MicroHobby 021
MicroHobby 021
° 2 1
95 PTAS.
EL» TA
HUBBY
p«sa SA
KUNG-FU:
PARA PRACTICAR
ARTES MARCIALES
ENTUSPECTRUM
HARDWARE
CONSTRUYE
TU PROPIO
jomen
PROGRAMAS
v
BLACK JACK -
FROGGER i
EL GORILA
BASIC
COMO
OBTENER
EFECTOS
ALEATORIOS
;;QUIERE PREMIARTE!!
entice Lee
DUilll *J(IW\J«
*mm CDMBAT
tYWX ,
tesa
i V t . 25 *'
i
É'l 1A |
SCREEN
MACHINE
S W ^Atoicte^
P I D E E S T O S PROGRAMAS A ERRE,
SA1VTA ENGRACIA 17, 6.*» - 2 8 0 1 0 MADRID,
TFNOS: ( f í l ) 4 4 5 0 0 fil y 4 4 5 0 4 3 6 O EN LAS M E J O R E S
T I E N D A S DE INFORMATICA.
NO LO OLVIDES, P I D E LOS J U E G O S ERRE... P U E D E S
SER UNO DE LOS GANADORES.
AcTVIsiOX SERVIMOS A T I E N D A S Y ALMACENES
MICRO
Director Editorial
José l Gome?-Centu»on
Director Ejecutivo
Domingo Gome,?
Subdirector
Gabrtel Nieto
Redactor J e f e
Alfica Perez Tolosa
Diseño
Jesús Irnesta
Maqueta A n o II. N.° 21. Del 2 6 d e m a r z o a l 1 d e abril d e 1 9 8 5
Rosa Mana Capitel 9 5 ptas. ( S o b r e t a s a C a n a r i a s 10 ptas,)
Redacción
José Mana Día/. Miguel
Sepulveda, Migue) Angel Hi|t>sa, MICROPANORAMA
3Í TRUCOS Como ° l Efecto sonoro. A ladrón, ladrón y medio. Scroli
Feo. Javier Martín
u n rel
Colaboradores
Jesús Alonso. Lorenzo Cebeira. simplificado. Superponer sonidos.
Primitivo de Francisco,
Rafael Prades
Fotografía PROGRAMAS MICROHOBBY. p" [HJrr, MC
Javier Martínez. Carlos Cande!
Portada NUEVO 9 " ' espectacular combate oriental.
Kun fu un
HARDWARE
Pejo. J.M López Moreno
C o m o cons,ruifte
2 2 ' p a s ° a p a s ° - , u prop'ojoysnck
Edita
Primera parte.
HQBBY PRESS, S A
Presidente S O F T W A R E Segunda parle del articulo El Spectrum puede hablar»
Mafia Andiino
Consejero D e l e g a d o
José I. Gomez Cenlunon
Administrador General • PROGRAMAS DE LECTORES. ;..™ Es*
Ernesto Marco
Jefe d e Publicidad
Mansa Esteban
32 CONSULTORIO.
Secretaria d e Publicidad
Concha Gutierre/ m OCASION.
Publicidad Barcelona
Isidro Iglesias
Tel. . (93)307 I I 13
Secretaria d e Dirección
Mansa Cogorro
PREMIADOS HOBBY-SUERTE
Suscripciones
M • Rosa González
M ' del Mar Calzada
Redacción, Administración
y Publicidad
La Granta. n. 8
Polígono Industrial de Alcobendas ESTA SEMANA
Tel 654 32 11
Como todas las semanas, publicamos a continuación la relación de pre-
Dto. Circulación
Carlos Petopadre miados en el concurso HOBBY SUERTE:
Distribución
Coedis, S A Valencia. 245 S A N H A G O M U Ñ O Z DELGA C O N C H I T A SANCHEZ HER JOSE I G N A C I O PEREZ SALAS
Barcelona D O (CORDOBA) N A N D E Z (MADRID) IMALAGA!
Imprime Suscripción o Microhobby Semonol Cirwa de programas Goto de progromos
Rotedic. S A S A N T I A G O FRAILE RUBIO AGUSTIN B I A N C CASAS J U A N PABLO LOPEZ ESCOBAR
Carretera de Ifun, Km. 12,450 (OVIEDO) IBARCELONAI ISEVILLAI
leí 734 15 00 Suscripción (i Mirrohobby Semonol Cima de programas Cinta de programas
Fotocom posición
Espacio y Punió. S A D I O N I S I O C R U Z ROBA DANIEL M E t G A R PUENTE J U A N M A N U E L MAESTRE M O -
Paseo de la Castellana. 268 IALMERIA) IGIJON) RENTE IBARCELONAI
Fotomecánica Suscripción o M k lolmbtiy S<>m{inal Cirilo de [iroqrumas Cinta de programos _
Lasercolof DAVID POLLAN R A M O N SEBASTIAN GE A JIMENEZ
Alejandro Villegas. 31 1MADRIDI IBARCELONAI
Depósito Legal: Cinta de programo! Cinto de programas
M-36.S98-1984 SANTIAGO ARANGURÍ.N J O R G E ORIOL CARITA
Representante para Argentina. PASCUAL ( S A N SEBASTIAN) (GERONA)
Chile, Uruguay y Paraguay. Ciü Cinta tje proyromas Cinta d e programos
Americana de Ediciones, S.R.L. J U A N FELIX HERREROS G O N JOSEP V I C O M A R C H
Sud America 1 532. Tel.: 21 24 64, ZAlEZ (VIZCAYA) IBARCELONAI
1209 BtJFNOS AIRES (Argentina). Cinta de programas Cinta <íe programas
MICROHOBBY no se hace LUIS O S C A R PEREZ H E R N A N M A R C E L O VAHE T O R R A D O
necesariamente solidaria de las DEZ ( Z A R A G O Z A ! IBARCELONAI
opiniones vertidas por sus Cinlq de programos Cinto d e programas
colaboradores en tos artículos
JOSE M A S A S A N C H E Z A N T O N I O OLIVER P O l
fumados Reservados lodos los
(MADRID) (MALLORCA)
derechos.
Cirilo d e programas Cinio de programas
Solicitado control M . ' C A R M E N GALLARDO M A N U E L fLORES
OJO S A N C H E / IMADRIDI CABANA ILUGOI
Cinio de programas Cinto de progromos
MICROHOBBY 3
J k'
EL AMOR EN EL
ESPECTRUM
Una compañía inglesa, jugando con la
inseguridad emocional de la gente, ha lan-
zado un programa basado en un tema uni-
versal, el amor. El programa se llama The
Love Oracle (El Oráculo del Amor), y la
compañía en cuestión es Solar Publishing.
Está basado, al parecer, en una especie
de tratado chino sobre el tema, el antiguo
Chinese I-Ching. Nos podemos plantear
preguntas como ¿me ama mi pareja? ¿so-
mos compatibles? o <qué quiero de la vi-
da? Las respuestas a estas y a otras pregun
tas son realmente filosóficas y abierta* .1
toda clase de interpretaciones.
El paquete que incluye este programa
resulta bastante caro para lo que están
acostumbrados los ingleses, 14,95 libras
(unas 3.000 pts.). Eso sí, incluye además
un volumen llamado The 1-ChingOn Lo-
ve, escrito por Guy Damian-Knight.
MICROHOBBY 4
AVENTURAS
7
«CONTROLADAS»
Pensando en la complejidad
de los programas de aven-
turas, tan extendidos en
el mundo de los juegos
basic
para el Speclrum, Adven- P R O G R A M A C I O N DE
id - w ture Planner ha creado
¡f un librillo que nos per- MICROORDENADORES
mite planear, o mantener
un record permanente, en
cualquier juego de aven-
turas. En cada página,
L encontramos un sistema de
trazado que nos ayuda a
plamlicar la forma en la que
vamos a actuar durante el juego,
algo muy necesario si tenemos en
cuenta la importancia del control
de la situación en los programas
de aventuras. Hay más de 150 si-
tuaciones, ejemplos, indicacio-
nes y consejos, para lograr sa-
lir con éxito de cualquier jue-
go de este tipo.
Cuesta en Inglaterra 3,95 li-
bras (790 pts.), un precio
,\M' j n u y razonable. Lastima que
la mayoría de los juegos
BASIC
de aventuras sean Programación de ordenadores
ingleses, aunque
los que dominen Paraninio. A. C h e c r o u n . 1 1 2 p á g i n a s .
este idioma en-
contrarán en La aparición de un libro de Basic en el mercado,
él una esti- de un tiempo a esta parte se ha convertido en algo
mable de lo más normal del mundo. Paraninfo, es una
ayuda. editorial que ya tiene una marcada experiencia en
este campo, y ésta es una obra más dentro de su
linea de iniciación al Basic.
Al igual que en otras publicaciones de este tipo,
se siguen, paso a paso, los fundamentos básicos de
la programación para ordenadores, intentando ex-
EL SONIDO
plicar el papel que juegan cada uno de los elemen-
tos que integran el sistema informático.
Hn el prólogo del libro se recomienda al lector
que sea algo experimentado en este campo, que pa-
Cheetah MarKeting, la compañía que lanzó al
se directamente al capitulo 3 > 4, donde se ofrecen
mercado el joystick por control remoto para el unas nociones de programación más avanzadas,
Spectrum, ha fabricado otro accesorio. Se llama que son más propias de los sistemas de extensión
Mega-sound y hace que los efectos de sonido de Basic y los ficheros, un aspecto, este último, muy
tu Spectrum vengan del altavoz del aparato de importante para todo programador que se precie de
TV y no del mismo computador. serlo. l:n cuanto se refiere al capitulo de extensión
De esta forma, puedes controlar el volumen del Basic, se pasa revista a los aspectos más interesan-
sonido con el botón, que a tal efecto, hay en el tes del Basic Plus de DliC, empleado en ordenado-
res PDP de la serie 11. que funcionan con el siste-
televisor. Es el
ma operativo RSTS.
mismo proceso
1:1 capitulo 5. está dedicado integramente a pro-
que utiliza el blemas de aplicación y en él se estudian aspectos
Comodore 64 como métodos de clasificación, resolución de siste-
con tan bue- mas de ecuaciones lineales, problemas de cálculo,
nos resultados, programaciones numéricas, y algunas cosas más.
ya que recor- r:i libro es una traducción de una obra francesa,
demos que es- cuyo nombre original es «Basic Programmation
te ordenador des Microordinateurs», llevada a cabo por el profe-
es famoso por sor universitario J. Sanchis y editado en Francia
por la editorial Bordas.
su magnífico
sonido.
MICROHOBBY 5
COmPUTIDUE
comprar tu ^pcctrum
te wyaikmte
Basic
CURSO ninos
introducción
BASIC
Y
además
6
programas
••mpirnauE Embajadores, 90
28012 Madrid
Abrimos sábados por la tarde Tfna 2270980
TRUCOS
COMO UN La posición 23672 cuenta De igual modo, la tercera SCROLL
los cincuenteavos de se- de las posiciones, la 23674,
RELOJ gundo y, como el mayor nú- cuenta el número de veces SIMPLIFICADO
mero que puede contener que la anterior posición ha
Luis García Lleo nos man- una única posición es 255, vuelto de nuevo a cero, lo Rafael Mellado Fernández
da un truco de gran utilidad aquélla cuenta 255 cin- que significa que cuenta en nos ha enviado un truco pa-
en el que se mencionan los cuenteavos de segundo, unidades de 256*256 cin- ra hacer SCROLL simplifi-
comandos POKE y PEEK. volviendo después a cero. cuenteavos de segundo. cando la sentencia POKE
23692,255.
Consiste en introducir en
una sentencia seguida de
un PRINT, la cantidad de «*»
o especie de comilia que se
encuentra en la tecla con el
núm. 7, tantas veces como
se quiera subir la pantalla.
Para aquellos despista-
dos que se olviden de incluir
la sentencia POKE, no tie-
nen más que recurrir a este
truco para solventarlo.
Otra de las ventajas que
aporta este sistema es que
se puede subir la imagen o
la linea tantas veces como
se quiera, mientras que en la
sentencia POKE 23692,255.
el SCROLL se produce en
toda la pantalla.
<
tt
SUPERPONER
SONIDOS
£
<
Con ellos podremos obte- La segunda posición, la Igualmente, puedes poner el Con este truco que nos ha
ner el reloj que posee el 23673, cuenta las veces que reloj en hora utilizando el mandado José A. Val Gar-
Spectrum, realizando el si- la primera posición ha pa- comando POKE. Si quieres cía. podrás superponer so-
guiente programa: sado a cero de nuevo, es ponerlo a cero, por ejemplo, nidos en tu Spectrum.
(65536 • PEEK 23674 + decir, contará en unidades tendrás que emplear POKE El funcionamiento es muy
256 • PEEK 23673 + PEEK de 256 cincuenteavos de 23674,0: POKE 23673,0 : sencillo, y el efecto se con-
23672)/50 segundo. POKE 23672,0. sigue mediante varios bu-
cles que comienzan en las
líneas 10, 11 y 12.
EFECTO SONORO A LADRON, LADRON Y MEDIO En la linea 20 está la clave
Joaquín Mateos Lagos del programa y podemos
Si en vuestro video-juego 15 segundos de la carga,
nos ha escrito para decir modificarla consiguiendo
queréis incluir un buen interrumpirla pulsando
efecto sonoro, una rutina en que el truco «Las siete lla- buenos efectos, de la si-
BREAK y teclear el siguiente
código máquina os servirá, ves», publicado en el núme- guiente forma:
programa:
según nos ha escrito Leo- a) Cargar lineas 11 y 22.
poldo Fuentes Mufioz. b) Poner, en el FOR de la
Para ello, se activa con 10 FQR n=£*e>0e TO 30OGO
linea 12, un número entre 1
RANDOMIZE USR 32400.
2 0 I F PEEK n > 3 1 T H E N P R I N T CMR
(PEEK n ) ,
y 20.
3 0 I F PEEK f i < 3 2 T H E N P R I N T " • c) Sustituir la última le-
4.0 I I E X T n tra de la línea 20 por:
TO 52*23 - d - d+b
ro 16 de nuestra revista, es Esto permitirá ver clara- - d+d - d+c
jtf cent t eoi-e i. * - d+c
fácilmente soslayable. La mente cual es la clave que
-.08 J;.2ÍS> J4.JJJ.2O; solución que nos da es la de debe ser introducida. A con-
En este espacio también tienen ca- cargar el programa que ha tinuación, simplemente car-
bida tos trucos que nuestros lecto- sido salvado en forma de gar bien el programa y, 10 FOR b»0 TO SO
res quieran proponer. SO FOR C>=0 TO 4¡S
CODE, de esta forma: cuando se autoejecute y pi- 30 FOP <J=0 TO 20
JO BEEP- .01.J BECP .01 , í
Para ello, no tienen más que enviar- ?0 NEXT <J
los por correo a MICROHOBBY, ca- CLERA 28999 : LOAD da la clave, darle la correcta so next e
70 NEXT b
lle La Granja, 8 Polígono Industrial «nombre» CODE 2 9 0 0 0 que hemos anotado ante-
de Alcobendas (MADRID) una vez transcurridos unos riormente.
MICROHOBBY 7
PROGRAMAS MICROHOBBY r
PUPURRI-MC T
PLOT 6 4 , lOO
126.100
DRAIJ 1 5 * 8 , 0
OPAU 0 , - 5 0
3 7 0 INPUT L I N E F«
3 8 0 I F F » = " N " THEN GO TO 5 1 0
3 9 0 GO SUB 4 10
4O0 GO TO 4 6 0
PLO
MICROHOBBY 8
FROGGER
JUAN J. ESPALZA RAMOS
:O R s X
ii
U
NOTAS GRAFICAS
S * t- • W
Spectrum 4 8 K
O 31»
LS ? PLA!&r,í^T®I0^MSPÉ 152 LET a * < 3 ) e a » ( 3 , 3 2 ) + a % <31 ( T
RA UN MOMENTO"
9 POKE 2 3 6 0 9 . 3 2
0 31)
153 LET a • ( 4 ) =a • ( 4 . 3 2 ) +a S •4 >( T
1 0 GO SUB 9 0 0 0 O 31)
1 5 GO TO 2 3 0 0 REM S I DETIENES 154 LET b » = t > » ( 2 TO )+b$<l>
E L PROGRAMA P U L S A GOTO 1 5 PARA 159 I F l N K E f f s ' 8 " AND y ' . 3 0 T H E N
SEGUIR LET y=y +l LET y l = y l + 8 LET f$=
2 0 GO SUB 5 0 O O
2 5 GO SUB 7 0 0 0 160 IF INKEY»i"7" THEN LET x 1 *x
3® GO SUB 8 0 0 0 1+8 LET X = X - 1 LET f»:"X"
9 1 I F ca =5 THEN L E T c » " 0 LET 170 I F I N K E Y $ = " 6 " AND X < 1 7 T H E N
x • 17 LET x 1 = 3 6 LET y s l 5 LET y LET X1«X1-3 LET X*x + 1 LET r $ =
1=123 LET p a n s p a n + l FOR f = l T O " S "
5 : P R I N T AT 3 , C < f ( , PAPER 5 , " " 1 8 0 I F I N K E Y $ = " S " AND y >1 T H E N
NEXT i FOR Í » 1 TO 5 LET Cíf) LET y 1 «y 1 - 8 L E T y =y - 1 LET f | j "
=0 NEXT f GO T O 1 0 0
9 2 FOR f = l TO 5 : IF C(í) TMEN 2 0 0 I F x = l l OR X = 1 7 T H E N L E T p a
P R I N T RT 3 , c m , PAPER S , I N K 1, =1 GO TO 2 1 0
2 0 5 LET p a = 4
9 5 NEXT ( 2 1 0 P R I N T AT x , y , PAPER p a , INK
100 LET t = l - . 2 5 IF l s ( I N T ti T 7 , (%
1 6 5 0 G 0 TO 1 5 2 0 HEN P R I N T A T 1 9 , 7 ; PAPER 6 - " 2 1 5 I F X = 1 7 TMEN P R I N T AT X,ytl
1 6 6 0 FOR G = 1 TO 2 GO SUB 9 1 0 P ".AT 19,7."| , PAPER p a , " " , A T x , y - l , "
RINT " , " ; 6 $ , LET F = F + 1 NEXT G L I L I " < TÓ U , 2 2 0 I F X = 1 6 T H E N P R I[tN>T~ P A P E R 1 ,
1 6 7 ® GO SUB 3 1 0 PRINT " , " , 6 » "MJMJ'U&WU AT 1 7 ,
1 6 8 0 GO TO 1 5 1 0 2 3 0 P & I N T PAPER 4 , INK 0 , A T 12,
1690 CLS P R I N T AT 0 , 0 , " P U L S O N 1 0 1 I F v i d s l T M E N GO TO 1 0 3 O, a * ( 1 ) a * i 2 i ' ii (t < (33i) a t ( 4 i
PARA R E P E T I R I N T R O D . D A T . " , R T 2, 1 0 2 I F p >5000 THEN LET vi=vi+l 2 4 0 P R I N T RT 1 4 , 0 . P A P E R 4 , INK
0 . " P U L S A M PARA I R RL M E N U " ; R T 4 FOR f = l TO 3 BEEP . 3 , 2 0 NEXT 5 , b$
, 0 . " P U L S A S PARA I N T R O D . OTRO » / f P R I N T AT 1 , 2 4 ; : FOR ( « 1 T O v t 2 7 0 I F X < > 1 7 AND X < > 1 1 AND P O I N
C " , A T 6 , 0 , " P U L S A O PARA PONER EN P R I N T I N K O, P A P E R 6 , " X " i NE T l u l . x l l = 1 T H E N GO TO 1 0 1 0
MRRCHA M / C " , R T 8 , 0 , ' P U L S E G PAR XT f LET Vid=l 2 3 0 I F x = l l T H E N GO TO 3 1 0
A GRABAR S I T E S " 1 0 3 P
K 6;-PANTALLASR I N T AT 2 1 , 1
";pan0 , P A P E R 1 , IN 3 0 0 GO T O 1 0 0
1700 INPUT " D I R E C C I O N I N I C I A L th 1 0 5 P R I N T PAPER 6 , INK 0 , A T 1,1 3 1 0 P R I N T RT X , y , PAPER p a , INK
ex) " , L I N E F% ; " 0 0 0 0 0 " ( TO 5 - L E N S T R * P > , P 7; r *
1 7 1 0 GO SUB 1 7 5 0 1 1 0 I F 1 = 1 T M E N GO TO 1 0 1 0 3 1 1 LET t = t - . 2 5 IF t • ( I N T t) T
1 7 2 0 GO SUB 4 1 0 LET CÍISJ 1 2 0 BEEP . 0 0 2 , 3 0 BEEP .0082,60 HEN P R I N T AT 1 9 , 7 ; PAPER
1 7 3 0 INPUT "DATOS I h e x ) ". LINE
f* GO SUB 1 7 5 0 BEEP . 0 0 2 , 1 0 SEEP .002,45
1 7 4 0 GO TO 1 8 1 0
1 7 5 0 I F F $ = " N " T H E N GO TO 1 7 3 0
1 4 0 P R I N T AT x , y ;
7, f »
PAPER p a . INK
'JII'II^IVWIrS'JiMniÍl0^
150 LET a * ( 1 ) = a t < 1 , 3 2 1 + a * ( 1 > ( T
1 7 6 0 I F F $ = " H " T H E N GO T O 5 1 0 O 31) 3 1 3 BEEP . 0 0 2 , 3 0 BEEP .002,30
1 7 7 0 I F F » a " S " T M E N GO TO 1 6 9 0 1 5 1 LET é * ( 2 ) = a * (2 , 3 2 ) (2) ( T 3 1 4 P R I N T PAPER 6 , INK 0 , A T 1,1
1 7 3 0 I F F $ a " 0 " T H E N GO TO 1 8 4 0 , " 0 0 0 0 0 " ( TO 5 - L E N STR $ p ) ; p
1790 IF F t s"G" THEN GO TO 1880
1 8 0 0 RETUP TURN
1 8 1 0 GO SUB 4 1 0 L E T OFTSJ POKE
D I ,DA
1 8 2 0 LET DI-DItl
1 5 3 0 GO TO 1 7 3 0
1 8 4 0 INPUT " D I R E C C I O N COMIENZO (
hext L I N E F«
1 8 5 0 GO SUB 4 1 0
1 8 6 0 P R I N T " P U L S E UNA T E C L A " PA
USE 0 CLS R A N D O M I Z E USR J
1 8 6 5 P R I N T 110, P U L S E UNA T E C L A "
PAUSE 0
1 8 7 0 GO TO 1 6 9 0
1880 CLS INPUT " D I R E C C I O N INIC
IO < h € X ) : " , L I N E F » GO SUB 4 1 0
1890 LET F = J
1 9 0 0 INPUT "LONGITUD « h e x l ", L 1
NE F » GO SUB 4 1 0
19 10 I N P U T NOMBRE " , L I M E M Í
1 9 2 0 SAUE H$CODE F , J
1 9 3 0 CLS PRINT "VERIFICAR RE6
OBINE '
1940 VERIFY ""CODE
1 9 5 0 GO T O 1 6 9 0
1960 CLS P R I N T " S I Q U I E R E CARG
AR LOS B Y T E S EN ALGUNO D I R E C C I
ON E S P E C I A L P U L S E " T A B 15,"A":
P R I N T " S I N O P U L S E OTRA T E C L A " P
AUSE 0 I F I N K E Y | s " f l " TMEN I N P U T
" D I R E C C I O N E S P E C I A L " , DS LOAD
" " C O D E DS
1 9 6 5 LOAD " " C O D E
1 9 7 0 CLS INPUT " D I R E C C I O N TABL
ftihíxl " , LINE FJ GO SUB 4 1 0 L
ET U = J INPUT " D I R E C C I O N NUEUA(h
«X > " , L I N E F % GO SUB 4 1 0 LET
G=J INPUT " L O N G I T U D ( h e x ) " , LIN
E F| GO SUB 4 1 0
1 9 8 0 L E T SEG = 4 6 / 1 5 3 5 * J : L E T M I N =
I N T (SEG 6 0 » LET S E G = S E G - H I N + 6 0
1 9 9 0 P R I N T AT 5 , 3 , " T A R D A R E UNOS
" ; M I N , " M I N U T O S " ; A T 7 , 1 5 , I N T SEG
," SEGUNDOS"
2 0 0 0 FOR D = 0 TO J - l POKE ( G + D ) ,
PEEK I U + D ) NEXT D
2 0 1 0 GO TO 5 1 0
MICROHOBBY 9
PROGRAMAS MICROHOBBY
315 IF p a n <4. THEN GO TO 350 BORDER 2 CLS 7090 LET ;
330 LET CU=CJ+1 PRINT AT 11,CU 2 2 0 0 I F p o r ( S i THEN GO TO 2 3 0 0
,
, PRPER 1. INK 6 , " 2 2 0 1 L E T v * = " " . LET < t = 9 PRINT LET M i l i : 1
3 4 0 I F C u —30 THEN LET CU=0 PRI fiT 2 , 0 , " H a s l o g r a d o m e j o r a r u n O
NT RT 1 1 , 3 0 ; PAPER 1 , " r e c o r d . " , R T 4 , 0 , " E s c r i be t u n o » b 7220 LET vi»3 LET p=0
3S0 LET < « ( 1 > = C * ( 1 > < 2 TO > + C » < 1 r e a c o n 1 1 n u a c » o n . M a x i » o 14 c a r a 7 2 4 0 LET r * = " X "
I) cteres . " 7 3 0 0 L E T x1=36 LET y 1 = 123
3 6 0 LET C»<2>-C»<2,32>+C»(2)( T 2 2 0 2 P R I N T RT 1 0 , S , PRPER 0 , " 7 3 2 0 LET t = 2 4
0 31) " ; RT 1 1 , 8 , INK o ; P
3 ? 0 LET c * ( 3 ) = C » ( 3 > ( 2 TO )+ c I i 3 7330 l E T b=1000
RPER 6 , " • • , RT 1 2 , 7 3 5 0 LET p a = l
1 X) 0 ; PRPER 0 , " 7 3 7 0 L E T p a n =0 LET ca =0 LET rr
375 PRINT RT 5 , 0 , PRPER 5, INK 2 2 0 3 I F I N K E Y * <>"•• THEN GO TO 2 2 =0 LET CO=0 LET CU=0
O. C » <1> ' ' ' ' C « ( 3 ) 03 7360 DIM C >S>
380 PRINT RT 7,0, PRPER 5, INK 2 2 0 4 I F I N K E Y $ = " " THEN GO TO 2 2 0 7 3 8 5 LET r n d l = 0
2 ; C » (2> 4 7 3 9 0 LET v i d = O
390 I F I N K E Y » = " 8 " RND y < 3 0 THEN 2 2 0 5 I F I N K E Y * = C H R » 1 3 THEN GO T 7 9 O 0 RETURN
LET y=y +l LET y l s y l + 8 : LET r * = O 2211 3 0 0 0 BORDER 3 PfiPER 5 CLS
395 I F I N K E Y » = " 7 " THEN LET x 1 * X 2 2 0 6 I F INKEY » =CHR » 1 2 THEN L E T 8 0 1 0 P P I N T RT 2 . 0 , PfiPER 4 , INK
1 + 16 L E T X =x - 2 LET r » = " X " í i = f i - l P R I N T RT 1 1 , Cf» RND f i >
400 I F I N K E Y « = " 6 " RND X < 1 1 THEN 7 ) + ( 9 RND f i =81 , PRPER 6 , " " , L
LET X1=X1-16 LET x « x + 2 LET r « ET v | ; v t < TO f i - 9 ) GO TO 2 2 0 3
2 2 0 7 I F LEN v * > 1 3 THEN GO TO 2 2 0
3 3 0 1 5 P R I N T RT 3 , 3 , PAPER 5 , 1
4 0 5 I F I N K E Y » = " 5 " RND y > l THEN 2 2 0 9 P R I N T RT 1 1 , f i , PRPER 6 , IN RT 3 , 9 " ".RT 3 , 1 5 , " ",AT 3,21
LET y l = y l - 8 LET y = y - l : LET r | = " K 0;INKEY», LET f i = f » + l LET v » ",RT 3 2 7 ' "
>C" =v»+INKEY* Ó 0 2 0 P R I N T J R T ' 1 1 , 0 , PfiPER 1. INK
4 8 5 I F x » l l RND y = c u + l RND p a n > 2 2 1 0 GO TO 2 2 0 3 SO 3 0 P P I N T PfiPER 4 , , , , . , . , , , , , ,
3 THEN GO TO 1 0 1 0 „ __ _ 2 2 1 1 80RDER 4 PRPER 4 INK O C 3 0 4 0 PRINT RT 1 7 , 0 , PfiPER 1. INK
4.90 I F X = l l THEN L E T p a = l GO T LS O, . .
O 500 2 2 1 2 I F P > r c l ) THEN LET n $ ( 5 l = n » 6 1 1 0 PRINT fiT 0,0 PfiPER 6 . , , , ,
4-95 L E T p a s ( 5 RND X » 3 I + IO RND X (4) LET r < 5 ) = r < 4 > : LET n » ( 4 ) = n » 6 1 2 0 PRINT RT 1 8 , 0 , PRPER 6 , , , , ,
= 9 OR x =51 + 1 2 RND x = 7 > „ „ (3) LET r < 4 ) i r ( 3 > LET n » i 3 > * n »
4.96 I F fiTTR < X , y » = 4 1 THEN GO TO (2' L E T r ( 3 1 « r (2> LET n » < 2 ) « n » 8 í30 PRINT RT 21,0, PRPEP 1,"
1010 (1> LET r < 2 ) = r < l > LET r(li=p
4.98 I F x > 3 RND fiTTR ( 3 , y ) « 3 4 T H LET n i l l i < v ( GO TO 2 2 2 0 8140 PLOT 0.12 DRfiU PRPER 5,255
EN GO TO 101© 2 2 1 3 I F p > r < 2 > THEN LET n » ( 5 > = n * ,0 PLOT 0.27 DPRIJ PfiPER 5.255.
S 0 0 P R I N T fiT X , y ; PRPER p a . INK (4) LET r ( 5 » = r ( 4 ) LET r > » t 4 ) = r i » 0
7; r » 13) L E T r U ) = r ( 3 ) : LET n » ( 3 > = n » 8150 PPINT fiT 19,0. INK 2,"TIEMP
5 0 5 I F X « 9 THEN P R I N T RT 1 1 , y , (2» L E T r ( 3 ) =r <2) L E T r ( 2 ) =p
PRPER 1 " " LET r> $ < 2 ) s v | GO TO 2 2 2 0 lili " NK 0 , , , l , l l , , , , ,
' l , , , , , ,
5 1 0 I F X = l l THEN P R I N T RT X , y + 1 2 2 1 4 I F p > r ( 3 » THEN LET n « I 5 ) = n s 6 2 1 0 P R I N T PRPEP 6 , INK 2 . R T 0 , 1
, PRPER P J , " " ; R T X j - í - i ; " " (41 L E T r I S ) =r ( A l LET n * ( 4 ) = r i »
S I S I F i r a l RND x - l i «ND y = r n d 1 , " SCOPE " , fiT 0 . 6 • n » ' 1 * . RT 0 . 2 4 , " F
THEN FOR f b 15 TO S STEP - 1 BEE
Bl (3) LET r ( 4 > « r ( 3 > L E T r ( 3 ) ep ROGGER"
P .03,-I NEXT f : LET p = p + 3 0 0 L LET r . » ( 3 ) = v * GO TO 2 2 2 0 8 2 2 0 PLOT 5 6 . 1 7 ? DPAU PRPER 6 ,
ET I C E l GO TO 8 0 0 2 2 1 5 I F p > r ( 4 ) THEN LET n « l 5 i = n » INK 3 , 0 , - 1 5 PLOT 1 3 4 , 1 7 5 DRAU
(4) LET r ( 5 1 = r (4) LET r ( 4 > = p PRPEP 6 , INK 3 , 0 , - 1 5
5 2 0 I F P O I N T ( u l , X l » = l RND X >1 LET n » < 4 > = v í GO TO 2 2 2 0 3 2 3 0 P R I N T fiT 1 1, PfiPER 6 , INK
1 RND X =9 OP X = 5 THEN L E T y s y - 1 2 2 1 6 I F p > r ( 5 ) THEN LET r ( 5 l = P 0 , fiT 1 . 2 4 ,
LET y 1 = y 1 - 8 LET n » ( 5 ) =V * GO TO 2 2 2 0 8 2 4 0 FOR f = 1 TO v i P R I N T PfiPER
S 2 5 I F X =7 RND P O I N T (yl,xl)=l 2 3 0 0 BORDER 4 PRPER 4 INK O C 6,"C< NEXT í
THEN LET y =y + 1: LET y l = y l + S LS P R I N T RT 0 , 0 , I N K 7 , PRPEP 8 2 5 0 P R I N T RT 5 . O . INK 0 , C » i l >
5 2 7 I F P O I N T ( y 1 , x 1 ) =0 RND x = 9 2 . • y o o o o & y . y x x K FROGGER « c o o c i c o c t . INK 2 , C » ( £ ) , ' , INK O , C » 1 3>
OR P O I N T ( y l , x l í = 0 RND x = 7 OR PO SáeX"; F L A S H 1 ; PRPER 3 , INK 0 , R T 3 2 6 0 P R I N T RT 1 - 1 3 , INK 0 . " 0 O O O 0
I N T i y l , x l > « 0 RND x = 5 THEN GO TO 1 TO 5 - L E N STR» r < 1 I ) , r < 11
1010 3 , 1 1 , " G f i M E OUER" 8 9 0 0 RETURN
5 3 5 I F X =9 RND y = 0 OR X=7 RND y 2 3 1 0 P R I N T RT 6 , 1 2 , INK 2 , ' R E C O R 9 0 0 0 FOR f = 0 TO 2 0 RERD q » FOR
= 3 1 OR x = 5 RND y = 0 THEN GO TO 10 OS" •J=0 TO 7 REfiD a POKE USR q » + 9
10 2 3 1 1 P R I N T RT 8 , 2 , 1 , T R B 6 , n % ( 1 > , ,a NEXT 9 NEXT f
5 4 0 I F X t 3 THEN GO TO 8 5 0 TRB 2 5 , • • 0 0 0 0 0 " ( TO 5 - L E N S T R * r ( 9 0 0 1 DIM r < 5 ) DIM n » ( 5 , 1 6 ) FOR
5 4 1 I F Cá >3 THEN GO TO 3 1 0 2 3 1 2 ^ P R I N T RT 1 0 , 2 , 2 . T R B 6 , n $ ( 2 ) f = l TO 5 LET r <1) =0 LET n » ( í )
5 4 S I F RND < . 1 THEN GO TO 9 1 3 ; T R B 2 5 . " 0 0 0 0 0 " < TO 5 - L E N STR$ r = ZX SPECTRUM" NEXT f
5 5 0 LET r n d = INT (RND*10) 9 0 0 9 RETURN
5 6 0 I F r n d =8 THEN GO TO 3 0 0 2 3 1 3 ' P R I N T «T 1 2 , 2 , 3 , T R B 6,n»(3> 9 0 1 0 DRTfi " a " , 0 . 0 , 4 8 , a , 1 2 7 , 2 3 9 , 2
7 0 0 GO TO 3 1 0 ; T R B 2 5 , ' 0 0 0 0 0 " ( TO 5 - L E N STR$ r 30 . a
8 0 1 I F f r =0 THEN GO TO 8 0 3 (31 ) r (3) 9 0 2 0 DfiTfi " b " , O . 0 , 2 4 , a , 2 5 2 , 1 9 0 , 6
8 0 2 GO TO 8 1 1 2 3 1 4 ' P R I N T RT 1 4 , 2 , 4 , T R B 6,n$(4t
8 0 3 LET r n d l = I N T (RND+29+1) , T R B 2 5 , " 0 O 0 0 0 " ( TO 5 - L E N STR» r 9025 DfiTA "C",230,a,239,127.48,a
8 0 5 P R I N T AT l l . r n d l , PRPER 1 ; (4 ) ) r ( 4 1 ,0.0
INK 3 , L E T ff=l GO TO 3 1 0 2 3 1 5 ' P R I N T HT 1 6 , 2 , 5 , T R B 6,n$(5) 9030 DfiTfi "d",62,a - 190,252,24,a,
8 1 1 P R I N T RT l l . r n d l , PRPEP 1 , " ; T R B 2 5 , " 0 0 0 0 0 " ( TO 5 - L E N STR* r O,O
9035 DfiTR "6",0,0,0,126,a,0,63,1
8 1 2 LET 1 r = 0 GO TO 3 1 0 2330'PRINT Ul, FLASH 1, INK 3 , P 26
8 1 5 I F CO=0 THEN GO TO 8 2 0 «PER 6 ; " Q U I E R E S UUGRR? 9040 DfiTR " f " ,0 , 0 , O , 5 6 . 5 6 . 0 , 2 5 2 ,
816 LET c o = l GO TO 8 3 5 126
8 2 0 LET r n d 2 n I N T (RNDt5)+1 2 3 4 0 I F I N K E Y » 0 " S " AND I N K E Y Í O 9045 DfiTR "g",126,63 .0,126,a,0,0
8 2 1 I F r n d 2 o l THEN L E T C o c = 3 ,0
8 2 2 I F r n d 2 = 2 THEN LET C 0 C i 9 " n " T H E N GO TO 2 3 4 0 9 0 5 0 DfiTfi "h",126,252,0,56.a.0,0
8 2 3 I F r n d 2 = 3 THEN L E T t o c » 1 5 2 3 5 0 I F I N K E Y « = " S " T H E N GO TO 2 0 ,o
8 2 4 I F r n d 2 = 4 THEN LET C 0 C » 2 1 2 4 0 0 GO TO 5 2 0 0 9 0 5 5 DfiTR "t",65,73,62,28,28,34,
8 2 5 I F r n d 2 = 5 THEN L E T C 0 C = 2 7 5 0 0 0 RESTORE 9 3 0 0 65 ,34
8 2 6 I F fiTTR ( 3 , C O C ) < >40 OR RTTR 5 0 0 1 REPID d u r . s o n I F d u r = 0 THEN 9 0 6 0 DfiTfi "j",O,16,38,255.38,16,
( 3 , C O C + 1 ) < > 4 0 T H E N GO TO 8 2 0 RETURN 0 . O
8 3 0 P R I N T fiT 3 , C O C , PRPER 5 , IN 5 0 0 2 I F d o r > 2 THEN PAUSE d y r GO 9 0 6 S DfiTA t ' , 234 . 2 0 S , 2 1 1 , 2 4 3 , 2 2
K i ; " * " LET C 0 = 1 GO TO 3 1 0 TO 5 0 0 1 1 . 198,247,227
8 3 5 P R I N T RT 3 , C O C , PRPER 5 , " 5 0 1 0 BEEP d u r . s o n 9O70 DfiTfi "l",63.71,187,a,155,21
" : LET CO-0 GO TO 3 1 0 5 0 2 0 GO TO 5 0 0 1 5.71,63 "
8 4 0 GO TO 3 1 0 5 1 0 0 RESTORE 9 4 0 0 9 0 3 0 DRTfi • - * " , 2 4 6 , 2 5 2 . 2 5 4 . a , a , 2 5
8 5 0 I F y =3 OR y = 4 OR y = 9 OR y = l 5 1 0 1 RERD d u r . s o n : I F d u r = 0 THEN 2.¿43 . a
0 OR y s 1 5 OR y = 1 6 OR y = 2 1 OR y > 2 RETURN 9 0 9 0 DRTfi - n " . 2 5 5 , 2 2 3 , 2 3 1 , 2 4 3 , 2 5
S OR y = 2 7 OR y = 2 8 THEN L E T c a « c a 5 1 0 2 I F dU r >2 THEN PRUSE d u r GO 1.247,239,255
+ 1 : LET p = p + ( Í 0 * ( I N T t i ) LET X l TO 5 1 0 1 9 0 9 5 DRTfi "O",34,65,34.28,28,62,
s36 LET X = 1 7 : L E T t = 2 4 5 1 1 0 BEEP d u r , s o n 73 , 6 S
8 6 0 LET c a s = ( l RNO < y = 3 OR y = 4 > 5 1 2 0 GO TO 5 1 0 1 9 1 0 0 DRTfi -p",194,37,56,120,56,3
n i/
J • (2 AND ( y = 9 OR y e 1 0 ) ) + ( 3 RND < 5 2 0 0 PAPER 0 INK 7 BORDER 0 C 7 , 1 9 4 ,0
y = 1 5 OR y = 1 6 1 ) + ( 4 RND ( y = 2 1 OR y LS
= 2 2 ) ) + ( 5 RND (y = 2 7 OR y « 2 8 ) > LE 5 2 3 0 P R I N T RT 8 , 1 0 , " l 9 1 1 0 DfiTR " V , 6 7 , 164 , 2 8 , 3 0 , 2 8 . 16
u r\.
T c ( c a s l =y GO TO 3 0 4,67 , 0
1 0 1 0 LET v i . v i - 1 9 1 2 0 DRTfi "f",0.O.132,79,63,15,1
1 0 2 0 OUER 1 3 ,24
9 1 3 0 DfiTfi "t",4,16,160,224,193,2
1 0 3 0 BEEP . 1 , 0 8EEP . 2 , 2 PRINT 54.96.24
RT x , P R U S E 10 BEEP . 3 , 6 9 1 4 0 DRTfi •• t " , 6 . 16 , 5 6 , 1 2 6 , 1 2 7 , 6 2
P R I N T RT x , y , INK 2 ; " * " : PRUSE 524© BEEP . 4 , - 3 0 BEEP . 3 , - 2 0 B , a , 24
10 BEEP . 3 , 9 BEEP . 2 , 6 PRINT EEP .3,-10 BEEP . 4 , - 2 0 BEEP . 4 9 1 5 0 DRTfi "u",0,0,0,33,114,94,13
RT x , y ; I N K 5 ; • O " PRUSE 5 : PRI .-15 PAUSE 1 BEEP . 7 , - 1 0 6.0
NT fiT X , y , PRPER p a , ' 5250 PRPER 3 INK 7 PAUSE 0 BO 9 2 0 0 REM DATAS DE SONIDO
1 0 4 0 FOR f = l TO 5 BEEP . l , f BE PDEP 5 CLS 9 3 0 0 DATR . 3 , 4 0 , . 3 . 4 0 . . 3 , 4 0 , 1 5 , 0
EP . 1 , ~< NEXT f 6000 GO TO 1 0 0 0 0 ,.3,40,.3,40, .3,40 ,4,0, .3,40,.3,
1 0 5 0 LET X » 1 7 : L E T y o l 5 LET x l » 6100 REM VARIABLES 45, .3,35, .3,36, .3,40 ,4,0, .3,42, .
36 LET y 1 • 1 2 3 7000 LET x = 1 7 • L E T y = 15 3,42 , .3,42
1 0 5 5 OUER 0 7010 D I M a » (4 , 3 2 ) 9 3 0 5 DATA 3,0,.2,40,.3,41,.3,40,
1 0 6 0 LET t = 2 5 7020 LET l i ( l ) i " SÍ se .2,40
1 0 7 0 P R I N T RT 1 , 2 4 , PRPER 6 ; " 9 3 1 0 DfiTR 3,0,.2,40,.3,40,.3,39,
",RT 1,24, FOR f = l TO V i L E f ^ S * (2) " .2,39,.3,40,.6,38,.2,45,0,0
P R I N T PRPER 6 - INK 0 ; " X NEXT 9 4 0 0 DfiTA .4,0,.4,2,.4,3,.4,2
t 7O40 LET a»(3> 9 4 10 DRTfi . 4 , 0 , . 4 , 2 , . 4 , 3 , . 4 , 2
1 0 7 5 I F v i = 0 THEN GO TO 2 0 0 0
1 0 8 0 GO TO 3 0 \Uf
v-r y-r 9 4 2 0 DfiTR . 4 , 3 , . 4 , 5 , . 4 , 7 , . 4 , 7
9 4 3 0 DRTfi . 4 , 3 , . 4 , 5 , . 4 , 7 , . 4 , 7
1 0 9 0 REM F I N DE JUEGO Y T f i B L f l DE 9 4 4 0 DfiTR .4,7,.4,8,.4,7,.4,5,.4
RECORDS 7060 LET b*=" , 3 , .4 ,2, .4 ,0, . 4 , 0
2 0 0 0 P R I N T RT 1 0 , 1 1 , INK 0 , PRPE 9 4 5 0 DfiTfi . 4 . , 7 . . 4 , 8 , . 4 , 7 , . 4 , 5 , . 4
R 5 ; " G O M E OUER" 7070 DIM c » (3,32) ,3,.4,2,.4,0,.4,0
2 0 0 1 GO SUB 5 1 0 0 708 .ET c » i 3 > =" 9 4 6 0 DfiTA 0 , 0
2 0 1 0 PRUSE 1 0 0 PRPER 2 INK 7
10 MICROHOBBY
VIDEO-JUEGOS IMPORTACION GESTION
J/U K AND T H E B E A N S T A l . K 1.750. • COIMTF:XT V . 7
OI.YMPICON 1.750.
P r o c e s a d o r de textos 4.000, —
DEATHCHASE 1.750.
MOON ALERT 1.750. • C O N T E X T V.8
MATCH POINT 1.750,
N1GHT G U N N E R 1.750, Versión en catalán 4.000,—
W O R S E THINGS SHA 1.750,
MAZIACS 1.750. • S.L.T.I. V . 2
POGO 1.750. B a s e de d a t o s c o n c á l c u l o s 4,000,—
AUTOMANIA 1.750,
WORLD CUP 1.750. • COPY RS-232
FULL THROTTLE 1.750, i m p r e s o r a s tipo A d m a l e 2.500,—
DARTZ 1.750,
UGH! 1.750, • CONTABILIDAD PEQ. NEGOCIO
ORC ATTACK 1.750, Novedad PIN 3.000.-
T.L.L. 1.750.
F R A N K N.STFZIN 1.750.
POLE POSITION 1.800.
GHOSBUSTER 2.000, ATENDEREMOS GRATUITAMENTE SUS CONSULTAS
CYCLONE 1 750.
T R A V E L WITH T R A S H M A N 1.750.
SOMOS LOS AUTORES
PY JAMAR AMA 1.750.
BOULDER DASH 1.750.
REACH HEAD 1.750.
NO CERRAMOS
AL MEDIODIA
9
PERIFERICOS
INTERFACE JOYSTICK +
J O Y S T I C K Q U I S C K S H O T II 6.995,-
INTERFACE CENTRONICS +
Software Copy-Color (Novedad) 8.000.-
ENVIOS INTERFACE S O N I D O TV
Totalmente externo (Novedad) 3.500.-
A TODA ESPAÑA: LAPIZ O P T I C O +
Software completo (Novedad) 4.750.-
Contrarreembolso: INTERFACE MONITOR
2 0 0 ptas. gastos envío B / N y Color. Video compuesto 3.900.-
Talón o giro: MONITOR TM80
Sin gastos Fósforo v e r d e a n t i r r e f l e c t a n t e 27.000.-
C I N T A C-15 100,-
BOLETIN DE PEDIDO
PROGRAMAS PROGRAMAS PROGR
«Kumite», un c o m b a t e en Oriente
KUNG-RJ
un ambiente muy propicio
Bugsr-byte a tal efecto, un «Dojo». una
48 K especie de gimnasio
oriental cuya traducción al
Tipo de juego: Deportes
castellano sería algo asi
Inglés como «el lugar del
«DI j ^ A i i f i
* m a £ nu a i in
III íiY
Í £.rirfíiriiriifflí f
P O I N T S O U I S X T S ©
F O U L 5 C
... .y v.-. s ..
-
14 MICROHOBBY
S PROGRAMAS PROGRAMAS
¡
La composición de las de algunas galerías, a Valoración. Es un juego
galerías de las cuevas por modo de ríos subterráneos.
^ ¿x r
extraño, en algunas
las que vamos pasando, En ellos, el personaje que ocasiones atractivo y en
está conleccionada a base manejamos se mueve, otras desconcertante.
de bloques de colores nadando, con mucha Recomendable para
distintos que, combinados, soltura. El efecto del micromaníacos con mucha
nos dan la sensación de movimiento del agua está paciencia.
galerías. bastante bien hecho, por
El detalle más curioso del medio de scrols muy
juego, al menos el que más suaves de algunas partes Originalidad ***
nos llama la atención del bloque gráfico. Gráficos **
cuando lo vemos la primera El recorrido que tenemos
Movimiento
vez, es el de las zonas de que hacer es bastante
agua que hay en el fondo largo. Hay que pasar por Valoración
MICROHOBBY 15
Algo más que
una tienda
de ordenadores.
Algo más en Servicio.
Personal altamente cualificado le asesorará en todo lo re-
lacionado con el mundo de la microinformálica y la robó-
tica, asesoramiento que continuará aún despues de haber-
le instalado su ordenador, en su propio domicilio. Garan-
tia total en todos sus productos.
ooo
# • OO
I o d o en M i c r o i n f o r m á t i c a
#
oo
c w c A «" O
cra C
OS g £
~ a> co <s> é a
« P3 «®ceSF O)
§c CO ra
s3 ro o
c
.Sí
E + '5
s -croo 6 ai
o a> o a 3
'3
UJ ai ra co Q.CO
UJ E o 0) i có 5= flj
o co
s •3 C
cc = -
c o w — ro L ML o—
ID UJ
UJ a¡ a 3 P ® co ;- Q
co o a ti 1! = « 3 ..
CO XI co v ro t* E O flj
<
c2 U"> « 3 « ü K a> ™ ^ i i «2. E
IT) ™ o c U J UJ *** ^ L GL u j ra
>ro c£> 4) aJ 01 _lV I I > I o>
i co « o c «
O gg — o £ « •o o g i « c Q. o o
C w
.E « « s
V) ro T3 a>
o ra ro o 5 5! ro ¡ I S ' >- CO
sO». «O« Q o « c ro a; c Sí D o 0 3 S ~ o o a W O 0!
¿ I c o- ro o ro £ § s ro o o i- w Oro — ro E O1 t> O •O
S rá
o o c n •=
CO .!=
I f o D) Qjroa ra
TJ o « -o w 0) m
ro
10
y g O 1 o
<D O 3 c ro ro c
Iroo »co o — o o w V c
C Q. n § E 3 O ® <>i _1 i w
I
3
o ra
!S"="2 a o « ro ro CT ffl« s w
® CU
•
O a (1) — co c
£ o ro ro ro <= O T> ro c -5 k_
o
a c 0) § 2 ! ° m c t j ra ™ UJ E c ra
3 2 S> w"o oí ro ro 3 •o C 3 ro
o o o
a
« s s a
c
a> g
c ra S £
« ro o-
° 0) c ,E 6
w
ai — 1 5 O = c - a> v¡ o¡ I *
*
o c «w c C 3 2
fi
y °
DI
n i o
E => « 3 a; cv O O
o
ü o 2. ro oí o' ®
.E o
«
ro r2
ro " ¡tí II w
ro o E ro
C —'ro-? -5
5
®
5 1 « f
ro cSí ra w
_i o Q.
2
cc
ro ro « E ¿
cr _ o2 £ o"O Q¿ü c cu c ra a> o t
o ¿<u ro ü
£ S S
co a—
>
^n flj3 5
£ c= JS ~ ü S2 S i S
=i S
S es « — es vi 2 <s
"g •re
= o
^ £
— B aa O
a -™ ^ C
ií
ív =
aj 2 ^ =J T. Oí ° e
•s -2
•ctS¡
® Si
O
ra
=
£ -s
= u cr 3
ft ?:
ES £? «J•
E W 2 « ™
a —= o
ií- « Sí "E H jjs »
e t^A 1*.
t nW- -o
S
ÍJ j2r"
= a -= a
'É £ = 3 ü = ; ü ü5 sa £o. qj-sí 2 ™ u— ;
£ ES= J2 o _ u =
333 91 =le =3
S ° M« I 1 <s> £—
E o.CO
— — — =
a s « s £ Í_i
— = s5 = 2 í
> ¡£ S a EcS 5 i £ 9"
JS <3 > S.
O O =J es
CSJ 3 C r>.3 => es es
es a
co
CO lA LfJ CVI
co co
ca
CSI N fvn CNI <N! L.-Í CVI (Vi OJ Oí
---
a es es C5
ÍNI
<Vi =o; O Q M
a» — r».
~ ^
a
5 — a
CNi
rv
=
co
rs
=2 L
CX53 •T) C3 9SO aesl tf>
=>
r-5
Lf>
=
O
5
CO co CO
Oi l^sl CVJ fvj fM (Vi CNI Oí
CVJ fs fs M tVI rv tv¡ (St OJ OJ OJ
10 ai ra O Q> ai
ai « í í^ o 31 ~ c o B ro
a
^
c 4> 1- g a>
ai
a 3
c O <r> C7 ro ¡ g
a ro ra (U 2co
D. S —
^ ra
o
0 ai o ra ai =
ra £ <y aic ro « 0 L. "S 2 = — 2 S Es
^ ra J2 _E
•3 UJ
•o . ro o E o > a>
o c S s £
C 1 1 8 E
1 2 «a» 1 oí
E = 5 aa > 2 | J « - o
01
E
< c
x •c a» a _ OI l i e £
J. s LLI o 1 0) ro
a
a° c 5 u "
en gi=Q- -o
c
3
—5
-a
0)« ra o
CL
«v -D 3í: i » §> £K 4J
S
¿ -g -s 3, L w -e á
c o o o l ' E c|o8
— «
c E o 3IU CO U-l -O
ro •o iS o 3» 5 o íí <•c
Uc zb—I •o O fi 3
<u £
c > <3 oo
c a
«t UJ c >=_ E 5o2 cro 5
a 3w
« c I « o M) ro a. U a> o oj « c
o ro
£ o
Ct o s - ¡8 ro
c ro CA re OJ
•o o o ai O SJ "
<5
v — J
ro •3 0) ro
co C « a
m
o ro a3JD o I I ro 2 (VI s
» o •D 5 E OI C
o ií
01 o l wo; ro
ro ro
k. r- *« E c0) — v S
<u ra ra w o
^a ^
¿ i C ' CJ
o g® £e
> %
3 "O > — SÉ ai
CT ai a> o VT T3 s e ® ro
0 c £ . 5 5 C « Í5 g 0
a
a> = E t i mo cj E
sz
m
"ra ra
• • ® ro
o
¡-jI» # r»
tf 3 ro 3
a> _ o
<U -n « c cr
o « •> s ra & 3 — ^ « "O (ó
w oj
•••Til. .»n u cr c3
u ** 1 2 3
o «
> "
O
o ro o 1 o . E
«> 0)
ro v ^ cE ro ra co <5.2
w JE Q) >•
*o*u* re Q) « 8 ui (/) ro c ° 0)
J — T3 o ^ Eá ? i u j o 3 c..o ra M oUa(D>" -0) ©3 fe 01- .2c w
o S.
U • Bf-a
J *» ra aT>> C
H<1 £
o «i 1 SI fc § 2 ro o>s •
um a> ai
<t • e>-o
M S. » ¡s V) w S "5 g e _ rsJ c . ro ai ° O £ o w p cro
a -• «»»i. J2 UJ c 2
•o 15
•
n o < UJ « ra Q ra ro • <»
OI o
Znh ti
M* Q o * o í . m a £ ® ¡ o -oj
o "S a>N o
1 • i- •ae o
2 o re
rH o
O 5 °F m O E ^
¿ZVf o =) S
«Ií«n¡3
iHpH, o
•o
o
3 3 *
O o ®
o n
" ac
^ c o 5 ^ a> * o
Q- c
CU o o
„ ro
l o =s «C Oí
= uj
.& 3
» i- o o « re
u Q. "O WS o
a cq — Oí ^ o ro w i- c
ra cc ra
z U•c- cr <0 5 ra
3 UJ CU
SÍ-SO -O o o> u j w Cü t: -o
ti • o' - a 3 a» roro
cíe o. 4> —o;"D3 o; ro Jj •o cQ) ® >
3 .20) 0)
> £
-5 2.
É Q. £
re * w i= « w 1 1 (1) t A 05 r-<
(O
a 3 0 <st
E 3 o» o P o c
3 ~
c 0
fl>
0 "O c 2 sa c°
re LU a ' o vi Q) X 0re <u re <
CC « a)
re o re
a
> t: N 3
"5 Oo k- c
> UJ
H i*-*
O O CT O 3 « si i> E a> n <¡>
re €£
£
a— u v° V) Cd > — § -o ca> ÍS 0 E u
1» 0 re
o re > 2 c re E
—> Vi0) -0
<¡) re V)c E
3 y s5
O
a
c o ^ di o) s i l d o « o „ CT ca> a> re
Q> £ o •o > 0 e c en > O
oÓ O "3 03 •a a, TaS
> c
g
5c? o S a» a o <d «Jai O a •0 T3 o o E « «
c «o « «2 0) b «
sz S c a a
fvj 0> Ui ? OL a S Í
0
Oa
CT re a>
» -O E "g o « "O r^í o <u —
0 — 0
re V> o Q „> -o
" -2
a> w o 3- > a I O
w a a> •D O w UJ n ow
«I « ü (n O
E o> •0 re re> •n c
3O
•o a. 2 v c 1¿ « 2 re E 'ü </> C3
2* o
<1 CE O
— A_ ER> re re
3 « g f2 Eo
LU M C 5 2 -g
w
E3
re « £re o
- =
£ "o <1 c tí
CC ÜJ . CS S"
—
O c 0 re 0 <
= -ST -O cr O Í-2 ™ «
o c C O Z b: di o ec V LLI
re O w 0 11 « .2
•o o « O í OI L. o 0 c 0 c 0 c re u)'35 >
* cr
•• a Sí
•r
11
M
• : or*
» I
V I F>
00
< •v hllu
XI
*.
_ ta o
JU£
Ir a *
re .-o
saz - c
|re
Í
MH
l Mt— - k
E «aici o
fiifff*tíO
-o
Boaonr-e
£
• ü> C re 0 4> a O c O v
I CJ ü A ra ' ' w SJ «i <y o
C
a1> 3C Tí
C
^í ímm A> 0 re Ü 3 c re
>1 EO O. o c 2
3 O W
o & re O ~ o re O a c
' —
re
•O
ü O a cr 0 3 1 8 « c G
51 £ Q. C 3 s o
& N » ü c f- 0 0
c
§ re
a 8 Q,
»
re I w re O 21 £o c «"* 1 6 O
® ^ 3 W
íí E «7 « re re o 0 * Sw ? 1 2? 2« £ re
O ai
re re 0J o
c X c 0 fs¡ re c a c
>OC= o O Oo w ÍS re á o o « w ••=
3
0 re 3 » E ® Oa >
E s «ÜJ .2 O
O O « o V
~ re
« re
3 c c3 o « 0 N •D
o > c o re A
-
^ S a aj © o E re o q ra
Ou o e C4 ÍN) CV. - re re _ ü
O re E ÍS w E S> re <£>
•O « 0) — c MJ w
0) >
« a. re 1 s o> u O
O. K 1
X <n 3 re 5 co
<rs un c o o UJ 2
?
a! c o o O I s ra re Ow
c re «
re •« • O c a» m o
-re re
E
<0 E
&
- ire
re re
QJ > — > « 0 1
0 4) 3 w re co • oai o £ re >- re ¡ 2 w "3 o <¿> « « s re
o 3 n 0 TJ o
c X <
3 <
>u c •C TS M 0) 0 3 s V/
fl) 2
w
"D «
w
re ^ I re o 15 | reo® re iíí JD "O 6 * re w >• o Wo M _ re 3 GJ "O <
« D
O OS « £ re o o 1 2 tn .9 & /A
c « 0) O
II
~ o o 5 * -- c v re ^ 1» >
<a > v>cc re o ^ 0
^
w «O « o re £ CA.C re a • t í a C 5-° 2 5 ra
x re o n T3
c ¿3 B
c. 6 Si
^3 I "o E CT3 > .E
UT> {NI «T S E CT » St " « a; o re v) E 0
LLI o "O g o re a> £ c o Ü> o "2
re "5 re ¡n « o £ ®o » re 0 Xícz •>- J- Q J 3 °
V) I I Ü T3 re o T3 ü w o i c c
T3 re en ^ a
£ c
\ o c
« «
G> O
re w
CJ o o
S a» ra
h- r-
w
1n •D ü o 'S- X
í>
10
<0 <M CÜ « ra g o 5
ro OJ ro « « re »
S OJ CJ o OH — CC
ro o M i"
LU
tn OC — X
LJ 0 OC ^
UJ yj O 4) U. O- z
NI v> ai C t. A S O
m
_r Q UJ ro a £ a — RSJ
© U r- r-
1 ro CD OJ CVJ
UJ <
O 1 00 cr ro ro
O u_ CJ OJ
«
3
z o
E
< re
CC "O
R
r- h- r 0
ai (JD ro o —
11 OC
N ro c —
E OJ re C C ><
^ t-k. £ —
0 Z
c ^ni ra
Í5 0 CNtS co3
ez cq
OC ^ ISJ
— «o
2
i—i
o
© 0
g
u
l <i s*
d* — ©
OÜ
<
<
£0
<9
g
£
<H S
II II
w
h h
n>
—*
UJ UJ + t> 4*>*
: : : ~
•• w © r
l-Oh« o>
ZbZ o«
OUJUW
O ~ z
¡-T>
- UJ
UJ ti |/><Ah
tf> „ n <n
i I i A l u ü|« © -4 ©
a
z
a
T*
*
~
©
+m
O --
C -•w
:
QD-Ti : di
HC-: : W Mi
TI íy
- £ X —a. «a
I>
+ + c •> C l- V
1.1»1
Z-'p.-
C
wt jl ^xi
w —a. o
Z
UJ
Z
h
o
y>
n
w
3
CD
a
a
o
X
z
UJ +
O
**
tZ
U J -•O
O ..-'o K
_J
t -Z
O
H J1T) 41 :
trt n> m ~
u
:
«
c yo
OI
u
c
<B
C
c
O O
tí 03
z z
UJ UJ
X X'
h h n>
;
i
;
lA c© i
*4
c
*
©
Oí
(U
ni
o
h
I
T»"TI I/I OnI < 3 V . i- (
A : ri c O
UMLLJ O 1 * :
m.uH
—.
J -1
«t «t 41
CtOO O- <L> o U II H O
acta o
* * * * * * •»• —.
iD ll •T> «
II ...» ^ A u : <e «i a. 01
* :
h
+
z z a * : : : nz * .»
- II <N UJ H + if) *
H * •i r- <® u -£iü Q.-H : z
*
UJ * h ** 2 Z
M zoo»<
HTJH - C ^ 01 # «t (- "CU UJ
>r X +
1z * -% (y II M <» * li -OHUMHrt >a a n © I
UJh h o «
*
II .T •© t-< * •j 1
0 (
O (Jíi/I ^ ^ » -
Hit lile*-' 3 H OO » o-'fo^ t) - o O U JO OO •'O h©
*
O » H * _J * tn OH S*-r w * c©iD(0 * 'J©C|- c
*
i DC© O " <-©<o 41 H
*
Mrt GJ t-'
Z: UJ * UJ O m a *
«i !T) h : -h^Oht- ais Z: : 00 = rtlí)
*
s Nht-h » : 4lD(-h h z * 3 t0|- Htt
I): ; cu * aCL w njij - Iflt- h
*
MCTÍXH A''-' CTI sru-o
•« i i/mír V a
-
w *
< r o. wa c o i ^ s i a Z -10 <740 a
«tu H Z. O": : m <v<-t
*
* * tfi® OH »» ii 11*0 II C n>
hD h + * >t( * ift 4>000(- <T>° h I- "Ufc- Q-f l-|— üJ-fl»
*
ü«0«SCl ot-t-h no^i- «r- c(_o " £ *
«JOic tz
JOS-OOH o r z z a.-D ZZ "De z WhZ hZ Z í;H(-VHH
2 nZZ i/j jO<süOh ha h-h
HhHM a ~ H I
-jaocccauJt-iL"JOII.ÍUh h ftl H = (- i-c H X
I- « OÍ R rtzwHHt- a Dh
UJli.MlL<MO UJ UJOUJ ujiuaa: Z: (£UJ Ii, OCC-tu oa ccaujcaa a: <iuju.r>u- oujo a UJU.O
_iw M o a uaa.aCL_iiüMMl l H O J O J J-JÜ.CL -M Q.K H
ooa- _J oq.:- . Q.: -a-isdo. a-a-iMiDH-^o-ju. a ZMO
o o J 1- o X h Z «
S©h-©t-SS OOJSQSS SS -s sos osvts '-S OS S SO S s s - o sscjss «nsso saoss s ss©
T-<Q 0) OO -i-tiMei^lO uñ- íiSO^I 4<(U: lí>Of*<OÍIOí tn
igal fuco N cu© cu cojt5<yno
u t-í (U Ojfuüji'j Irttí) lí) l/lU"' cJl JJU"J: Ifl—10Irtich 10ÚIOIÍHD
seoso-Hiii - <ú l(M
úkúl ú)
CUCUOOJOM IW iMOlGjrOWl» »OI«M OIOJOJ (VKUfljCU •vajft ojdjoat: (uoi vwfíjKoi ojtufu cuottuwru w OJO
O : : ©o © h a z h : O9 O o : 10
A c3
** fu «0 V tu «H
t_ r* o
OO : J©
ctz * X D X 41 jaai
© A OCUJ o o h X z z ara
4> : iflX: 0|~ h vi tu O UJ UJ 41 HUJO
crazh 40 D © UJ X r Ch OZh
Z l/t ' J1Ü.XW O o -1 41 H O: CU : a. h h h e— CCUJ
M •O 4>ujuju.ou o o •A A O w o aoo
ect <s 41 <n
CC: L (5 " s a o
T> ;41 O ' i z z z h
X 41
* * **
•o _J: -j H Z<o IÍI c© i
£
- i ZUJ UJ UJ
* * >*
o •t (ü . Ul Z :ii : H uj: 1 z
S
• &
Vt u
•i «-i
*
+ t-l + 1 * (WOUJI X X *> d (
mS1—• o n> • »
a-- 1» U J Z-» CU tu
-1 a CL^I: : Xh h h * * * ** 41 X «t * » -t: X
J>
*
.. a
*
«r tú UJ 41 O: - -h ¡ i : II irt <lt h J0 -OO : -h
a. - (O© o - Z 41 41 s «
* * * * * * * *
oa a a .©«i i
*
* a *
*
<5 * lA ,
ri • 00 o •• . ÍV + UJ 1. c ¡ ya (Xh
* *
*
+ h a - < H (:U n a ** 01 * (yH 00
O «-1 *• (Ji^^t
*
u;o OO
* *
O
*
a -ftlio: : : 10 ** X.
" " ii ii II x. o©
* * * *
41
+
* o **
* *
10 3 (X h: ; w OH •OrH«tII
a av z- : © sI—I
* * * * * £ *
» a * Z O «t «t s * a * •rl 3 © 11 h:: 1—'
» ** UzJ * h
z> n j •4
* * *
UJ o h : hhl->> >- > TÍ UJ * © II Mlfl Z H
C r*3h %Í|(IW; ©B > (\l h hl->
•
a iid'iaujuj S •j- O UJ ii: : rl * X *
* * * *
o + X UJ H * (C ** <rauj
¿¿ UJ ^
» *
a * «t ii «no
+ *
* 4) a ..ü© _J II 41 v C * a H t-t-z u
i- b- •-ZZZtHw
* *
UJ <-Hhl-ZZ M z M
*
Z o ***** UJ K h J-: M z JSA 1» •JO * * * ** UJ ch 2Z"
O D a
cciOÜLzH Hw
* * » » * * * * * * * * * *
o Z Q z CZKZ-
X cc X Q. >T)M HHM X Cioa ^ hH C£I_M HXHZ H H X
UJ
CL o tu z a i'ictcraiuu. U M. U. ODJ
M oa
OJZ -U. ccaowa u.tcuja
C0(J M^tioaccu-ja HazaiflM
UJli.SU. o U
""ti. JHQH^IJ J o-ioa aocu.
OOOlLO.: Q-a1-1
DQ cc MUJO. a
© O <Ti
1in0>
©W z© •
©scus© © (U ©s
Q-l-4 «Jrtiroo'íio 10 <0 N©
H
o©^
h Ü
(VJ^tO •-S 0JHS©© SGS© © ©s octs ©
©©o vi©(3©CL©©©C©0©0' ->-<
TH
rtCUOÍOuj't©
s
©©cus os©s
©SOS-©Q©
a,* lO'í) §
-i 3 O 3 ~t •V ^HHHrt^ .ridriri^HSHH cu CJlCUOOjO
.l' tOC
l VJ ü
*
§
ra • 0) re u
u x> - c O
I
tfl 0a a 3 lA _> -t 3 O
OI os o® • x M* : ; j a o <n o O!
aif> : -O o.r». m xh O U- - z z z o
w
a
w
«i f) A : O ul H H Cc«u z z » < re
a
D
>
a u «oí uj u 3 qf
%
A
Ti a oH O
eco * ao cí + «n— waCt O UJ o+ J - -H G)
«*»
4 r r o 3 15
A oh ~ OH + * * ifl o •> a o C «J V H H s « § C oí
X * * o~o ^o <1 X Z - .71 TI TJ ** * * * * V) O o.
Ü. o
c tí *re• ü
- O vi -x(3Ox* » w c z a i£i - •
A Ul 1 * «I 0) n> 3
o z c*a O E O^O O ** Z w
4)— ®o itf> ^ -• Ú 0) — 0) O) «
—•
<í (A O IV <A oa, * o —- a.» H O c <"» « * O *
CO 0)
•o o z a.-o OZ Ü - 1* M ^c-cu-cto t s OH 3 id «i «II II* « £ 3
+ m : :
—' H *
<e o.|u — fí OU. J .O ¥ o C-JMOy-JH: - > * * * o ®» 11 o.<-c*- ** O ** fu C7 0) E
3 tn
c »i«)c a s OlTiC-^^O» a o O w CD
I»I N-o olí- O O H
• * * +
v — J— Ct X<w -<n * co UOU o * na y h or-c—r- ** 3 •D a> o o
: >(L a
*
"TJ "T> o J>0IWH >-HO - - * * H * * - A
i " O u-fllOuW * Z * c Q c
T3
vi ~ HO i_ a C
Ú a O H- ÜJO o ra
li tfiH
o hiCjujO" **
o -n <®Z *t<0 + H • C
-jl
*
O G<T« i O « a •-•'i • tu * H az 3 U J 0) O
O ÚL ~ O 0La
* UJ V
E C II Una: s* ** M "O ^ Z O •D UJ £
O
* ¥ * Z: : N
O Jhü * O «1-71 T£L t-H OH O * ni- t- » * ®lrt Hg) Z a> co 3 re
: H irtOC: H*aa ** O a i/i z ui cía ion o * a » a l a « caT.a o * tí - O ® : 5 ü i CTE
Zo Zo c oiiioZa <*> * " 3 CCL ** * « II ID H
•ísSsSfeSEfe IlíH o + C S tlH 3 II H HNUJmw «
zz H
HH
* * *>* * + * *
U1Z 1-
H o. «a hhj; ( - H J H M D>1 r HH zH : - CHH II Z LHI ZFTUO NON
H>DH K CL re c
ir
a
z u . a a z L_C£CEC£U
l-l HOlH woiair
I taiL-u. j a n <ra
H
OIU aa
DC . L CL; H .otüatL
l£ *»u- -JiHuoauj
H a ccuju- ILÜO o :2 Gs o
j i H X H - a a a aa oa - V V
a ^a.-ii-iowHo
o m c (J
o c ^ o
o
O: S S —SS S — SO© o x ss so os SIS «SSO'.SQ S-'SOO o o 3 32 o
irt jnoejr» o IflNOuSO SO a>® in DjOOlO^ O — re jO
O: (U<yfl>-iíV: IfíiOitlft: tr>u> inir»-•UlEID*'lftlf>lfiHiíiiíl iü S V > -o
Oí» O X aíOiínn1 -d-it: i. <r> m m ro_ 3
0
•O * a
o e
£ °
ai o » S
cd a
E
3 o O
z 2- C i i
o
M
C
^ s co S £
oo o o5 «12
Q o tS¡ ES
zz o a
Ü
« 3 £E ® — Cn i
+ ******** a ü. aa
+* a D aa o a E CL
u bJ o H oo
* - H
ifí h
if) • lí) * os o Z
IU
oo
I * <r>n »
-HH oo
sa a
01 •t
* - — * * * * *
* * + * * V)
* O * i i * z li: * * * 03 «
O
* % *
a * I * ce * o t-H o * ®C i (0 ID I£HD * *
Q. 3
3 * i* H z * H ZZ II OI0 * o * O
O
O
a
+
* O -) •f
* o o
tu
a #QCH
* (J MH
II II
N *
Z * irt * i. * a *
a *
O w
* <r ÜJ * O u * w r- ® cu c g
<r> o y<x H Lfí
* * ^ *
* id *m I- c
• t- a D * ^ ÍDC) * G. * ers
* if) * .9? CT
•
a o (us o *
ItlOO lD
z> a **• ftl • - rtc»® m o * hH ** M H NW z *
o •
C5
H H h-H * i- * lo
in
t) c
o rw o ra • - * (J » \f) Ht t -•cff a a aa * G +*
ce uní íjOC ii CSC * * * * * II c * i» *o• »***
# CJ c * 3 Sí
ILI * * * * c
+ CHH ' ^ « re
a
* * * * * * * * * * * * * *
c
CLn r H 3H H3H rzH O — r^ CC «
X O ÜJUJ ao axaoaxr cr,->>-ixr zhi-r HH M H UHflHHl
T3
u
a tú -ia O-l
u.a
aujo-iautu
ozu,<io2a oaaiuiij
tLaa.za
CEbJUili
a-Jja
ujiua TI CU nd.-ccauj
- i j a t-Q. i d caaa _II a5 <=
O 41 = = s; _ g a
s so eo sssssso ooinss soss SOISuScS a ; £ x <D
01 0(£l r^oo aiSrfWoituj ^r-fiw O^IOlD r^r-o «0> DS £3C 5. Sí
rucuturu OOI JOJ(.oiart -OOf) C
— O(«MO~3
c re = •S: 3 O m >- re
re o o re re ra '
= c B
o
re = E
O ? O « o.
<U aQ re 3 O Tc3 re o
(0 o a E NO
3 w
<f> 0) 0) z "C 5 2
o C "S "8 £ re>— co O! c. 0)
• c W "O re % E m 3
UJ §
I a c E n 0) E
rsi o w ü S LO « re •3
0) ra uj a o ® o O O C S o
O cr £ . N co OO f C 0)
TO "O
O «O I I Q) O O ^ 0)
V) 5 « £ <D •a ? g II £
z< ^ z re 3 O e 3 T31 •c £ re o O
O ^S 5— 2^ S ^ ^s 3 cgu ü o
re '
cc «k-
o < <u w a • OQ 3 Oí c
11 a" ® co—
a § T O i £ « a. z ¡c £ X
re •CEX3 0) — O t" 1Q. —
l- s £ £ S
E CU — zz zz
i s : n iT « co E
o C o ~
re 3 v z z zr z 0)
> ^ -«o •o co E c o ¡D E tn <u x — a>
9—
Q
- O
cnOnQ
UJ <C £ m u UJ e UJo--O ® co UJ
< <
2 O rt re S £< o re a;
U O 0) o c?5 ^ l i l i ^ I I o « i- D "O co o a
— — ai
^ w S B) w *
1 1 i s s € «s
- a a 5 5 JS « = «
O! 2u
l l " » •O =O RO fr?
« C 5 •e "= =
ai tr c 2
^= S G ^
ra 5; O ^™
% - 5.£ H,
? SÍ -c 2 ra E c
V,ü
re SS »3 ==
=
3
!- 1rí3 JS = =
c o J= o = u
—
= ü« 2
=
^ £ o S— ^ — o CL. g
ex s
=
s =—
S L
ÍV.-51 C3 -n Q C
(ro
TJ » u-5 Jí*>J
1rei c
0) ^ «
_3 > i l 0) o •o E C71 CJ QJ re f —
O CS)
É ü
•o W « § E o u re a> o ^ "O 0) re sOí «O — —
O O 0) c f • re re
o o o c 're o
> SI t=
"O
re TO
c w <j re 5 i M o c E « - 3J 3 0 1- re co 3 v>
>-
o •O
o O re — . u 3 o v>re 3 3 5™ u^— W ^ j u r ara 4) ai
«I
<3 3 e a) 3 re re qj o <u c a 2 re I 2 QJ TO
- as
w gi . c3 o o g Ó o tí
c
« _o ^ -S
Vi
u C ° I a! « -2 » o O
2 « re C "Ore t QJ TO < rS «>
ig
O ) re "o w "
E o 6 z g G
ü o—>
<r> 3w en re re o re W • — cu !_í Oí
s
c •o c CC
w
O a « I « ~ o
c o re ü
re o
— re c
1
3 cre i 3 re El TOu S • =C TO JtS TD > aj C'fljL3reaj jN O
•O •re o oí re o g
1 - re i >: re
H re re « 2 O tn<D O a, c3 (5 3O O o re
w o c * o ^ irt 3 X re
o. _o T 3 re C O tfí e/1 C —9
.= Q) a ra C O o « Ere
•
S
r* o;? o "55 O re q <L>_c c ® w
£ re A Sí £ o
QJ a o
5 -O
re c 2 re "> re
- re .2 ü o k. re .t u N re a tí _) o
re ai
3 4)
1
re - "Oo o - l O) 0) o re re o
3 Qr) z O a re 3 a
— es
S
re re ~ W 'O re o ÜJUJ Ü ¡ a> c<u c = > "O a •a > x: re •O
cn re
« S o u n d on Sound,
una cinta muy Personal»
La c i n t a v i r g e n para Personal C o m p u t e r C-10 y C-15.
CONSTRUYE TU
PROPIO JOYSTICK (I)
Primitivo de FRANCISCO
Ya h i c i m o s e n e l n ú m e r o 8 , u n a n á l i s i s d e t a l l a d o d e l a
filosofía f u n c i o n a l d e los J o y s t i c l c A h o r a , d i v i d i d o e n
d o s p a r l e s , os p r o p o n e m o s f a b r i c a r o s v u e s t r o p r o p i o
Joysticlc, t i p o K e m s t o n , d e u n a m a n e r a c l a r a y
minuciosa.
Construirse uno mismo un Joystick, realmente reducido y con un puñado
es bastante más sencillo de lo que pue- de componentes electrónicos de fácil
de parecer, con tu voluntad y nuestra adquisición.
ayuda, podrás conseguir a un costo
t)«
-Hte -CZ> o* tres objetivos finales: que saliera eco-
-CZ> 0» nómico comparativamente con lo que
fe
ya existe en el mercado, que no existie-
-C3 06
fe ra algo parecido ya comercializado, y
-tm> oí que fuera de fácil montaje y realiza-
• f e
ción, incluso para que se animasen a
IC- 2 hacerlo, en base a los dibujos y fotogra-
74LS32
fías. los más «miedosos» ante las cons-
í CU10 trucciones Hardware.
1
CU» Como interface, elegimos el tipo
kemston, por ser su protocolo Joystick
E s q u e m a del Joystick c o m p a c t o M i c r o h o b b y c o n p r o t o c o l o K e m s t o n (Fig. 1).
2G
vcc
74LS240
riN
G*D
1G
vcc
En^i 74LS32
[pl Ijp]
GND
22 MICROHOBBY
s
I
microordenador, uno de los minorita- La información de la actuación de Spectrum depende, por tanto, del pul-
riamente empleados en los programas los cinco pulsadores (Abajo, Arriba, sador o pulsadores que estén actuando
comerciales. Derecha, Izquierda y Disparo), es en- simultáneamente en función de la po-
tregada por la interface mediante los sición del Stick. Para aquellos que de-
bits D 0 a D4 del bus de datos, según el seen saber más en torno a este tema,
La interface K e m s t o n siguiente orden: por D 0 penetra la se- como por ejemplo cuales son los datos
La interface kemston utiliza la direc- ñal del pulsador de la derecha, por D I recibidos por el Spectrum en las ocho
ción de puerto 223, lo que equivale a el de la izquierda, pur D2 el de abajo, posibles direcciones de la palanca jun-
activar el bit A5 del bus de direcciones por D3 el de arriba y por D4 el de dispa- to con sus respectivas combinaciones
llevándolo a nivel bajo o cero lógico. ro o fuego. El dato recogido por el con et botón de disparo, les remitimos
al número ocho de Microhobby en que
se trataba ampliamente sobre el tema.
El c i r c u i t o e l é c t r i c o
Hn el esquema eléctrico intervienen,
únicamente, dos circuitos integrados:
el 74LS240, que contiene ocho inver-
sores con salidas triestados y el
74LS32, que contiene cuatro puertas
OR de las cuales sólo son usadas dos de
ellas. (Ver figura 1.)
MICROHOBBY 23
HARDWARE
En Microhobby hemos construido
un prototipo, que se detalla en las foto-
grafías, que funciona perfectamente, lo
cual proporciona una garantía total.
MANCO DE BANANA El Joystick se compone, físicamente,
DE T V
de una caja de plástico que contiene la
tarjeta de circuito, impreso con los dos
circuitos integrados y el mecanismo
SEPARADOR DE
del Joystick. De la caja sale una cinta
CIRCUITO IMPRESO plana de 13 conductores, Al otro extre-
mo de la cinta, se halla un conector
hembra para tipo conector trasero del
ARANDELA
Spectrum.
Una vez que hayas adquirido los
componentes detallados en la lista de
OI SCO OE ALUMINIO
SEPARADOR OE ( ÍSMM » J
materiales puedes proceder al montaje.
CIRCUITO IMPRESO
MUELLE HECHO
CON UN CLIP PULSADOR
Debido a la extensión de este articulo, nos
( 6 mm O ) hemos visto obligados a dividirlo en dos partes
la que aquí incluímos y una segunda, la próxima
semana, en la que publicaremos los dibujos de
las dos tarjetas de circuito impreso que compo-
ARANDELA CIRCUITO IMPRESO nen este montaje, y las instrucciones del pro-
grama adjunto que sirven para mostrar el co-
rrecto funcionamiento del joystick.
Perfil del m o n t a j e del m e c a n i s m o del Stick. (Fig. 4.)
Por otro lado, para todos aquellos lectores
que lo deseen, tenemos disponibles las dos tar-
jetas o el kít de joystick completo, al precio si-
mo señal de activación del pulsador. guiente:
Los triestados son abiertos hacia el bus Realización práctica - P l a c a C.l. de joystick, 350 ptas.
-Placa C.l. para conector trasero, 175 pías
de datos en e! momento en que el mi- La realización es, lógicamente, la —Kit completo (incluyendo ambas placas!,
croprocesador pide por programa la parte más conflictiva de todo montaje 2.500 pías.
lectura del puerto 233, para lo cual hay Pedidos a PROHOBBY La Granja, s/n. Polígo-
electrónico, por lo que recomendamos no Industrial de Alcobendas, adjuntando talOn
que sumar las señales RI); de permiso la lectura detallada del texto y guiarse nominativo por el valor del pedido, más 100
de lectura, IORQ; de acceso a puerto y por los dibujos y fotografías que se ad- ptas por gastos de envío
10CLERP 5 7 9 9 7 LET PRP = 0 LET 1000 IF OP F+1 =166 THEN Z ASE POKE 2 " 9 9 9 INT -Z.-256'
T LE"»" G l = l LET G H r l LET X = SO TO 1 5 0 0 „ „ " C O N T R O L COC'E Í"993 . Z-2~99
135 LET v =©" |_ET MSC LET G=0 1010 LET X = X - 1 LET Y=V + 1 K,0 T O
PO*E 2 3 6 5 3 . 3 LET ZI=26001 1600 211"T IF RS = "E- ' THEN L£T pfip = l p
2 sZ I - S : LET Z F s P E E K 2 3 7 3 2 * 2 6 6 *P 1500 EEEP .1.30 RI'I INC 7 , P R P E P O RT 2 1 . ; ••.=
EEl- 2 3 7 3 3 1S.0 GO TO 1 6 3 0 A- 21 I I "Y = " , R T 21 23."J =
15 I N P U T " T I P O K E f ' O 5 T 0 N a O 1600 L E T GsO IF POINT < X , Y > = 1 T 2119 I F A I : N " T M E N GO SUE- 3 O 0 O
SINCLRIP <s> ,J* J $ = r - THEN HEN LET G=1 2120 TO 2 0 0 0
1 6 1 0 PLOT INK • £200 P L O T INF :. IF.'JERSE L.X.Y
L E T PUERTO • 2 2 : -
18
L E ' f 1 =0 TO 1613 IF GH=0 THEN RETURNC IF : = z i THE-. G : s u e 2 7 0 0 LE" Z
1614 LET Z S Z »2 IF 2>=Z T M E N GO =z: LET - = 1 3 5 LET , = ; - GOTO
16
Í436
IF J * = " S " TMEM L E T
Pi=255 GO T O
P U E P t O «6
15
3UE 2700 RETURN 2C00
LET ¿21C -E- Z =Z-2
21 15 Z e 2 =2S6
1615 I F G » 1 T H E N POKE Z , 2 5 5
1 7 GO TO 15 G=0 RETURN 1 C'EER TME'Í L E T Z=Z-
13
23
L E T PFTUSRSO
I N P U T " CE 5 E H CRP3RR PA'.'TAuL
.620 POKE Z X POKE <2 * 1 (Y 2120 LE" ASPEE» Z LE' Y =PEEK TZ
1 6 3 0 RETURN
A (i N "; V* IP . Ce " N 1 THE', GO £ 0 0 0 ^ O ^ U = 0 TO R R U S C NE*T U I -:
TO 2 3 F PFTR = I T H E N P R I N T C H P E R 0 INI- 22Í5 X»254 THEN LE- ZRZ-£ GO
¿ 5 P C I N T " P O N G A EN MARCHA EL C 7,RT 2 1 - 4 ' " , R T 2 1 14 " Ñ 7.; 2220
RSSETTE" LOPE- " " 5 C R E E N * GO SU T 21,26 RT £ 1 , 4 ; * , A T 2 1 14 22 30 GO T C 2000
£ 3000 P P I N T AT 2 0 . 0 , PfiPER 0 ..,RT 2 1 ,26 . A 2~00 FOR 5 * 1 ~ 0 10
INI- O L O R D " CODE LET Z=PEEK 2 0 0 6 LET R = I N PUERTO IF J®a"5" 2-;O 6EEP . 2 30 EEEP .2.10
2-996+256'PSEK 27999 L E T > =PEE T H E N GO SUB 3 1 0 0 2720 NEXT 5
K iZ-2 LET v=PE£f 2-1 GO T O 2007 ,_ET A=fiBS • P1 -R ' RETuRN
2000 2 0 1 0 IF ft=0 T H E N GO T O 2 1 0 0 REM £ Z O O F O R C = 2 , = 0 0 1 TC- Z 5 T E P 2
5 3 E-ORC'EP 3 POKE 2 3 6 2 4 • 2 4 PR CONTROLES £310 P E E K F O X RND ?EE>" 'F.L :
PEP 5 CLS 202O IF R-16 THEN GO TO 2200 RE . - H E ' ; GO T C 2640
¿0 FOP 1=0 TO 31
. 2 H BORRADO 2Í-20 ;JE-T F
i 4.0
i. "I'
PPINT I' • O.RT 2030 IF rt 16 THEN GO TO 2036 RE 2 5 3 0 RETUR N
M MOVIMIENTO £340 P
0=F
5C NEXT I 2033 GO TC 2040 REM IMPRESION 2650 F PLOT INUERSE 1 PEE" F0.,PEE>
60 -OR 1 = 1 TO ^7
20 10 1".MT I 2035 LET Glal IF GH=1 THEN LET 1
0t 1 1
70 PPINT INK 0CT C-H=0 LET Z=Z*2 POKE Z, 254 GO 2660 LE" " F O =F0 + 2
.31. TC 200O I ER PEE» FO = 2 5 5 "HEN GO 2
50 'IEXT I 2 0 3 6 I F G = 1 T M E N GC T O 2 0 3 6 seo
35 PLOT K.Y 2 0 3 7 PLOT I N K T. INUERSE 1,X,Y £6:0 IF PEEK FO 254 T^EN GO TO
30 GO T í 2000 2 0 3 S GO SUB R * 1 0 0 GO T O £ 0 0 0 2650
100
n I F -X + l - = 2 4 6
THE'-I
o i-E"" <=.-.+ 1 :-o 70 GO TO 1 5 0 0
íeoo 2 0 4 0 LET GH=1 I F « 1 6 T * £ N PLOT £390 LET Z'isZ Í.ET F0N =F0 LET Z
INK T INUEP6E G L . X . V LET 61=0 =Z+F-F0
200 IF x-1 =7 TMEN GO TO 150C GO S U B 1 C - 1 6 ) » 1 0 0 GO T O 2 0 0 0 £9C0 FOR O = F0I-J T O Z N 5 - E P 2
210 LET = x -1 GO TO 1600 REM I M P R E S I O N 2910 POÍ E F C-EEK O PO^ E I F » l > ,P
400 IF Y-l<=7 THEN GO T 0 1500 2100 LE* FL»=INKE $ IF « » = ' THE EEK C*LI
4 10 LET í*«Y-1 GO TO 1600 •L GO TO 2 0 0 0 25=0 LET
500 IF X + 1 r 24 3 OC -1 =~ THE'I 2102 IF = T H E N I N P U T "OL'E T
GO TO 1500 I'ITS " " T GO T O 2 0 0 0 2930
2 9 35
NEXT O
L E - x»PEEI- 'Z-2' LET V=PEE
„ „
510 LÉT X = • + 1 LET YbY-1 GO TO 2 1 0 4 !=• FL*«"M" T M E N IMPLIT " O U E U ' >' Z - i '
1600 ELOCIOAC PAUSR GO T O 21 0 0 0 £-.:<40 PET'JRN
6O0 IF X-1 =7 OR Y - l t t T THEN GO 210É H$ = "C ' THEN INPUT 3UE P 3000 LET PRR=0 1 P P I N T PRPEP O I
TO 1 5 0 0 RPEL " ' , P PRPEP P FOP 0 = 1 TO Ht- 0 R- 21 . 1 .
6 1 0 LET X s X - 1 LET V.Y-1 GO TO 30 FOR U = 1 T O 2 0 P R I N T INK 6.
1600 O U E » 1 . RT U . G . " "
A GO T O 2 0 0 0
NE > 7 U NEXT 3010
JIOO
RETURN
I P R = 2 5 3 OR R=237 THEN LET
300 IF .+1 =163 THEN GO TO 1500
518 LET v =Y +1 GO TO 1600 2 1 0 5 I F R ( = " 0 " T H E N GO S U S 2 6 0 0 FL=RTL
3110
RETURN
I F A S 2 5 4 OP R=236 THEN LET
2110 IP FL»="Ñ' T H E N GO T O 1 0
900
N GO TO 1 5 0 0
IF + 1 > =246 OR / + 1 í =166 THE
2115 ir M»= S " T H E N SRUE "OIBUJO Ñ =A- 1
9 1 0 L E T XaX + 1 LET v=. + 1 GO TO Í-CREENS PO^E 27993 . Z-256-INT 3120 RETURN
1600 1
24 MICROHOBBY
0 Alicia 0 Dados 9 Musical 0 Desen- »
sambtador 0 Cosme 0 Ataque • G.D.U.
0 Dominó 0 Squash 0 Rescate
A LA vsm
EN ESTE NUMERO:
ALICIA Vive en el pa s
' las marav ,tas
' una ATAQUE De' i e n d e t u c i u d a d d e las h o r d a s
fascinante aventura. invasoras.
• COSME A y u d a C o s m e a d e s p e r t a r d e su
a
pesadilla.
£1 p r i m e r p a s o p a r a c o n s e g u i r « s i n t e t i z a r » a l g o , es
«analizarlo». Nuestro sintetizador d e v o z precisa
disponer de una p e q u e ñ a base d e datos donde
a l m a c e n a los v a l o r e s d e t o n o y f r e c u e n c i a n e c e s a r i o s
p a r a simular la correcta pronunciación d e c a d a u n a d e
l a s letras. En e s t e a r t í c u l o p r e s e n t a m o s u n « a n a l i z a d o r »
d e v o c a l e s q u e s e r v i r á p a r a i n t r o d u c i r e n m e m o r i a los
valores pertinentes e n c a d a caso.
Esta semana vamos a ver uno de los ma se encontraron los cinco ciclos que
programas de trabajo que se desarrolló forman la base del sintetizador de vo/
específicamente para estudiar y mejo- Los ciclos son éstos:
rar el sonido de las cinco vocales pu- Letra «a» ciclo de 14 bytes repelido
diendo acceder rápidamente a las ba- 19 veces (19, 32, 22, 33, 7, 74, 19,42, 28,
ses de datos de cada una de ellas y oír 55, 22, 43, 17, 14).
seguidamente el sonido resultante. Letra «e» ciclo de 22 bytes repetido
En el artículo anterior, desarrolla- 16 veces (5, 84, 13, 5, 23, 100, 7, 17, 6,
mos un programa para analizar las vo- 17, 10, 12, 22, 13, 8. 16, 7. 20, 9. 10. 22. ros 1120. 1220, 1320. 1420y 1520. Cam-
ces grabadas en cinta cassette y ver las 11). biando el contenido de estas líneas
distintas gráficas que presentaban. Letra «i» ciclo de 14 bytes repetido D A T A se puede variar el sonido de las
Cuando se utilizó para estudiar los dis- 17 veces (10, 174, 19,2,20. 73, 3, 12.6, cinco vocales.
tintos sonidos del idioma castellano se 99, 10, 5, 16, 8). En las líneas D A T A con número
pudieron constatar algunas curiosida- Letra «o» ciclo de 6 bytes repetido 16 1010. 1020, 1030 y 1040 se encuentra el
des que nos sirvieron de gran ayuda al veces (25, 109, 32, 146, 30, 180). código máquina que lee ios ciclos de
programar el sintetizador. Letra «u» ciclo de 4 bytes repetido 22 cada letra y los convierte en una salida
Una de ellas fue la gran similitud de veces (30, 150, 37, 127). audible en el Spectrum. Pensar que es-
las gráficas generadas por una misma El siguiente programa permite ma- ta rutina permite generar cualquier on-
vocal analizada en todas sus diferentes nipular desde un listado BASIC los ci- j da cuadrada (aprox.) desde una base de
posiciones silábicas. Por ejemplo la «a» clos de las cinco vocales, que se en- tiempos. L o q u e permite generar cual-
generaba gráficas prácticamente igua- cuentran en líneas D A T A con núme- quier ruido por raro que sea.
les en silabas del tipo consonante-vo-
cal (sa, ba, ca) como en las sílabas del
tipo vocal-consonante (as, ar, an).
Esta similitud se mantenía para to-
das las demás vocales. Por lo que se de-
cidió que los sonidos vocales serían so-
lo cinco. Cada una de las cinco vocales
sólo tendría un sonido.
Estas gráficas tuvieron que optimi-
zarse y se utilizaron varios métodos:
Primero se intentó encontrar el ciclo
promedio a partir de los diferentes ci-
clos repetitivos, el fracaso fue absolu-
to, el ciclo promedio de una vocal oído
separadamente no se parecía en nada
al sonido original. El segundo método,
que resultó el correcto consistió en ais-
lar los diferentes ciclos y sin pretender
unificarlos, se escucharon separada-
mente como si toda la onda estuviera
formada de ciclos iguales. De esta for- Gráficas típicas d e c a d a una d e las vocales
26 MICROHOBBY
DESENSAMBLE DE LA
RUTINA CONTENIDA EN
LAS LINEAS DATA 1010,
1020, 1030 y 1040
íe 0RG 63000
20 LD HL.««400
36 LD DE,#6100
40 DI
50 LmBEL! LD 6 , « HL
60 LD A»B
70 AND A
30 JR Z , LAEEL3
LABEL2 LD A,«17
100 OUT (HFE >
n e CALL L*BEL6
120 DJNZ LABEL2
1 30 LABEL3 INC HL
140 LD B,(HL)
150 LD A, B
160 «ND A
170 JR :,LABEL5
1 SO LABEL4 LD A, «7
190 OUT <«FE) ,A
208 CALL LABELó
210 DJN2 L.-1&EL4
220 LABEL5 INC HL
230 DEC DE
240 LD A, D
250 OR E
260 JP •IZ , L A B E L 1
El listado BASIC es un poco alípico una pequeña miscelánea de como uti- 270 El
pero está hecho con la sana intención lizar a fondo las instrucciones de DA- 280 LABEL6 RET
MICROHOBBY 27
PROGRAMAS DE LECTORES v
ESTADISTICA ESCOLAR Premiado con 15.000 pts.
28 MICROHOBBY
292S P R I N T I N K 7 , PRPEP 4 , A T 2,0 ,5*IJ> BEEP . 0 1 , - 1 LET J n J + 1
» " , I N K 1,(1T 6 , 1 1 , " M E N U " ,CI BEEP .1,10 NEXT I
I 8 5 2 0 P R I N T I N K 2, PAPER 4 RT 1 0 , 2930 INPUT "ASIGNATURA'' l a e n o s d 3 5 9 0 P P I N T I N K 2 , PAPER 4 , A T 2 0 ,
1
4 , " G R A F I C O DE A S I G N A T U R A S lA>" Í LO letras»", L I N E A» 4 , " S U 6 P E N 3 O S" BEEP .1,1
2 5 3 0 P R I N T I N K 2 . PAPER 4 , A T 12, 2935 I F L E N A * > 1 0 T H E N GO TO 2 9 3 0
6 , ' G R A F I C O OE CURSOS í C > "
2 5 4 0 P R I N T INK O . R T 2©,1,"Pulse
0 3 6 0 0 P R I N T I N K 6 , PAPER 2 , A T 18,
S
2 9 4 0 P R I N T I N K 6 . PAPER 3 , A T 2,1 2; " 0 1 2 3 +3 " BEEP .
ia t e c l a coífeipcmdienu 3,AS BEEP . 1 , 1 5 INUERSE 0 1 , 15
2 9 4 S INPUT NUMERO OE ALUMNOS DE 3 6 1 0 RESTORE 3 6 2 0 FOR I E 6 TO 1 6
L CURSO " , A C LET U=5 LET U=3 STEP 2
2 9 4 7 P R I N T I N K 3 , PAPER 7 , A T U , 3 3 6 3 0 READ BS P R I N T I N K 3 , PAPER
2 5 5 0 I F I N K E V $ • " A " OR I N K E Y » * ' 4 " 0,RC BEEP .1,-J 7.RT 1 , 2 4 , 6 * BEEP . 0 1 , - 1 NEXT
T H E N GO SUB 2 6 3 0 GO TO 2 6 3 6 2 9 5 0 INPLIT " A L U M N O S CON MUY D E F I I
2 5 6 0 I F I N K E Y * = " C " OR I N K E Y S = C " CIENTE \ N LET 0 = 2 0 GO SUB 3 0 0 3 6 5 0 DATA " A L S " , " 0= "," 1=
T H E N C-0 SUB 2 9 8 5 GO SUB 3 5 0 0 0 " , " 2= " , " 3= ","+3«
' 2 S 7 0 GO TO 2 5 5 0 2 9 5 5 I N P U T " A L U M N O S CON INSUFIC 3 6 6 0 I N P U T "CURSO*» <»en0S de 1 2
i 2 6 0 0 P R I N T AT 2 1 , 0 , " D e s e a o t r o 9 IENTE .N GO SUB 3 0 0 0 letras»"; L I N E C$ BEEP .1,10
r a f 1 co S / N " 2 9 6 0 I N P U T " A L U M N O S CON S U F I C I E N 3 6 7 0 I F L E N c * > 1 0 T H E N GO TO 3 6 6
2 6 1 0 I F I N K E Y T » " 5 " OR I N K E Y « = " S TE " ; N GO SUB 3 0 0 0 O
T H E N GO TO 2 6 C 0 2 9 6 5 I N P U T " A L U M N O S CON B I E N " , N 3 6 8 0 P R I N T I N K 7 , PAPER 4 , A T 2,2
2 6 2 0 I F INKEY " N " OR I N K E Y f = " n GO SUS 3 0 0 0 , C*
THEN 6EEP 2 , 0 6EEP 2 . - 6 6EEP 2 9 7 0 INPUT ALUMNOS CON N O T A B L E 3 6 9 0 I N P U T "NUMERO DE ALUMNOS DE
3.-17 CLS STOP ".N GO SUB 3 0 0 0 L CURSO " , R C L E T J =6 LET U = 3
2 6 2 5 GO TO 2 6 1 0 2 9 7 5 INPUT ALUMNOS CON S O B R E S A L 3 7 0 0 P R I N T I N K 3 , PAPER 7 , A T J,2
2 6 3 0 GO SUB 2 9 8 5 PRINT INK 2 , B IENTE " , N GO SUB 3 0 0 0 GO TO 2 6 7,AC 6EEP .1,-J
RIC-MT 1 PAPE R 6 . A T O 1
DE A S I G N A T U R A S " BEEP
GRAFICO
.1,0
00 3 7 1 0 I N P U T " A L U M N O S CON O SUSPEN
2 9 9 0 PAPER 1 BRIGHT O CLS PR SOS " , N LET 0 = 2 0 GO SUB 4 0 0 0
* 2 6 4 0 PLOT 16 3 1 DPAU INK 7,0,10 I N T INK 3,.AT 0 . 2 4 - , AT
i 4 DRAU 1 9 5 , 0 DRRU 0 - 1 0 4 DRAU 3 7 2 0 I N P U T " A L U M N O S CON 1 SUSPEN
-195,0 6EEP .1.5 SO " , N GO SUB 4 0 0 0
T 2 3 5 0 LET J = 1 L E T 5 * = " * V. ALUMNO 3 0 1 0 LET J I U + 2 P R I N T I N K 3 , PAP 3 7 3 0 I N P U T " A L U M N O S CON 2 SUSPEN
s ¡r ER 7 ; A T Ü , 3 0 , N BEEP .1,-J
SOS " , N GO SU6 4O0O
3 7 4 0 I N P U T " A L U M N O S CON 3 SUSPEN
2 3 3 0 FOR 1 = 5 T O L E N S * * 4 3 0 2 0 LET C = I N T <(LO0*NI/AC>
2 6 6 5 P R I N T I N K 2 , PAPER 4 AT 1 0 SOS " , N GO SUB 4 0 0 0
3 0 3 0 FOR 1 = 3 2 TO 3 2 + C PLOT 0 , 1 3 7 5 0 I N P U T " A L U M N O S CON MA5 DE 3
l ,5t(Ji BEEP .01,-J DRAU I N K 6 . 2 7 . 0 BEEP .01.-1/5
2 8 7 0 LET J = J + 1 NEXT I SUSPENSOS " , N GO SUB 4 0 0 O GO
1 2 3 7 7 P R I N T I N K 2 , PAPER 4 . A T 2 0 . NEXT I TO 2 6 0 0
* 10."N O T A S BEEP .1,10 3O40 LET OÜO+32 P P I N T I N K 4 , BR 4 0 0 0 LET J r J + 2 P R I N T INK 3 , PAP
2 8 3 0 P R I N T I N K 6 . PRPER 2 . A T 16 IGHT 1 . INUERSE 1 , A T 4 . U . C , '." ER 7 , R T J , 2 7 , N BEEP .1,-J
2 . " MO IN SU BI NO SO " BE BEEP . L . C 1 0 LET U = U+¿ PETUPN 4O20 LET C = INT <(1O0*NI/AC»
I EP . 1 , 1 5 3 5 0 0 P R I N T I N K 1 , PAPER 6 , BRIGM 4 0 3 0 FOR 1 = 3 2 TO 3 2 + C PLOT 0 , 1
2 8 8 5 RESTORE 2 8 9 0 FOR 1 = 5 TO 1 7 T L . A T 0 . 1 . " G R A F I C O DE C U R S O S " DRAU I N K 6 , 2 7 . 0 BEEP ,01,1/5
6TEP 2 BEEP .1.0 NEXT I
* 2 3 9 5 READ B i P R I N T I N K 3 , PAPER 3 5 1 0 INK 6 PLOT 1 6 , 3 1 DRAU O . L 4 0 4 0 LET © = 0 + 3 2 P R I N T I N K 4 , BR
7,RT I . 2 7 ; B » BEEP . 0 1 . - 1 NEXT 04 DPAU 1 6 3 , 0 DRAU 0 . - 1 0 4 DRA IGHT 1, INUERSE l . A T 4,U,C,"Ü"
2 9 1 0 DATA AL = \'MD = ","IN» U -163,0 BEEP .1,5 BEEP . l . C / 1 0 LET U = U * 4 RETURN
•;,"SU« ","8I= •• , " N O * ","50 = 3 5 3 0 LET J = 1 L E T SS = " « V. ALUMNO
2 9 1 5 INPUT "CURSO'' ( * < n o s de 12 6
U U J S I " , L I N E CS 3550 FOR 1 = 5 TO L E N S $ + 4
2 9 2 0 I F L E N C t > 1 2 T H E N GO TO 2 9 1 3560 P P I N T I N K 2 . PAPER 4 . A T 1.0
5
BLACK JACK
Elvira SAINZ
Spectrum 4 8 K
Si t e g u s t a n
las c a r t a s y , e n
e s p e c i a l los j u e g o s d e
a z a r , con este Black
Jack un tanto
p a r t i c u l a r , te lo
pasarás «pipa».
A pesar de que este conocido juego
necesita, al menos, dos personas, en
esta ocasión podremos jugar solos con
el croupier (tu Spectrum). Al comien-
zo del programa se muestran las ins-
trucciones y. mientras tanto, se defi-
nen los gráficos (subrutina 9500) y la
baraja (subrutina 9800) que consiste en
una matriz de 13 x 8 que formará las
irece cartas, destinando a cada una su
valor y su palo.
Se inicia la jugada apostando lodo o Premiado con 15.000 pts.
parte del dinero estipulado (1000 £). A 1 REM E L V I R A SAINZ
1 0 GO SJ,
continuación salen dos cartas (con me- 2 0 REM
nos no se pueden conseguir los 21 pun- 30 LET 1=1000
40 GO SUB 7 0 0 CLS LET
tos que requiere el juego) y el Spec- NOTñS GRñFICñS
SO
":
LET x =0
LET w = l
LET v = l
LET PU=*
LET C*«"
MICROHOBBY 29
PROGRAMAS DE LECTORES
740 RETURN 0
120 IF p=2 TMEN L E T U*3 LET i* 1OO0 REM 2 0 7 ® I F a » = " n " T H E N STOP
l 1010 L E T PC-0 LET #=1 LET x=0 2 0 8 ® I F a $ = "£ " T H E N GO TO 4®
130 IF P=3 TMEN L E T U«5 LET I = LET y = 17 2 1 0 0 P P I N T PRPER 1 , I N K 7 . A T 16.
i 1020 GO SUB 1 0 0 6, FLASH 1 , " "»OTRA PARTIDA^
140 IF p 34 THEN L E T U=7 LET i» ".AT 17,6," S» O NO
8i ^|oo reh W B M ^ M a H m
I S O L E T j « = fe» <n .U TO i ) IF 2110 LET a t = INKEy t IF «»*"" THE
1 2 ^ » COR Cs® TO 5 P R I N T RT x + C . N GO TO 2 1 0 0
" TMEN CO TO 1 0 5 u , PRPER 7 , c » NEXT C 2120 I F a « = *'n" THEN NEU
1 6 0 L E T b » m , u TO « > • " 1 2 4 C P R I N T RT X , V , j t < 1 I , A T x + l , y 2130 GO TQ 3®
170 IF j t < 2 » a " « OR j » < 2 > = " » T . j I (£1 ,RT x + 4 , y + 3 , g * < 2 > . A T x+S,y 9SOO REM
MEN I N K 2 PRPER 7 •3;j$ il) 9 S 1 0 FOR x = 1 4 4 TO 14 8 FOR j = 0 T
180 IF J * t a ) OR j t < 2 > = • " T 1250 IF 1 OR W=2 T H E N L E T y m y • O 7 PERO * POKE USR CHR» i t j , i
MEN I N K O PAPER 7 5 LET M = « t l GO TO 1 3 0 0 NEXT , NEXT 1 RETURN
U 1 2 6 0 I F W =3 THEN L E T X a7 LET y = 9 5 3 0 DRTfl O , S 4 , 1 2 7 , 1 2 7 , 6 2 , 2 8 , 8 , ®
£0» REM amBBBBaB 17 L E T « s v + l : CO TO 1 3 0 0 9 5 4 0 DATA 0,8,28,62,127,62,28,8
2 3 0 FOR Ü 0 T O 5 P R I N T RT X + C . 1 2 7 0 I F w = 4 OR w = 5 TMEN L E T y «y + 955® DATA O . 8 . 2 8 . 4 2 , 1 2 7 . 4 2 . 8 , 2 8
y , PRPER 7 , C t NEXT C 5 L E T w«w + l GO TO 1 3 0 0 9560 DATA 0,8,28.62,127,42.8,28
24.0 P R I N T ftT X , y , j • < 1 > , RT X + l , y 1 2 8 0 I F u =6 T M E N L E T x = 0 LET y = 957® DATA 0,70,201,73,73,73.23®.
, j í < 2 > , A T x + 4 , y + 3 , j » l 2 ) . A T x +5 , y 17 LET O
• 3 , j « <1>
2 5 Ó I F u > l OR w » 2 T H E N L E T y = y +
1300 r e h ar
131® I F n >10 THEN L í BORDE
5 LET +1 GO TO 3 0 0 1 3 2 0 I F n = 1 THEN LET n=ll
2 6 0 I F w = 3 THEN LET x = 7 LET y = 133® LET p e z p e + n R 1
1 LET w = w * l GO TO 3 0 0 9 6 3 0 P R I N T AT 1 2 . 9 , PAPER 2 , BRI
1 3 4 0 P R I N T RT 14 , 1 9 . PRPER 5 . IN GHT 1 . " BLACK JRCK " , A T 11,9,"
2 7 0 I F W=4 OR V = 5 T H E N L E T y =y + K O , " CROUPIER " , P C
S L E T wsw + 1 GO TO 3 0 0 ";RT 13.9,"
1 3 5 0 I F PC 1 7 T H E N PAUSE 1 0 0 GO
2 8 0 I F w = 6 TMEN LET x=® LET y * TO 1 0 2 0
1 LET 9635 PRINT AT Í5,9,"© by E. Si 1n
3OO REM A N I U D K M ^ Z 1 3 6 0 I F PC 2 1 T H E N P P I N T ftT 1 6 , 5
P A P E R O , I N K 6 . " E L C R O U P I E R SE 9 6 4 0 P R I N T RT 2 1 , 0 , " P u U a u r . i l
3 1 0 I F n > 1 0 THEN LET n = l ® MR1 P A S A D O " , R T 1 7 , 5 , " 'GANA e c 1 a p a r a cor» u n u j r ••
320 IF AND THEN LET h a STE FOR f i l O TO 2 5 9 6 5 0 PRUSE O CLS
1 6EEF . 0 5 , i NEXT f LET U U ) G 9 6 6 0 P R I N T AT ® , 9 . PAPER 2 . 8RIG
330 IF THEN LET p u » n GO SU 0 TO 2 0 0 0 MT 1 , " B L A C K JRCK "
B 100 GO TO 2 0 0 1 3 7 0 I F p C i p U T H E N PAUSE 10® GO 9670 PRINT El jueso COHSiSlt
3 4 0 LET p u =pu * n TO 1 0 2 ® en a p i - o x i a a r - i e a 21 puntos, sin
3 5 0 P R I N T AT 1 4 , 0 . PAPER 5 . INK 1 3 3 0 I F PC =Pt' TMEN P R I N T RT 1 6 , 8 pasarle, encuyo caso p i e r d e s 1
0 . " T I E N E S ",PU," P U N T O S " , PRPEP 7 . I N K 1 . " ' H E M O S EHPOT AC- o apostado. R c o n 11 n u a c 1 o n el
360 IF AND p u i í l TMEN P R I N 0 1 " , R T 1 7 , 8 ; " J U G A M O S OTRR UEZ" c r o u p i e r Kara l o a i í i o , con l a ve
T OT 1 6 1, 6 . PRPER 3 , I N K 7, FLASH FOR 1 = 1 0 TO 2 0 BEEP . 0 5 . I NE•T fliaja de q u e s e p l a n t a r a cuando
1." •ENHORABUENA'1 , FLASH i FOR i = 2 0 TO 1 0 S T E P - 1 BEEP le supe r e . "
O . R T 1 7 , 6 , " H A S HECHO B L A C K - J R C K .®S,f NEXT f PAUSE 1 0 0 PRPER 968® PRINT " L a s R E G L A S DEL J U E
FOR r. = 1 TO 3 FOR f = 1 0 TO 2 S 4 CLS GO TO 5® GO s o n : - B i a c K jac». consj
BEEP . 0 3 , I NEXT f NEXT n LET 1 3 9 0 I F PC>Pu T H E N P R I N T RT 16.6 s u en c o n í í - í u i r 21 puntos con
l>Uí<£ GO TO 2 O O 0 , PAPER 2 . I N K 5> " E L C R O U P I E R SE las dos p r i - n e r a s cartas.
3 7 0 I F p u < 2 1 T H E N GO TO SOO PLANTA",RT 1 7 , 6 , " íPEROIST -las figuras vate
3 8 0 I F p u > 2 1 T H E N P R I N T ftT 1 6 . 1 E' FOR f = 1 5 TO O S T E P - 1 n 10 p u n t o s . - e l AS v a l e 1 1 e n
O. PRPER 1 . I N K 6 . MRLft SUERTE BEEP . 0 5 , f NEXT f LET 1*1-4 l a s dos p r i - h e r a s c a r t a s ceños
" . O T 1 7 , 1 0 , " T E HAS P A S A D O " FOR GO TO 2 0 0 para el c r o u - p i e r , que ¿ie»pre
f = 1 5 TO 1 S T E P - 1 BEEP . 0 5 . f N 2 0 ® O REM _ásm le v a t e 11."
EXT f LET 1 = 1 - á ¿O TO 2 0 0 0 2 ® 1 ® FOR F = 1 9 TO 2 1 P R I N T PAPER 969® PRINT " - e l c r o u p i e r no se
5 0 0 REH 1 ; AT f , 5 , " puede p l a n - t a r a n t e s de 17 P u n t
5 1 0 P R I N T RT 1 6 , 9 , PRPER 7 . INK NEXT r P R I N T OT 1 9 , 8 , PAPE OS. T u S i .
2."->0TRR CflRTR^'.RT 1 7 . 9 , FLRSM R 1, INK 6 , "RNTES T E N I R S " , 9 , " £ E n p i e z a s con 1000 £
1;" SIvNO R ver concuantas acabas."
5 2 0 LET a « = I N K E Y » IF a»<> s A 2 0 2 0 P R I N T RT 2 0 , 8 , PAPER 1 . INK 9 7 0 0 GO SUB 9SOO GO SUB 9 8 0 0
NO » | < ) " n " T H E N GO TO 5 1 0 6 . HAS APOSTADO " , A , £" 9 7 1 0 I N P U T " P u l s a ENTER p a r a e u p
5 3 0 I F a * - ' • « • • T H E N GO SUB 5 S 0 2 0 3 0 P R I N T AT 2 1 . 9 , PAPER 1 , INK c z a r "', a t RETURN
GO SUB 1 0 0 GO TO 2 0 O 6 . " T E QUEDAN £"
5 4 0 I F a » = " n " T H E N GO SUB SSO 2 0 4 0 GO SUB 9 8 3 ® FOR F=® TO 15® Ü l O RDEIR « W 1
^ TO 1 3
GO TO 1O0O NEXT F: I F L ¡ = 0 T H E N P R I N T RT RERD d i L E T r> $ ( r ) =a t NEXT f
SSO P R I N T RT 1 6 . 9 . PRPER 4 , 1 9 , 5 . PRPER 1 , I N K 7 , " L A S T I M A O 9 6 2 0 DATA " A " , " 2 " , " 3 " ,"4" , " 5 " , " 6
" , RT 1 7 , 9 . " UE 5E ACABO ,RT 20,5." " , " 7 " , " 8 " , " 9 " , "10" , " J " , " O " , " K "
" GO TO 2 1 0 ® 9S25 DIM b t < 1 3 , 8 )
2 0 5 ® PAUSE 2 ® 0 9 8 3 0 FOR n = 1 TO 1 3 LET b»in)an»
2 0 6 0 I F L > 0 T H E N P R I N T RT 1 6 , 5 , < n > • " * " t n » i n ) • " • " t n $ i n i + " * " $ <n
7,' ^ N K ^ f " D I S P O N E S DE " , l , " £ " , R PAPER 4 , PAPER 3 , INK 6 , >+"f" NEXT n
T 2 0 , 8 , "CURNTO OPUESTOS'*" F L A S H 1 , " ?OTRA A P U E S T A - » - , F L A S H 9 8 4 Ó RETURN
7 2 0 INPUT " ". INK 9 9 9 9 SAUE " b l a c k j i C k " LINE 1 C
7,3 I F a > l T H E N P R I N T OT 2 0 . 6 . PAPER 4 , " " , , R T 1 7 , 5 , PA
PER 4 , " " PAPER 3 . " SI/ LS P R I N T RT Í O . S , F L A S H 1,"LIS
PRPER 7 , INK 2 , " NO T I E N E S .a TO PARA U E R I F I C A R " UERIFY
C " PAUSE 2 0 0 GO TO 7 1 0 NO PAPER 4 , " L E T AT
SINKEY» I F a * = " " T H E N GO TO 2 0 6 LS
7 3 0 I F a < l T H E N GO T O 7 2 ®
EL GORILA
Feo. Javier COBO y
Premiado con 15.000 pts.
NOTAS GRAFICA»
,ftT 9 , 6 . F f , A T
Ft.AT 11,24
100 IF
.F J,AT 14.16.F»
c»
1 0 , 8 . F t RT 1 1 , 8 . F »
AT c 2 4 , F $ . A T 9 . 2 4 . F » . f t T 10.24
s 1 2 T H E N P R I N T AT 1 3 . 1 6
110 I F = 1 6 THEW P R I N T AT 16 8 .
Feo. José GONZALEZ A B C D E F G M l . i l - L M N 0
F t . A T 1 ? , 6 , F » . AT 1 6 , 2 4 F » AT 1 7
24 . F *
1 2 0 I F ^ * 1 9 T H E N P R I N T OT 1 9 , 1 3
. a ^ l í l l Q l VPDSN F j . A T 20 1 3 , F » . O T 1 9 , 1 9 . F » . O T 2
Spertrum 4 8 K O :9,F»
1 3 0 NEXT
1 4 0 P £ I N T RT 4 1 4 , AT 5 . 1
N u e s t r o o b j e t i v o , es l l e g a r h a s t a u n g i g a n t e s c o g o r i l a 4 " ( M | RT 6 . 1 4 .
150 LET y 3 = 1 1
'.ífr-
LE~ y 2 = l l LET
2=2® L E T y 4 = 14 LET 4rl3 LET
q u e se e n c u e n t r a s i t u a d o e n lo a l t o d e u n edificio. U n a y 5 • 14 LET 5 = 19 LET y 6 = 17 LET
' 6 =24 LET y y 6 = 17 LET < x 6 * S L
misión a r r i e s g a d a q u e nos recuerda a King Kong. ET y 7 = 2 0 LET x 7 = 1 6
1 6 0 L E T Ki = I N T < R N D * 2 > » 1 IF k = l
T H E f l L E T x 3 • 19
170 I F ÜS2 THEN LET X 3 = 1 2
180 LET hy = 2 0 LET h / = 5
Para acceder a la cúspide, tendremos 1 9 0 P P I N T RT 1 2 , 1 1 ,
O, "
",AT 12,2
30 MICROHOBBY
a s o I F h x > > 1 7 OR h x < « 2 1 T H E N PR
I N T fiT 2 0 . 1 9 , F 4
3 6 0 I F INKE^i « 5 " 7 " AND h * = 1 2 T H E
N GO TO 3 9 0
3 7 0 I F I N K E > 4 = " 7 " AND h x . 1 8 T H E
N GO TO 4 3 0
3 8 ® GO TO 2 0 0
3 9 0 P R I N T RT 1 9 , 1 3 , F » . f i T 20,13,
F»
4 0 6 P R I N T RT h y . H X + l ; F 4
4 1 0 LET h v > 1 7
1 2 0 GO TO 2 0 0
4 3 0 P R I N T fiT 1 9 , 1 9 , F 4
4 4 0 P R I N T fiT h y , h x + l , F 4
4 5 0 GO TO 4 1 0
4 6 0 PRINT INK 4 , f i T y 6 , x 6 , " M "
LET x 6 * x 6 + . 5 PRINT INK 2 , f i T y y
6 , X x 6 , " é "• L E T x x 6 = x x 6 « . S
4 7 0 I F x 6 > = 2 4 . S OR * 6 = - l , 5 T H E N
LET X 6 = - X 6
4 3 0 I F X X 6 > » 2 4 OR X X 6 = - 9 T H E N L
£T x X ^ s * x x &
4 9 0 I F CODE 5 C R E E N » (hy.hx+l>=0
T H E N GO TO 1 1 7 0
5 O 0 I F h x > = 5 OR h y < » l l T H E N P R I
NT fiT 1 7 , 8 . F 4
5 1 0 I F hX > = 1 7 OR h y < » 2 2 T H E N PR
I N T fiT 1 7 , 2 4 . F 4
5 2 0 I F INKEY 4 = " 5 " THEN LET h x = h
x-1
530 IF INKEY $ 3 " 8 " THEN LET hx«h
X +1
5 4 0 I F I N K E Y * = " 7 " AND h K t ? T H E N
GO TO 5 9 0
5 5 0 I F I N K E Y * = " 7 " AND h x « 2 3 T H E
N GO TO 6 2 0
5 6 0 I F I N K E Y 4 = " 6 " AND h x » 1 2 T H E
N GO TO 6 5 0
5 7 0 I F I N K E Y 4 = " 6 " AND h x * 1 8 T H E
N GO TO 6 6 0
5 6 0 GO TO £ 0 0
5 9 0 P R I N T AT FI
6 0 0 L E T h y = 14
6 1 0 GO TO 2 0 0
6 2 0 P P I N T fiT 1 7 , 2 4 , F 4
6 3 0 LET h\j = l 4
6 4 0 GO TO 2 0 0
6 5 0 P R I N T AT i 7 , 1 3 " "
6 6 0 PP"INT fiT 1 7 , 1 9 . "
6 7 0 LET h y = 2 0
& S 0 GO TO 2 0 0
6 9 0 I F I N f E > 4 = " 5 " T H E N LET h sh
X-1
7 0 0 P R I N T INC 1 . f i T y 4 . - 4 , £
LET 4=>4«2 IF 4 = 2 2 OR
- 7 THEN LET
~ 1 0 I F CODE S O P E E N * ( h y . - . «li=0
T H E N GO TO 1 1 7 0
7 2 0 I F H x < = 1 3 OR hX > ® 1 6 T H E N PP
I N T AT 14 1 6 . F 4
73P IF INKEY 4 = " 8 " T H E N LET h x s h
x• 1 _ _ ^
7 4 0 I F I N K E Y * » " ? " AND h >. = 1 5 T H E
H GO TO 7 6 0
7 5 0 I F I N K E V 4 = 'ۥ" AND h x t ? THEN
GO TO 8 1 0 __
7 6 0 I F I N K E n * = " 6 " AND h = 2 3 T H E
•J GO TO 8 4 0
7 7 0 GO TO 2 O 0
7 8 0 P R I N T AT 14,16,F4 1030 GO T O 200 1280 P R I N T AT 4 , 0 , " T u »1:1On e s
7 9 0 L E T h y = ll 1040 PRINT A T 1 1 , 8 . F 4 AT 11.24.F l l e g a r a r r i b a d€ l i n n u i u , p a i " J
6 0 0 GO TO 2 0 0 4 e l l o h a s d i ÍVI u c que te cojan
3 1 0 P R I N T fiT 1 4 , 6 . " 1050 LET h y s 6 l o s g u a r d i a n e s de 1 r e i n o de ( o s
6 2 0 LET h y = 1 7 1060 GO TO 2 0 0 gor1 las."
8 3 0 GO TO 2 0 0 1070 P R I N T AT 11.24.F4 I_2Í 9f 0" PRINT M , " P u l s a u n a u c i s P
S 4 0 P R I N T fiT 1 4 . 2 4 , " >f i t « K 2 1 f . " P R I N T RT 9 , 0 . " SO
8 5 0 L E T h y = 17 lOoO LET h y = 6 to podras u t i l i z a r tu habiii-dad
6 6 0 GO TO 2 0 0 1090 GO TO 2 0 0 taitarina cuando te € n t u « n - tre
870 IF INKEY* ="5 " THEN LET h,.=h 1100 P R I N T fiT 4 , 1 4 . ",ST 5,1 1 f r e n t e a un a g u j e r o . " FOR
x-1 4 , "
TO 26
, AT 6 , 1 4 , ••
P R I N T AT 6,X," " _ÑEXT X
" FOR X =5
TO 6 E 4 FOR X =7 TO 0 S T £ P - 1 B
8 8 0 I F INC E• 4 = " O " fiND h \ = 1 2 T H E
N P R I N T fiT h y , h x , PAUSE 1 0 LET D4= • LET E 4 = «CTL ORDEP X P P I N T , INK X , A T 1 5 . 6 "
P R I N T AT h y - 1 h x ; ' • © " PAUSE 10 L E T F 4 = "EBHET' _ _ BUENA SUERTE IF INKEY* O "
P R I N T AT h y - l . h x , " 1 PAUSE 1 0 1110 FOP *=4 TO 26 S T E P 5 FOR F " T H E N GO TO 1 3 1 0
=1 T O 10 NEXT F P R I N T AT 4 , X , D 1 3 0 0 NEXT x NEXT e
O
P R I N T AT h y - 1 , h x - 1 . " © "
P R I N T AT h y - 1 , h y - 1 , " "
PAUSE 1
PAUSE
4, AT 5 , X. E 4, FIT 6 , X , F 4 NE XT F 1 3 1 0 BOPDEP 7
iO P R I N T AT h y . h x - 2 , " © " LET h OR G=1 TO 100 NEXT 6 1 3 2 0 PAUSE O
1120 PRINT fiT 10.6,"NO ESTH MAL 1 3 3 0 GO TO I O
S 9 0 IF INK£\ 4 = " O " A N D h x t l 3 T H E " . A 4 . AT 13,9, " 0 = R U N JB = PFIRFIR' 1 3 4 0 FOR y = 6 5 TO 7 9
N P R I N T AT h y . h x . " P A U S E 10 1 1 3 0 IF I N K E Y * • " N " T H E N G O T O 1 6 1 3 5 0 FOR x =0 TO 7 PEAO a POKE
P R I N T AT h y - 1 . h x + l , " © " PfiUSE 1 10 GO TO 1130 USR C H P 4 ( Y ) + . - , a NEXT x
O P P I N T flT h y - 1 , h x « 1 , © " PA 1140 IF INKEY*»"R" THEN CLEAR 1 3 6 0 NEXT y ^ _ „
USE 10 P R I N T AT h y - l . h X + 5 " " 1 3 7 0 DfiTfi á,0,0.0,240,248,252,25
PAUSE 1 0 P R I N T fiT h y . h +3," GO TO IO 2
LET hXihX+3 1 1 5 0 P R I N T fiT 1 7 , 1 0 ,
T ( 1OO0O/T « U f U l u e i >
-PUNTOS»",IN 1 3 5 0 DATA
1390 DfiTfi
0.0.0,0.15,31.63,63
7.63,64.153.130,152.19
9 0 0 I F h v s l O OR h x = 1 1 T H E N P R I N
T «T h y , h x • 1 , " " FOP X = h y TO 2 1160 GO TO 1130 2 , 231
0 P R I N T AT x - l , h x + l , " " , A T X.hX 1170 F O R Y A1 T O 5 FOR X = 1 TO 10 1 4 0 0 DATA 224,236.2,153.65.3.3.2
• 1 , "<£>" NEXT v : L E T h y = 2 0 PRINT B E E P .01,X: N E X T < NEXT . 31
AT I S , 9 , P * , P * . P * , P * , P S ; A T 16,9. 1 1,3"0 - P R I N T A T 0 , 7 + A B S
> (Un<lUíS-i 1 4 1 0 DATA 127,127,127.254,254,25
P», p», P * ; P4, P4, p * 1190 LET t a n g u e s = t a n q v t i - 1 IF 1 4,253-2S1
9 1 0 I F h x » 1 9 OR h x * 2 0 T H E N P R I N a r i q u e s < >0 T H E N GO TO 2 0 0 1 4 2 0 DATA 2 4 0 255.247,220,128.19
T AT h y . h x , " " FOR x s h y TO 2 1 2 0 0 BEEP 1 , 0 BEEP 1 , 2 BEEP . 5 2 240,253
O P R I N T AT X , h x « l , " © " , A T x-l.hx .3 BEEP . 5 . 2 6EEP 1 , 0 BEEP 1 , 1430 DfiTfi 15,255,239.59,1,3.15,1
• 1," NEXT LET hy =20 PRINT O BEEP 1 , 2 BEEP . S , 3 BEEP .5,
2 BEEP 1 , 0 BEEP 1 . 0 BEEP 1 . 2 1 4 4 0 DfiTA 254.254 254.127,127,12
AT 1 6 2 0 P 4 P 4 . C 4 AT 13 2 0 = 4 P 1 2 1 0 CLS P R I N T AT 1 0 . 9 , "OTRPI U 7,191,223 .
EZ S E R A " , A T 1 2 . 1 2 . f i 4 . A T 14.3,'S= 1 4 5 0 DfiTA 251,171,67,67,66.61.1
* ? 2 0 PRINT INK 1,AT y 3 . 3 * RUN ® - P A R A R " , A T 1 7 , 11, "PUNTOS =
LE" > 3 + . 2 5 IF = ; 9 . 2 5 OR
X 3 • • 1 1 . 3 5 THEN LET X 3 = - X 3 O" 1 4 6 0 DfiTA
6,4,252
255,254.252,252,236,19
9 3 0 I F INKE I 4 = " 3 " THElt LET h 1 2 2 0 I F INKEY 4 = " R " THEN CLEAR 1 4 7 0 DATA 255,127,63,63.55,35,32
x+1 GO TO I O
9 4 0 I F CODE SCPEEN4 í h y . h + 1 ' =C 1 2 3 0 I F I N K EY 4 = " N " T H E N G O TO 1 6
10 1430 DATA 223.213,226,226,98.16S
T H E N GO TO 1 117 0
950 IF INKE, 4 " & ' AND h < « l S T H E 1 2 4 0 GO TO 1 2 2 © ,126.126
1 2 5 0 CLS P R I N T AT 2 0 , 2 , " P u l i a 1 4 9 0 DATA 7 3 , 4 1 . 4 1 . 4 6 , 1 1 0 . 2 5 5 , 2 5
N GO TO 1 0 1 0 5 . 124
9 6 0 I F I N í E \ 4 = " 7 " AND h = 7 T H E N una t e c l a para ver ias",AT 2 1 , 9 ,
ínsuuiCioníS" PAUSE O CLS 1 5 0 0 DATA 255,129.129,255,16,16.
OO TO 1 0 4 0 2 5 5 ,C
9 7 0 I F I N K E . 4 = ' 7 " AND h » 2 3 THE P R I N T AT 1 , 6 . " + + T E C L A S DE MANEJO
t«",AT 9.10,"S=IZQUI£RDA",AT 11. 1 5 1 0 DATA 1 9 5 , 1 9 S , 1 9 5 . 1 9 5 . 2 5 5 . 1 9
h GO TO 1 0 4 0 5.195.195
9 8 0 I F h y ) = 5 OR h y < = 9 T H E N P R I N 1 0 , " 6 =ABAJO " , A T 1 3 , I O . " 7 = f i R R I B A
",AT 1S,10,"S=DERECHA".AT 17.10 1 5 2 0 RETURN
T AT 1 1 3 , F 4 15 3 0 STOP
9 9 0 I F h y = 2 2 OR h y = 2 6 T H E N PP , " 0 = SALTAR"
I N T fiT 1 1 , 2 4 , F 4 1260 PRINT 0 1 , P u l s a una l e e i a p 1 5 4 0 SAUE " S U P E R C O C O " L I N E 1
1 0 0 0 GO TO £ 0 0 ara c o n t i n u a r . " PAUSE O 1 5 5 0 STOP
1 O 1 0 P R I N T PT 1 1 . 1 6 , ' " 1 2 7 0 CLS P R I N T AT 1,7."•««SUPE
1 0 2 0 LET hy = 1 4 R COCO«««"
MICROHOBBY 31
CONSULTORIO
Cabeceras falsas Las posiciones de memo- adelante; y a$(2 TO 5) le da- Funciones STR$ y S Q R
ria 23651 y 23652 correspon- rá del segundo al quinto.
Soy un asiduo lector de den a la variable del sistema Me gustaría, a ser posible,
MICROHOBBY y en el nú- STKBOT que apunta al fon- que me explicaran el signi-
mero 1 viene un programa do de la pila del calculador. Unidad de disco ficado de la función STR$ y
que se llama Microcopi. Ten- SQR.
go la costumbre de hacer En el número 7 de la revis-
Antonio J. CABEZAS Barcelona
una copia de cada cinta que ta salió, en el apartado de
V í d e o inverso novedades, que ya hay una
compro por seguridad; gra- • STR$: su argumento es
cias a Microcopi lo he podi- Poseo un Spectrum Plusunidad de disco para el ZX un número, y su resultado es
do hacer. Hace unos días y la verdad es que se nota la Spectrum. Quisiera saber la si
cadena que representa a
compré una cinta de juego,diferencia con el de 48K en esta unidad sirve para cual-
ese número.
se trata de un simulador de cuanto al teclado, pero ten-quier tipo de ordenador (sin Ejemplo:
vuelo, y ésta no he podido go una duda con el mismo, tener que ser Sinclair). STR$ 4 = "4"
copiarla porque sobrepasa concretamente en dos sen- Enrique PONS • Barcelona STR$ (5 + 3) = "8"
los 41471 bytes que admite tencias «INV. VIDEO» y SQR: su argumento es un
Microcopi. «TRUE VIDEO»; ¿para qué • La unidad de disco es ti- número positivo, y su resul-
Mi pregunta es si hay al- me pueden servir? po IBM, no así la interface, tado es la raíz cuadrada de
guna posibilidad de alterar ese número.
Manuel L. MUÑOZ Sevilla que es exclusiva para el
el programa Microcopi para Spectrum. Ejemplo:
que pueda admitir más SQR 9= 3
• La sentencia «INV. VI-
bytes, o si existe algún otro
DEO» sirve para imprimir en
programa que pueda hacerla
vídeo inverso, púlsela antes
Darid MARTINEZ • Vite * y* de lo que quiera imprimir. La IN para joystick
sentencia «TRUE VIDEO» re- L o s m á r g e n e s d e la
Poseo un INTERFACE 1 y pantalla
• MICROCOPI le permitirá torna a video normal.
sacar copias de todos los No son comandos de Ba- cuando está funcionando al- Me seria sumamente útil,
programas con cabecera sic, sino simplemente fun- gún programa en Basic que por motivos profesionales,
real, en caso de tener cabe- ciones del teclado. Los co- utiliza el modo IN 1 parapoder eliminar los márgenes
cera falsa (como el que us- mandos correspondientes joystick, me encuentro conde la pantalla del televisor.
ted nos comenta), o sin ca- son «INVERSE 1»e«INVER- el problema de que se blo-
becera, deberá recurrir a un SE 0». quea. ¿Cómo se podría solu- Luis GUTIERREZ Pontevedra
32 MICROHOBBY
trum accionar el teclado,Spectrum Plus, apreciando • Efectivamente, se trata En general, estas peque-
cortocircuitando, por ejem- en todos el mismo error ló- de un problema aparente- ñas dificultades se pueden
plo, un Ax con un Dx deter- gico). mente grave, si bien es po- solucionar recurriendo a de-
minado? Veamos en qué consiste sible solucionarlo profundi- terminadas facilidades que
el problema: zando algo más en la forma nos brida el Basic. Añada a
Angel F. PE ULES • Alictnte
1. La máquina calcula co-de trabajar de nuestro orde- su programa la línea: 15 LET
rrectamente el valor numéri- nador. a=VAL STR$ a, y verá cómo
• Al teclado hay que acce-
co de una potencia, y, en En principio, hay que te- se reconcilia con su ordena-
der a través de un «port», por
consecuencia, en pantalla ner en cuenta que el Spec- dor.
tanto, lo que usted propone
aparece el valor correcto. trum, al igual que todos los Para mayor información,
no es posible. Le remitimos
al número 13, página 21 de
2. Pero si utilizamos el va-ordenadores, trabaja en bi- le recomendamos el libro de
nuestra revista. lor numérico hallado me-nario y en coma flotante. los doctores IAN LOGAN y
diante la potenciación, la Asimismo, para elevar el nú- FRANK O'HARA: «The com-
máquina se comporta como mero «a» al exponente «b» plete Spectrum ROM disas-
si este valor fuese mayor del primero halla el logaritmo sembly», Ed. Melbourne
P r o b l e m a s m a t e m á t i c o s que realmente es al ser uti- neperiano de «a»; a conti- House, 1983; pág. 222 a 230.
e n el S p e c t r u m lizado en la instrucción «IF-nuación, lo multiplica por
THEN». «b», y el resultado lo utiliza
Me dirigo a Vdes. aprove-
Tal vez se entiendan me- como exponente para elevar
chando la sección que nos La f u n c i ó n R N D
jor las cosas con un progra- a él la constante de Euler, o
ofrecen a los lectores para
ma de ejemplo de lo que lo que es lo mismo, le halla Al intentar crear un juego
efectuar consultas, y lo ha-
quiero decir: el «antilogaritmo» neperiano.
con una variedad de panta-
go para exponerles un pro-
blema que, simple en princi- 10 LET a=3T2 Tanto el logaritmo nepe- llas, y con una ejecución
pio, no me lo ha podido ex- 20 PRINT a riano como el número «e», aleatoria, el ordenador sólo
plicar el servicio técnico de 30 IF a=9 THEN PRINT se hallan generando una se- me ejecuta la primera de
Spectrum, con el cual meiibien» rie mediante polinomios de ellas. La función que he uti-
puso en contacto telefónico 40 IF a >9 THEN PRINT Tchebycheff, por lo que el re- lizado es:
la tienda donde adquirí mi«mal» sultado nunca es exacto. 10 IF Y-27 THEN LET
Spectrum Plus. corrido el programa, apare- Al imprimir en pantalla, el J=J(RNDx 10)
Este problema puede re-ce en pantalla: 9 mal. ordenador toma un máximo 20 IFJ= 0 THEN PRINT...
sultar MUY GRAVE para los Aunque sencillo, el proble- de ocho cifras significativas; 30 IFJ=1 THEN PRINT...
usuarios que utilizamos elma resulta de «órdago» enpero al efectuar sus cálcu- En la primera linea pongo
spectrum en programación programación numérica. Por los, lo hace en binario y en el Y=27 porque es el punto
numérica, en mi caso soyello, y porque he dejado de coma flotante; concretamen- que me interesa para que
profesor de matemáticas, y«hablarle» al microordena- te, la comparación se hace cambie la pantalla.
aunque seguidamente voy ador, es por lo que les moles- bit a bit. La razón de hacer- Julián RODRIGUEZ • Gerona
plantear el problema, en re-to y les agradecería en el al- lo asi, es para evitar la acu-
sumen podemos decir: ma que tuviesen la amabili-mulación de errores en cál-
—El microordenador dad de ofrecerme una res- culos repetitivos (imagínese • Sustituya las líneas 20 y
Spectrum Plus falla en cier- puesta. la resolución de una integral 30 por:
to trabajos sencillos con la por métodos numéricos) que
A. PE7RI ETXEBERRIA • Pamplona
20 IF J < 5 THEN PRINT...
operación aritmética de po- produciría resultados catas-
tenciación (he probado otros tróficos. 30 IF J >5 THEN PRINT...
MICRO-1 DRUMEN
Jorge Juan, 116.28028 - Madrid. Tel. 274 53 80. 0i Ominen. 6. 28012 Madrid Tei 239 39 26 Metro Atocha
Hardware Software Spectrum Tratamiento textos. 2.270
Spectrum 48 K (normal y plus) 20% Dtc. Aíien-8 (novedad Erbe).- 2.495 Fruit machine 1.650
Regalo 1 joystick + 6 cimas Raid Over Moscow (novedad Erbe). 1.960 Harrier attack 1.785
Amstrad CPC-64 K (cassette y monitor verde).... 74.400 MatcMJay 1.925
Joystick dos fuegos 1350 Gbostbuster (caza-fantasmas) 2.520 • Si tu pedido de software es superior a 3.000 ptas., gratis dos
Joyslick 4 fuegos (profesional) 3.175 Gift from ihe gods 2.360 cintas C-15.
Sony Hit Bit 55 + Software (6.000 pts) 49.000 Blue Max 1.975 • Llámanos o escri be a cuaiqu ier tienda, y recibirás tu pedido
impresora Admate 1001100 cps.) 47.500 Knigtil Lore 2.475 contra-reembolso. Sin ningún gasto de emio,
Teclado Saga-1 (profesional) 15-300 2ax*on 1.950
• Madrid capital, reparto propia Máximo 24 horas (sin gastos).
Teclado Ofctrooihs 11.900 Combat lynx.... 1.925
Interruptor/Reset 1.375 Software Amstrad (promoción) • Más productos sin detallar, llámanos, te informaremos am-
C-15 {cinta especial computadoras). 85 Rotand ort the ropes 1.650 pliamente.
Microdrive 1.375 Galaclic plague 1.650 • Buscamos distribuidores en toda España.
MICROHOBBY 33
— D i OCASION-
• CAMBIO por ZX Spectrum 48K puter, Sinclair User y Computer & Sharp MZ-80-B ampliado a 64K de • VENDO consola vídeojuegos
el siguiente lote Un amplificador Video Games. Discutiremos precio memoria Precio 100000 pesetas Philips con dos juegos valorados
de sonido de 25W 4 entradas, mar- Preguntar por Ferrán Tino. 214 75 Vendo calculadora programable en en 7,000 ptas aproximadamente,
ca Sales Kit. Un ecualizador esté- 94 Barcelona. Basic Casio FX-702P incluyendo impecable (G. 7000). Comprado el
reo para 2 salidas Una luente de • VENDO ZX-81 en perfecto esta- impresora FP10 e interface FA2 pa- 30/12/84. Garantía de un año.
alimentación de laboratorio se re- do con ampliación a 16K así como ra cassette Precio total: 30.000 pe- 17.000 ptas. todo Ponerse en con-
gula internamente. Una mini emi- todos los cables necesarios para setas Dispongo del procesador de tacto con Oscar Teléfono: (91) 462
sora espía de FM alimentada a 9V la conexión a TV. a cassette y fuen- texto «Context» conectado en se- 54 23. De 10 a 11 de la noche o
Una mini ruleta electrónica con te de alimentación. Interesados lla- rie através del interlace 1 a una im- escribir a C/ Ocaña n® 20, piso
diodos led Y un pájaro electróni- mar al 246 24 80. pregunar por presora Admate DP100 y a pesar 4<<D 28047 Madrid
co regulable Preguntar por José de Gonzalo preferentemente por las de seguir las ¡ntrucciones del mis- • VENDO consola ATARI 2600 en
8.30 a 10 al teléfono 964/52 47 53. tardes ma no logro imprimir más que con perfecto estado por 35.000 ptas o
Villarreal (Castellón) • VENDO Interface i + Microdri- el tipo de letra standard sin conse- por un Spectrum. Incluyo 9 cartu-
• VENDO Timex Sinclair —16K. ve. por 22.000 ptas Impresora pa- guir los restantes tipos para los que chos (Battlesone. Spider-man. Tu-
más cuatro juegos excelentes, más ra Spectrum GP 50 S por 20.000 está disertado y de los que sí dis- tankham, ¡ungle hunt. pitufa sp»der
libros, por 12.000 ptas Preguntar Al- ptas Coniactar con Gregorio al te- pone esta impresora. Agradeceré figther, asteroids combat y fres-
Iredo. tardes Tfno 410 22 07 léfono 353 68 53 Barcelona que si alguien sabe cómo hacerlo way); además de los dos joystick
Madrid • VENDO ordenado LASER 200 me escriba con la solución Gra- incluso dos mandos de paleta y un
• VENDO interruptor ON/OFF y en muy buen estado con todas las cias. Miguel Angel Peña Tfno.: transformador Tfno: 388 60 59 de
RESET para Spectrum. Está nue- conexiones necesarias para su fun- 942/31 05 61 Santander. Isabel 11. Barcelona Manuel Carmona. Pla-
va ya que lo compre para un Spec cionamiento más manual, tres cin- 21-1. Llamar de 8 a 15 horas za Trafalgar, 1-3.4« 0 Badalona
trum Plus y después vi que no se tas de juegos y cinta de demostra- • VENDO Libro Edif. Paraninfo • VENDO ordenador Sinclair ZX
le podia acoplar Precio 1000 ptas ción. Sólo por 20.000 ptas Intere- «Los colores y grálicos en el Spec- 48 K Comprado hace 1 mes con
Interesados llamar al tfno 22 60 10, sados escribir a: Antonio Manuel trum», con su correspondiente cin- interface Kempston, 1 Joystick
prelijo 955 Huelva Barranco Avda Castelao 13.8° C ta de demostración. Fbr 1.000 ptas Kempston. fuente de alimentación,
• COMPRO números atrasados Vigo (Pontevedra) Santiago Soler Rabadán. Tfno- 36 un cassette especial para Spec-
de las revistas inglesas Your Com- • VENDO ordenador personal 14 07. trum y 9 cintas de juegos Todo
• SE VENDE un ZX-Spectrum completo por 45.000 ptas Clara
48K. revistas y programas por Tfnos.: 448 76 00 ó 448 75 00.
30.000 ptas. una impresora SEI- • DESEO ponerme en contacto
KOSHA GP50 5. por 25.000 ptas con Clubs y grupos de usuarios del
y cassette PHILIPS D 6600/30 P ZX Spectrum. Escribir informando
especial ordenador, por 10.000 con todo detalle a Miguel Molina
comercial, S. A. ptas Todo el lote |unto a un precio Vives C/ Ruzafa, 9. Valencia.
FACTURACION/Spectrum especial, 60000 ptas, los interesa- • VENDO en 30.000 ptas o inter-
dos llamar por la tarde de 7 a 10 cambio por Spectrum 48 K. emi-
Un solo programa que maneja 20 licheros do artículos y direcciones con un total
de 1 000 artículos más 400 direcciones de clientes, etc.. en un solo cariucho al 258 30 35 de Barcelona, pregun- sora INTEK SSB 120 FR. cubre la
Este programa se utiliza para tar por Carlos Jorge u Oscar. frecuencia de 26 465 a 29.635 Mhz
• Realizar facturas (hasta tO conceptos) • Reati;arolertas|hasta lOcoricepios) • COMPRO revistas y publicacio- Manolo. Tfno 29 82 55 Córdoba
• Realizar pedidos (hasta 10 conceptos) • Realizar albaranes (hasta 10 concep-
tos). • Llevar el control de stocks (t.000 artículos) • Lisias de precios (aumento
nes inglesas sobre el Spectrum • ¿TE interesa un Spectrum de 16
automático). • Envió de circulares (400 direcciones) Máximo 50 ptasJunidad Interesa- K. en estado impecable comprado
Instrucciones totalmente en castellano. dos dirigirse a: David Guerrero Tos- el 7 de diciembre del 83, con 40
De venta en El Corte Inglés y tiendas de informática tada O Mirla 3-2° izqd 28024 Ma- programas por sólo 29.000 ptas''
A LSI SA Antonio López, ti?, 2." O 28026 Madrid Teléfono 475 43 39. drid. o al teléfono 91/218 86 52. C/ Julio Unkíja 17, 8°D 48014 Bil-
• VENDO video-juego por compu- bao. Tfno (94) 447 34 69. Josefa
tadora ATAR! 2600. Nuevo, dos Ortega (llamar sólo a mediodía o
PRECIOS ESPECIALES joystick, un alimentados cuatro car- noche).
PARA C O L E G I O S VENTA DIRECTA tuchos juegos: Combat, Golf. E.T., • QUISIERA comprar un Spec-
Y TIENDAS Superman Precio 20 000 ptas Lla- trum Plus para lo que. a ser posi-
SIN I N T E R M E D I A R I O S mar al 22 28 58. Toledo ble, intercambiaría o vendería una
COMMODORE 64
ZX8t 1K ORIC ATMOS • INTERESARIA cambiar microor- máquina fotográfica Cosina C 52
SPECTRUM 48K COMMODORE 64-16
ORIC ATMOS 48K
denador Spectrum 48 K con am- de 35 mm con velocidad de obtu-
UNIDAD DE DISCO plificador sonido 600 programas ración ajustada automáticamente
MICRODRIVE DATASSETTE-SPECTRUM 48K
INTERFACE comerciales muchos libros, dos por exposímetro Escribir a Fe". Ibá-
JUEGOS (Importados) SPECTRUM 64K
* * • MiCRODRIVES-INTERFACE I suscripciones completas desde el fiez Castra CJ Eduardo Quera 2, 2°
Tels r93) 242 80 t t 319 39 65 ULTIMOS MODELOS n° 1 a revistas de informática pa- izq 14008 Córdoba.
BARCELONA ra Spectrum Todo lo cambio por • COMPRO memorias RAM TMS
rol (93| 725 20 59 SABAOELL Seis m e s e s d e g a r a n t í a
(A panir 18 00 horas» VlC-20 con cassette VIC + 16 K 4532 ó 3732, o ¡nlormación de dón-
* * * y sus manuales (si liene programas
MICRO (Import). C/ Magallanes. 51 • de encontrarlas a precio asequible.
MICRO /RAM áuco. Barcelona 08004 Telf: 242 19 99 mejor) Ofertas a Rafael O'Donnel Llamar a horas de comida José
Obispo (.aguarda 1, 1* (De 7 a 10 de la noche) Verger O 31 de diciembre 43-1® 2 o
00001 BARCELONA
Tino 204 63 42 Madrid.
07003 Palma de Mallorca (Balea- • VENDO Atan Video Computer
res). S y s t e m , en perfecto estado A b u n -
• VENDÓ/CAMBIO Cursos (4) de dante información sobre equipo y
Radtoelectrónica y televisión Va- software disponible, cables TV:
/VHCRO ARTO rios libros y revistas sobre el mis- transformador y 4 mandos Precio
15.000 ptas, con 32 cartuchos de
mo tema por Hardware para Spec-
m IOS ESPECIALISTAS FN trum 48K. Algo interesante cosas juegos y otros 5 mandos para jue-
HACEMOS FACIL INFORMATK A SINC LAIK Y electrónicas Kits etc. o por radio gos específicos Precio 40000 pe-
LA INFORMATICA COMMODORE Grundin-satéllit de 21 bandas En- setas Cartuchos sueltos Precio:
• SINCLAIR • SPECTRAVIDEO Todo el Hardware y Software vío relación a quien la solicite Es- 2.000 Contactar: Antonio Duboy
«COMMODORE • DRAGON nacional y de importación
•AMSTRAD • APPLÉ cribir a Julián Seguen Serradilla. Tfno 416 52 25. Madrid.
• SPERRY UNIVAC M A S DE (i50 P R O G R A M A S 28 Madrid 28044 Acepto ofertas • CAMBIO pista de Scalextnc y
Club de usuarios y Club de los mandos de velocidad. 60 libros
i n4i • DESEARIA que algún amable
' f niMu 414»« > I vídcoiuegos Servicio de
roo)**:)» c> ,*«>I4 MAOUiQ lector me enviase las instruccio- de lectura y texto, y un juego elec-
asistencia y de reparación, y trónico. por un Spectrum de 16 K
vinjiw O nes en español, de los siguientes
:C« VAD*TP rmn VAO*<D ademas venia por
programas Morse (emisión- Los interesados escribir a Fc° Ja-
correspondencia
'c-* 't '4 ESCRIBENOS recepción) y Psitron Pagaría gas- vier García Cañadas O Roneda
JWQQ» V*;IPl¡> 0*0' V 4. «WT*
ARTO. C/ Angli. 43 - Tienda tos de envío y fotocopias A P Sur. 77-2° C. Losar de la Vera (Cá-
11*»»* ¿|Nt*f n
U* •tmrt- Mi "O *
08017 BARCELONA 22.151. Barcelona 08080 ceres).
•MOÍUÓO^'A
34 MICROHOBBY
>>
w Tlf BSE
íl(
0
REHSH0P ]
Ordenadores personales
REMSHOP-OVIEDO c/ Matemático Pedrayes, 6 Teléfono (985) 25 25 95
RENOVACION EN MARCHA, S.A. REM S H O P 1 REM SHOP 2
OFICINAS C/ Galileo. 4 - 28015 MADRID C/ Dr C a s t e l o . 14 - 2 8 0 0 9 MADRID
C/ Espronceda,34-2«int Telefono (91) 445 28 08 Teléfono (91) 274 98 43
28003 MADRID
Teléfono (91) 441 24 78
•
1 Cassette especial 8.500 1 Joystick 4.500
1 Interface Joystick (Dos salidas) 4.500 1 Cable 3.990
1 Joystick puño 4.500 1 Impresora DP 100 59 900
1 TV -I- Monitor 16" 69.000 1 Cassette especial ordenador 8.500
REM NOTICIAS
REM C L U B S P E C T R U M
BOLETIN DE PEDIDO
tos e n v í a n o s t u d i r e c c i ó n y r e c i b i r á s
V COMMODORE puntual información
Funciona como u n club de video Se
REM PEGATINAS
adquiere una cinta y se intercambia
25 ptas 3 modelos REM MEMBER Nombre y Apellidos _
con otras a 200 pías semana En
ME REM I LOVE Y O U REM
cmtas inglesas 400 pías semana Dirección y Teielono
FOREVER
Solo versiones originales
REM CAMISETAS Deseo recibir mas i n f o r m a c i ó n
OLUB
990 ptas 3 modelos REM MEMBER
Para usuarios del Q i Solicita infor-
ME REM l LOVE YOU REM Deseo adquirir
mación
FOREVER indicar talla pequera
REM C U R S O S normal y grande Precio tolal {incluye 300 ptas de gastos de envid)
Sasic 1 2 M C y aplicaciones REM GRAPH
Giro Postal • Giro Telegráfico • Transferencia Sanearía •
REM FRANCHISING K i t g r a t i c o s 6 c o l o r e s 9 9 0 p i a s (REU-
I n g r e s o e n c u e n t a 3 7 6 9 8 B A N C O DE B I L B A O R í o s R o s a s 44
SI quieres montar tu propia mmi- TILIZABLE)
tienda de mtormatica o una tienda MADRID-3
REM GRAPH
especializada envíanos l u d > r e c o o n Talón adjunto • Talón conformado adiunto O
10 plantillas teclado reuMuabie 900
y recibirás información completa
otas
REM J E T A L L Tarjeta VISA n u m e r o
SI quieres vender nuestros produc
Fecria c a d u c i d a d Firma
INV€SDISK 200