RAID 9900&:0:0:0:0:k=17:fl1=0:y=10 :c=20:shot=40(:point=0:savcas=0 jet=0:w(15,1):w(11 ,1)=6000p:w(12 ,1)=6009y:w(13 ,1)=70F:w(14,1)=60<:w(15,1)=6009y:w(1,1)=6000p:w(2,1)=6009y:w(3,1)=425:w(4,1)=70F:w(5,1)=60<:w(6,1)=535:w(7,1)=535:w(8,1)=535:w(9 ,1)=535:w(10 ,1)=535:demo=0:q(10 ,2):para=0:kol=0:level=1:k$(1,13 ):last=0:t$(10 ,13 ):p(10 ,1):k=0:x=0 olevhld=0:savj=29:savk=0:n$(1,13 ):b=10 :b(9 ,1):b(1,1)=255:b(2,1)=254:b(3,1)=252:b(4,1)=248:b(5,1)=240:b(6,1)=224:b(7,1)=192:b(8,1)=128:b(9 ,1)=0  15 >:5:3::r$=" ":record=-99000A\ (n$(1)=" ":300, C0:0:0:pompa=0:para=0:savk=0:savj=29:level=1:aer=0:k=0:fl=20703P:f1=20959Q:z1=1:a=20672P20703P:a,255:a:a=20928Q20959Q:a,255:a:point=0+70000*demo:shot=60<:c=19:7:0:4:20,0;"":1:20,7;"":7:20,25;"":0:6:21,0;"Score: Shells: ":21,7;point:21,22;shot 3:5:0:5:0,0;" ":fl1=0:b=(*20) 550&:aer=0 level<3500 jet<1500 *1<.58000@  7000X Z5:1:4:1:5:1::10 ,10 ;"PLEASE WAIT" Zu6=96`:u4=64@:u5=80P:u3=480:u0=0:u1=16:u2=32 *u9=144:u7=112p:u8=128 a=04 23232Z+a,42*:a ua=160 ub=176 uc=192 ud=208 ue=224 uf=240  l0=0  l1=1  l2=2  l3=3  l4=4  l5=5 l6=6 ! l7=7 " l8=8 # l9=9 $ la=10 % lb=11 & lc=12 ' ld=13 (le=14:lf=15 *"43+:x=121:a$ +t=07:a ,%a$+t,a:t:x:0:0:: -"l",l7,u1+l8,u6,u8,u8,u6,u3,lf,"j",uf,lc,l6,l1,l1,l6,u1+l8,ue,"p",l8,l8,l8,u1+lc,u1+lc,uf+lf,uf+lf,u7+le,"d",u1+l8,u3+lc,u7+le,u7+le,uf+lf,ud+l5,u5+l2,u5+l2,"f",u5+l4,u3+l4,u3+l8,u1+l0,u1+l0,u3+l8,u1+l0,u2+l8,"k",u2+l4,u2+l4,u3+lc,u3+lc,u3+lc,u3+lc,u1+l8,u1+l8 ."g",u2+l2,u2+l3,u6+lc,u3+lc,u3+l8,u3+lf,l4,0,"i",lf,lf,u1+lf,u3+le,u3+lc,u7+l8,uf,uc,"c",0,0,0,u7+le,u1+l8,0,0,0,"h",0,0,0,u1+lf,u0+l5,1,0,0,"b",0,0,0,uf+l8,ua+l0,u8+l0,0,0,"n",0,0,3,uf+lf,u3+lf,3,0,0,"m",0,0,0,u5+l5,u2+la,0,0,0,"o",l1,l2,lc,u1+lc,u1+l8,u2,0,0 /-"a",0,u1,u1,u1,u1,u3+l8,u2+l8,0 0"s",u4+l9,u2+la,u1+lc,u1+l8,u2+lc,u4+la,u8+l9,u0+l8,"q",0,0,0,uf+lf,u0+l7,0,0,0,"u",0,u0+l8,u1+lc,uf+lf,uf+lf,u1+lc,u0+l8,0 1"e",u1+l8,u3+lc,uf+lf,uf+lf,uf+lf,u3+lc,u1+l8,0,"r",0,u1+l0,u3+l8,uf+lf,uf+lf,u3+l8,u1+l0,0,"t",0,0,0,uf+lf,ue+l0,0,0,0 2,5:2:19,10 +y;"" 3)pompa=1pompa=25400 40demo=1w((*14)+1,1) 5="s"Ŧ="S"6009y 6="a"Ŧ="A"6000p 7="z"Ŧ="Z"70F 8="x"Ŧ="X"60< 9="0"80P :,5:2:19,10 +y;"" ; < 5300 ?y=1970F Af3:5:y=y+1:19,10 +y-1;" ":2:19,10 +y;"": F 5300 Iy=-9 60< Kf3:5:y=y-1:19,10 +y+1;" ":2:19,10 +y;"": P`shot=shot-1:6:0:0:21,22;" ":21,22;shot Q'shot=0f$="SHELLS":5500| Rt=0182 SO(18-t,10 +y)=40(ū(18-t,10 +y)=47/91[ TN(18-t,10 +y)=5ū(18-t,10 +y)=47/89Y Ut088X V6:5:18,10 +y;"":.001wn,10 :.004yn,8:.008zn,5:0:3:5:0:18,10 +y;" " XJ2:5:18-t,10 +y;"":18-t,10 +y;" " Y*2:5:.02{# =,.02{# =:t Z [Z5:2:18-t,10 +y;"":.001wn,10 :.004yn,8:.1}L,10 :.008zn,5:.010z# =,3:.008zn,5:.004yn,8:.001wn,10 :.1}L,5:.001wn,.5:.001wn,1:.002xn,5:.004yn,8:.006yD,10 :.1}L,18 \para=1750 ]l1:18-t,9 +y;" ":18-t,6+y;" ":17-t,6+y;" " ^jpoint=point+500:6:0:21,7;" ":21,7;point:6300 _k0530 `fl1098b a 4000 bpoint=point+1000 dS0:6:21,7;" ":21,7;point:6300 i5savj29savk0lf=15:7142 n 8 (point*h$="c"h$="C"levhld=0:203 ? 300, @5"Is the cassette and cabling ready ? [y/n]",h$ Ah$="y"h$="Y"323C B 300, C?savj=29:savk=0:savcas=1:"raid"203 D4::7:0:10 ,0;" THE GAME IS SAVED STOP THE TAPE ": E0:6::4,2;"Hello friends. I hope you will enjoy the game even if it is so very difficult to win the battle against the enemy planes." Fz$=r$:savrec=record:10 ,2;"Anyway the main purpose of the game is to shoot down the largest number of planes thus scoring a high number of points. Let's look now at the battle scene.":337Q GA0:4:18,2;"PRESS ANY KEY TO CONTINUE" H=""328H I3:5: J:fl=20703P:f1=20959Q::a=20672P20703P:a,255:a:a=20928Q20959Q:a,255:a:point=50400:shot=60<:r$="Bill":record=45500:c=19:7:0:4:20,0;"":1:20,7;"":7:20,25;"":0:6:21,0;"Score: Shells: Lev.1":21,7;point:21,22;shot M.a=04:23232Z+a,42*:a P Q 327G R100d:0:5:1,2;"This is the battle scene. Let me try to explain first the red and black lines" S9 :4,2;"They show the FUEL level. For each move you make with the anti-aircraft tank  " T`7,0;" the fuel level decreases. You can move the tank 255 times. Anyway if you are short of fuel a pump will appear on the right side of the screen. To refuel you must place your tank close to the pump. As soon as you detach the tank from the pump it stops refuel- ing. If the pump is hit refuel- ing stops." Uz0:13 ,147:-8,0:20,-147:2,6:-2,-6:-4,6 Vz0:220,147:8,0:-502,-147:4,6:-4,-6:0,6 W+pomc=240:poml=19:54306 X*2:5:19,29;"" Z 327G [%5:19,15;"" \5:1,2;"You can move your  using":2,2;"keys z and x :":4,2;" z LEFT":5,2;" x RIGHT" ]S7,2;"You can fire  pressing":8,2;"key 0." ^1:0:6:21,22;shot:0:5:10 ,0;" You have a total of 60 shells. When these have been used the game is over." _ 327G `C1:4:1:20,7;"" a.0:5:19,15;"" b0:0:5:1,2;"You have a total of 19 anti":2,2;"air-craft tanks.If the tank in":3,2;"action is hit it will be re-":4,2;"placed by another from your ":5,2;"arsenal." d7,2;"Your tanks stored in the":8,2;"arsenal can also be hit":9 ,2;"by bombs or by the jets that":10 ,2;"in level 3 & 4 will make":11 ,2;"raids flying low." os0:327G:7:4:1:20,0;"":20,25;"":0 p[0:5:1,2;"You can fire a missile  ":2,2;"from the ramps with keys":3,2;"a and s. These keys may":4,2;" only fire when the":5,2;"air-craft is far away":6,2;"from you, when it is just a":7,2;"dot '.'. When you press a" q@8,2;"a  starts from the left ramp":9 ,2;"but only if the air-craft":10 ,2;"is in the left side of the":11 ,2;"screen, as you can see in the":12 ,2;"bright part at the top of the":13 ,2;"screen.":1:0,0;" . " r0:14,2;"The opposite happens when you":15,2;"press the s. The air-craft":16,2;"must be in the right side." s 327G t4:1:20,0;"":20,25;"":5:0:1,2;"The flashing missiles after":2,2;"keys a or s have been keyed":3,2;"have to be directed onto the":4,2;"target using keys z or x.":5,2;"If you miss the target you":6,2;"loose the missile, but if":7,2;"you hit the plane you score":8,2;"1000 points without loosing" u9 ,2;"the missile. To hit the plane":10 ,2;"at the game level 1 you need":11 ,2;"just to hit the square where":12 ,2;"the '.' is. In the higher":13 ,2;"levels you must hit the '.' .":14,2;"You can loose missiles also":15,2;"if they are hit by the jet":16,2;"in levels 3 & 4." v 327G w40:6:1:21,7;point:0:5:1,2;"The flashing number indicates":2,2;"the actual points you score.":4,2;"How you score points :":6,2;"500 = if you hit the ":7,2;"500 = if you hit the JET" y8,2;"1500 = pilot with parachute":9 ,2;"500 = each of six para":10 ,2;"1000 = the plane with missile" z 327G {0:6:1:21,7;point:0:5:1,2;"How you loose points :":4,2;"200 = the flys safe":5,2 |5,2;"400 = pilot lands safe":6,2;"1000 = each para landed safe":7,2;"500 = any tank or missile":8,2;" hit by the JET":9 ,2;"300 = tank hit by the ":10 ,2;" air-craft." } 327G 0:6:1:21,27;"Lev.1":0:5:0:1,2;"You can see now that Lev.1 is":2,2;"flashing. During the game the":3,2;"level you reach is shown in":4,2;"this way. Explanation of the":5,2;"game levels :- ":9 :1:6,2;"L.1":0:5:6,5;" = Easy to hit the aircraft":7,2;"with the missiles." +9 :2:8,2;"L.2":0:5:8,5;" = Now to hit the plane":9 ,2;"with missiles you need to hit":10 ,2;"the '.' exactly.":9 :3:11 ,2;"L.3":0:5:11 ,5;" = The enemy starts to use":12 ,2;"his very powerful JETS.":9 :4:13 ,2;"L.4":0:5:13 ,5;" = JETS are more effective.":14,2;"You are now weak so the enemy":15,2;"trys to land with his para" 9 :1:16,0;"L.1=0-9999 ":2:16,15;"L.2=10000-19999":3:17,0;"L.3=20000-29999":4:17,15;"L.4=30000- ON "  327G 0:5:2,2;"At the end of the game you will be informed of the reason why the game is over and the points you scored and if you beat the record. Moreover your score will be recorded in a personal record table that can hold to 10 personal records. If the table is full you will be asked if you want to store your name and your points in place of another player."  327G ^4:1,0;" " 5701E:0:1,1;"Bill":1,15;"      54000":2,1;"Peter":2,15;"   22500":3,1;"Marie":3,15;"   35000" 0:5:13 ,1;"The above is an example of the mentioned personal record table Please note the decorations corresponding to the points scored."  7142  327G A1:6:2:10 ,7;"ENJOY THE GAME !" *0:r$=z$:record=savrec:203 Cn$(1)="Demo-mode ":demo=1:xxx=1:204 t=0182 O(18-t,10 +y)=40(ū(18-t,10 +y)=47/80P t  535 jet=*2:aer=1:j=05:5:0:0,b;".":.002xn,4:502:j:3:5:0,b;" " aer=0:j=04:5:0:2,b+1;"-":.002xn,6:502:j:3:5:2,b+1;" " j=03:5:0:4,b+2;"":.002xn,6:502:j:3:5:4,b+2;" " j=02:5:0:6,b+3;"":.002xn,8:j:flag=0:1000:flag=1:1060$:5:5:6,b+3;" "  j=01:5:0:4,b+4;"":.002xn,8:502:j:3:5:4,b+4;" " wj=01:5:0:2,b+5;"":.002xn,12 :502:j:k=116 1:5:0:0:.01z# =,502-k:2+k,b+7;" ":2+k+1,b+7;"":0:502:k:5:3:2+k,b+7;" " o(20,b+7)=33!b+7=10 +y5000:5:5:2,b+5;" " 9k=0:5:5:2,b+5;" " Yj=01:5:0:0,b+6;"":.002xn,12 :j 8level<4ť*1<.6x=0:558. 8para=1:x=1:bb=b+8:720:600 3:5:0,b+6;" ":q(1,1)-1,q(1,2)+bb;" ":q(1,1),q(1,2)+bb;" ":q(2,1)-1,q(2,2)+bb;" ":q(2,1),q(2,2)+bb;" " g=19 x=162  600X x:g #x=-6000p:g=110 'q(g,1)=99cx=x+1000  g # 720 $para=0 %550&:558. & (H3:5:18,0;" " )t3:5:19,0;" ":2:5:19,10 +y;"" *Hpompa=1pompa=2pomc=240:poml=19:54306 , .point=point-200+x /[6:0:21,7;" ":21,7;point:6300:8 X^ll1=q(x,1):ll2=q(x+1,1):cl1=q(x,2)+bb:cl2=q(x+1,2)+bb [ll1=1620l ]ll1=99c650 ^ll1=19650 b13:5:0:ll1-1,cl1;" " gll1,cl1;" " l%q(x,2)=(*8-*2) q6bb+q(x,2)>31q(x,2)=-(*4) v4bb+q(x,2)<0q(x,2)=(*4) {cl1=q(x,2)+bb }(7:5:ll1+1,cl1;"" 0:ll1+2,cl1;"" q(x,1)=ll1+2 ll2=99c ll2=3665 ll2=19700 13:5:0:ll2-1,cl2;" " ll2,cl2;" " -q(x+1,2)=(*2-*8) Fbb+q(x+1,2)>31q(x+1,2)=-(*4) Dbb+q(x+1,2)<0q(x+1,2)=(*4) cl2=q(x+1,2)+bb (7:5:ll2+1,cl2;"" 0:ll2+2,cl2;"" "q(x+1,1)=ll2+2  502  g=110 2 7q(g,1)=1:q(g+1,1)=3:g  .3:5:18-t,10 +y;" " 19-t,10 +y;" " jpoint=point+500:6:0:21,7;" ":21,7;point:6300 r=110 $19-t=q(r,1)790 r: 'q(r,2)+bb=10 +y805%  775   %q(r,1)=99c * Wrf=(b+3)*8+4:lf=rf+8:hl=175-(6*8+4) 'err=((*16-*8)/8) 0tar=((y+10 )*8+4)+err*8 tar14015 r114016  18-r,r1;"":4016 /19-r,r1-1;b$:18-r,r1;"" i0:5:7:18-r,q;"":0:19-r,q;"":fl1=19-r:rt502 Hr=19-fl1:5:1:18-r,q;" ":19-r,q;" " q=q+*3-*2 #q30q=q-*4-1 b$=""4035 b$="":4040 b$="" r r114048 b=r1-8  2000 j6:0:point=point-400:21,7;" ":21,7;point:6300 (lf=15:savj297142 savk08142 savj=29:savk=0:  8 Lk=17b+7=10 +yƫ(20,b+7)=33!2012  2000 Wk=17b+710 +y3:4:0:20,b+7;" ": ,3:5:19,10 +y;" " h=724 $(20,h)35#5020 h  5005 50:0:3:4:20,h;" "  e=06  (20,e)=trib5120 e e=2531  (20,e)=trib5120 e f$="MISSED SHOTS":5500| &c1:4:0:20,e;c$   pompa3pompa=0 z1=05452L z1>9 5352 fb=b(z1,1) z1=z1+1 fl,fb f1,fb Ifl<20677Ppompa3pomc=240:poml=19:54306   z1=1 fl=fl-1 f1=f1-1 'fl<20672Pf$="FUEL":5500|  5305 10 +y29 pompa=2 z1<15452L z1=10 5352 fb=b(z1,1) z1=z1-1 "fl,fb 'f1,fb , 6,pompa=1:0:5:pomc,poml ;1,0:0,3:5,0:0,-6:-3,0:0,1:4,0:0,-1:-3,0:0,7:2,0:-1,0:0,-5 < L z1=8 Ofl=fl+1 Tf1=f1+1 Y!fl>20703Ppompa=0: ^ 5405 |:0:5:13 ,6;"G A M E O V E R" T2:6:1:1:16,6;"YOU SCORE ";point;" POINTS" E6:2:1:1:15,6;"NO MORE ";f$ )point ":19,6;"IS THE NEW CHAMPION "  5514 n1:7:0:18,6;"<";r$;"> ":19,6;"IS STILL THE CHAMPION " levhld05600 last05520 a=1:5545 a=1last 0t$(a)=n$(1,113 )5650 a last=10 5560 last=last+1 $t$(a)=n$(1,113 ) p(a,1)=point #xxx=1300,:300,  5600 J1:7:0:0,2;"PERSONAL RECORD TABLE FULL"  5700D 0"ENTER NAME TO BE SUBSTITUTE OR n",k$(1) N0:0:5:0,2;" " -k$(1)="n"k$(1)="N"5600 a=1last t$(a)=k$(1)5546 a  5570  5700D 0:0:151  p(a,1)9999'a,15;"" O5p(a,1)>19999Na,17;"" P7p(a,1)>29999/ua,19;"" Q?p(a,1)>39999?a,21;"" RCp(a,1)>49999Oa,23;"" Sa,26;p(a,1) Xa Y 7142 ] paer=0 qb>10 rzz=0:e=06 s$(20,e)=39'6016 te u yaer=0 zb10 { zz=0 |e=2531 }$(20,e)=39'6016 ~e  ,1:7:2:20,e;"*" .02{# =,20 ,3:4:0:20,e;" " m1=e*8+4 yy=m1  xx=0  m1,15 ;demo=1xx=xx+(*5)-(*5):6032 ="z"Ŧ="Z"xx=xx-1 ="x"Ŧ="X"xx=xx+1 zz=zz+8 str=(yy/8)  yy=yy+xx zz=1686130 yy>255yy<0 .20-(zz/8)06070 fin=(yy/8) stryy1cpntyy6220L  6070 $(ypnt<4ypnt1<46080 ) 6070 . ctrk=yy-yy1 3!ypnt=(8*(cpnt-yy1)/ctrk) 8*ypnt1=(8*(cpnt-yy1+2)/ctrk) = 6180$ L ctrk=yy1-yy Q!ypnt=(8*(yy1-cpnt)/ctrk) V*ypnt1=(8*(yy1-cpnt-2)/ctrk) [ 6180$ *levhld0level=levhld:6315 "point10000'level=2 "point20000 Nlevel=3 "point300000ulevel=4 30:6:21,27;"Lev.";level  X 7000X ] lf=15 ga$ la=07 qn v a$+a,n ya ,"r",u7+l2,ue+l2,ue+le,uf+lf,uf+le,ue,ue,u7 sava=a savj=29:savs=15 a=savj0-1 O0:0:5:14,a;"":6:14,a+2;"" savj=a a=sava  502 +*level>level/8+27500L a=savj %3:5:14,a;" " a jet=*1.5@ savj=29 %jet<17142:7150  7080  7142 t=01 a$ a=07 n a$+a,n:a:t y"r",0,u1+l0,u3+l8,uf+lf,uf+lf,u3+l8,u1+l0,0,"q",0,0,0,uf+lf,u0+l7,0,0,0  %jet=0:savj=29:8 Ub=savj-5-7 V:3:4:20,savj-5;" ":7259[ Wb=savj-5-7 X c=c+1 Y:3:4:20,savj-5;" ":7259[ [ 7300 \ l1:1:6:19,b+7;" ":5:19,b+7;"":.02{# =,.02{# =: +6:1:19,b+7;" " @0:5:0:19,b+6;"":10 ipoint=point-500:6:1:21,7;" ":21,7;point:6300 -3:5:19,b+6;" "  c=c-1 ,c=0f$="ANTI-AIR TANKS":5500|  %kol=0:b=savj-5-7 .3:5:19,savj-5;" " h=724 $(20,h)35#7430 h ,3:4:0:20,h;" "  7259[ Lsavj<6 ~(6:savj*8+2,557 .002xn,20 /(19,savk-5)=45-7555 1(19,savj-5)=42*kol=42* R-39',-39':savj*8+2,557:5:-39',-39' kol=42*7400 /(20,savj-5)=33!7253U /(20,savj-5)=39'7255W  kol40(8400  kol=0 73:5:0:19,savk+7;" " pompa=3 .6:1:19,savk+7;" " .006yD,10 .2:5:19,savk+7;"" .006yD,10 73:5:0:19,savk+7;" "  "(tar-4)/830 76:1:19,(tar-4)/8;" " .006yD,10 72:5:19,(tar-4)/8;"" .006yD,10 @3:5:0:19,(tar-4)/8;" " pompa=3  @ 8000@ E lf=15 Jt=01 Oa$ Ta=07 Yn ^ a$+a,n aa:t c,"q",u4+le,u4+l7,u7+l7,uf+lf,u3+lf,l7,l7,le m7"r",0,0,uc,uf+lf,uf+lc,uc,0,0 sava=a savk=0 a=savk291 O0:0:5:14,a+1;"":6:14,a;"" savk=a a=sava  502 +*level>level/8+285004! a=savk %3:5:14,a;" " a jet=*1.5@ savk=0 %jet<17142:8149  8080  8142 t=01 a$ a=07 n a$+a,n:a:t y"r",0,u1+l0,u3+l8,uf+lf,uf+lf,u3+l8,u1+l0,0,"q",0,0,0,uf+lf,u0+l7,0,0,0 $jet=0:savk=0:8 =b=savk+7-7 >:3:4:20,savk+7;" ":8259C ?b=savk+7-7 @ c=c+1 A:3:4:20,savk+7;" ":8259C C 8300l D ll1:1:6:19,b+7;" ":5:19,b+7;"":.02{# =,.02{# =: v+6:1:19,b+7;" " {@0:5:0:19,b+6;"":10 jpoint=point-500:6:1:21,7;" ":21,7;point:6300 -3:5:19,b+6;" " Hpompa=1pompa=2pomc=240:poml=19:54306 c=c-1 ,c=0f$="ANTI-AIR TANKS":5500| kol42* +2:5:19,b+7;"" kol=0  b=savk+7-7 .3:5:19,savk+5;" " h=724 $(20,h)35#8430 h ,3:4:0:20,h;" " ! 8259C !4savk>23 !f26:(savk+2)*8+2,557 !h.002xn,20 !i/(19,savk+7)=45-8555k! !jA(19,savk+7)43+kol=(19,savk+7) !kZ39',-39':(savk+2)*8+2,557:5:39',-39' !ukol07600 !z/(20,savk+7)=33!8253= !/(20,savk+7)=39'8255? ! &0:0:7: &1,11 ;"AIR-RAID" &/3,9 ;1;" 1983 C.C.S. " &&9 ,7;"COPYRIGHT WARNING" &y,,,,"Please note unauthorised copy":"-ing, hiring, and lending of":"this software is strictly":"prohibited." &A21,3;6;1;"Press any key to continue" &=""9965& & 'C0:0:0:pompa=0:para=0:savk=0:savj=29:level=1:aer=0:k=0:fl=20703P:f1=20959Q:z1=1:a=20672P20703P:a,255:a:a=20928Q20959Q:a,255:a:point=0+70000*demo:shot=60<:c=19:7:0:4:20,0;"":1:20,7;"":7:20,25;"":0:6:21,0;"Score: Shells: ":21,7;point:21,22;shot