Content
Image Gallery
City Bomb
10 PRINT "DO YOU WISH INSTRUCTINS"
20 INPUT C$
30 IF CODE C$=62 THEN GOTO 800
40 CLS
50 FOR X=0 TO 31
60 FOR Y=INT (RND*11)+11 TO 19
70 PRINT AT Y,X;"\' ";
80 NEXT Y
90 NEXT X
100 LET A$=">=\.:\ '\:."
110 LET C$=" "
120 FOR H=1 TO 20 STEP 2
130 FOR X=0 TO 31
140 PRINT AT H,X,;A$;
150 LET F=PEEK (PEEK 16398+1+PEEK 16399*256)
160 IF NOT F=118 AND F>0 THEN GOTO 700
180 IF INKEY$<>"" THEN GOTO 500
190 PRINT AT H,X,C$;
200 NEXT X
210 NEXT H
220 PRINT AT 0,10;"WELL DONE"
230 STOP
500 FOR Y=H+1 TO 19
510 PRINT AT Y,X;"\' ";
530 PRINT AT Y,X;"\@@";
540 NEXT Y
550 PRINT AT H,X;C$
560 LET X=INT ((RND*2)+X)
570 GOTO 170
700 PRINT AT 0,10;">=YOU CRASHED<=",H*31+X;"POINTS","ANOTHER GO?(Y)"
710 INPUT C$
720 IF C$="Y" THEN GOTO 10
730 STOP
800 PRINT "CITY BOMB BY S.C.ADAMS"
810 PRINT "----------------------"
820 PRINT "YOU MUST BOMB AWAY THE CITY"
830 PRINT "BY PRESSING THE NEW LINE"
840 PRINT "KEY BEFORE LANDING"
850 INPUT C$
860 GOTO 40
870 CLEAR
880 SAVE "1031%2"
890 RUN