Ambush
High resolution graphics make this forest scene something worth seeing! You are trapped by snipers hiding amongst the trees. Your only shelter is a low wall. Can you kill all the snipers before one of them succeeds in shooting you?
10 REM AMBUSH.
20 REM @ MICHAEL BEWS.
30 MODE 1: BORDER 0:INK 0,0:INK 1,24:INK 2,18:INK 3,9:WINDOW #1,1,40,1,25:PAPER #1,0:PEN #1,1:CLS #1
40 DIM P(5,5),L(11,2),S(5,2)
50 GOSUB 1000
60 TB=5000:TM=0:K$="0000000000":MN=0:Al=
0:FR=0:MX=80
70 GOTO 600
80 REM KEYBOARD INPUT
90 TM=TM+1:LOCATE 29,16:PRINT MID$(STR$( TM),2);
100 IF INKEY(0)=0 THEN LOCATE 11,14:PRIN T R$(1);:LOCATE 11,15:PRINT R$(2);:LOCAT E 11,16:PRINT R$(3);:MN=1:GOTO 160
110 IF INKEY(2)=0 THEN LOCATE 11,14:PRIN T 0$(1);:LOCATE 11,15:PRINT Q$(2);:LOCAT E 11,16:PRINT 0$(3);:MN=0:GOTO 160
120 IF (INKEY(47)=0 AND MN=1) THEN FR=1: GOTO 160
130 IF INKEY(8)=0 THEN MX=MX-8:GOTO 160 140 IF INKEY(1)=0 THEN MX=MX+8:GOTO 160 150 GOTO 160
160 REM ACTION ROUTINE
170 IF MX<0 THEN MX=0
180 IF MX>220 THEN MX=220
190 IF FR=0 THEN 410
200 FR=0
210 Y=23
220 IF MX<42 THEN Y=Y+32:GOTO 270
230 IF MX<70 THEN Y=Y+7:GOTO 270
240 IF MX<124 THEN Y=Y+8:GOTO 270
250 IF MX<164 THEN 270