200 Flying Bomb
470 FOR X=-10 TO 10:SOUND 1,(X+100),4:NE XT
480 FOR X=1 TO 1000:NEXT:RESTORE:GOTO 60 490 REM *** DITCHED ***
500 LOCATE 12,17:PEN 2:PRINT CHR$(24);"D ITCHED!";CHR$(24);:PEN 1:GOTO 590
510 REM *** CRASH ON TARGET ***
520 LOCATE 12,17:PRINT"THAT'S CLEVER!":6 OTO 460
530 REM *** LOST GAME ***
540 LOCATE DK+1,HK+1:PRINT" "
550 LOCATE 12,17:PEN 3:PRINT" LOST! ":PE N 1
560 GOTO 590
570 REM *** STALLED ***
580 FOR X=H TO 17:LOCATE D+1,X+1:PRINT" ";:LOCATE D+1,X+2:PRINT CHR$(231);CHRS( 232):NEXT
590 FOR X=-10 TO 10: SOUND 1,(X+150),3:N EXT
600 FOR X=1 TO 1000:NEXT
610 RESTORE:GOTO 60
620 STOP
630 SYMBOL AFTER 230
640 SYMBOL 231,192,64,127,26,15,0,0,0 650 SYMBOL 232,0,0,248,175,254,190,127,1 90
660 SYMBOL 233,0,0,248,175,254,0,0,0 670 SYMBOL 234,0,0,0,0,0,190,127,190 680 SYMBOL 235,64,64,64,64,64,64,64,255 690 SYMBOL 236,1,3,7,15,31,63,127,255 700 RETURN