Program Printout: Rear Gunner

REAR GUNNER is a program included specifically for the computer novice, to demonstrate the use of graphics mode and the maneuvering of a display under cursor control.

The screen shows a graphic G, representing your target, and a plus sign which is your gunsight. Align the two with the cursor keys and blast your target to oblivion with 0.

  5 PAUSE 50
 10 LET A=5
 20 LET B=7
 30 LET C=INT (RND*26)
 40 LET D=INT (RND*17)
 50 PRINT AT D,C;"(graphic G)"
 60 PRINT AT A,B;" + "
 70 PRINT AT A-1,B;"   "
 80 PRINT AT A+1,B;"   "
 90 IF INKEY$="5" THEN LET B=B-1
100 IF INKEY$="8" THEN LET B=B+1
110 IF INKEY$="7" THEN LET A=A-1
120 IF INKEY$="6" THEN LET A=A+1
130 IF INKEY$="0" THEN GOTO 150
140 GOTO 50
150 IF D<>A THEN GOTO 50
160 IF C=B THEN GOTO 170
170 PRINT AT D-1,C;"(graphic Y;SPACE;graphic T)"
180 PRINT AT D,C;"(SPACE;inverse SPACE;SPACE)"
190 PRINT AT D+1,C;"(graphic T;SPACE;graphic Y)"
200 RUN