1.
10 KEY OFF:SCREEN 1,0:COLOR ,0:CLS:RANDOMIZE VAL(RIGHT$(TIME$,2 ...
... 100 ' CX=HOZ POS CY=VERT POS 110 ' VY=SPEED UP & DOWN VX SPEED L&R 120 ... 160 CX=CX+VX:CY=CY+VY 170 VX=VX+AX:VY=VY+AY+GRAVITY*TINC 180 ...
2.
10 DIM RG(5),DR(8,2),T(8),LM$(5) 20 UL$="7":UP$="8":UR$="9":RT$="
... GOSUB 5000:IF JF THEN 340 330 IF EX=FX AND EY=FY THEN 530 340 IF ZF THEN ... COLOR 14:LOCATE EY,EX:PRINT CHR$(139) 3010 COLOR 2:RETURN 4000 LOCATE FY ...
3.
4.
5.
6.
7.
8.
9.
10.