Colditz i(Escape From Colditz. DRJ 7/2/2000 2327 &23693\,7:ç:55299 623739\,111o: "colditz0.c":32753  "colditz1.c" ( "colditz2.c" 2 "colditz3" colditz0.c 5 !@!4[9 S+~ +(+nOg#OR + X lJ@@  N`}\(0Ĥ 0=!   @  <||X  06<<~B<|~@U I g8P 0@00@  @BBb @A@B@ =@b  @ 3C0)  Z)zr c04P@@B||BJ(+  B@B~|H 0||@@J 0 e)(`8 ? `  gN 0  BD@B& @ BB@ZBD@F @@D@B@FB@i0 60 @< p` P  a @@  `0@!P+Y\ @@B@ Bf@  08` 8 >@(])@,  v |<@BB|0|BBZ S$( 0 @ ! `Ha @@@~|@Y |,; C C@Bį<  @ !!- Z 0 (  @B@@< DB#8ABB@D (H 'Ы  @@!p !8P( w ~<~@@( @ @@ "X -  @@8 0R`p   @@ A $  @t XS"dzpv"  Y;p`Z@ ~   "!$AP q 2(`" "F "! ?8 ? 4"B" ,     _!ED!& & `Y@~ L0< ``m  @ !Dc (?Ac1 d} }@L#}H  x!DY (!B   w y ?D j j$# $PUj""jH<08S`/   +D,V/"  #p< !A[!*~?+=˿(0#0Zcolditz1.cT'؀V'>z| > $>Ҽ MMOO\GWq !v>!͵R bd&2:H\yC%  :H\% y&- y.>? !WxGyO A#BK + RW+#6++$$$~$$~$>(> >bd&F(*D:  >>> ~BFF~~~@~|~~`f~~@~~|@~F~~ <$~f~~B~ >>F>00>"">000>FF>>FF><``|FFF8<&0,88,&lVVVV|FFFFFF>0000<`<|<FFFF<FF,,FVVV,F,,FFFF><~ 0~0p p(!"%!1+o!!#S9";!! f!! f#S="?o*9*=!J!ѧR>!} sC*=#"=[?R*9#"9[;Rnf((*e\d "!ok o,>s> *\#6#ͫͪ> *("ͪ:G~ > YYYl s> Yzs*([\RPs> Ys*\P> YYY,>sK( V1]]  ZX COMPILER V2.0  1983 THRELFALL and HODGSON Compiled OK Program Length = bytes To run enter RAND USR "[!!G!"#"%">2**"(*#>!t!%>"t !or2X<2*S\###"]\>2\͕$(̣i~V ̃̾̊M̯ʕ̪̫by̴ 80!M r!r!or*]\~:Y ͕*]\~:Y J͕*]\#~# ͕͕;}2*!Z++6>!*t.:gw!+r w# ! "(*e\d ""z(J{!90){ ͲKB#))yx0|g}o(yxyOxGxD||G||/g}/o#!r=| }l&@R0?jj\jgW< U>?YU*6!7͵!rK(y( *T]6 >Y>2'Y>"Y2͍[(*w (ZSS :j\2j\) :A\2A\) 8 0{(y8Yw#2͍>?͍ͦyS+~(-()6 >Y>Y> YY>YYY2͍S2'6 + 6 >?͍ͦS>"Y> YLq#px y*2>Y:A\ :j\_(>C >L¯>Gͦ˗2'y8ï6#y8ï>YYw#>Y:'Y2͍S>Y:'Y>"Y>YYUYUU>LY>YUw (. (e+(-( 0^:^ y nY* w* 6 !* ~ (+(-(0)))_*~-yʶ> Y>YY> Y>Y öU>?YU>YxY *(w#"([[Rѯɯ͂+( -( *(/2>~͕+(- #gx !DMw>!i`t/(*-!Jr-!f>~+(-!w!Rw->~>~) ͕!͕( ( J:00O *]\"]\>~}~|~V#^"l\"I\C@> YQG[(G[R"[\RK(:*(>*l\t!r!r>To*\*\>ׯ>U,s>ׯ>PU"\"\h!|+s#r#^#V#*!#LB*R#>͕;QLt>*]\#~: > ͕*]\#~ ("]\ (( 8:(Y:> !r>2+͕!r>DM >2\2\o:k\GD>2k\Do[v\c.zRR_PR0#"v\˼DM͂ (>*!x\t>"!v\t|( >-Y'͏0͏0d͏0 ͏0͕͕d͕ ͕͕R>0R8<Y͕R>!t>~>[!t!Gr͘!r)#*J8 T]*\%R06S!Kww!) w>~!Lr!w͕R>*t!#"ww##>~>[t>!Rt>Lt͕R͕>#~!Sww>"##t[(G͏!sw,*6#6'#[(Gͪ>~!cr!k r!or!r| =͘!r*]\#~ (((PP"P#~$P !r>I !w>!Rt= >Y >Y>(< >e !(w>>e͕~*I\#QLw|z7|(7z7͚.K&Ew!"r!cr͕8 ͕͕ ͕͏m!srLL!or͕ +>2+͕ 1"ʘ'H,;(~3:+(@R(!r ">~!Gr>!t͕!r>"t*]\#~$ʾ !@rp!r(ͣ!sr]>~*(w*]\#~Y"(~"]\[(G>t>t͘!r>}|͏!r>{}͕, >>.&t;+'+!Cr!Cr>}~!Yr> Y!CrA˯[[*]\#~08:8 A8˯[0͕˯(2($  Ͳ&o))K G:$(( x>!Z[2 o :n +n+([!4~ w+[[Ro(w":͕ >!t!r:!FwLz[GG*(["T]*\%R͕R >~&͕=͘1| !w!Gr>"t !~ow!&w C͕"( !r͕˯A&o>t>*!{\t͕"> ~`i!>*t>~.8>~!r*SRgoo#!r !|w>!t]͕R͕>!t!Vr##L !jr||.&“>~>&h.t!&w !r "!%͕.K&Ewr!r.`&iw !"ç͕(0>!&jte͕͘>~͘>~͕-̕((0 A5B/͌͘!rR >*t;>!tN#F #:K\:L\o:\2\>M n(:\ > :\ <͎ 0_3>ͽ͏ͽ!r1!r͕/!r>.&8tÕ_|(ULGö*o>>&t͘.}&w͘>}~!"r>͏ͽ !w$r ͏ͽ!#r>.&t1>.&t!cr͕8͕ >͏ͽ͏ͽ!-#r*l\#QL>t*#| *("#*%[(G͕" ͣ>~-̕;w͕ ( ͏>~ί~*("%!w1͕;QL###>!t>"!%t͕R !Wr>~!Gr' ͕!tr>!t!r !Wr>"t͕ 1*%| L~# L"%!*%|  ~Lx(8*%  ~# L"%͏>~>!it!r>2+͕>!r͕͂(s!w!#r͕6!w!-r͕6>!t!r*]T6 *x.+͕((" ͣü !rü !rümüR͕͂( 4͕͘*]\~) !]Tw ͕!r>!t!r>!t!r!r͂)( ͕6͕͕"͍2 ɧRDML*"x*S*[RLx(*q#pH""*>w#!r6͕!>r6!Hr!r= >Y >Y> >e<( >Y!(w>Y*K <4#> Y͕͕R͕"(͕" > Y>:Y> Y(( $( "(  4>AY> YP> Y>PY> YP> Y^#V(>Zcolditz2.cX>]]600p<$` <$<<<<!<~~~<>BB< PU%""DD>QUUQ>BbRJFB4,1;1;">";18,1;1;">" Tfood=(*20)+3:key=(*20)+3:3,food;4;"";19,key;6;"":(pattern*9 )*100d <.2~L16,139:5;230,0:16,27:5;230,0:sound=55400h:x=4x=188000@ ABERDEEN FOR THE TREBLE v4,2;0;" ";18,2;0;" "  x=3y=foodfood=1 x=19y=keykey=1 <t=t-1:diff=11,11 ;"TIME ";t;" " t<18000@ X,Y;m$;A,B;""  9940& =""m$="":600X R="q"ƫ(X-1,Y)7X,Y;" ":X=X-1:X,Y;"":m$="":600X R="a"ƫ(X+1,Y)7X,Y;" ":X=X+1:X,Y;"":m$="":600X R="o"ƫ(X,Y-1)7X,Y;" ":Y=Y-1:X,Y;"":m$="":600X &R="p"ƫ(X,Y+1)7X,Y;" ":Y=Y+1:X,Y;"":m$="":600X XRr=(*4):r=0a11 a,b;" ":a=a-1:a,b;"":700 bAr=1b1a,b;" ":b=b+1:a,b;"":700 lBr=2a11 a,b;" ":a=a+1:a,b;"":700 vAr=3b2a,b;" ":b=b-1:a,b;"":700 x=ay=b8000@ 0y=0food=1key=11000  400 4"7":f="1"̰"32":scroll=55561 :f:"0":     SCREEN 2   a:ٰ"1";ܰ"1";"SO YOU HAVE ESCAPED FROM YOUR CELL. YOU ARE BETTER THAN SOME. BUT DON'T GET TOO EXCITED - YOU ARE STILL INSIDE THE BUILDING. TO GET OUT YOU MUST NEGOTIATE THE MAZE OF CORRIDORS, PICKING UP SOME WATER AND A KEY ON YOUR WAY. WATCH OUT FOR THE LASERS AND THE GUARD, AND REMEMBER,ONCEIN THE CORRIDORS, THERE IS NO TURNING BACK..."  ""8500":f="1"̰"20":f:"250" Ls=s+(t*lev):lev=2 NWHAT'S A DRAGON 32 ? Q1y="30":b="1":water="0":key="0":t="300" V:"2","0";ڰ"2";ٰ"7";"":f="3"̰"19":f,"0";ڰ"2";ٰ"7";"";f,"31";ڰ"2";ٰ"7";"":f:"20","0";ڰ"2";ٰ"7";"" `,F="10"̰"12":F,"0";" ";f,"31";" ":f j58500:f=5292:(*15)+3,f;" ":.01z# =,0:f:11 ,3;" ":.01z# =,0 t"0,9 ;"THE CORRIDORS" y[21,0;"SCORE ";s;" ";12 ;"HI ";hsc;" ";h$;21,25;"LIVES ";l ~\(pattern*9 )*100d:19,26;5;"";3,6;6;"" X,Y;m$;A,B;"" &x=19y=26water=1 "x=3y=6key=1 <t=t-1:diff=11,11 ;"TIME ";t;" " t<18000@ 9940&:<.04|# =83S,144:5;0,-128:179,144:5;0,-128:sound=55400h:y=10 y=228000@ c83S,144:0;0,-128:179,144:0;0,-128 ?3,22;7;"v";3,10 ;7;"v" =""m$="":1300 S="q"ƫ(X-1,Y)7X,Y;" ":X=X-1:X,Y;"":m$="":1300 S="a"ƫ(X+1,Y)7X,Y;" ":X=X+1:X,Y;"":m$="":1300 S="o"ƫ(X,Y-1)7X,Y;" ":Y=Y-1:X,Y;"":m$="":1300 Sr=(*4):r=0a11 a,b;" ":a=a-1:a,b;"":1400x FORTY-TWO Br=1b1a,b;" ":b=b+1:a,b;"":1400x (Cr=2a11 a,b;" ":a=a+1:a,b;"":1400x 2Br=3b2a,b;" ":b=b-1:a,b;"":1400x xx=ay=b8000@ 1y=0water=1key=12000  1160 4"7":f="1"̰"32":scroll=55561 :f:"0":    SCREEN 3   :ܰ"1";ٰ"2";"HMM, NOT BAD. YOU HAVE ESCAPED FROM THE MAIN BUILDING, ONLY TO FIND YOURSELF IN THE EXERCISE COMPOUND.AVOIDING THE LASERS ANDGUARDS AS BEFORE, YOU MUST TAKE SOME FOOD AND A KEY. BUT BEWARE,ON TOUCHING THE KEY, YOU WILL ALERT THE PATROLLING GUARDS, WHOWILL HEAD STRAIGHT FOR THE DOOR IN AN ATTEMPT TO BLOCK YOUR WAY OUT. YOU MUST BEAT THEM TO IT,ORBE TRAPPED FOREVER..." ""8550":f="1"̰"10":f:"250" 4 s=s+(t*lev) 9Rkey="0":food="0":lev="3":t="300":y="30":g1="3":g2="18":gdir="1": >"2","0";ڰ"2";ٰ"7";"":f="3"̰"18":f,"0";ڰ"7";ٰ"0";ݰ"1";"X":f:ڰ"2";ٰ"7";"":"10","0";" ";"11","0";" " C,19,25;7;0;" " H{0,9 ;"THE COMPOUND";20,0;"SCORE ";s;" ";12 ;"HI ";hsc;" ";h$;20,25;"LIVES ";l Mskp=(*4)+9 :kp,5;6;"":g3x=kp:g3y=6:g3x,g3y;"":(pattern*9 )*100d R/food=015,21;4;"" T<t=t-1:diff=11,11 ;"TIME ";t;" " Ut<18000@ W%x=15y=21food=1 \x=kpy=5key=1 ^x>18whoops=55500::"Whoops! You have stumbled into the execution yard by mistake. Looking around you notice that you are not alone. I hope you'vemade a will...":f=1200:f:8405 a0food=1key=1y=03000 f<.15~16,513:5;230,0:sound=55400h:1;16,513:1;230,0:x=158000@ p>.85Y171,142:2;0,-117u:sound=55400h:1;171,142:1;0,-117u:y=218000@ u8WHO ARE THESE GUYS 'ULTIMATE' ANYWAY? zgg1,1;"";g2,1;"";x,y;m$;15,1;1;">";3,21;1;"v" C(g1=10 gdir=1)(g1=3gdir=-1)gdir=-gdir 6key=1gdir=1:g1=10 gdir=0 =""m$=""  9940&  x,y;m$ S="q"ƫ(X-1,Y)7X,Y;" ":X=X-1:X,Y;"":m$="":2300 S="a"ƫ(X+1,Y)7X,Y;" ":X=X+1:X,Y;"":m$="":2300 S="o"ƫ(X,Y-1)7X,Y;" ":Y=Y-1:X,Y;"":m$="":2300 ^="p"x<30ƫ(X,Y+1)7X,Y;" ":Y=Y+1:X,Y;"":m$="":2300 }g1,1;" ";g2,1;" ":g1=g1+gdir:g2=g2-gdir:g1,1;"";g2,1;"":y=1(x=g1x=g2)8000@ ` kgp=(*8):g3x,g3y;" " jTg3x=kp+(kgp=3kgp=4kgp=5)-(kgp=7kgp=0kgp=1) ~Yg3y=5-(kgp=5kgp=6kgp=7)+(kgp=1kgp=2kgp=3) g3x,g3y;"" x=g3xy=g3y8000@ 2130R 4"7":f="1"̰"32":scroll=55561 :f:"0":     SCREEN 4   :ٰ"3";"I CAN SEE I HAVE UNDERESTIMATED YOU..ON ESCAPING THE COMPOUND YOU ARE CONFRONTED WITH A WIDE OPEN SPACE. ALWAYS THE CAUTIOUS TYPE, YOU THROW A STICK INTO THESPACE. IT LANDS WITH A CLICK ANDEVAPORATES INTO THIN AIR. A VERYUNPLEASANT FEELING COMES ACROSS YOU. THE FIELD IS OBVIOUSLY FULLOF DREADED TRANSPORTER MINES. ONE WRONG STEP AND YOU WILL BE ZAPPED. YOU MUST STILL COLLECT SOME FOOD AND A KEY TO UNLOCK THE LARGE WOODEN DOOR WHICH YOU CAN SEE AT THE OTHER SIDE. GOOD LUCK..." 5WHAT DO YOU THINK OF IT SO FAR ? ""8600":f="1"̰"10":f:"350" "SUDDENLY, YOU NOTICE BESIDE YOU A SMALL METAL OBJECT ON WHICH ISWRITTEN 'ACME TRANSPORTER MINE DETECTOR'.IT WILL WARN YOU HOW MANY MINES ARE NEAR YOU, THOUGH NOT WHERE THEY ARE. USE IT WELL." "f=110 :f:450  s=s+(t*lev) &Qmines="0":a="11":b="1":key="0":food="0":lev="4":t="400":y="30": 0"2","0";ڰ"0";ٰ"4";"":f="3"̰"18":f,"0";ڰ"0";ٰ"4";"";f,"31";ڰ"0";ٰ"4";"":f:ڰ"0";ٰ"4";"":"10","0";" ";"11","0";" " 1\12 ,0;" ";10 ,31;" ";11 ,31;" ";12 ,31;" " :c0,9 ;"THE MINEFIELD";20,0;"SCORE ";s;" ";20,25;"LIVES ";l Df=175K:mix=(*16)+3:miy=(*28)+2:mix,miy;0;0;1;"":.005y# =,10 :f Ix,y;0;0;" " Nkx=(*16)+3:ky=(*28)+2:fx=(*16)+3:fy=(*28)+2:kx,ky;6;"";fx,fy;2;"" =""m$="" 9950& <t=t-1:diff=11,11 ;"TIME=";t;" " t<18000@ x,y;m$ a,b;"" +="q"ƫ(x-1,y)64@3220 "q"3230 E(x-1,y)=64@x,y;6;" ":x=x-1:8300l U(x-1,y)4x,y;6;" ":x=x-1:m$="":x,y;m$:3300 +="a"ƫ(x+1,y)64@3240 "a"3250 E(x+1,y)=64@x,y;6;" ":x=x+1:8300l U(x+1,y)4x,y;6;" ":x=x+1:m$="":x,y;m$:3300 4BIG BROTHER IS WATCHING YOu ! ="p"ƫ(x,y+)ɰ"64""3260" "p""3270" 4(x,y+"1")="64"x,y;ڰ"6";" ":y=y+:"8300" R="p"ƫ(x,y+"1")ɰ"4"y<"30"x,y;ڰ"6";" ":y=y+:m$="":x,y;m$:"3300" +="o"ƫ(x,y-1)64@3280 "o"3290 E(x,y-1)=64@x,y;6;" ":y=y-1:8300l D(x,y-"1")ɰ"4"x,y;ڰ"6";" ":y=y-:m$="":x,y;m$:"3300" mines="0" ]mines=mines+((x-"1",y)="64")+((x+"1",y)="64")+((x,y+"1")="64")+((x,y-"1")="64") #20,14;"MINES ";mines *mines>0װ".01",(mines*"2")*"10" HHr=(*"4"):r=0a11 a,b;" ":a=a-:a,b;"":"3450" R0r=bǼa,b;" ":b=b+:a,b;"":"3450" \;r=2a11 a,b;" ":a=a+:a,b;"":"3450" f:r=3b2a,b;" ":b=b-:a,b;"":"3450" zx=ay=b"8000" food=(x=fxy=fy) key=(x=kxy=ky) -food=1key=1y=0"4000" "3200" 4"7":f="1"̰"32":scroll=55561 :f:"0":    SCREEN 5   :ٰ"4";"WELL, WELL, WELL. WONDERS WILL NEVER CEASE. YOU HAVE CLEARED THE MINEFIELD AND REACHED A DARKFOREST AREA. THROUGH THE WOODS YOU CAN JUST MAKE OUT SOME SORT OF A BUILDING AND YOU CAN SEE A LOT OF SMOKE ABOVE THE TREES.YOUCAN ALSO SEE A GUARD STANDING ATTHE OTHER SIDE AND YOU CAN JUST ABOUT CATCH SIGHT OF A LASER, THOUGH YOU SUSPECT THERE IS MORETHAN ONE.YOU FEEL VERY THIRSTY AND YOU WILL NEED SOMETHING TO THROW AT THE GUARD TO ATTRACT HIS ATTENTION..." ""8500":f="1"̰"10":f:"300"  s=s+(t*lev) roy=(*"27")+"3":rox=(*"16")+"3":way=(*"28")+"2":wax=(*"16")+"3":a="11":b="1":water="0":rock="0":lev="5":t="300":y="30": "2","0";ڰ"0";ٰ"4";"":f="3"̰"18":f,"0";ڰ"0";ٰ"4";"";f,"31";ڰ"0";ٰ"4";"":f:ڰ"0";ٰ"4";"":"10","0";" ";"11","0";" " \12 ,0;" ";10 ,31;" ";11 ,31;" ";12 ,31;" " "z0,10 ;"THE FOREST";20,0;"SCORE ";s;" ";12 ;"HI ";hsc;" ";h$;20,25;"LIVES ";l ,f=1125}:trx=(*16)+3:try=(*28)+2:trx,try;4;0;"":.0025x# =,10 :f 6r(7):f=17:r(f)=(*27)+3:n=318:n,r(f);0;" ":.005y# =,1:n:f:f=34:n=318:n,f;0;" ":n:f 87DON'T KNOCK IT UNTIL YOU'VE TRIED IT ;rox,roy;6;1;" ";wax,way;5;1;" ":0:rox+1,roy;4;"";rox-1,roy;4;"";rox,roy-1;4;"";wax+1,way;4;"";wax-1,way;4;"";wax,way-1;4;"" (pattern*9 )*100d @f=17:<.25~q=(*7)+1:2,r(q);"v":(r(q)*8)+3,151:2;0,-125}:sound=55400h:1;(r(q)*8)+3,151:1;0,-125}:y=r(q)8000@ A=t=t-1:diff=11,11 ;"TIME=";t;" " B59940&:(x=roxy=roy)rock=1:ir=0 C*(x=waxy=way)water=1:iw=0 D2y=0rock=1water=15000 E>.9ffff27,151:2;0,-125}:sound=55400h:1;27,151:1;0;0;0,-125}:y=38000@ F>.8L35#,151:2;0,-125}:sound=55400h:1;35#,151:1;0;0;0,-125}:y=48000@ G=""m$="" Hx,y;7;m$ It<18000@ J4220|:f h)rock=0rox,roy;ir;1;"" i 9940& j=t=t-1:1,16;t;" ":t=08000@ r*water=0rox,roy;iw;1;"" wGIVE THAT MAN A COCONUT |[="q"ƫ(x-1,y)4x,y;0;" ":x=x-1:m$="":x,y;m$:4300 [="a"ƫ(x+1,y)4x,y;0;" ":x=x+1:m$="":x,y;m$:4300 f="p"ƫ(x,y+1)4y<30x,y;0;" ":y=y+1:m$="":x,y;m$:4300 [="o"ƫ(x,y-1)4x,y;0;" ":y=y-1:m$="":x,y;m$:4300 lr=(*4):r=0a11 a,b;" ":a=a-1:a,b;7;"":44000 Kr=1b1a,b;" ":b=b+1:a,b;7;"":44000 Lr=2a11 a,b;" ":a=a+1:a,b;7;"":44000 Kr=3b2a,b;" ":b=b-1:a,b;7;"":44000 0x=ay=b8000@  4160@ 4"7":f="1"̰"32":scroll=55561 :f:"0":     SCREEN 6    END OF THE BEGINNING ? }:ٰ"5";"Oh Oh! I could be in trouble here! You are just outside the railway station. If you can find10 marks to bribe the guard and a key to open a truck before thedeparture time you will be in the clear as the train is bound for Zurich. But it isn't all plain sailing. My mobile laser- carrying guard will try to trackyou and the track is electrifiedIs this the end ?" N"8550":"(or just the beginning of the end)...":f="1"̰"30":f:"200"  s=s+(t*lev) @lev="6":t="200":y="30":cash="0":key="0":mgp="7": 2,0;0;5;"===":f=318:f,0;0;4;"";f,31;0;4;"":f:0;4;"":10 ,31;" ";11 ,31;" " 3,1;"^IN"  {0,10 ;"THE STATION";20,0;"SCORE ";s;" ";12 ;"HI ";hsc;" ";h$;20,25;"LIVES ";l ?r(6):5150:q=16:data:r(q)=data:q ; THERE'S GONNA BE THUNDER DOWN UNDER! 44,3,9 ,12 ,17,18 #?3,28;6;"";18,3;7;"" ([="q"ƫ(x-1,y)4x,y;0;" ":x=x-1:m$="":x,y;m$:5200P 2[="a"ƫ(x+1,y)4x,y;0;" ":x=x+1:m$="":x,y;m$:5200P ":<.25~mgp,0;4;"";" ";:mgp=mgp+(mgpx):mgp,0;">" U 9940& Znmgp=xƥ<.516,(21-mgp)*8+4:230,0:sound=55400h:8000@ x="2"y>"3""8000" -x="2"yǰ"3"(key="1"cash="1")"6000" draw="238":f="1"̰"6":<".25"q=(*"6")+"1":"247","175"-((r(q)*"8")+"3"):ٰ"2";-draw,"0":sound=55400h:ް"1";"247","175"-((r(q)*"8")+"3"):ް"1";-draw,"0":x=r(q)"8000" #x=3y=28key=1 -key=03,28;6;"" $x=18y=3cash=1 .cash=018,3;7;"" 3,1;"^IN" <t=t-1:diff=11,11 ;"TIME=";t;" " t<18000@  5160( p4"7":f="1"̰"32":scroll=55561 :f:"0": q r s t" THE END ? u v w x" FREE AT LAST ? ":"8600"::"0","0";ް"1";ٰ"9";"WELL DONE! YOU HAVE REACHED THE PLATFORM AND ARE ABOUT TO ESCAPETO FREEDOM. BUT WAIT. YOU HAVE FORGOTTEN YOUR SECRET DIARY AND THE VITAL DATA CONTAINED IN IT." y["IT IS YOUR DUTY TO RETURN TO YOUR CELL AND RETRIEVE IT. I WISH YOU GOOD LUCK..." z2f="1"̰"6":f+"7","0";ް"1";f;j$(̰"32"):f |3f="1"̰"6":f+"13","0";ް"1";f;j$(̰"32"):f ~3f="1"̰"2":f+"19","0";ް"1";f;j$(̰"32"):f :6020:f=116:du,pi:du/10 ,pi:f 8,16,8,16,8,18,12 ,15,4,16,8,18,8,19,8,19,8,21,12 ,18,4,16,8,14,8,16,8,14,8,13 ,8,14 al=l+"1":s=s+"5000":"9300":"0","0";ް"1";ڰ"6";ٰ"0";j$:return=55300:110n c i0:0: n'a$=" ESCAPE FROM COLDITZ ! " xGf=129:0,32 -f;a$(f):.05|L,10 :f  98b 1;HELP ! I'M TRAPPED INSIDE A COMPUTER PROGRAM ! ? @?x,y;"":8010J:f=111 :dur,pit:dur,pit:f J.6,0,.4L,0,.2~L,0,.6,0,.4L,3,.2~L,2,.4L,2,.2~L,0,.4L,0,.2~L,-1,.6,0 T<l=l-1:l<18400 :f=1100d:f Vl>08030^ Y 8200 ^lev=1:200 h2lev=2t=500:x=11 :1105Q r%lev=3x=11 :21059 |%lev=4x=11 :3105! %lev=5x=11 :4110 %lev=6x=11 :5110 V:" GAME OVER"::8900":" DO YOU WANT ANOTHER GAME ?":8290b i$="y"i$="Y"99c 8i$="n"i$="N":" ARE YOU SURE ?":8290b i$="n"i$="N"99c ;i$="y"i$="Y":" ABSOLUTELY POSITIVE ?":8290b i$="n"i$="N"99c Ei$="y"i$="Y":" IRREVOCABLY CERTAIN ?":8290 b i$="n"i$="N"99c 9I$="Y"i$="y":" UTTERLY DECIDED ?":8290b i$="n"i$="N"99c !:i$="y"i$="Y":" TOTALLY IMMOVABLE ?":8290b #i$="n"i$="N"99c &@i$="y"i$="Y":"SO THAT'S YOUR LAST WORD THEN ?":8290b (i$="n"i$="N"99c +i$="y"i$="Y"8280X X&:"WELL THAT'S NICE ! SPEND WEEKS WRITING A PROGRAM,DAYS DEBUGGINGIT,HOURS TESTING IT, POSITIVELY AGES DOING THE MACHINE CODE AND DRAWING THE TITLE SCREEN, AND YOU WON'T EVEN HAVE ONE MORE LITTLE GAME ! WELL, I'LL TELL YOU SOMETHING, I WON'T FORGET THIS IN A HURRY, SUNSHINE !!! " Z"f=1600X:f:0 bFf=110 :f:I$=:I$"Y"I$"y"i$"n"i$"N"8290b g k l10 ,0;"YOU HAVE HIT A TRANSPORTER MINE";4;" ";7;"WHICH HAS TRANSPORTED YOU (VERY";4;" ";7;"PAINFULLY) BACK TO YOUR CELL.":55300::200 7:f=132 :scroll=55561 :f:0:0:7::"You have been caught trying to ESCAPE FROM COLDITZ. You have no alibi and there can only be one possible result. Thefiring squad take aim...":f=1100d:f 20,0;:f=122:*7 ;ink=(*7):pap=(*7):(inkpap)8410 8407 k1;ink;pap;"CENSORED (TOO MUCH BLOOD + GUTS)":f:="":f=110 :sound=55400h:f 0 WOW ! A SAXOPHONE !!!! 8025Y !4=8510>!:f=017:du,pi:du/1.5@,pi:f: !>E.4L,7,.4L,7,.8L,12 ,.4L,11 ,.4L,12 ,.8L,14,.4L,12 ,.4L,14,.4L,16,.4L,16,.4L,17,.4L,16,.8L,9 ,.4L,14,.4L,14,1.6L,12 ,1.6L,11 ,3.2L,12 !f;8560p!:f=112 :du,pi:du/8,pi:f: !p6,7,6,12 ,6,19,6,10 ,6,16,6,19,6,9 ,6,16,6,19,3,17,3,16,18,12 !<8610!:f=1491:du,pi:du/12 ,pi:f: !6,8,2,10 ,2,8,2,5,2,3,2,1,2,3,2,1,2,5,2,1,2,-2,6,-4,6,8,2,10 ,2,8,2,5,2,3,2,1,2,5,2,1,2,5,2,5,8,3,6,8,2,10 ,2,8,2,5 !f2,3,2,1,2,3,2,1,2,5,2,1,2,-2,4,-4,2,1,2,3,2,1,2,5,2,1,2,-2,2,-4,2,-2,2,1,2,5,2,1,2,5,2,5,2,1 !m8710":f=134":.01z# =,10 :m$:ma:md:x,y;ink;"":x=x+ma:y=y+md:x,y;m$:f: """,-1,0,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",1,0,"",1,0,"",1,0,"",1,0,"",0,1,"",0,1,"",0,1,"",0,1,"",0,1,"",0,1,"",0,1,"",0,1 """,1,0,"",1,0,"",1,0,"",1,0,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",0,-1,"",-1,0 "7"SCORE ";s;" HISCORE ";hsc:s>hsc8910" ": "j23658j\,8::hsc=s:h$="":" INPUT 3 INITIALS ";:f=13 "=""8920" "@h$=h$+:;:.05|L,(h$*6):g=110 :g:f "23658j\,0::: #:0,4;" ESCAPE FROM COLDITZ ! ":2,0;"   1984 SCORPION SOFTWARE  BY S. CAMPBELL AND L. O'DONNELL" #M11 ,0;" DO YOU WANT INSTRUCTIONS ?" #n=120:n $)="".065}R,*502:9220$ $ ="n"Ŧ="N"9240$ $ "y"Ʀ"Y"9220$ $_="y"10 ,0;" WELL, YOU'RE NOT GETTING ANY ! READ THE INLAY, YOU LAZY SOD ! " $12 ,0;" (unless you're a pirate and don't have one), in which case ";1;1;"Tough luck buster !" $ 9599% $i="n"11 ,0;" ":9600% $" 9220$ $T(f="1"̰"6":(f="2"f="4"f="7")f $^9f:"0","0";ް"1";ٰ"8";f;j$:="":"20":=°"9" $hf: %:0,0;"OY! STOP TRYING TO BREAK INTO MYPROGRAM! JUST FOR THAT I'M GOINGTO SEND YOU BACK TO THE START !!":f=1100d:f:90Z %f=1200:f %Gf=10 16:f,0;" ":f %H10 ,0;"WOULD YOU LIKE A PRACTICE GAME ?":=""9601% %u="y"Ŧ="Y"10 ,0;" SO WOULD I BUT THERE ISN'T ENOUGH MEMORY. SORRY...":F=1126~:F %610 ,0;" " %611 ,0;" DIFFICULTY ? (1-EASY 2-HARD) " %=""9605% %!="1"diff=1:9610% %!="2"diff=2:9610% % 9605% %`11 ,0;" WHICH PATTERN ? "::" (1-90 FOR RANDOM)" %=""9620% %%<47/ů>5799610% %.>46.pattern=-47/:9650% % 9610% %\21,0;1;" PRESS ANY KEY TO CONTINUE ":0:0:100d &:t>10 .01z# =,(500-t)/10 :9950& &warn=55529 &="h"0:0 &="r":8200 &=9 & & ':"" '(" SCORPION"16384@,48984X: ' 9:1;" CONGRATULATIONS! ";0;:::"YOU HAVE ESCAPED FROM COLDITZ ! TELEPHONE SCORPION SOFTWARE NOW AT BATHGATE (CODE 0506) 56478 OR633907 AND QUOTE THIS CODEPHRASE'SCORPION-SOFTWARE WITH A STING'TO CLAIM YOUR PRIZE OF `30 WORTHOF ";1;"FREE";0;" SOFTWARE OF YOUR CHOICE." ' :::1;" IMPORTANT "::" YOU MUST QUOTE THE CODEPHRASE BEFORE YOU SAY ANYTHING ELSE. YOU MUST ALSO BE ABLE TO PRODUCEA PROOF OF PURCHASE OF THIS GAMEAND A WITNESS TO TESTIFY THAT YOU DID NOT CHEAT." ' 9995 ' ' OPYRIGHT MESSAGE FROM CAPTAIN ZAX.........THIS PROGRAMREPRESENTS A NEW CONCEPT IN SOFTWARE PROTECTION....SEEMINGLYAN ORDINARY GAME, ESCAPE FROM COLDITZ IS ACTUALLY THE FIRST COMPUTER PROGRAM IN THE UNIVERSETO HAVE BEEN TELEKINETICALLY IMPREGNATED WITH A MIND OF ITS OWN.....YES, ESCAPE FROM COLDITZCAN THINK,REASON AND REACT FOR ITSELF......IF IT SHOULD DETECT ANYONE ATTEMPTING TO ILLEGALLY COPY IT, THIS PROGRAM WILL AT ONCE SEND OUT A TELEPATHIC SIG- NAL TO THE AUTHORS CONTAINING YOUR NAME AND ADDRESS,WHEREUPON THEY WILL INSTANTLY BEGIN PROC- EEDINGS TO HAVE YOU BROUGHT SWIFTLY TO JUSTICE. YOU HAVE BEEN WARNED......... ' +WHAT DO YOU MEAN, WE'RERUNNING OUT OF MEM "