moon dy9900&:9100# :ii=31:9000(# wait stage1 stage2 %ship<4man<10 10 ( endgame d231743{:"":236077\,123{:2  stage1  up=0 Qx=2:y=3:mothx=0:a$(5,32 ):i$(5,32 ) man=man+1 pointer=1  inc=1 'c=15:d=132 (*(11 -man)<.4La$(c,d)="" d:c    surface  topprint $a0,6;6;score;0,17;5;high;0,30;7;ship .Ac=15:4+c*2,0;6;a$(c):c 8.2,0;m$;3,0;n$;y,x =3,3;s$ !mothx=mothx+inc:dropx=x+inc mothx=28inc=-1 mothx=1inc=1 .2,mothx;m$;3,mothx;n$:y,x;s$ 9pointer=pointer+pinc:pointer>32 pointer=1 ac=15:6;4+c*2,0;a$(c,pointer);a$(c,pointer-1):c ii=4drop=1 F.005y# =,24*drop-12 :.005y# =,24*drop-10  y,x;" "  y=y+drop:y=21shiploss drop1200 kx=x-((ii=2ſii=10 ſii=6)x>0)+((ii=1ſii=9 ſii=5)x<32 ) (y,x)=320 (y,x)=""shiploss  1200  Ty-1,x;s$:c=110 :.1}L,-10 +c:.1}L,-10 -c:c up=0:drop=0 pointer=1 $m(nman)=0:nman=nman+1 :surface:topprint y=y-1:y,x;s$ 'c=15:d=132 (*(11 -man)<.4Li$(c,d)="" .005y# =,30:d:c score=score+250  a0,6;6;score;0,17;5;high;0,30;7;ship Ac=15:4+c*2,0;5;i$(c):c  %2,mothx;m$;3,mothx;n$ 4mothx=mothx+inc 5mothx=28inc=-1 6mothx=1inc=1 9%2,mothx;m$;3,mothx;n$ : y,x;s$ >9pointer=pointer+pinc:pointer>32 pointer=1 Cac=15:5;4+c*2,0;i$(c,pointer);i$(c,pointer-1):c Hii=8up=1 RB.005y# =,24*up-12 :.005y# =,24*up-10 \ y,x;" " fy=y-up:y<3shiploss p!y=3x=mothx+2home zup21004 kx=x-((ii=2ſii=10 ſii=6)x>0)+((ii=9 ſii=1ſii=5)x<32 ) (y,x)=""shiploss  21004  7:0:0: 0c=0502:*255,*175:c 65,4;5;"WELCOME TO 'MOON RESCUE'" H16,0;1;1;"PRESS ANY KEY WHEN YOU ARE READY" =""ƿii=03040 ?16,0;1;"PRESS ANY KEY WHEN YOU ARE READY"  ?4:17,0;" " 618,0;" " 619,0;" " f20,0;" ";3;"";4;" ";3;"";4;" " 621,0;"" ?C=110 :M(C)>020,M(C);6;"" C  7: _0,0;6;1;"SCORE: ";5;"HIGH: ";7;"SHIP: " -3;""  |WC=07.5:Y,X;C;"":.01z# =,C*5:.01z# =,C*-5:C !SCORE=SCORE+300,:30 pFC=Y20:C,X;٥*7;"";1;C,X;"":.01z# =,-C:C u1,-20:502 z9SHIP=SHIP+1:DROP=0:up=0::30 @(6,11 ;1;"GAME OVER" Jscore>highhigh=score:c=110 :.01z# =,*502:*7:c:0:11 ,0;1;1;"WELL DONE - A NEW HIGH SCORE!!!!" T250::5 #' #(,A$(5,32 ):I$(5,32 ) #2?SHIP=1:MAN=0:X=2:Y=3:NMAN=1 #7_s$=19+1+"":m$=" "+16+2+" ":n$=" "+16+2+" " #<,mothx=0:drop=0:score=0 #F:stage1=1000:stage2=2000:endgame=8000@ #Pwait=3000 #Rpinc=2 #Usurface=4000 #W*topprint=5000:shiploss=6000p #Xhome=5500| #Z!m(10 ):c=110 #d m(c):c #nX4,5,6,11 ,14,15,17,23,25,26 #x # c="a""n"+7:a:c,a:c #high=0 & &s0,100,00111111?,1111111,1100000`,11110110,11111111,11111111 &v11000,1111110~,11111111,11111111,0,11111111,11100111,11000011 &r0,100000 ,11111100,11111110,111,1101111o,11111111,11111111 &r11111000,11111000,11111000,1111100|,111111?,11111,1111,111 &r1000,11100,1111111,1001001I,1011101],111110>,100010",1000001A &v11111,11111,11111,111110>,11111100,11111000,11110000,11100000 &u11000,1111100|,11111110,1111111,1111111,1111110~,1110008,10000 &t0,111100<,1100110f,11111111,11111111,10111101,1000010B,100100$ &10000000,11000000,11100000,11110000,11111000,11111000,11111110,11111111 &\1,10110011,11111111,255,255,255,255,255 &_1111111,111111?,11111,1111,111,111,1,0 &h0,11100,11100,1001001I,111110>,1000,10100,100010" &d1,11,11,1111,11111,111111?,1111111,11111111 &y11111110,11111100,11111100,11110000,11100000,11000000,10000000,0 & '%:11 ,11 ;"6.9 K-BYTE": '."moon"100d:"4"31744|,800  aighiaxymaSM  N  othrocortagetagendgam@ai inurfacopprinhiplospom|5   ɥ ointen! 34 |yS"$$$~$$~$>(> >bd&F(*D:88D((D~> ~bbf~~~@~|~~`f~~@~~|@~F~~ <$~f~~B~ >>