MINED OUT \(#GZ\   NO CHEATING NOW !!     zink=9 :bonus=0:lev=1:damsels=1:HSC=250 : DAMSELS=1  -H$="IAN":6  /SPE=6:9 ,-9 : <damsels>25700 D !PAPER=6:INK=9  EBORDER=0:mines=502:damsels=1:SC=0  )bonus=0:DAMSELS=1  Cink=9 :BORDER:PAPER:INK::BORDER !x=21:y=15  "t$=(x+65A)+(y+65A) XX=21:YY=15  TI=0 oldx=x:oldy=y C$="":V$="" $CC=0:DD=0:EE=0  RR=1 OO=21:PP=15 XX$=" < SAFE AREA > " " PA=7 $ ss=0 (#lev115,0;: 2 300, dRN=(*13 )+4 ga=330 hA=10 A=20A i121,19;PAPER;9 ;"MORE MINES" j(RN,A)=568115s n RN,a;"" sK=RN-1+(*3) x+(K,A-1)568K,a-1;"" .002xn,557 !21,19;" " (RN,A)=568150 RN,A;" " a 570: ,#0,28;0;" " .e0,0;0;7;"ADJACENT 0";0,17;"NO.";DAMSELS;" SCORE ";SC 151,0;" " @n=219 J/n,0;" " On T620,0;" " ] x,y;C$ an:SC=0DAMSELS>2BONUS=015,0;:  21,19;1;2;7;"MINE HIDING":damsels=9 mines=mines+32 :MINES=MINES+(10 -(SC/1000)) H21,3;1;2;7;1;"LEVEL ";DAMSELS Lw=1mines:(*16)+3,(*30)+1;PAPER;"" .0015wD,35# DAMSELS1W DAMSELS1439 $19,1;X$(WW+29) 52,1;X$(513-W513-W+29) W #lev115,0;: M10 ,1;PAPER;"";11 ,15;"";10 ,30;"" 521,0;" " DAMSELS=1480 (damsels=9 9900&:480 S21,0;1;1;"RESCUE DAMSELS FOR EXTRA POINTS!":450 OCC=(*12 )+4:DD=(*6)+6:EE=(*6)+19 J=17 CC,DD;"";CC,EE;"" E=111 :E .002xn,58: CC,DD;"";CC,EE;"" E=111 :E .002xn,58: J damsels8490 Z21,0;7;1;0;1;"HIDE BETWEEN 3 MINES TO OPEN GAP" S1,15;"":8,11 ;1;1;7;"GAP CLOSED" Im=60<10 -2.5 :n=17:n:.125},m:m 621,0;" "  8,11 ;" " .0875}3333,10 621,0;" " &21,31;paper;paper;"" 21,10 ;1;"GO!":n=120:.002xn,n+20:n:21,10 ;" ":.05|L,37%  535 oldx=x:oldy=y x=x+(="9")-(="8")  x=x-(x=22)  y=y+(="7")-(="6") TI=TI+1 wDAMSELS4TI>(260*PAPER+70F)(TI/(3*PAPER+1))=(TI/(3*PAPER+1))543 oldx=xoldy=y520 .003xD,-4 oldx,oldy;PA;" " #t$=t$+(x+65A)+(y+65A) (x,y)" "1000 1damsels=9 papaperx<178000@  550& OO,PP;PA;" "  @I$=T$+T$:DAMSELS5PAPERPATI>20008000@ !%RR=RR+2:.0018wkC,60< "2OO=65A-I$(RR):PP=65A-I$(RR+1) #(OO,PP)" "1000 $OO,PP;PA;"" % & x,y;PA;C$ :o=((x-1,y)" ") ;p=((x+1,y)" ") <q=((x,y-1)" ") =r=((x,y+1)" ") > o=o+p+q+r Do.04|# =,o*10 W;0,0;(4-O);9 ;"ADJACENT ";O Xx=03000 \o=3damsels=88,12 ;1;"GAP OPEN":c=140(:.001wn,30+c/4:0:7:c:1,15;" ":8,12 ;" ":2  Edamsels>2damsels<9 ti>502>.98zG100d  500  !X=CCY=DDY=EE6000p: 5damsels=9 x=8y=5+ss8444 _W=201-1:.003xD,0+W:X,Y;"":.002xn,10 :X,Y;"":W =j$="MUFFED":>.8Lj$="GOOFED":>.73333j$="BLEW" 80,0;0;7;" YOU ";j$;" IT ! " 1.6L,-35#  2000 ;X,Y;7;0;1;(65A+(*60<)) 1,-35# SC>HSC4500 !0,28;0;" " s0,0;0;7;" ";"TRY AGAIN ? LEVEL ";DAMSELS;" ";0,22;1;"SCORE ";SC I2,1;0;7;" PRESS ANY KEY (""I"" FOR INFO) " L?10 ,9 ;7;2;1;" GAME OVER " `paper40 jpaper<47 ~]72H,96`:112p,0:0,-9 :-113q,0:0,9  9 r21,29;BORDER;9 ;" ";21,0;BORDER;9 ;" HIGHEST SCORE IS ";HSC;" BY ";H$ n=1100d:n N=110000000 GSC=HSC21,0;border;9 ;"";21,31;"" =""M=116:M ISC=HSC21,0;border;9 ;"";21,31;"" @=""M=116:M A s$= E s$=""n JS$="I"S$="i"7000X T32,1;" " r 6 ;:I.ANDREW (CARDS) FOR ALL MODERN POSTCARDS  n=120:n a=121 Ba,0;1;9 ;" " a @21,1;1;7;0;"ACTION REPLAY" n=1100d:n y$=t$ t=1̱y$2 -m=15:="S"Ŧ="s"2033: m XX,YY;7;" " hdamsels>1T=2121,0;0;7;"HOLD ""S"" FOR SPEED OR ""E"" TO END" 4xX=y$(1)-65A:yY=y$(2)-65A Xx,Yy;7;C$ '.005y# =,5+(T*40(/(T$)) y$=y$(3) ="E"Ŧ="e"2055 t 821,0;" "    DSS=(((2000-TI)/502))*5:SS<502SS=502 SS=SS*DAMSELS ^0,0;DAMSELS/1.5@;9 ;" LEVEL ";DAMSELS;" SPEED SCORE = ";SS;" " >damsels=1ss<100d0,31;1;" " 1,0;"" xN=15502:.001wn+((502-30)/2000),(502+N/2.83333):2::7:0:N border bonus>0sc=sc+bonus:21,0;7;1;"INITIAL BONUS = ";BONUS:BONUS=0:N=120.6:.025{L,n+5:N:21,0;" " 2000 6g=4226:.005y# =,g+24:g MN=180P:1:2:3:4:5:6:N SC=SC+SS !0,30;0;" " P0,0;0;7;"ADJACENT 0 NO.";DAMSELS;" SCORE ";SC n=1120x n MINES=MINES+10 PAPER=PAPER-1 DAMSELS=DAMSELS+1 5PAPER<0BORDER=BORDER+2:PAPER=6 PAPER=6MINES=502 !damsels=7mines=20  10 ^N=1502:1:2:3:4:N:DAMSELS=1  TN=1502:6:2:.002xn,40(+(N/10 ):6:N M=14 N=70-1 +10 ,7;N;"A NEW HIGH SCORE !" .004yn,502-N N M 110 ,7;9 ;"A NEW HIGH SCORE !" N=16 0,15;"" L=17:L .006yD,13 0,15;"" L=17:L .006yD,16 N ]21,0;1;1;7;" ENTER YOUR INITIALS NOW ";0;" "  Q$=" " N=13  Q$(N)= Q$(N)=" "5088 @Q$(N)97aƯQ$(N)122zQ$(N)=((Q$(N))-32 ) :21,(24+(2*N));7;1;Q$(N)  .12}u[,(N*5)+20 m=14:m N H$=Q$:HSC=SC K21,0;7;0;" WELL DONE ";H$;" " (RN=112 :.0045ytj,-10 :1:2:6:4:N 2BORDER K.1}L,8:N=14:N:.1}L,8:.1}L,8:.1}L,20:.1}L,24:.1}L,18:.15~,29 LN=17:N:.12}u[,22:N=13:N::.07}\(,19:.08}# =,17:N=13:N:.1}L,14:.1}L,12 N(10 ,7;" " P Dlev=damsels-1 E)z$=" Which level to start ? " Gln=021:paper:.002xn,n+5:n,0;1;" ":n H_n=121:n:n=031:paper:paper:n*8,0:0,175 I,.0015wD,64@:.0015wD,59; J410 ,n;ں(*6);9 ;z$(n+1) Kn L99 :sc=0bonus=015,0;: NY13 ,13 ;1;"1";13 ,14;" ";13 ,18;1;lev X!13 ,13 ;1;"1" b13 ,14;" TO " l!13 ,18;1;LEV v*.1}L,30:n=125:n wl$=:l$=""5751w }M21,0;paper;paper;1;" WHOOPS ! TRY AGAIN !! " ~L0,0;paper;paper;1;" WHOOPS ! TRY AGAIN !! " <l$<491ůl$>5791,-15:5700D ll=l$ ;ll>levll(ll)ll<11,-15:5700D  sc=0  damsels=ll Jll=1paper=6:border=0:mines=502:bonus=0 &n=3034":.006yD,n:n Lll=2paper=5:border=0:mines=60<:bonus=250 Lll=3paper=4:border=0:mines=70F:bonus=750 Mll=4paper=3:border=0:mines=80P:bonus=1500 Oll=5paper=2:border=0:mines=90Z:bonus=2200 Nll=6paper=1:border=0:mines=100d:bonus=2700 Mll=7paper=0:border=0:mines=20:bonus=3500 Mll=8paper=6:border=2:mines=502:bonus=4200h LL=9  lev=1  10 n pX,Y;V$:C$=V$ r7:C$=V$ z)U=255025:X,Y;"" +N=182:.002xn,n+u SC=SC+5 20,21;0;7;" SCORE ";SC n  X,Y;"" +N=182:.002xn,n+u n U ti=ti+35# paper 8 XINSTRUCTIONS ] P=0 b1:1::7 d10,0;" QUICKSILVA PRESENTS ...." en=160<:n gN=216 hsN,0;"                                " lN py.2~L,30:.1}L,20:N=15:N:.075},26:.125},26:.1}L,18 r50,0;" A GAME OF STRATEGY AND SKILL ! " tN=47/5683 va9 ,11 ;P;0;9 ;"MINED OUT!":7;128,99c,N:P=P+2 xN { 9 M18,0;" OR ""RESCUE BILL THE WORM FROM CERTAIN OLD AGE""" ;9 ,11 ;0;7;1;"MINED OUT!" 8:N=317:N-1,4;8;"";N-1,27;"":19-n,3;"";19-n,5;"";19-n,26;"";19-n,28;"" !.005y# =,33!:N:1  7057  7080 +21,21;1;"PRESS A KEY" n=160<:n =""7060 7:0   ;2,0;"  MINED OUT! By Ian Andrew" ''" YOUR MISSION (should you decide to accept it) IS TO RESCUE BILL THE WORM BY REACHING HIM"''" HE LAYS DORMANT ON THE FINAL MINEFIELD (LEVEL 9)" '" THIS IS BILL """"" E''" YOU """" BEGIN AT EACH LEVEL AT THE BOTTOM OF THE SCREEN" 4'" AIM FOR THE GAP AT THE TOP OF THE SCREEN" +21,21;1;"PRESS A KEY" 7N=140(:N:N=150000P:=""N '9980&:N=144,:I:L:  I,L;"":.035|\(,N/2  I,L;" ":N  v1,0;" MOVE USING KEYS... 5,6,7 & 8"'" [ 6=left 7=right 8=up 9=down ] ** SEE KEYBOARD OVERLAY **"  '" MINES """" ARE VERY UNPLEASANT"''" YOU ARE WARNED OF ANY MINES THAT ARE ADJACENT TO YOUR POSITION AT THE TOP LEFT OF THE SCREEN" "HELLO THERE"  L'" YOU ONLY LIVE ONCE DO NOT HIT ANY MINES" *''" DAMSELS - THESE ALSO REGISTER AS MINES, BUT IF YOU ARE NEXT TO ONE DO NOT HESITATE TO RUSH IN AND RESCUE HER. YOU WILL BE REWARDED" 4 7057 >2,0;" THE BUG """" (a mine with legs) WILL CHASE YOU SOMETIMES - IT CAN GET VERY AGGRESSIVE" Cn=115:n HZj$=" " Rjn=1̱j$-35#:6,0;j$(nn+31):.0018wkC,60<:m=11:m:n \%" AND NOW SOME..."''" TIPS - THE SAFE AREAS ARE COMPLETLY MINE FREE - SO AIM FOR THE TOP SAFE AREA (NOT JUST THE GAP) & YOU CAN SAFELY MOVE TO THE GAP FROM THERE. WHEN THE BUG IS ACTIVE (LEVEL 4 ONWARDS) KEEP ON THE MOVE - YOU CAN USUALLY MOVE QUICKER THAN THE BUG!" f 7057 pd3,0;" THE FENCE IS MINED AND WILL REGISTER AS A MINE IF YOU ARE NEXT TO IT" z58,0;""  N=12 O=01 6+O,14;"" ;0,0;(4-O);9 ;"ADJACENT ";O o.04|# =,o*10 6M=122:M:6+O,14;" ":O:N M6,14;"":0,0;4;9 ;"ADJACENT 0" 11 ,0;" IMPOSSIBLE? - IF IT SEEMS IMPOSSIBLE TO GET THROUGH - DO NOT DESPAIR - MINE SPREADERS """" NOT ONLY ADD MINES BUT " >" THEY ALSO REMOVE SOME HIDDEN ONES (Kind aren't they!)" {'';1;7;" PRESS ""I"" TO SEE INSTRUCTIONS AGAIN - ANY OTHER KEY TO BEGIN " s$=:s$=""7390 s$="I"s$="i"7000X  L 6 79906 > A PA=PAPER BZ21,0;1;1;7;1;"YOUR MAP HAS BLOWN AWAY! (SHAME)" C!20,14;paper;" " Dn=192-.5 Ev.05|L,N-10 :damsels8n>14N,1;1;PAPER;PAPER;" " H X,Y;PA;C$ JN P20,14;PA;" " R621,0;" " T n9300T$:DX=30:u=.155~Q.005y# =-.01z# =:damsels9 x815,0;: 0,dx;0;7;" ":dx=dx-1:u,8:u,12 :u,16:*7:u:n=116:0,dx;0;7;" ":dx=dx-1+(dx=0):u+.005y# =,8:*7:u+.005y# =,12 :u,16:n 20,0;7;" ":t=02 !l=077:l !8450!:8700! !n=15 !4x+n,y+n;"*" !>x-n,y+n;"*" !@x+n,y-n;"*" !Bx-n,y-n;"*" !n !n=15 ! x,y+n;">" ! x,y-n;"<" ! x+n,y;"#" ! x-n,y;"#" !n ! !l "t "$ 0 ". 9300T$ "8G0,0;7;0;" TWO THOUSAND POINTS EXTRA ! " "9sc=sc+2000 "Lb=07 "MB:9 :x,y;c$ "Nrn=114:.002xn,502-n+b:1:2:3:4:5:6:7:b:n "Pb "V6:paper:9 "_0:0: "`0n=0306:m=110 "j:.008zn,n+m:m:n "Ĺ3,8;"CONGRATULATIONS";'';" YOU HAVE RESCUED BILL AND THE WHOLE WORLD IS GRATEFUL ! " "΀''''';" YOUR SCORE = ";SC;" WHICH ISN'T"'" AT ALL BAD .... WHY NOT HAVE ANOTHER GAME AND IMPROVE YOUR SCORE ?" "SC>HSC4500 #DAMSELS=1:1200 #4DAMSELS=1:N=150000000> :=""N # 6 #& #(1:3:9 #)'::10 ,9 ;"STOP THE TAPE" #*2:g=1502:.000650v*d,502+g/502:5:2:3:4:1:4:6:1:g #,236099\,32 #-$10 ,9 ;"DON'T GO AWAY!" #.m0,0;" ";0,31;" ";21,0;" ";21,31;" " #/ #0RA=116:A$:B=07:C:A$+B,C:B:.012zD,40(:A #2H"",0,0,0,0,60<,126~,0,0 #,8,28,62>,62> #NQ"E",18,42*,146,124|,16,568,124|,124| #PK"F",8,16,8,186,93],16,8,16 #xP"G",90Z,90Z,36$,195,195,36$,90Z,153 #}.04 |# =,23 #m10 ,0;0;7;" Press ""I"" for INSTRUCTIONS "'" Any other Key to begin " #.1 }L,23 #s$=:s$=""9095# #s$="i"s$="I"7000X # #L"",0,0,0,0,60<,126~,165,165 #H"K",0,0,0,0,0,0,85U,170 #O"m",192,32 ,18,13 ,63?,16,32 ,192 #N"N",0,0,192,192,78N,74J,91[,112p #Q"P",0,132,204,180,132,132,132,0 #Q"Q",0,144,152,148,146,145,144,0 #Q"R",0,159,144,158,144,144,159,0 #J"S",0,31,32 ,30,1,33!,30,0 #n=2-1-1 #E.003xD,27-n:.003xD,19-n:.003xD,29-n #n0n $"n=-11:0 $,9300T$:9340|$ $Y44,4+ss;"";4,6+ss;"" $^45,4+ss;"";5,6+ss;"" $`46,4+ss;"";6,6+ss;"" $c77,1+ss;"";7,6+ss;"" $f79 ,1+ss;"";9 ,6+ss;"" $h610 ,4+ss;"";10 ,6+ss;"" $j611 ,4+ss;"";11 ,6+ss;"" $l612 ,4+ss;"";12 ,6+ss;"" $u $|n $(11 ,5+ss;paper;paper;"" $ 0 $"8,5+ss;0;"" % % &.ss=(*11 )+6:.3,-12 &C0,15;"";1,15;"":.3,-12 &cn=01:m=06:n:.003xD,n*m:m:.002xn,30+n+m*2:m:n &2:1 &n=09 &4n+3,ss+1;paper;paper;" ":n & 0 & 9200# &15,6,15,6,15,6,15,6,15,6,14,6,13 ,6,13 ,7,13 ,8,12 ,8,11 ,8,11 ,7,11 ,6,11 ,5,11 ,4,11 ,3,11 ,2,11 ,1,11 ,0,10 ,0,9 ,0,8,0,7,0,6,0,5,0,4,0,3,0 &3,1,3,2,3,3,3,4,3,5,3,6,3,7,3,8,3,9 ,3,10 ,3,11 ,3,12 ,3,13 ,3,14,2,14,1,14,0,14 &'0,14,0,14 'i END n onueamselsapeordeine<x y ld ld 0pqr76@i VXQ < SAFE AREA >  C72zT6VPVPUPTPUPTPTQTRTSTTSTRTQTRTRSQSPSQSQRPROROSOTNTOTNTNUJMUFFEDYQGITHGITS c