JEU -> Action               

1 joueur

Paru sous forme de listing dans le magazine Tilt HS 3 (Mars 1987)
Auteur : ?

Le jeu est buggé d'origine : Subscript out of range in 620


Voici une solution imparfaite qui fait fonctionner le listing (l'ajout des scores ne fonctionne pas toujours et parfois la balle passe a travers la raquette) :
AVANT :

250 DIM A(40,23)

440 XB=5:YB=23
450 XI=XB:YI=YB

600 IF A(XB+1,YB)=1 THEN XI=XI-1:IND=1
610 IF A(XB-1,YB)=1 THEN XI=XI+1:IND=1
620 IF A(XB,YB+1)=1 THEN YI=YI-1:IND=1
630 IF A(XB,YB-1)=1 THEN YI=YI+1:IND=1
640 COL=0:GOSUB 900
650 IF IND=1 THEN XB=XI:YB=YI
660 IF IND=0 THEN XB=XB+1:YB=YB-1
670 COL=2:GOSUB 900

690 IF YB=23 THEN IF XB=XR THEN 720
700 IF XB>23 THEN 760

960 PRINT STRING$(2,CHR$(10))

APRES :

250 DIM A(40,24)

440 XB=5:YB=22
450 XI=1:YI=-1

600 IF A(XB+1,YB)=1 THEN XI=-1:IND=1
610 IF A(XB-1,YB)=1 THEN XI=1:IND=1
620 IF A(XB,YB+1)=1 THEN YI=-1:IND=1
630 IF A(XB,YB-1)=1 THEN YI=1:IND=1
640 COL=0:GOSUB 980
650 XB=XB+XI
660 YB=YB+YI
670 COL=2:GOSUB 980

690 IF YB+YI=23 THEN IF (XB+XI=XR OR XB+XI=XR+1) THEN 720
700 IF YB+YI>23 THEN 760

960 PRINT STRING$(2,CHR$(143))