Publicidad
680 DATA BIN 10111101
590 DATA BIN 10111101
700 DATA BIN 10000001
710 DATA BIN 11111111
Tefe tenis
Este programa es una versión del más veterano de los juegos de ordenador. Para dos juga
dores, o para uno contra el
ordenador.
Para ponerlo en marcha dé la orden
RUN.
Luego pulse
ITJ
o
[I]
para elegir el número
de jugadores.
Opciones:
Jugador 1:
~
sube la raqueta;
0
la baja.
Jugador 2:
IKJ
sube la raqueta;
~J
la baja.
Gana el primer jugador que consigue 15
puntos.
Al transcribir el programa tenga en cuenta lo siguiente:
1. Los números "66" de la línea 150 representan caracteres gráficos. Para obtenerlos
se pulsa I
GRAF
I
una vez,
y
luego se pulsa
m
dos veces. Después se pulsa nuevamen
te
I
GRAF
I
para desact
ivar
el modo gráfico.
2. El número
"8"
de las líneas 150, 250 Y 540 también representa un carácter gráfico.
Para obtenerlo se pulsa
I
GRAF
I
y
luego
lIJ.
Después se pulsa nuevamente
I
GRAF
l.
3. La letra
"A"
de la línea 330 también representa un carácter gráfico. Para obtenerlo
se
pulsa
I
GRAF
I
Y
luego
~
.
Después se pulsa nuevamente
I
GRAF
I.
10 PAPER 4: INK 0: BRIGHT 0: B
DRDER 4
20 CLS
30 GD SUB 730
40 DIM x(2): DIM y(
2 ):
DIM p
(2
)
50 LET comp=l
:
LET scl=0: LET
sc2=0: LET z$="0"
60 PRINT AT 2,10; INK 7; "TELE
TENIS"
70 PRINT AT 8,
2;"JUND
O DOS
J
U
GADORES
(
1/ 2 )7"
80 LET i$= INKEY$
Capítulo 8. Guía de programación en +3 BASIC
332
Publicidad
