Flying Bom S 1:7:5  SC=0 rPO=0:CR=0:DIST=270000:DC=DIST:TH=1000:D=0:H=4:DK=D:HK=H:S=150 ( 610b d:1;"FLYING BOMB" i;1;2,0;"SCORE: ";2,6;SC nw1;0,14;"MLS TO TARGET: ";1,18;"HEIGHT FT: ";2,18;"SPEED NTS: " x?18,0;5;" " X20,0;2;"USE'A&Z'KEYS FOR HEIGHT,'N&M'FORSPEED'K'RELEASE BOMB! " l3;14,31;"";15,30;"";16,29;"";17,28;"" **MAIN ROUTINE** X1;1,28;" ";1,28;((17-H)*100d-20) J1;0,28;" ";0,28;(27-D)/5 ?1;2,28;" ";2,28;S*2 -HK,DK;" ";H,D;4;"";:HK=H:DK=D ,(A=23556\:A=255360h 13A=77MS=S+5:S>195S=195 6WA=78NS=S-5:S<45-16,0;1;"STALLED!":850R @A=65AH=H-.1}L J3A=90ZH=H+.1}L:H>16.8fff750 TH<2.2 H=2.2 ^.A=75K4;HK,DK;"";:500 h"H>13 D>27780  **MOVE CLOSER DC=DC-S:D=((DIST-DC)/TH) D>30810*  200 **BOMB DROPEED 1Y=1:V=H+1:F=D+1:HK=V:DK=F X=Y*Y*(1-S/200) .01z# =,-20 V=V+X/40(:F=F+Y/8 &"V>15F>28710 :$V>18.5F>31810* ?HK,DK;" "; D V,F;"" I HK=V:DK=F NY=Y+1:530 X**initialisation b;x=07:a,b,c:""+x,a:""+x,b:""+x,c:x l#x=07:a:""+x,a:x v#x=07:a:""+x,a:x .x=07:a:""+x,a:x:100d  **WON GAME  HK,DK;" "; 116,11 ;1;"CONGRATULATIONS!"; -SC=SC+1:1;2,6;SC ~7;2;1;14,31;"";15,30;" ";16,29;" ";17,28;" " SX=110 :.01z# =,10 :.01z# =,+5:.01z# =,15:X $X=1100d:X::20  *DITCHED <2;16,11 ;1;"DITCHED!":900  **CRASH ON TARGET  016,11 ;"THAT'S CLEVER!":730  **LOST GAME * HK,DK;" " 492;6;16,11 ;1;" LOST! " > 900 H *STALLED R7X=H17:4;X,D;" ";X+1,D;"":X SX=110 :.05|L,-10 :.05|L,5:.05|L,-5:X X=1100d:X  :20  plane 192,0,0,64@,0,0,127,248,248,26,175,175,15,254,254,0,190,0,0,127,0,0,190,0 *bomb G0,0,0,0,0,190,127,190 dam J64@,64@,64@,64@,64@,64@,64@,255 H1,3,7,15,31,63?,127,255  7:0:7: #' #([y=07:a$:t=0:x=18:t=t+2^(8-x)*a$(x):x:t #2 ""+y,t #<x:y #F""