How long can you last against the missile onslaught? Use Z to move right, X to move left, and . to fire.
PROG : 16509
D-FILE: 17452
VARS : 18245
E-LINE: 18246
STKBOT: 18246
STKEND: 18246
9999 means line number
PRINT means treat as KEYWORD P
10 REM MISSILE DEFENSE*SLR1983
20 PRINT ">>> MISSILE DEFENSE
<<<",,,"TYPE IN Z FOR LEFT, X FO
R RIGHT,AND . FOR FIRE."
22 PRINT AT 21,0;"³± ²²± ±²³³²
²³± ²²³±± ²³³±±² ²³";
25 LET S=0
27 LET D=.1
30 LET A=15
40 LET B=INT (20*RND)+5
50 LET C=4
60 PRINT AT C,B;" "
70 PRINT AT 20,A;" ! "
80 LET C=C+D
90 LET D$=INKEY$
100 LET A=A-(D$="Z" AND A>0)+(D
$="X" AND A<29)
110 IF C>=20 THEN GOTO 170
120 IF D$="." THEN GOTO 150
130 GOTO 60
150 IF A+1=B THEN GOTO 220
160 GOTO 60
170 PRINT AT 20,A+1;"¶";TAB 0;"
±÷´²÷÷öö¶±öñò²öö¶··ôóö²²±öö±¶²ñ´
";
180 PRINT AT 17,B-2;"·³³³ô";AT
18,B-2;"´ ÷";AT 19,B;" ";AT 20
,B-2;"ô ·"
190 PRINT AT 1,0;"SCORE: ";S;
TAB 0;"GAME OVER***PRESS A KEY T
O START
"
200 IF INKEY$="" THEN GOTO 200
205 CLS
210 RUN
220 FOR X=INT (C+.5) TO 4 STEP
-1
230 PRINT AT X,B;"¸";AT X,B;" "
240 NEXT X
250 LET S=S+100
260 IF D<.8 THEN LET D=D+.05
270 GOTO 40
300 SAVE "MD"
310 RUN