pearl OOOQ 48085ջ "" 1:1:"" 1:1:"" pearl @r|~<|@B<||B2ļżżt:ļ=¥!͵!:\D>~< >O2Ƽ!żD>2ۻ>2ػ>Pww>(w>w>w >w>2Ƽ>#2ʼż~2׻~2ֻ~w2׻~2ֻͳ0$~F(0~w8 ~w ~ 8 ~w ~0~wͳ0~ 855~044ͳҦp!:\:\2\>6C: wDͺ$>2Ƽ>-2ʼż>2ʼż>2ʼż!F>w:\ˏ2\!:\>2: G"-¦!>2Ƽ>#2ʼż4~ ڦD!:\>< >22Ƽ>-2ʼż!DG!~=~ =>wwD22ww>2\D2!>w?wç֑8(w>2ػ>2ٻ>2ۻ>2ڻ7>w>w~--w~- -w~2׻~2ֻ>2Ƽ>2ʼż 55 55 44 44# Rͳ2854ͳ854~=<~=7P~2׻55>2Ƽ>2ʼż# R~8DF ~w6 ~=p p!:\:\2\>6C(6DT-ͺ$6C6DT-ͺ$>2Ƽ>22ʼż!FF :\ˏ2\!:\>|Z"-(Z"-!>2Ƽ>2ʼż~w4 ~ >2Ƽ>(2ʼżD> 2ۻ>2ػP~2׻55>2Ƽ>%2ʼż~8D>2ۻ>2ػ> 2Ƽ> 2ʼż~w2D Zero On Your TailTail You Have Been Shot Down!!:\>>>>:2!çԼ!÷>>(-/8;8+z!͎{<~>2Ƽ>2ʼçTڙt>p w2ֻ~2׻ż4~F >p w2ֻ~2׻ż5~F >p w2׻~2ֻż5~F yG(TyDHds}w$2{{@L08|8>??@c @c <~<?? ??w,--$w,--$_0:ħ 0 2(0 :ħ 0 2:(:<2o'''è:=2oè_0&: ħ 02 :@ 2: : 2 ((0$: ħ 02 :H 2: : 2 :!(: <2 o'''hA: =2 ohA5n}ߵ*\#*{\^###NF~~wͪ"w4/d !W A#BHCw# A!W~?w+~?w0#~w++!@~'w#~'w0+~w##!W R~+Rx( ~+x(  R~+ 6+!@ ~#x( R~#Rx(  ~# 6#@ @ @0` @@    @   @  @@@ @@@ `@@@8 @@ 0@ @0@@ p @ 0 0 @0 @80@@@  0 0@@ 18@0 @?x @@@ 8p0 @` @ A@@1    xp@Aircraft Shot Down 0>< >2">H2%>2&:\2\&H.J:\ˏ2\>2.2/23>!Zw#|!#PJ!$PJ!%PJ|!nPJ!oPJ!pPJ!=PJ!>PJ!?PJ!VPJ!WPJ!XPJ!PJ!PJ!PJ!KPJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ!PJ>22> 2>d2:ħ(;ͳ0n>2ͳ'''''2ͳ8>2 >2:2&H:2+j&H:+oD: $&H:oX &H:+oDů2:ħ(Rͳw>2ͳ'''''2 ͳ8&H|2&@|2ͳ8>2! >2!: 2 :2,: 2-:,g:-oD:! 4:g: oX:,g:-oDů2:"ħ(Eͳ>2"ͳ'''''2$ͳ8&H|2#&@|2#ͳG:$Ā2$:#2':$2(:'g:(oD:#g:$oX:'g:(oDů2">2Ƽ>2ʼżA>2F:%2):&2*:\M(m(͎{ :&=2&(:&<2& ':&ħ 02&:%@ 2%:&:& 2& ':&ħ 02&:%H 2%:&:& 2& @:&<2&'''(:&=2&:)g:*o:.( w$  J>2.:%g:&o:\2\J:\ˏ2\:F͎{#5>2.>d2ʼż:24: 25:$26:&:4O(:5O(:6O(+:%Hʴ:&:O:%Ĺ:&:#O:%Ĺ:&:4<24:5<25:6<26:%g:&o J?&H:oD:3<23>22:g: oD:3<23>22 :#g:$oD>2"2$:/ħ\2/>>>>:/2 :%g:&o J ͳ 0"&@ͳ0ͳo J>K2ʼż:" >21Aͳ09x22:#g:$o|g>w,>w>2ʼż>w-w:2G:1<21 \:=W:=R:8=(282:7=27P:323 You Have Been Killed By A Zero!>(< >22Ƽ>d2ʼż The Japanese Have Been Defeated!>3)< >22Ƽ>d2ʼż_0$:$ħ 02$:#@ 2#:$2$S0$:$ħ 02$:#H 2#:$2$+0:$<2$''':$=2$>QU< ͦ:9K>ħ8P::ħ8y:;ħ8_:<ħ8Y:=ħ8*>2E::29:;2::<2;:=2<:>2=>2Dr>2D::29:;2::<2;:>2<>2E>L>2D::29:;2::>2;>2E> ,>2D>*2E::29:>2:>>2D:>29>82E>2+27> 2A:Dħ(4!G ~#w ++>QU< ͦ>2@2\!c:E_SF>2H:@O:\(2@ħ 8z0[FSF21:A2.<2A>>>>>> >p>>>:>2C:H High Score Phil....... Mart....... Cath....... Paul....... Jane.......>>>>:=2>>>>:<2>>> >:;2>>>>::2 >>>>:92#>::25>>>>:92O <  ? 0`  @       @@ `  @   @   @  @  @> @      *v\T])))))"v\|!@~#@!~#!@~#@!~#>P0<<B808H~H~#pearl "? b9$?  Sabresoft 1983  0 7000X  2000  3000  4200h ( 2?10 ,9 ;"ANOTHER GAME ?";11 ,13 ;"(Y/N)" <="n"Ŧ="N"0 F="y"Ŧ="Y"90Z P 60< Z 7030v d 15   in=0 ,1;10 ,10 ;"INTERCEPTION" 2,0  H4;0,11 ;"Score ";7;0,19;0 50193,0 50185 ,0 50195,0 l=49130 l=65303 n=13 i=14 4h(n+5)=i6;1;a(n),b(n);p$(i) i n  n=15 i=14 ,g(n)=i3;1;v(n),w(n);p$(i) i n ! &  W10 ,1;"SELECT DIFFICULTY LEVEL 1 TO 4";11 ,9 ;"(1 IS HARDEST)" ="1"2070 ="2"2120H ="3"2170z ="4"2220  2020 T49135,4:59012,2:59147 ,1:59772|,8  U59827,7:502328,7:48597ս,45-:48754r,6 * 2240 HU49135,5:59012,1:59147 ,60<:59772|,8 RU59827,7:502328,7:48597ս,38&:48754r,7 \ 2240 zV49135,6:59012,1:59147 ,120x:59772|,6 U59827,7:502328,7:48597ս,30:48754r,8  2240 V49135,6:59012,1:59147 ,180:59772|,4 U59827,7:502328,7:48597ս,22:48754r,9   502 e8,4;"SELECT ANTI-AIRCRAFT GUN";10 ,12 ;"1>FAST";12 ,12 ;"2>SLOW" ="1"2290 ="2"2310  2260 59157,2  2330 59157,1   :1;1;2;2,11 ;"RED ALERT" 5,0;"A large force of aproaching aircraft has been picked up on radar.Do you wish to scramble your fighter aircraft as a precaution?(y/n)" ="n"Ŧ="N"3072 ="y"Ŧ="Y"3080 8 .25~,12 .15~,0 3060 score=(*65A)+30   z=-200 .01z# =,z z 51;10 ,5;"All aircraft scrambled"  100d l=65303 05f=15:3;1;x(f),y(f);"" :f >)f=15:v(f)=x(f):w(f)=y(f) ?f D5f=13:6;1;a(f),b(f);"" Nf Rf=18:g(f)=h(f) Sf X.f=15:r(f)=(*4+3) bf l r=0 vc=115 f=15 r=r(f)3900< f r=r+1 r=7r=0 $f=15:s(f)=*10 f f=15 s(f)2.5 3305 !x(f)=x(f)+1:h(f)=4 3325 s(f)0.125}3320 !y(f)=y(f)+1:h(f)=2 3325 /y(f)>0y(f)=y(f)-1:h(f)=3 f .15~,10 U20,0;"Do you want to change heading of any squadron?(y/n) " ="y"Ŧ="Y"3355 ="n"Ŧ="N"3360  3340  3700t 4000 )in=1480 *c 4c=1200 9'f=15:r=r(f)3900< >f C#r=r+1:r=7r=0 G co=0 He=15 M$x(e)=d(e)y(e)=e(e)co=co+1 Rco=53600 We \ alt=1 a&alt/2=alt/23435k b 3455 kalt=alt+1 le=15 p7x(e)d(e)x(e)=x(e)-1:x(e)>d(e)h(e)=1 ze alt=alt+1 e=15 7y(e)e(e)y(e)=y(e)-1:y(e)>e(e)h(e)=3 e .15~,10 U20,0;" Do you want to change heading of any squadron?(y/n) " ="y"Ŧ="Y"3505 ="n"Ŧ="N"3510 3490 3700t 4000 in=1480 c  .score=((50180/49135)*7) "score>100dscore=100d s yf=13 ~U20,0;" Do you want to change the heading of this squadron?(y/n)" .1}L,-20 g=112 i=14 4h(f+5)=i6;1;a(f),b(f);p$(i) i .01z# =,-5 g ="y"Ŧ="Y"3765 ="n"Ŧ="N"3755  3740 f  Y20,0;" Input new direction  5 West,6 South,7 North,8 East " ="7"3795 ="8"3825 ="5"3805 ="6"3815  3770 h(f+5)=1 f  h(f+5)=3 f  h(f+5)=4 f  h(f+5)=2 f: <o=13 =+x(f)=a(o)y(f)=b(o)x(f)=x(f)+1:o >o=15 ?o=f3905A @(x(f)=v(o)y(f)=w(o)y(f)=y(f)+1 Ao Ci=14 E,g(f)=i3;1;v(f),w(f);p$(i) F,h(f)=i3;1;x(f),y(f);p$(i) Pi  g(f)=h(f) r(f)=(*4+3) v(f)=x(f):w(f)=y(f)  j=13 i=14 4g(j+5)=i6;1;a(j),b(j);p$(i) i g(j+5)=h(j+5) 6h(j+5)=1a(j)>0a(j)=a(j)-1 7h(j+5)=2b(j)<31b(j)=b(j)+1 6h(j+5)=3b(j)>0b(j)=b(j)-1 7h(j+5)=4a(j)<19a(j)=a(j)+1 i=13 i=j4050 5a(i)=a(j)b(i)=b(j)a(j)>0a(j)=a(j)-1 i m=15 !a(j)=v(m)b(j)=w(m)4115 !a(j)=x(m)b(j)=y(m)4080 m i=14 4h(j+5)=i6;1;a(j),b(j);p$(i) i j   in=1 i=14 4h(j+5)=i6;1;a(j),b(j);p$(i) i a(j)=19:b(j)=4 ,h(j+5)=1:g(j+5)=1  *6;1;a(j),b(j);p$(1)  !a(j)=x(m)b(j)=y(m)4060 i=14 ,g(m)=i3;1;v(m),w(m);p$(i) ,h(m)=i3;1;x(m),y(m);p$(i) "i ' g(m)=h(m) ,v(m)=x(m):w(m)=y(m) 1 4065 h0:5:0: r01;10 ,7;"Air Raid Warning!" ws=18 |*.25~,-10 :.15~,-20 s  O8,0;" Enemy aircraft approaching! Man anti-aircraft guns"  502  502317,5 58355 Esscore=(502273*6)+((50223/-502273)*2) $sscore>155sscore=155 score=score+sscore  %9 ,7;"Score this round" 10 ,14;score  200  scoreǾ5023396500d 1:1:9 : s=score:50238>,s 4,7;"CONGRATULATIONS!!!";6,0;" You have reached one of todaystop scores.When the High Score Table is displayed you may enteryour name (up to 4 letters)." <:" You may enter either upper or lower case letters." >:" The table will be displayed until you press any key." :"PRESS ANY KEY TO CONTINUE" ;.15~,30:.25~,0:.15~,20  0   l=60330 ( 100d 2 0 F50238>,0 d b).5,-25:.15~,-25 p,58727g,25:58853,25 qs502339,100d:50234:,115s:50235;,125}:50236<,200:50237=,225 r-59716D,12 :48414,220 v1:1:7: {.25~,0 H11 ,0;"Do you want to see instructions?";13 ;"(y/n)" ="n"Ŧ="N"8100 ="y"Ŧ="Y"7090  7050  instructions  k(7)  l(7)  7108 d=17:k(d):d d=17:l(d):d }8,9 ,11 ,13 ,16,16,16,13 ,10 ,15,25,13 ,18,25 t8,0;" When 'scroll?' appears at the bottom of the screen press 'y' when you have read instructions"  400  ͊8,0;" If you break out of the programby mistake then restart with GOTO 40";21,0;"PRESS ANY KEY TO CONTINUE"  0  շ0,2;"It is 6.45 am.";2,0;" You are sipping your coffee, trying to keep your tired eyes open and concentrate on the radar screen in front of you. " ֻ:" The boredom is suddenly brokenby a blip on the radar screen moving from the north.You rub your eyes and try to raise some enthusiasm as you make an entry in the day's logbook." ~:" Something seems wrong : the Flying Fortresses you were expecting are early,and should be coming from the west." 5:" Now is the time for you to change history!" "PRESS ANY KEY TO CONTINUE"  100d  0 :5,0;" You will be given the chance of scrambling P40 fighters to investigate this intrusion of your airspace,or you can relax and take another sip of your coffee." P:" If you wish to see instructionsfor scrambling aircraft then press 's'." *:" If you wish to relax then press'r'." ="r"Ŧ="R"7500L ="s"Ŧ="S"7165  7150 :8,0;" You will see a map of Oahu island.The possible targets are the harbour (H),and the main airfields ()"  350^ l=65303  #d=17:k(d),l(d);"" d +;1;1;15,16;"H"  350^ :2,0;" The yellow aircraft are your squadrons and you can direct them,when prompted,towards the magenta aircraft who have failed to answer requests for identification."  1:" Your orders are to intercept and attack." %:" You will be asked if you wish to change the heading of any of your squadrons.If you reply 'y' then you will be asked in turn if you wish to change the heading of a particular squadron." *,:" The directions you may fly in are :-" /$:" 5>West 6>South 7>North 8>East" 4|:" If you do not change the heading of any squadron then they will move in the direction that they are heading." 9:" You cannot fly off the edges of the map,but from time to timeyou may receive reinforcements, on the south edge of the map, from the aircraft carrier Enterprise which has been alerted." ::" THE POSITIONS SHOWN FOR THE HOSTILE AIRCRAFT ARE THE LAST KNOWN POSITIONS,ALTHOUGH THE POSITIONS FOR YOUR AIRCRAFT ARE THE ACTUAL POSITIONS." ;:" If you manage to intercept theenemy aircraft you will leave the map,and get a view from the cockpit of one of the intercepting fighters." :" Only fire when the enemy aircraft are in the centre of the screen,as excessive firing will draw the attention of enemy fighters towards you." ?k:" The 'VALS' are very tough and will need more than one accurateburst of fire to bring them down." @:" If you are unlucky enough to get a 'ZERO' fighter on your tail then you can only use the keys '6' for down and '7' for up,to try and dodge his fire." A8:" Unfortunately his fighter is better than yours." Bt:" On completion of this skirmishyou will return to the island map to attempt more interceptions." C:" Eventually all Japanese aircraft will reach their targets,and then you are transferred to the defence of 'Pearl harbour'." D:"PRESS ANY KEY TO CONTINUE" E 0 L M~" You are manning a quick firinganti-aircraft gun aboard USS CALIFORNIA which will bring downany aircraft with one hit." N:" You will have the choice of a manoeuvrable but difficult to control gun,or a slower and morecontrollable gun."::" Beginners are advised to startwith the slower gun." O:" Once again the control keys are 5>LEFT 6>DOWN 7>UP 8>RIGHT 0>FIRE.The only other key used is the 'm'(PAUSE) key.When pressed the action is frozen until you press any other key." P:" You must move your sight amongst the flak bursts,which hide enemy fighters,and fire when anything comes across your sights." Q:" Ammunition is unlimited,so fire as often as you like.The 'ZERO' fighters which fly towards you,machine gunning the decks of the ships,are your onlydanger,and as the game continuestheir fire becomes more accurateand deadly." R:"PRESS ANY KEY TO CONTINUE" S 0  p8,0;"Do you want to see High Score Table which will be displayed until you press a key?(y/n)"  100d ="y"Ŧ="Y"8140 ="n"Ŧ="N"8200  8110  9 : l=60330  100d  0  7: "10 ,10 ;"Please Wait" %0score=0 %:sscore=0 %D50180,0 %F in=0 %I r(5) %N a(3) %R d(5) %S e(5) %X b(3) %Z g(8) %\ h(8) %^ v(5) %` w(5) %b x(5) %f s(5) %gp$(4,1) %l y(5) %q 9630% %vn=13:a(n):n %n=13:b(n):n %n=15:x(n):n %n=15:y(n):n %n=18:h(n):n %n=15:d(n):n %n=15:e(n):n %$11 ,10 ,16,14,15,24,0,0,0,0,0,6,8,10 ,12 ,13 ,4,4,4,4,4,1,1,1,15,15,11 ,16,13 ,16,16,15,18,25 %Dp$(1)="":p$(2)="":p$(3)="":p$(4)="" % %  corecoreltom|r w xyYqdp %>*b] ] vv     v  H lscor    ++  & &  @