MicroHobby_007.pdf

(14714 KB) Pobierz
1
141CROM
95 PT
AS.
Canarias 105 plas.
= =6_1Si
PROGRAMAS
SAL ODEDAMA
T
r LACHARCA
MISION
IMPOSIBLE
C M CREAR
O O
UNPROGRAMA
R
IPASO AP
ASO
E DISCO:
L
LAAL
TERNA A
TIV
PROFESIONAL
P
ARATU
SPECTRUM
EXCLUSIVA
E MAP
L
A
COMPLET
O
YA
• TODO
C L R diL
OO
D L I:MI6
E
JEO
UG
[SAIMAZOOK
Spectrum puede con todos.
¿Quién nos gana en
gama? Estamos por
asegurar que ninguno.
No olvides que tenemos un
Spectrum poro cada
exigencia: (tos capacidades
diferentes (16K y 48K) y
tres modelos con dos tipos
de teclado (doméstico y
profesional)
cuenta con más de 5.000
fitulos publicados a nivel
internacional, cien de ellos
están traducidos al
castellana
Naturalmente estos crecen
casi de forma constante.
Una buena muestra es el
voluminoso catálogo de
software que puedes
solicitar o tu distribuidor de
confianza.
¿Quién nos gana en
programas? Spectrum
¿Quién nos gana en
periféricos? Ya son más de
50 los periféricos creados
especialmente poro el
Spectrum, pero no creas
que eso termina ahí. Es
¿Quién nos supera en
muy raro el da que no
aparece en el mercado una
novedad. Así tu Spectrum
guardará paro ti el mismo
interés del primer día
número? Otro factor a tener
en cuenta te diremos que
ya son más de tres
millones los
microordenadores Sinclair
vendidos en todo el mundo
(y mas de 100.000
Spectrum vendidos en
España) ¿no te parece esto
una buena razón para
confiar en tu Spectrum?.
Decídete este ano tener un
Spectrum es todo un regalo.
Los concesionarios
INVESTRONICAtienen paro ti
un montón de novedades.
• De venta en la Red de Concesionarios
INVESTRONICA.
'•
• - 4 . - 6 4 1 0 . r o &
SINCIAIR RESEARCH LIMITED hace constar que no está en condiciones de garontzar el origen y calidad de
aquellos productos que no hayan sido cornerciolizados en España o través de su distribuidor exclusivo INVESTRONICA so.
Director Editorial
José I. Gómez-Centurión
Director Ejecutivo
Domingo Gómez
Redactor Jefe
Africa Pérez Tolosa
Diseno
Jesús Iniesla
Maqueta
Rosa PI Capitel
Redacción
Jose Maria Diaz
Gabnet Nielo
1MICR
o
1
-
1
1
1
• • 4110 4iffb E l e 4ED 4MO
I M I
EAM l i i n • 4 I R D
ftiM
CEO ONIP 1 E 1 411Mit
Ario I • N, 7 • la al 24 de diciembre de 1984
95pies. (SobrotaseCanarias 10 ptas.)
T R U C O S . Cóctel de trucos. Cambiar los atributoS de pantalla.
Colaboradores
JesúsAlonso Lorenzo Cebeia.
Primitivo de Francisco Rafael
Pracles, Victor Prieto
Fologralia
Javier Martinez
N O V E D A D E S E l DISCO: la alternativa profesional para tu Spectrum
y La Charca. Salto de dama. Las judias
saltarinas.
I
I
PROGRAMAS MICROHOBB
NUEVO.
Comentarios de programas
Pollada
José Maria Ponce
Dibujos
FernandoHoyos. Manuel Barroca!,
J.R. Ballesteros, A, Petera, EL.
Frontan, J, Septien
Edita
H B YPRESS. &A.
OB
Presidente
Maria Andrino
José I. Gómez:Centurión
B A S I C . E n este número se trata sobre la elaboración de programas.
pm PROGRAMASLECTORES.
Lamudanza de las hormigas. Letragorda. Misión
imposible. Funciones trigonométricas.
Consejero Delegado
Ernesto Marco
T r md e g e n o
esaventuras.
i
s el a
1 1 i E X C L U S I V A . ticos a N AgM s 2un
M S ua yhfaarsratnatep ga s a o u a n d transportará ex6
p i l r A,
O
e
C O N C U R S O . Mastermind Mas información sobre esta gran competición.
Administrador General
Jefe de Publicidad
Marisa Esteban
Secretaria de Publicidad
Concha Gutiérrez
Publicidad Barcelona
T .: t93i 3071 13
el
1
Secretaria de Dirección
MansaCogorro
Suscripciones
M. Posa Gonzalez
M' del Mar Calzada
Isidro Iglesias
CONSULTORIO/DE OCASION/CORREO.
0 1 .
4W"
giMP (11=10 NMIP 4 1 E D 411=IP f i l M M e . O R O 111•11
1
OFERTA EXCEPCIONAL DE SUSCRIPCION, VALIDA SOLO HASTA EL 30 DE ENERO DE 1985
Redacción,Administración
yPublicidad
Arzobispo Morcillo, 24, oficina 4.
28029Madrid
T 733 50 12
ell.-
Distribución
Coedis, SA. Valencia, 245.
Barcelona
Imprime
Rotedic. SA
Folocomposicion
Consulgraf
Nicolás Morales. 34.
T 471 29 08
el.:
Foloinecimica
Zescan
Nicolás Morales, 38
T 472 38 58
el.:
Deposito Legal:
N1,38598-1984
Representante para Argentina.
Chile, Uruguay y Paraguay Cia.
,
Americana de Ediciones. S.R.L.
SudAmérica,1.512_Tell.: 21 24 64.
1209BUENOSAIRES (Argentina),
DerechosExclusivos
Users., *Sinclair
Programs* y *Sinclair Projects. de
E A Publications (Londres).
MP
MICROHOBBYno se hace
necesariamente solidaria de las
opiniones vertidas por sus
colaboradores en los articulos
firmados. Reservados todos los
derechos.
Sesolicitara control
OJD
Ii
MICROHOBBYSEMANAL,AHORA
ASUA C N ELLENODEV N A A
LAC/
E TJ S
AHORRE 850 PTAS. SOBRE EL PRECIO
REGULAR DE SUSCRIPCION jitIN
DE DESCUENTO»
1
r P7EFIOIA7A—V17
1
L,"91 Ajj
1_
I 3 900
PTAS
— ••
CONSIGA UN REGALO SEGURO.
Gratis para usted uno do estas
tres cintas de programas, cuyo
precio en lo calle es de 2.000 PTAS.
¡ELIJA IA (DUE QUITRA,'
oAHORRO 830 PlAS
PARTICIPE EN VALIOSOS SORTEOS. Cada mes, durante el penado de validad de esto oferto,
sortearemos entre todos los cupones de suscripción recibidos UN ORDENADOR Of Y TRES
MICRODRI VES CON SU INTERFACE;
4 premias valoradas en más da 2 6 0 . 0 0 0 PTAS.
¡CUANTO ANTES RESPONDA MAYORES SEPAN SUS OPORTUNIDADES DE GANAR!!
é
e 41
7 6 •7 »
• - 4
, • •
g i r
4
.1k 4 1 d i dB e
'-••••
-a.,a•
1 0
4
q m .
4
_
4
4
DEVUELVANOS SU TARJETA DE
SUSCRIPCION AHORRO HOY
MISMO Y PARTICIPE YA EN EL
SEGUNDO SORTEO QUE TENDRA
LUGAR ANTE NOTARIO DURANTE
LA SEGUNDA SEMANA DE ENERO
DE l985
SI LO DESEA, SOLICITE SU
SUSCRIPCION POR
TELEFONO.
MICROROBBY 3
N U E V O S
EN TRIlLNIMILN TU
P R E C I O S VA L I D O S A PARTIR
DEL 1 DICIEMBRE 1 9 8 4
FAilAON
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENT RE TE NI M'EN I
ENT RETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENIIIETENiMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENT RETEN! MIE N TO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
CAI,J6
CL002
01001
00002
01003
01004
O K005
OK007
OK009
OK011
CUBOS
FIGHTER PILOT
NIGHT GUNNER
TOMA HAWK
IT RACER
3 0 TANX
DICTATOR
SPAWN OF EVIL
FRUIT MACHINE
OK014
OK015
DK017
01031
OK021
OK048
OK025
DUDO 1
GEM51
GEMS2
1M001
04003
IM004
IM005
IM008
1000
i M00/3
I M009
iMfllO
ROAD TOAD
GOLD MINE
HARO CHEESE
MAZIACS
SPEED DUEL
ZIG ZAG
GOLF
COMBAT LYNX
PICKPOCKET
REACTOR
ARCADIA
MOLAR MAUL
JUMPING JACK
ZIP ZAP
ZZOOM
STONKERS
ALCHEMIST
PEDRO
CSOMIC CRUISER
AC BILL
lion12
M 0008
MI001
OCP01
SPACE SHUTTLE
MISSION I tEspar1oll
CHESS THE TuRK/AJEDREZ
1
18 0 0
10 9 5
I 695
1895
1895
1.495
1.495
1 495
I 495
1 495
1 495
1495
1495
1 495
1 495
1495
2.495
1495
1 495
1495
1.495
1.495
1 495
1 495
14 9 5
1495
1495
1.495
1.495
1800
2100
2.500
TIPO PROGRAMA
ENTRETENIMIENTO
ENTRETENIMIENTO
MODELO
PR1 002
NOMBH1
AIRLINER
1
P
,
V
6
9
P
5
pR1012
0TC726
OTC7213
OTC729
VSG002
HUNTER KILLER
FULL THROTTLE
BRAX BLUFF1
JASPER'
1
BEACH ME AD
2 1 : 6 2 9 5 5 0
.
8
9
5
8
9
5
2
5
0
0
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
ENTRETENIMIENTO
GESTION
GESTIDN
GESTION
VS001
cCu:
GEEryi%
D
GEM04
TORNADO LL
1
,
5
9
5
CONTABILIDAD ESP 4 . 8 0 0
200(1
0EstioN EFECTOS
BASE OE DATOS
4 1 3 0 0
DIRECCIONES
CUENTAS COMERC
CONTROL STOCKS
4
4
800
800
48 0 °
4 8 0C
4,800
7.200
GESTION
GESTION
GESTION
GESTIDN
GESTION
GESTION
GEsTION
EDUCATIVO
GGmA 07
GE p0874:19
I M65
OCP02
rR N FTC G E S ARO T
o A NT H OO: PL L
R I
EDUCATIVO
EDUCATIVO
EDUCATIVO
EDUCATIVO
EDUCATIVO
C AR K
CA OI
;
CAR03
CAR04
CAROS
CL004
CL005
OK002
AORESS MANAGER
POLINOMIOS
2
,
5
5
:
0
0
GEOMETRIA ELEMENTAL
MATRICES Y SISTEMAS
ANALITICA
2
CIENCIAS NATURALES
ARiTMETICA
1
5
0 10
EDUCATIVO
EDUCATIVO
EDUCATIVO
EDUCATIVO
EDUCATIVO
EDUCATIVO
ACCESORIO
01(010
OCP134
OCPOS
OCP07
05000
00 C53
0M11e
2000
0
0
2.500
Zx DESIGNER
DESENSAMBLADOR• OISTRON 2 , 0 0 0
3000
ENSAMBLADOR . ASTRON
MASTER TOOL
3
.
0
0
0
3.00o
E l l a SCREEN
MACHINE CODE TEST
3.00o
MAL ETIN
5
9
9
5
Todos n u e s t r o s p r o g r a m a s son onginales.
diseñados p o r n o s o t r o s o i m p o r t a d o s legalmente,
ab a n a l o g
Santa Cruz de Marcenado, 31
28015-MADRID Tel, 2 4 8 82 13
Telex: 44561 B A B C E
no "pirateados", distribuidos por:
PROGRAMAS 2
iiFantastica simulación de batalla aire-tierra!!
Con el soporte técnico de Westland
Flelicopters
Es un programa original, importado
legalmente y distribuido p o r
DOS PROGRAMAS SELECCIONADOS
DE NUESTRA LISTA NORMAL DE
TnTuLos (ALCHEMIST, 3D TAN)Ç
MAZIACS, ) PRESENTADOS EN
UN ATRACTIVO EXPOSITOR
P.V.P. 1 . 9 9 5 Ptas.
Programas originales, importados
legalmente y distribuidos por
abc analog
Santa Cruz de Marcenado, 31
28015-MADRID Tel 248 82 13
Telex: 44561 BABC E
abc analog
Santa Cruz de Marcenado, 31
28015-MADRID Tel. 248 82 13
dloTelex: 44561 BABC E
aort
Esc
TUO
RC
COCTEL
DETRUCOS
Sin duda, nuestros lectores
recordarán un truco publicado
en el número anterior que nos
permitía proteger nuestro pro-
gramas de miradas curiosa&
inhabilitando las dos lineas in-
teriores de la pantalla emplea-
das por la máquina para men-
sajes de error. etc. Propone-
mos aquí un método alternati-
vo que consideramos muy útil,
dado que es muy dificil, por no
decir imposible, «reventar» un
programa protegido de esta
forma.
El asunto está en impedir el
funcionamiento d e l a tecla
«BREAK» especificamente de
forma que cualquier intento de
detener el programa conlleva-
rá la destrucción del mismo.
Para ello, nos aprovechamos
de que al pulsar esta techa, el
ordenador necesita saber en
contenido de determinadas po-
siciones de memoria: si cam-
biamos estas posiciones y le
«mandamos» a otro sitio, suce-
derá el «system crash» que
queremos.
El programa listado más
abajo realiza el trabajo y debe-
ría funcionar indistintamente
en 16 K y 48 K• con o sin In-
terface 1 e, incluso, si al orde-
nador están conectador perifé-
ricos que empleen memoria
RAM para inicializarse como
algunas interfaces de impreso-
ra
Hemos aprovechado tam-
bién. para incluir en el progra-
ma algunas técnicas que,
aparte de su utilidad, pueden
considerarse dentro del apar-
tado trucos.
Vamos pues a analizar el lis-
tado detenidamente para tratar
de averiguar cómo y por qué
funciona_
Lineas 20-30:
Lo primero que hay que ha-
cer, es fijar el RAMTOP del sis-
tema, es decir. la ultima posi-
ción de memoria RAM utiliza-
ble inmediatamente antes de
la zona de gráficos definibles
por el usuario.
La primera pregunta seria,
por qué emplearnos DEF FN
en lugar de la sentencia LET
mucho más obvia: la razón es-
triba en que el resultado de la
función 10 empleamos en la
linea 4 0 después de haber
ejecutado u n a sentencia
CLEAR. la cual desgraciada-
mente, borra las variables, así
que el ordenador no sabria
que le estamos hablando en la
línea 4 0 (el ominoso VARIA-
BLE NOT FOUND,,,),
Linea 40'
Aquí empleamos una técni-
ca bastante curiosa que permi-
te examinar la manera en que
la máquina evalúa una «expre-
sión lógica». dando un resulta-
do de verdadero (1) o falso (0)
pretendemos asignar a la va
riable HPILA el valor de la va-
riable LPILA + 1: como co-
mentaremos m á s adelante.
INKEYS efectivamente conten-
(Ira la cadena vacía cuando se
ejecute el programa, así que la
expresión es cierta y por tan-
to vale t La utilidad de este ti-
po de truco es muy grande, ya
que por ejemplo, nos permite
bifurcar a varias lineas según
que tecla hayamos pulsado.
Linea 60:
Inhabilita la tecla «BREAK».
Línea 90:
Restaura la tecla «BREAK»
colocando los valores origina-
les en las posiciones de me-
moria adecuadas.
Línea 110:
Esto es una llamada a una
subrutina de la memoria ROM
que permite terminar un pro-
grama de una manera bastan-
te inusitada deomos al lector
que se sorprenda agradable-
mente.
Para ver cómo funciona el
programa, sugerimos que se
incluya una linea como la si-
guiente:
65 G O T O 6 5 +
(INKEY$=tia»)_
La pantalla permanecerá en
blanco hasta que se pulse la
«a» minúscula: s i pulsamos
«BREAK» se destruirá. Recor-
demos que a l hacer RUN.
INKEVS contiene la cadena
vacía puesto que no la hemos
utilizado para nada, por lo que
la expresión de la línea 40 va-
le 1
En fin, una vez expuesta la
idea, no dudamos que el inge-
nio de nuestros lectores hará
el resto
bailamos en las DATAS el va-
lor de 41 por 616=(0 .8)+61
De paso. hemos incluido
unos pocos bytes más que co-
locan el borde del mismo co-
lor del papel. empleando la ins-
trucción RRCA con objeto de
mover el número que repre-
senta el papel a los bits 0, 1
y 2 del acumulador Acto segui-
do, mediante l a instrucción
OUT (C), A cuyo equivalente ya
vimos en un truco BASIC, con
CAMBIAR
LOSATRIBUTOS
DELAPANTALLA
:.•cnemos una corta ruti-
na en código máquina que nos
permite cambiar instantánea-
mente el color del borde, papel
y tinta a los valores que elija-
mos: la rutina se presenta en
forma «artesanal», e s decir,
10
AD X :
15
20
100
1,255,2,237,176,141254,ti52,41,15,
15,15237,121,201
10 R E M * 4 . * F I
20 D E F F N R ( )
EEK 2 3 7 7 1
30 C L E A R F N R
40 L E T L P I L R =
LA=LPILA+(INKEY
SO R E M * * * I N
"BREAK" * * *
60 P O K E L P I L A
70 REM * * * R E
***
50 REM * * * R E
FOR N=40260 TO 40960+22 R E
POKE N,X: NEXT N
L I S T
RANDOMIZE LI5R 4 0 E 0
DATA 3 3 1 0 , 8 5 , 5 4 , 4 1 . 1 7 , 1 , 8 8 ,
JR E L R R M TO P * * *
=PEEK 2 3 7 3 0 + 2 5 5 * P
FN R ( ) - 3 : L E T H P I
S=-")
H A e I L I TA L A TECLA
,0: P O K E H P I L A , 0
STO D E L P R O G R A M A
: TA L P R - B R E A K -
* *
90 POKE L P I L R
100 REM * * * " C ,
**
1 1 0 P f = a - Z - O r l I Z E LISP 4 7 1 0
apEriT, PTWA1,-?
hay que construir el valor del
byte de color y luego introdu-
cirlo mediante POKE o bien
cambiar el valor en las DATAS.
Si se observa el listado del
programa se verá que el núme-
ro 41 se repite 2 veces: éste es
el byte de color que indica pa-
pel 5 (cyan) y tinta 1 (blue).
El byte se construye multi-
plicando el valor del papel por
8 y sumándole l a t i n t a
(41=(5.8)+11
Por ejemplo, para poner pa-
pel negro y tinta amarilla, cam-
seguimos el efecto deseado
Los colores no quedan fija-
dos de forma permanente. asi
que si imprimimos algunos ca-
racteres después, sin indica
ción explícita de papel y tinta;
aparecerán con los atributos
que el ordenador conserve por
detecto
En este espacio tambien tienen ca-
bida los trucos que nuestros lecto-
res quieran proponer.
Para ello, no tienen más que enviar-
los p o r c o r r e o a MICROHOBBY,
CiArzobispo Morcillo, 24, of. 3 y 4,
Madrid-28029.
MICROHOBBY 5
Zgłoś jeśli naruszono regulamin