ZXTape! 0Created with Ramsoft MakeTZXtitle G GJI8 23613=\,0 : &::::"" =LUD1 @A,a@sx 0@|o|{>|`|/|=>|@; @ 0w`@`=8  {x@{Ϟ~ @> `>`?>|  |  0<@~< :} oϙ@0 ϛ>?>?v>~|n ~~9~@x?~o _8|o|w>>|3|/|=>|〃@pp?7pπp`$%)$%( UUUUUUUUUUUUU$')<=UP PP UUUUU@UUUUU@̓@ɀ$ ( U@UUUU*UUUU*UUUUU1?p۟$ ( UT*TT*UUUUPUUUUP`6@$ )` UUUUU UUUU **lT*TTT۟~!? >D??>َ`( $')UUUUUUUUT UUUUTɀB!! D  0( $%)UUUUUUUUU  PP PPPB!! D! ظ0)$%( UUUUUUUUUUUUUUUp`B!! ! ظ0z!= .(!.  0B! @! ;|$~ َ`B! D ! qBBBB@B8g@8$BBB@B@$@|<<| |<6B< /.D!.l@~BB|B??xD@BB~~|~D D> 1c@B~|@|Dx@~~>B@D| |"| ̓@BBB@@D3D@BB@BB@B|D @"D c@~@|<|>| p7 @::" :                   888888888888888888888VVQQQQVVVVVVVQVVV8888888VVVVVVVVVVVVVVVVVVVVVVVVVVVVVVQVVV:H\˧W_z{AA# # <@(di'6&\\\B=BAJ[[\Tw1X![!@@P!!y[ K SR P16/48 16/48 Magazine Ltd. *6\$:[O [![[[K[>#xG= >8{O= :[O  " 416/48*S\ ~&o%DM! XX*S\ ~ # ?16/48:!H@~  + ## !H@ ~7?B # ## 16/48;:H\˧W_z{AB.C.THORNE APRIL 1983*S\[ [!N [+*S\[ [!}F+ [*S\[ [! F+N+ [}*S\[ [`DL [*S\[ [&DH [$*S\[ [!N [+*S\[ [U!xOF [F [F [#*S\[ [`DL [D [D [*S\[ [&DL [D [D [$*S\[ [H [Ad [cc 16/48 script$$~(PP|P|T|BH$J(*D: 00>>> @|LTTd|(>|D8@||DD|(H~|@|D||@|DD||D|D8DD||DD|| >>|D p|DD||$ p|@| x 8DDD~DD(8TTT~((DD||~D"~p |8p`r$="C":"You are not suprised to find a battery inside":go Flb="146":hb="184":r$="F":d$="ns":beg="2010":ðT$("17")PIC RET m"9","8","2040","1","2100","2","1000","0","2020","42","2020","76","2060","11","2050","33","2070","16","5290" ðT$("17")PIC: &r:"There is a door to the north":g +a$="DOOR":wo2="2025":ret2="2030":go2  y$;"a loose control panel":go +a$="PANE":wo2="2035":ret2="5060":go2 3"Behind the panel there are two bared wires":go -"You must make the right"'"connection.":go  +a$="BATT":ret2="5260":wo2="2065":go2 t$("31")"G""5210" !init:w="(prog+326)":"2075" <t$("21"̰"22")"GG""You do not have a gun & ammo !":go 1"You destroy the door.":t$("17")="2":^:GO 4+ðt$("17")"The door will not open":go 5%R$="E":d$=" sew":beg="2110":ret 9&"3","4","2200","3","2500","2","2000" >/INIT:x$'y$;"a broken door to the"'"south":g Flb="110":hb="206":pic:Z$="":r$="m":d$="n e":beg="2210":ret J"6","1","2500","3","2100","0","2220","42","2220","31","2230","28","2230" Npic::"You are in the 'CAFETERIA'"'y$;"an automated burger"'"machine.":g X"There are buttons for;"'"Burger,Bun,Salad,cheese,Cola"'"& one to serve the food.":go 8"2240":wo2="2245":ret2="2232":F=̰"4":a$:GO2 F $a$:ret2="5180":wo2="2250":go2 1"BURGER"," BUN","SALAD","CHEESE","COLA","SERVE" 3z$=z$+a$+",":"One ";a$;" coming up!":F:"2235" kpic:prog+"239","80":f=̰"80":w="prog+237":f:t$("33")="m"::"The ";z$'"arrives.":Z$="":go %R$="H":D$="ns w":beg="2500":ret H"6","2","2200","1","3100","4","2100","8","2520","0","2530","42","2550" 7"You are in the 'Motel' section."'y$;"a bare desk":g "It's not behind YOU !":go +a$="BEHI":wo2="2535":ret2="2550":GO2 +a$="DESK":wo2="2540":ret2="5060":go2 Rt$("32")="H":t$("16")=(97a+*R):y$;"a key on hook '";t$("16");"'":go +a$="DESK":wo2="2555":ret2="5060":go2 y$;"a bare DESK":go CBEG2=BEG:LB="5":HB="213":BEG="3010"::PIC:RET1:BEG=BEG2 >"5","48","3020","16","3020","7","3050","5","3050","6","3050" C:PIC::R:"You are outside Sleeping"'"Cubicle '";r$;"'.":g @t$("16")r$T$("32")"G""What without the right key ?":go "6000" ,"Ok, but you look a bit silly"'"there":go %R$="b":beg="3110":d$="nsew":ret !1"4","1","3250","2","2500","4","3150","3","3200" &beg1 N$r$="a":beg="3160":d$=" e":ret S"1","3","3100" Xbeg1 %r$="c":d$=" w":beg="3210":ret "1","4","3100" beg1 %r$="e":d$="nsew":beg="3255":ret 1"4","1","3400","2","3100","3","3350","4","3300" beg1 "r$="d":beg="3310":d$="e":ret "1","3","3250" beg1 %r$="f":d$=" w":beg="3360":ret "1","4","3250" beg1 H#r$="g":d$=" s":beg="3410":ret M"1","2","3250" Rbeg1  init:lb="164":hb="174":pic:"2":cloud:t$("15")"1""A recorded message tells you"'"that under Space Trucker rules, you cannot leave yet.":#1;"Press a key"::"300" (N="15"̰"35":T$(N)=" "T$(N)="!":N init:"7":n=̧:w=(prog+"453"):n:9150#::"23692","255":'"Congratulations !"''"I hope you remember the codewordso that you can start the next episode" k"9810":'"Press R to run the program againPress J to load the next chapterPress Q to NEW it" #1;10000' a$=:a$="""4040"  a$="R" a$="Q"0 5a$="J":9 ,9 ;"Start the tape":""  "4040"  M"42570","186":"42571","19":ټ:BDIS::"23658","8":"23617","252" ""42515","240":"42516","160" *"What are you going to do ?"'">";c$ 3"23692","255": c$=""װ".5","-30":5008 C$="5500" $B$=C$:"9810":ٰ"2";B$:"9800": B$=B$+" ":"42440" 'N=̰"3":42350n+N,A$(N+):N x42354r,wo2-256*(wo2/256):42355s,(wo2/256):42356t,255:42357u,255 M42570J,ret2-256*(ret2/256):42571K,(ret2/256) <42515,110n:42516,165:42440ȥ  "CHEAT":GO (<.3װ".5","-30":"WHAT ?":go #<.4LƱB$>"8" "Why ?":go >װ".5","-20":"Sorry, I didn't understand."'"Try again.":go ("You see nothing more to help you":go '"You cannot go in that direction":go "You cannot":go 7<".25""Make sure that your map is"'"accurate":go #<".25""I cannot help you":go  <".25""EXAMine things":go 1P="2":"Do you want the instructions ? (Y/N)" a$=:a$="""5105" a$="Y""9200" go .t$("33")"G""You have nothing to eat":go ,"OK.":T$(18)="1":t$("33")="M":go  "OK":GO x$=r$:wo2="5740":"5700"  "OK.":GO (x$="G":wo2="5750":"5700" - "5150" <"Nothing happens":go P6r$>"k"r$<"a""You do not have the correct key":go U*r$t$("16")"The key does not fit":go V "6000" Z "5760" d "5060" x"There is no reply":go ,a$="DETEC":wo2="5265":ret2="5268":go2 CLS:"4000" "Nothing happens":go "Nothing happens":go !"You are not strong enough":go "You are ignored":go  "Why ?":go "You don't find anything":go  "5290" "In which direction ?":go "You cannot":go "I cannot help you":go "Ok.":粧:: A"Are you sure ? Y/N"''"n.b. Press ""X"" to NEW this"'"program." a$=:a$="""5393"  a$="Y" a$="X"0 go "Time passes...":go /t$("16")r$"You are too uncomfortable":go  "zzzzzz...":t$("15")="1":go #W"This SAVEs this stage of the"'"game on to tape."'"Do you want to carry on ? Y/N": $a$=:a$="""5412" % a$"Y"go '6:"Lud1"t$():"LUDOID""41200","600":bdis:beg 7H"This LOADS a previous game from tape"'"Do you want to continue ? Y/N" ;a$=:a$="""5435" = a$"Y"go @G:"PLAY THE TAPE":"Lud1"T$():"":BEG=T$("11"̰"14"):BEG-"10" J"Hi there !":go T3"10000":B$(5)="BAZZ"BEN:9810R&: UGO { "OK":GO }C$="N"C$="GO NORTH": ~C$="S"C$="GO SOUTH": C$="E"C$="GO EAST": C$="W"C$="GO WEST": C$="U"C$="GO UP ": C$="D"C$="GO DOWN": C$="V"c$="L"BEG C$="H"C$="HELP": !C$="P"C$="WAIT FOR A WHILE": C$="R"C$=B$(̱B$-"4"): C$="Q"C$="QUIT GAME": C$="I"C$="INVENTORY": C$=C$+" ? ":  W="42587" !t$()=r$:T$("11"̰"14")=BEG /BEG-"10":M$:N=̰M$:M$:A=M$:M$:B=M$ O"41204"+"6"*A,B-256*(B/256):"41205"+"6"*A,(B/256):N T$(27)=D$: e'"There are exits visible;"'("North,"t$("2")="n")+("South,"t$("3")="s")+("East,"t$("4")="e"); G("West,"t$("5")="w")+("up,"t$("6")="u")+("and Down"t$("7")="d") &>"7000":N="19"̰"18"+obj:M$:T$(N)=R$"You can see; ";m$ 0n:go E "7000" N$ER=:ret2="5730":M=1obj X#m$:t$(18+M)=x$a$=m$:go2 b\M:ER"You cannot. (Try rephrasing your""sentences"" or using some"'"different nouns)" cgo l3t$("18"+M)="G":"You take the ";m$:ER=:M:go v2t$("18"+M)=r$:"You drop the ";m$:ER=:M:go *"7000":"You have with you;":n=obj: m$:t$("18"+n)="G"m$ n:go PROG+"239","72" !=""W=(PROG+"237"):"5810"  p9d$=" s":beg="6010":lb="72":hb="222":缧:pic:ret u"1","2","beg2-10" za缧:pic::r:"You are in a cubicle."'"Someone has written ""cold store""on the wall.":g d;:0:0:0::""16384@:9070n# i!"LUD1"16384@,43924 n 5 X"DETECTOR","POSTER","SHOTGUN","CARTRIDGES","MUSHROOM","PAPER","LABEL","GLYCOL","SAWDUST","WARM CLOTHES","WASTE PAPER","CROW BAR","BATTERY","KEY ","FOOD" "I:#:9810R&:"name";m$'"drive";m:*"m";m;m$9460$:*"m";m;m$: #' #(*prog=23635S\+256*23636T\ #2NG="5650":init="9000":cls="9040":Bdis="9070":Ben="9080":big="9900" #:"Press M to save to Microdrive"''" Q to quit" $a$=:a$="""9410" $ a$="q" $ "42399", $a$="m":"9000":"9810":"Put empty cartridge in drive 1"'"Press any key"::*"m";;"LUDOIDS #1"ʰ"9460":*"m";;"Ludoid1 ""41127","19181": $ $G"41127":23613=\,0:"Loading code":*"M";;"Ludoid1 ": &H`236077\,((prog+474)/256):236066\,prog+474-256*236077\: &R-236066\,0:236077\,60<: &"23296[,z$(56) &"23297[,z$(78) &:23299[,175+23297[-8*z$(2) &*23298[,8*z$(34) &z$=z$(9 ) &z=1̱z$ &23300[,z$(z)-32 &w=(prog+34") &c23298[,((23298[)+8*23296[)*((23298[+8*23296[)<256) &z & & 2  Program by Barry Thorne Graphics by Jim Dann w6500d LUD1 @@@ 255 \ uth,East,!  uth,East,! 255 \ uth,East,!M3#3#M3T3TOKO3JMRb=Wq MQ ?v>*=\s#r>2:\!}*=\q#p@!~(##~( G>#~x>FLOOKNORTSOUTEASTWESTUP DOWNCLIMHELPEAT DRINTAKE GET PICKWEARDROP(OPENCLOS<LOCKFUNLOPGOT ZREADdKNOCnTELLxSAY xTALKxASK xLIFTPUSHPULLPUT PRESKILLSHOOATTAFIGHHIT PUNCKICKHOLDBREASMASEXAMFEEDPOURDIG TWISSWIMENTETURNLEFTRIGHRUN WALKCROSCRAWLEAPJUMPHIDEWHERFINDLOSTSUICQUITWAITPAUSSAVE"LOAD6HELLJINVEZTIE UNTIFLY STARFIREBAZZTCONNSLEEBATTl!@>#^{+s#r#= k LOOKNORTSOUTEASTWESTUP DOWNCLIMHELPEAT DRINTAKE GET PICKWEARDROP(OPEN2CLOS<LOCKFUNLOPGOT ZREADdKNOCnTELLxSAY xTALKxASK xLIFTPUSHPULLPUT PRESKILLSHOOATTAFIGHHIT PUNCKICKHOLDBREASMASEXAMFEEDPOURDIG TWISSWIMENTETURNLEFTRIGHRUN WALKCROSCRAWLEAPJUMPHIDEWHERFINDLOSTSUICQUITWAITPAUSSAVE"LOAD6HELLJINVEZTIE UNTIFLY STARFIREBAZZTCONNSLEEBATTl!@>#^{+s#r#= k Program by B.C.Thorne September 1984*K\~(A8`88#88!8 #B #N#F  #>0###!S\[\"(( S# #N#F*[*######~!HWaCT *T *T@ @* kQ@ T *T *T * @kU? T *,T *4|,T@ @*4 j4T *,4T *,,T *4"),T *48j4T *,4T *,T *")T@ @*8kT *T *T*""*T *8 kT *,T *44T*,"!)T@ @* @kT *,T *44T*,# ?  >>>>~"  * ( @@@ <@ ?I(   ^ 8#~~? )I@ ~@ ~Z )(  ~ # Z )(@@ <@   ?|~A(  #P !I@ @ pA$88888888888888888888888888888888888888888888888888888888888888888888888888888888888=888888      GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG          % aCT *T *T@ @* kQ@ T *T *T * @kU? T *,T *4|,T@ @*4 j4T *,4T *,,T *4"),T *48j4T *,4T *,T *")T@ @*8kT *T *T*""*T *8 kT *,T *44U*,"!)T@ @* @kT *,T *44T*,# ? 4TU @ UP:4 v:+ Z<UUUUTUUVUU˘g4?U@  UU@zϴꪪ㇏dH \jϼUUUUTUUVUU<itΰj UUT @ z zߗI8p  Z}xUUUUTUUVUU8@UUT:u0`x_$Z= UUUUTUUPUUq   * ( @@@ <@ ?I(   ^ 8#~~? )I@ ~@ ~Z )(  ~ # Z )(@@ <@   ?|~A(  #P !I@ @ pA$88888888888888888888888888888888888888888888888888888888888888888888888888888888888=888888                                     % JG @   U`G  yx  U'   ERD d"L U'  @ }| ? U   YX  V   ML  N   EPD p@ N   EЗD V R uURR @ @ < 8    FUR ` x ZX     EURr *  .     EIQ  x       b          x          Z        <,         1    1    1    2    2    ??2   -2   ,?PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPPP0000PHHHHHHHHHHHHHHHPPPPPP1011PHHHHHHHHHHHHHHHSSSSPP1111PHHHHHHHHHHHHHHHSYYSPP0110PHHHHHHHHHHHHHHHSYYSPP0120PHHHHIHHHHHHHHHHSYYSPPPPPPPHHHHIIHHHHHHHHHSYYSPPPPPPPHHHHIIHHHHHHHHHSSSSPPPPPPPHHHHHHHHHHHHHHHPPPPPPPPPPPHHHHHHHIHHHIHHHPPPPPPPPPPPHHHHHHHIHHHHHHHPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPPPPPPPPHHHHHHHHHHHHHHHPPPPP88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888882  P` 4I$ U@$I$ UU`,A$I:UUUVD?K)IUU`K.N`@?T `@ % P  $JUV?rI$I5UU I$j UUT UA~U_   I@5` I$ UV @I$UUU@!(I$UUUX? -I*Up  #3I:?UU  $` ` $I$UT?I$I:UU! D$IUUUXZVz]|@IjUUV  ? I$U@ I$JuUT@@?I$#UUU!?I$UUUUP??4M$ꪫU^a4$ꪫ>?05UUU? 2? I0U@ dI$ UX?)$I'UUU#)mI* UUUUP?ihZIUOi$zI UUU 0`TA $HU @$I.UUP@@RI$N UUUB?RƄz5UUUU`?ȴU_ RI4UUUGAUAU   I$5UI$ZUUPI$5UUVCI$ꪨUUUi&~? &UUUSUUI$ZUUUQ UTi$jUUUUxW} $ꪪ_5S $jU?@?QU?`>TUUUUU ?UUU8UUUU,I$UUUT|7UQRI$ꪪUUUU?UOI%ʯW< $ꪯU???Ȫ| *,$IjUUUU<@UGI$UUUNU_~$J5G<IgU?? UU_UUUUUPUUUUUUUP-I$UUUUI$UUUpU?>I$O|U_~  ⪪.?I%UUUB5UI& UUW8 U~>RI*8UO| & U_~@ 8UUUUS UUUUPUUUUUUT.? $NUUURT$J1UUT>?J_ JU|@ª પj /?I$UUUS8UUI$UU?I$_@?@ >HUUUUT UQ|UUUK4I:UUUVS I*;SI*U_ >* ʪ*J''''''''''''''''''''''''''''''''''''''''' '''''''''''''''' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''8888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888+;?5UT>@ ?X=?|?7t=;`  E-? <ƈ E. U`? @< @ !E.x;*< ?)-5UX?V !).@V !! DB =H@  v,TT  @NDB ?p?  @>x N{~|?%?  +i@%?  @{ 4{'O@%?  ~ DB H$5@-?6? ?DB ~=8@-6  DC <?@-6 Pn !"W`@@P_@ @@g@3Z{@o7?I28888888888888888888888888888888888;888888888888888888888EEE8FFF888888888888888888899BBBFFF9888888888888888888##BBB8FFF'''''''''''''''''''##'''''''''''''''''''##FFF8EEE''''''''''''###FFFEEE''''''''''''###DDD8EEE''''''''''''###''''''''''''###BBB8DDB''''''''''''###BBBDDD''''''''''''###BBB8DDD''''''''''''####'''''''''''#############''''''''''######HHHHAHHHHHAHHH##########!OAOOAOO$$$$$$$$$$$$$$$$$$$$ $$$$$$$$$$ $$$$$$$$$$ $$$$$$$$$$ ##########    @  M; f"`)  f??" z@zzf:J J J M*X X XM `*@@@@N `* @@ @N `` ``` ` ` `` ``` `  `  ``` ```` @`  ` ` ```` `z`z z `` ``` @` J`J J ``?? ``` @`@X`X X `` ` `  `@`@@@ `` ` @` @`@ @ ` `` `` `````` `` `````?`? `` `````` `` `````` `` `` `` ` ``` ` `;`` ` `20(00(00(770(00(00(770(00(00(770(00(00(770(00(00(770(00(00(770000.(.000000000.(.000000000.(77******************************77******************************770000.(.002222000.(.000000000.(770(00(00(770(00(00(770(00(00(770(00(00(770(00(00(770(00(00(770(00(00(770(00(00(770000.(.002002000.(.000000000.(77(((((((((****(((((((((((((((((7(((((((((*((*(((((((((((((((((b?@@@@@?@@@@@@?@@@@@`@@0 c  0   0c 0`cd   ` ?0? d@@@@@@@@@@@0@@@@@ @@@ 0d 0`@@.?O5 .@@@@O@@?.?  ? O5 .O@@.O5.  ~` O@ .@@@@O5 ??@? @ @   ?@@@@@@@@? @@@@  @@@@@  @@@@@@ @@@@ @@@@ @@                 ?     ?   ? ?    @ @  @  ?     @ @@@?@@@@ @@@@@@@@@@ ?@@@@@@ @@@@@@@@@@ ?   ? ? 00000000000000000000 000000000000000000 0000000000000000        xxxxxx  300000000003 000055000000 05555==55500 8==========8 88=======888 8       title2 G GXI8 23613=\,0 : &::::"" L2 x@Tza@sx 0@|o|{>|`|/|=>|@; @ 0w`@`=8  {x@{Ϟ~ @> `>`?>|  |  0<@~< :} oϙ@0 ϛ>?>?v>~|n ~~9~@x?~o _8|o|w>>|3|/|=>|〃@pp?7pπp`$%)$%( UUUUUUUUUUUUU$')<=UP PP UUUUU@UUUUU@̓@ɀ$ ( U@UUUU*UUUU*UUUUU1?p۟$ ( UT*TT*UUUUPUUUUP`6@$ )` UUUUU UUUU **lT*TTT۟~!? >D??>َ`( $')UUUUUUUUT UUUUTɀB!! D  0( $%)UUUUUUUUU  PP PPPB!! D! ظ0)$%( UUUUUUUUUUUUUUUp`B!! ! ظ0z!= .(!. 0B! @! ;#xG= >8{O= :[O  " 416/48*S\ ~&o%DM! XX*S\ ~ # ?16/48:!H@~  + ## !@@ ~7?B # ## 16/48;:H\˧W_z{AB.C.THORNE APRIL 1983*S\[ [!N [+*S\[ [!}F+ [*S\[ [! F+N+ [}*S\[ [`DL [*S\[ [&DH [$*S\[ [!N [+*S\[ [U!xOF [F [F [#*S\[ [`DL [D [D [*S\[ [&DL [D [D [$*S\[ [H [Ad [cc 16/48 script$$~(PP|P|T|BH$J(*D: 00>>> @|LTTd|(>|D8@||DD|(H~|@|D||@|DD||D|D8DD||DD|| >>|D p|DD||$ p|@| x 8DDD~DD(8TTT~((DD||~D"~p |8p`R$="^":BEG="1210":D$="ns":lb="211":hb="201":pic:ret ="5","2","2000","1","1500","3","1000","8","1220","48","1230" 6pic:CLOUD:"You are standing outside an"'"igloo":g $"The word you need is ENTER !":go B"You are inside a rescue hut":r$="I":beg="1230":d$=" s":ret "1","2","1200" g Gr$="C":beg="1510":d$=" s":lb="156":hb="189":pic:缧:pic:ret ?"5","2","1000","0","1520","42","1520","44","1560","31","1580" /PIC:缧:CLOUD:R:Y$;"a huge lump of ice":g +a$="ICE ":ret2="5060":wo2="1530":go2 9"There is a LUDOID | jammer"'"buried in the middle":go #ret2="5268":t$("26")"G"ret2 "[t$("15")="1":"The block of ice starts to melt you can get closer to the Jammernow.":go ,5t$("15")="1"t$(16)="1":ret2="5260":ret2 6a$="DETEC":wo2="1600":go2 @<"You cannot get close enough for the detector to work":go ]t$("18")="0":r$="J":beg="2010":d$="n":lb="119":hb="212":ðT$("17")pic:缧:RET +t$("17")d$="n d":beg="2020":RET 3"4","1","1000","0","2040","42","2040","48","2100" "2","1","1000","6","2500" ðT$("17")pic:缧::R y$;"a Helijet in the ice":g +a$="HELI":wo2="2050":ret2="5060":go2 0"The door is open, it seems"'"serviceable":go 4"r$="S":BEG="2110":d$="n":ret 9c"8","8","2190","1","2000","12","2120","57","2120","56","2120","42","2150","72","2170","73","2180" >1"In front of you there is a"'"control panel":g H+a$="OUT ":wo2="2000":ret2="5130":go2 f;"THE CONTROLS TO START THE MOTORS& FLY, SEEM TO WORK":GO z["Even you cannot cope with these strange controls."'"You crash & are killed"::"230" Pt$("17"̰"18")="14":"The heat causes the jet to startto sink in the ice":go >"You could try to start the"'"engines & fly the helijet":go Mr$="a":d$="n wu":beg="2510":ret:h$="Frozen Beef":I$="No destination" &"3","1","2600","4","3400","5","2000" beg1 (Nr$="b":d$="ns w":beg="2610":ret:h$="Used crates":i$="Return to Glacia" -&"3","1","2700","2","2500","4","2800" 2beg1 Nr$="c":d$="s":beg="2710":h$="Milk Solids":i$="TO-"+t$("11"̰"20"):ret "1","2","2600" beg1 Br$="d":d$="nsew":beg="2810":h$="I.M.S.":i$="Homeworld":ret 1"4","1","3000","2","3500","3","2600","4","2900" beg1 T0r$="e":d$=" e":beg="2910":h$="Flour":ret Y"1","3","2800" ^BEG1 FR$="f":d$="ns w":beg="3010":h$="Soya Beans":i$="Service Q":ret &"3","1","3100","2","2800","4","3300" beg1 \R$="*":d$=" s w":beg="3110":h$="Glycol "+t$("11"̰"19"):i$="-Damaged":ret !?"5","2","3000","4","3200","16","3120","40","3120","41","3120" &beg1 0,a$="CRATE":ret2="5270":wo2="3130":go2 :$t$("30")"G""What with ?":ret2 D R$="g":beg Dr$="h":d$=" se":beg="3210":h$="Glucose":i$="Colony #ks6":ret "2","2","3300","3","3100" beg1 Ibeg="3310":d$="nse":r$="i":h$="Milk Solids":i$="Freight #d34":ret &"3","1","3200","2","3400","3","3000" beg1 HJbeg="3410":r$="j":d$="n e":h$="Transplant":i$="Organs (Human)":ret M"2","1","3300","3","2500" Rbeg1 Sr$="k":BEG="3510":go="3520":d$="n":h$="| diodul":i$=" hint ^":RET "2","1","2800","8","BEG1" beg1 R$="K":go="5000":go -INIT:cls:lb="104":hb="166":pic:"2" init:n=̧:w=(prog+"453"):n:9150#::R:"23692","255":'"Congratulations !"''"You have destroyed a LUDOID"'"jammer. Have you got the"'"codeword for the planet where"'"they have gone to ?" _''"If you haven't found the"'"codeword yet, go back & look at all the labels on the crates." o"9810":''"Press R to run the program againPress Q to NEW it"'"Press J to load the next chapter" #1;10000' a$=:a$="""4040"  a$="R" a$="Q"0 Ha$="J":10 ,0;"Turn the tape over & play side 2":""  "4040"  M"42570","186":"42571","19":ټ:BDIS::"23658","8":"23617","252" nbeg<"2200"t$("28")"G"a$=t$("10"):t$("10")=(a$-1):a$" ""You freeze to death"::"230" }A$=T$("18"):A$"The helijet is sinking":w=(prog+"361"):t$("18")=(a$-1):a$="1""You drown..."::"230" ""42515","240":"42516","160" *"What are you going to do ?"'">";c$ 3"23692","255": c$=""װ".5","-30":5008 C$="5500" $B$=C$:"9810":ٰ"2";B$:"9800": B$=B$+" ":"42440" 'N=̰"3":42350n+N,A$(N+):N x42354r,wo2-256*(wo2/256):42355s,(wo2/256):42356t,255:42357u,255 M42570J,ret2-256*(ret2/256):42571K,(ret2/256) <42515,110n:42516,165:42440ȥ  "CHEAT":GO (<.3װ".5","-30":"WHAT ?":go #<.4LƱB$>"8" "Why ?":go >װ".5","-20":"Sorry, I didn't understand."'"Try again.":go ("You see nothing more to help you":go '"You cannot go in that direction":go "You cannot":go 6<".3""Make sure that your map is"'"accurate":go "<".4""I cannot help you":go 1P="2":"Do you want the instructions ? (Y/N)" a$=:a$="""5105" a$="Y""9200" go 4a$=t$("8"):a$" ""You have nothing to eat":go go 6a$=t$("9"):a$" ""You have nothing to drink":go GO x$=r$:wo2="5740":"5700"  "OK.":GO (x$="G":wo2="5750":"5700" - "5150" <"Nothing happens":go P'"You do not have the correct key":go Z "5760" d "5060" x"There is no reply":go ,a$="DETEC":wo2="5263":ret2="5268":go2 t$("16")="1""4000" "Nothing happens":go !"You are not strong enough":go "Nothing happens":go "You are ignored":go  "Why ?":go "You don't find anything":go  "5290" "In which direction ?":go "You cannot":go "I cannot help you":go "Ok.":粧:: A"Are you sure ? Y/N"''"n.b. Press ""X"" to NEW this"'"program." a$=:a$="""5393"  a$="Y" a$="X"0 go "Time passes...":go #W"This SAVEs this stage of the"'"game on to tape."'"Do you want to carry on ? Y/N": $a$=:a$="""5412" % a$"Y"go '6:"Lud1"t$():"LUDOID""41200","600":bdis:beg 7H"This LOADS a previous game from tape"'"Do you want to continue ? Y/N" ;a$=:a$="""5435" = a$"Y"go @G:"PLAY THE TAPE":"Lud1"T$():"":BEG=T$("11"̰"14"):BEG-"10" J"Hi there !":go T7 10000':B$(5)="BAZZ"BEN:9810R&: UGO { "OK":GO }C$="N"C$="GO NORTH": ~C$="S"C$="GO SOUTH": C$="E"C$="GO EAST": C$="W"C$="GO WEST": C$="U"C$="GO UP ": C$="D"C$="GO DOWN": C$="V"c$="L"BEG C$="H"C$="HELP": !C$="P"C$="WAIT FOR A WHILE": C$="R"C$=B$(̱B$-"4"): C$="Q"C$="QUIT GAME": C$="I"C$="INVENTORY": C$=C$+" ? ":  W="42587" !t$()=r$:T$("11"̰"14")=BEG /BEG-"10":M$:N=̰M$:M$:A=M$:M$:B=M$ O"41204"+"6"*A,B-256*(B/256):"41205"+"6"*A,(B/256):N T$(27)=D$: e'"There are exits visible;"'("North,"t$("2")="n")+("South,"t$("3")="s")+("East,"t$("4")="e"); G("West,"t$("5")="w")+("up,"t$("6")="u")+("and Down"t$("7")="d") &>"7000":N="19"̰"18"+obj:M$:T$(N)=R$"You can see; ";m$ 0n:go E "7000" N$ER=:ret2="5730":M=1obj X#m$:t$(18+M)=x$a$=m$:go2 b,M:ER"You cannot (Try rephrasing that)" cgo l3t$("18"+M)="G":"You take the ";m$:ER=:M:go v2t$("18"+M)=r$:"You drop the ";m$:ER=:M:go *"7000":"You have with you;":n=obj: m$:t$("18"+n)="G"m$ n:go PROG+"239","64" !=""W=(PROG+"237"):"5810"  1BEG="5850":LB="61":HB="227":PIC:粧:RET1 ("3","0","5870","42","5870","21","5890" 粧:PIC::R:"You have found a part of the"'"'Galactic Market Intervention"'"Store'. It contains over"'"produced stock."'Y$;"Long rows of crates.":g +a$="CRAT":wo2="5880":ret2="5060":go2 "Each crate is labelled":go Ilb="113":hb="247":pic:8;"9",;H$';I$:"21",::go d::: n""16384@:9070n# x"L2"16384@,48760x  5 X"DETECTOR","POSTER","SHOTGUN","CARTRIDGES","MUSHROOM","PAPER","LABEL","GLYCOL","SAWDUST","CLOTHES (for cold conditions)","WASTE PAPER","CROWBAR" "F:9810R&:"name";m$'"drive";m:*"m";m;m$9460$:*"m";m;m$: #' #(*prog=23635S\+256*23636T\ #2NG="5650":init="9000":cls="9040":Bdis="9070":Ben="9080":big="9900" #*=\s#r>2:\!}*=\q#p@!~(##~( G>#~x>FLOOKNORTSOUTEASTWESTUP DOWNCLIMHELPEAT DRINTAKE GET PICKWEARDROP(OPEN2CLOS<LOCKFUNLOPGOT ZREADdKNOCnTELLxSAY xTALKxASK xLIFTPUSHPULLPUT PRESKILLSHOOATTAFIGHHIT PUNCKICKHOLDBREASMASEXAMFEEDPOURDIG TWISSWIMENTETURNLEFTRIGHRUN WALKCROSCRAWLEAPJUMPHIDEWHERFINDLOSTSUICQUITWAITPAUSSAVE"LOAD6HELLJINVEZTIE UNTIFLY STARFIREBAZZTDETE!@>#^{+s#r#= k LOOKNORTSOUTEASTWESTUP DOWNCLIMHELPEAT DRINTAKE GET PICKWEARDROP(OPEN2CLOS<LOCKFUNLOPGOT ZREADdKNOCnTELLxSAY xTALKxASK xLIFTPUSHPULLPUT PRESKILLSHOOATTAFIGHHIT PUNCKICKHOLDBREASMASEXAMFEEDPOURDIG TWISSWIMENTETURNLEFTRIGHRUN WALKCROSCRAWLEAPJUMPHIDEWHERFINDLOSTSUICQUITWAITPAUSSAVE"LOAD6HELLJINVEZTIE UNTIFLY STARFIREBAZZTDETE!@>#^{+s#r#= k Program by B.C.Thorne September 1984*K\~(A8`88#88!8 #B #N#F  #>0###!S\[\"(( S# #N#F*[*######~!HWaCT *T *T@ @* kQ@ T *T *T * @kU? T *,T *4|,T@ @*4 j4T *,4T *,,T *4"),T *48j4T *,4T *,T *")T@ @*8kT *T *T*""*T *8 kT *,T *44T*,"!)T@ @* @kT *,T *44T*,# ?  >>>>~"  * ( @@@ <@ ?I(   ^ 8#~~? )I@ ~@ ~Z )(  ~ # Z )(@@ <@   ?|~A(  #P !I@ @ pA$88888888888888888888888888888888888888888888888888888888888888888888888888888888888=888888      GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG   GGGGGGGGGGGGGGGG          % D}_8Ax ? (^  8_?_ τ$?` @8_{'  p$D  x ?a x 8m`p>@Pc ?tx@p   8_@1@P@  :,mP@wV C CC O @@*: `*  @ @" +; ]P@hPAbUJ5@ @ @@@  @0 @*;p 2=(<@uUUV H*(H@)H@&  @  *p-`AN};ժʪ}DU```0/,( >>-BPK1Pjt:cUUUUEp *`0 1߻`g ;-U OW{F>ϑU   0wƀ '@ `oǀ7#|H?dhZJ@@C?Z$O<?r C@ `9wu '|'0 ~x  _ӈN<¿@`GgA`?-]o n'}Xy?`^i'^_~ gڂrCwe(R@@0O6 (^nB5 'gOBju*@0 `܈?W;cP}ܠ࿮p@z}' @#3@C8_^ O f@V@\x 'o  wqBjx;B|7@? AA܂?O?`pַp`TWH<_}y yú1DC G8(!)kx@;` P@` CLᘫ ? ??@6 >ٯ@@X?`w!UAZt߀ ò9@L ?~(e0O$}!V{{\ }t(  u9@ 1&?}(ݻ PWy/< ~'@|Eg$[5 wg}oEIPC?˅ "~$׭ Y)< Opx}rG@(P9Wu8@ /Q]?  88888888888888888889999999998999888888888888888888899899889988998888888888888888888999888888888888888888888888888889988888888888888888888888888888898888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888?}_8Ax  ? ^  (?_ 8_τ$?` @ _8{'  $D  px ?a x >@Pc 8m`p?x@tp   8_@@1@P :_N |~pX@$:O ~3 rBF;O Cڀx@?ŀs4;pJ p.@o`;( 4? `~F>9@4pj2AK_!{?@])?5?n >>isB"h ǀ3`p @;_<?~0?"cr??(?o/ eEHY /'A @ C?.`A`w|n]b UT倹TTUP@EC!UU@9@PUUP@UP  c(1hh 39<,;1?o/ F/> bJ<~ UTa@0 U@`&1 (*k0$z z@H` 0$ Rp8>HV ????yvϪB/?UPUUUUUQ@@AUU@s@UT@U@@@"? P" n@(|@ + $D}|p|="*<`-@tOU@ `~@"U@׈!*(@@# x0"={?D#\e,#q$"*r & --y_PU~?UUUUUUUQ\@-UU@y@P $  xx! PlP#4D @*< z?O C`@~P/^[@@ P>8ߠ*  2U6"*B+`00w ^TKD@piV Ps=~ ۱OGq_T^OC0D u@xQ߰ATUUUUU@~UU@ ~@@@P+L ݎ @@\ n}*u?s > n@ ߿9x|=aT| (!0@/'쀠 @T? )  8888888==========8888888888888888888=======99======/88888888888888==================88888888888=========9999========8888888888============9======/=;;;;8888888=====================;;;;8888888=;;;;;;;;;;;;;;;;;;;;;;;;8888888=;;;;;;;;========;;;;;;888888888888888888888888=8=88888888888888@}_8Ax ? ^  (_?_ 8 τ$?` @8_ {'  p$D x?a  xp>@Pc8m`?x@tp  8_@P@1@:    @@0B(#@;DC: <   <* C; A@@AQUTUPU 10UU@C;p @ DH@*@ cC+ ?p`UUUUUUUUPl!WPPCp o~߀]~ꢪ"j(#>> n  @(UU_UWUUV @!UU#; M*0|@6 Aw  !I`/?H@?(8#p@@X 1P@@?)?oD Bn0 D04 @H>np )@0"?1?Uh'^`d@  >AH@  H?@([0X) FT @`rx' >@ \ PA@F?`(B/ T `.`01P&K > P H00@)Bs  & ?")wN@M$@$.@+ @ pC2 W] FO 9@%?0D@@Bw@k.9 B!-)mLD  888888888888888888888889888888888888O888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888=888888888888888888888888888888888888888888888888888888888888888888888888888888888888888)}_8Ax ? (^  8_?_ τ$?` @8_{'  p$D  ?xa x 8m`p>@Pc?tx@8p  >_@1@P@:  8@2@!P p@%Q: p4 aP ?_5UP !UUG?\; ^` NH`?`0_  8Ao ?;p }0* p pUTBUUo2  ?Io c ҿg8? Џt ? @B FÀ ? p,`h)=#k_ UV `BU5 > Pō>a×8(?   X*2@ ?}, ?? UU` !: UU ?UU:" b~`V4UUTi(UUU( UUUg?p~yuUUW3=P_#~P Ў`D@B ?Ub?`UUUAKUUU$\8EUUUGC?5UUG p W cD@_ | ] ~U` A8UUUɼ_5UUU%|UUUgDUUGHEUn_M  |;UX6FP_UUTR|?5UUU_!8UUUgcм UUgx~}@` !_?gD0`(O|UVN0oLUUUU?R 0}UUUO#UUUS?8PoUUoFF`X8!@\Հ(UU@fUUUU?Q `tUUUO# @SUUUSLUUOD&-w H`vy,@`)UUL??UUUU?(~ UUUO'^s?UUS?@UUO0d%aLiu``X2UU ?v?UUUU(}g UUUOx@ |UUSkZ1[_8I&!P>Ξa{6   88888888888;<8888<<<88888888888888888888<<888<<<<<<<8888888888888888<<<88<<<<<<<888888888888888<<<<<<<<<<<888888888888<<88<<8<<<<<<<8888888888<888<<<<<8<<<<<<88888888888<888<<<<<<<<<<8<<<<<8888888888888888<<<<<<<<<<<<888888888888888888<<<<<<<<<<<88888888888888888888<<<<<<<<<<88888888888888888888888<<<<<<<<8888888888888888888888888888888888888888888888888   @   `    @  ? @@@@ @   @@ @     `  @ @ @`@@ @@     @   @    @@ 0 @   @ @@` @ @ @ @@@@@`@ @  @ @  @@  ?0  @@  @ @@  @ @@@@ @@  `@@@  @`0@   @@@    @@  A@       @      ?  x~  s ??    @ 0 @? !!  ?  ɓ 8<    @@   a"      ?  0  ?A "      S ͳ`?/   @@ A ` @D  $P    S '!    @  IH   ?S     @@    A0      '                >  ?        ?   ? ?        ?   ?                                       8 ?             _           88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888//8888888888888888888888888888//(/8888888888888888888888888888/(((8888888888888888888888888888((((//888888888888888888//((((((/8888888888888888/(((((((((8888888888888888((((((((((//88888888//((((((((((((/888888/(((((((((((((((//((((((((55(((((((++(((((((5555.......++.......5555......((......5555...((((((((...5555((((((((((((((55((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((u?}}}||: ((((((((((`D? ::::::::::`G((((((((((**********`**********?H((((((((((d((((((((((@::::::::::To**********(((((((((( T` wP888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888=888888888=888888888(=88888888(=88888888000000000000000000(/=8888888000000000000000000((=8888888000000000000000000((=8888888000000000000000000(((8888888000000000000000000(((=8888000000000000000000(((0/8888000000000000000000(((0(=888000000000000000000(((0(=888(((((888(((((888(((((/8(((((-8(((((-8(((((-8((((((8((((((8(((((-8W