MicroHobby_003.pdf

(14048 KB) Pobierz
o
1 1C O
41 R M
A
95 PT
AS.
Canarlas 105 plas
- osozrY
ems.% sA
EWA
ARNE
PED
IAGRABAR TUS
1
PROGRAMAS
A A C DEL
VN E
S.I.M.O. 84
A
VENTURA
E LAS
N
PIRAMIDES
UNDIA
E LAS
N
CARRERAS
D S U R C N,.44004
ECBE O
E SPECTRUM
L
TUPODERDE
TELEP TIA
A
irtriF:rjr
UTILIDADES
D PROGRA
MACION
E
ZX Spectrum +
(64K)
Para los que exigen +
DireciorEditorial
José I. Górnet•Centuridn
I
P
DirectorEjecutivo
Domingo Gómez
RedactorJefe
Africa Pérez Tolosa
Jesús Iniesta
Maquela
Rosa M Capitel
14ICROEMEEW 1
A oI • N. 3 • 13 al 19 denoviembrede 1984
n
95ptas. (SobretasaCanarias 10 0 0
Diseno
E TS M N
SA E A A
'
1
Redacción
Jost Maria Diaz
Gabriel Nieto
•
TRUCOS.
Aprovechamiento de la variable .SEED.. Scroll de pantalla. Simulación de la
sentencia ,,ON GOTO..
Colaboradores
JesúsAlonso.LorenzoCebeira.
Primitivo de Francisco. Rafael
Prades, Victor Prieto
Javier Martinez
I
•
P O R M SMC O O B .
RGA A IRHBY
Ayentura en las Pirámides. Percepcion extrasensoria. Un d'a en las carreras.
Fologralia
Dibujos
IFCOMENT OSDEP O R M S
ARI
R GA A.
Siete de los mejores programas del momento son comentados en este numen;
r r - B A S I C . Tercera parle de este coleccionable
2 2 I N I C I A C I O M Segunda parte del Color en el Spectrum: dibujando en color.
Jose M, Fbnce. Fernando Hoyos,
Manuel Berrocal, J.M. Ballesteros
Edita
H B YPRESS. SA
OB
Presidente
Maria Andnno
José LGOn'iez•Centusion
111PROGRAMAS DELECTORES
Ofrecernosesta semanadosprogramas:
itCopyline. y .Aritmémori..
ConsejeroDelegado
Ernesto Marco
Administrado(General
Jefede Publicidad
Marisa Esteban
Secretaria de Publicidad
Concba Guilerrez
1 1Avance del SIMO
1
•
E N C U E S T A . Sacamos el Spectrum Plus a la calle.
• CONSULTORIO.
e eion .••• o n . m e a i,mymegas a= •
n
m
1
PublicidadBarcelona
Isidro Iglesias
1.)3071 13
9
3 1
Secretaria de Dirección
Marisa Cogorro
M. Rosa Gonzalez
M. del Mar Calzada
Suscripciones
Redacción,Administración
yPublicidad
Arzobispo Morcillo, 24, oficina 4.
28029 Madrid
Tell.: 733 50 12
SIN Q I R T CE R U
O U EE L A S S
E
MR H B VOG A A O U T D
C O O BL S R B P R S E :
I
CADAMES
PONDREMOS
ASU DISPOSICION
UNACINTA
CONTODOS
L SPROGRAMAS
O
PUBLICADOS
E LOS
N
CUA
TRO
NUMEROS
D DICHO MES.
E
La primera cinta contendrá los
programas publicados en l o s
números del 1 a l 4 inclusive; la
segunda, l o s publicados en l o s
números del 5 al a y así
sucesivamente.
El precio especial de esta cinta
es de 550 ptas., m á s 75
pesetas por gastos de envio
por correo certificado a su
domicilio,
Disiribución
Coeclis. S.A. Valencia. 245.
Barcelona.
Rotedc. S.A.
Imprime
Fotocomposición
Consulgral
NicolásMorales, 34 • e
T 471 29 08
el.:
Folomecinica
Zescan
Nicolas Morales, 38
T . 472 38 58
el.'
DepositoLegal:
M-36.5981984
RepresentanteparaArgentina,
Chile Uruguay y Paraguay, Cia.
Americana de Ediciones, SRL,
Sud América, 1.532. Telf,'. 21 24 64.
SI VD. ESTAINTERESADO EN
RECIBIRLA, ESCRIBA A
HOBBYPRESS. S.A..
AP ADO 54062 DE MADRID,
ART
INDICANDO CLARAMENTE
QUEMES COMPLETO DE
PROGRAMASDESEARECIBIR
ENCINTA E INCLUYENDO EN
ELSOBRE UN TALON
NOMINAL A NOMBRE DE
HOBBYPRESS. S.A., POR
V
ALOR DE 625 PTAS., O SI LO
PREFIERE, EL RESGUARDO
DELGIRO POSTAL A TRAVES
DELCUAL HA EFECTUADO SU
P
AGO.
1209BUENOSAIRES¡Argentina).
D r c o Exclusivos
ee h s
Users.,
Programs. y .Sinclair Projects. de
EMAP Publications (Londres).
MICROHOBBY no se hace
necesariamente solidaria de las
opin.ones vertidas por sus
colaboradores en los articulos
firmados. Reservados todos los
derechos.
Se solicitará control
¡ELIJALAFORMULA
QUEMAS
LECONVENGA!
Cualquier consulta puede
realizarla llamando a los tela:
733 50 12 - 733 50 16
OO
J
MICROHOBBY 3
ftwar
r c pagadrolii
oa
u
o 411
,1
;
SIMULA
r OE VUELO
SPECTRUM 481(
((omen_
so t w a r e If ¡see
ii
iii P I D E L O S E N T U T I E N D A !!!
TRUcvs2
AR VC A E T
P O E H M NO
I
D L V RA L S E
EAA I B E E D
Son muchas las ocasio-
nes en las que, por necesi-
dad d e programación, s e
nos plantea el problema de
tener que introducir un de-
terminado valor en una di-
rección de memoria. Siem-
pre que el valor sea mayor
de 255, habrá que tener en
cuenta que va a estar com-
puesto de dos octetos, de
los cuales el primero va a
ser el menos significativo
(aunque e s t o n o parezca
muy lógico).
Veamos u n ejemplo: s i
queremos introducir el nú-
mero 1 0 0 0 en la dirección
de memoria 64500. pode-
mos consultar el capitulo 25
del manual, en el que se nos
habla de las variables del
sistema. A l l í encontramos
una fórmula:
POKE N , — 256 INT
(V/256)
POKE N + 1, INT (V1256)
Con ella es posible alma-
cenar en la dirección antes
citada los valores 232 y 3 co-
rrespondientes a l o s octe-
tos más significativo y me-
nos, respectivamente. La so-
lución e s buena, pero l a
fórmula puede resultar un
poco engorrosa si la utiliza-
mos muchas veces.
Otra solución más rápida
está relacionada directa-
mente con l a variable del
sistema SEED, que es la que
contiene el origen para RND.
Es la variable que se fija me-
diante la función RANDOMI-
ZE. Las direcciones donde
se encuentra almacenada
esta variable son la 23670
la 23671. Si introducimos la
siguiente instrucción RAN D-
MIZE 1 0 0 0 , almacenare-
mos en la primera dirección
de la variable SEED el octe-
to menos significativo (232),
y en la segunda, el más sig-
nificativo (3), Por tanto, bas-
tará c o n introducir l a s i -
guiente línea PRINT PEEK
23670, PEEK 23671 y ten-
dremos en pantalla los valo-
res antes citados, los cua-
les se introducen más tarde
con los POKES correspon-
dientes,
t r, f t les%•••
r e r, n d e
t
i
A
M
'
todo esto consistiría en in-
troducir directamente en los
POKES correspondientes
los valores PEEK. Para con-
seguirlo, utilize el siguiente
programa:
10 IMPUT N: RANDOMI-
ZE N
20 POKE 64500, PEEK
23670
30 POKE 64501, PEEK
23671
40 GOTO 10
donde vamos a bifurcar de-
ben poseer u n a SEPARA-
CION CONSTANTE.
Aunque se puede objetar
que esto no es más que la
resolución de un caso par-
ticular, debemos hacer notar
que el método siempre es el
mismo, es decir, hallar un al-
goritmo que se ajuste a los
números de sentencia a los
que querernos bifurcar.
que en la jerga informática
se conoce como SCROLL
de pantalla, es decir, todo
aquello que se encuentra en
el display de nuestro moni-
tor o televisor se mueve una
linea hacia arriba, proceso
análogo al que realizamos al
terminar un renglón y mover
el carro en una máquina de
escribir.
El truco está en IMPRI-
S U A I ND
I LC E
M
O
LS N E C
AE T N I
A
"OL,G T "
OO
La sentencia g o t o "
permite bifurcar una serie de
lineas de programa depen-
diendo del valor de una de-
terminada v a r i a b l e , p o r
ejemplo:
ON X GOTO 1 0 0 , 2 0 0 ,
300, 4 0 0
Si X es igual a cero o X es
mayor que cuatro, la senten-
cia se ingnora y se ejecuta
la siguiente. Si la variable X
está dentro del rango 1-4, el
programa bifurcará correcta-
mente (X = 1 goto 1 0 0 . X
= 2 goto 2 0 0 , etc.).
Aunque e l B A S I C d e l
SPECTRUM no posee este
comando, su simulación es
bastante sencilla; una de las
maneras de hacerlo seria la
siguiente:
SR L
C OL
D P NA L
EA T L A
Uno de los problemas con
los que más a menudo nos
encontramos en todo tipo de
aplicaciones, bien sean jue-
gos o programas de utilidad,
es la presentación en panta-
lla de los resultados.
Indudablemente existen
para este problema multitud
de soluciones incluso e n
BASIC, pero la que nosotros
sugerimos n o s parece l a
más simple, recurriendo, eso
si, al código máquina
En la ROM (READ ONLY
MEMORY, memoria de sólo
lectura), existe un complejo
programa encargado de ges-
tionar multitud d e tareas
esenciales para el funciona-
miento del ordenador que,
normalmente, n o s p a s a n
inadvertidas: pues bien, di-
cho programa se compone
en general, d e subrutinas
que se llaman unas a otras
y nosotros, aprovechándo-
nos del trabajo de la casa
SINCLAIR vamos a emplear
una de ellas que comienza
en la dirección 3190.
Petn I n r i itinn r p A l i 7 n l c
10 REM • •• ON G O T O
DEMO. • • •
20 L E T X = ( 1 A N D
CONDICION-1-CIERTA) + (2
AND CONDICION-2-CIERTA)
+ ( 3 A N D CONDICION-3-
CIERTA) + (4 AND CONDI-
CION-4-CIERTA)
30 IF X = 0 THEN GO-
TO 60
40 Garo vio()
50 REM • • • END DEMO.
60 REM • • • RESTO DEL
PROGRAMA
Para el caso de subruti-
nas, sustituir la linea 40 por:
40 GOSUB X • 1 0 0
Las limitaciones de esta
forma particular de resolver
el problema, son:
A: N o puede haber dos
CONDICIONES SIMULTA-
NEAMENTE CIERTAS.
IZt• I
. I l nn n a s nd e nre-srir n r k
i e e
r n
MIR EN LA ULTIMA LINEA
DE LA PANTALLA mediante
un "print a t 21,0:" l o que
sea " " y luego llamar a la
subrutina, b i e n mediante
"RANDOMIZE USR 3190" o
asignando a u n a variable
cualquiera e s t e n ú m e r o
''LET NOIMPORTA = LISA
3190'.
Cualquiera d e l a s d o s
sentencias antedichas bas-
tará para que nuestra rutina
se ejecute.
Para aclarar ideas, teclee
el siguiente programa de de-
mostración por favor:
10 R E M • * * * SCROLL
DEMO****
20 PRINT AT 21,0:" ESTE
PROGRAMA ES"
30 LET A = USA 3190
40 PRINT AT 21.0:"UNA
DEMOSTRACION"
50 R A N D O M I Z E U S R
3190
60 PRINT AT 21.0:"DE
SCROLL LINEA A LINEA"
70 LET A = USA 3190
80 PRINT AT 21.0
En este espacio tambien tienen ca-
bida los trucos que nuestros ledo.
res quieran proponer.
Para ello, no tienen más que enviar-
los p o r correo a MICROH088Y.
CiArzobispo Morcillo, 24, ol. 3 y 4.
Madrid-28029.
o oienedifil,•nr
MICROHOBBY 5

Plik z chomika:

Inne pliki z tego folderu:

Inne foldery tego chomika:

Zgłoś jeśli naruszono regulamin