ZXTape! 0Created with Ramsoft MakeTZXCells  Loader 6:6: "" (*0:0:18,0;:"" 2Save <"Cells"10 F" "  @??????????????????????8??8888p8p8p8888p8p8p8888p88p888p888p88p888p888p88p888p888p88p888p??88p8p8p888p8p8p8 '$$'  '$$' @<<x>B< # $$$$$D$$ @BBDbB # $$$$$D$$ @BBBR@ $ $$$$$$  #D$'@B~BJN $ $$$$$$ ? #D$'???@BBDFB?? # '$$'#???~<Bx>B<???? # '$$'#CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBDDDDDDDDDDDDDDDDDDDDDDDDDDDDBCCBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDBDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDBrDDDDDDFFFFFFFFFFFFFFFFFFFFDDDBrrDDDDDDFFFFFFFFFFFFFFFFFFFFDDBrrtDDDDDDDDDDDDDDDDDDDDDDDDDDDBrrtLDDDDDDDDDDDDDDDDDDDDDDDDDDBrrtLLDDDDDDDDDDBrrtLLHDDDDDDDDDDDDDDDDDDDDDDDDBrrtLLHH8888888888888888888888888888888888888888888888888888888888888888xCELLS CAxC2S$(32 ):0:3:6:0 lS(7):S(3)=1:S(2)=100d:S(1)=10 :T=0:D=1:E=0 (=23658j\,0:A(80P):A(K)=(*K)+1 <:I=48:I,4;2;" ":I:2;7;5,5;" Do you wish to LOAD ";7,4;" a character from tape ";12 ,10 ;1;" Yes or No " PG$="yn":600X:6: ZGS=14000 d 1010 n 5510 sV1=0:RM=0 xEA(1)=3A(2)=3A(3)=3210 1410:1710 RN=A(12 ) GRN=15510:5610:500:R1=2:RM=1 +RN=1:''M$;" arrives":2300 100d !H=A(12 ):D=A(6)*H H"You fell down a ";H*10 ;" foot pit"'"doing ";D;" hp's of damage" +120x:A(6)=1260 OS(2)=S(2)-D:S(3)=S(3)+1:1310:100d 2"At the bottom there ";:S(2)=S(2)-D .R=A(3):D=A(8):RN=A(8) 280+10 *R "5"is a pool of acid ... lose ";D;" hp's!":250 ,_D=RN*A(4):"are some"'"spikes - you hit ";RN;" causing"'D;" hp's of damage":250 63"is ....":5510:5610:500:'M$ JE::S(3)=S(3)+1:200:2800 :100d +A$=M$(1):T1>80000@530 <A$="A"A$="E"A$="I"A$="O"A$="U"M$="an "+M$:530  M$="a "+M$ 2D=D+(4*(D*(S(3)-1))^.5)  X GS=0 b#.08}# =,32 :0:C$= lI=1̱G$ v"G$(I)=C$GS=I:I=G$:640 I GS=0610b   'RN=A(4):800 +10 *RN *" snorting": 4: >" growling": H" howling": D=13 A1=A(7) R=A(100d) A1<5A(D)=A1 S(3)=1((A(1)=3A(1)=5)(A(2)=5A(2)=3))A(3)=1:1090B ,A1=5R<10 A(D)=A1:1090B $1A1=6R<25A(D)=1:1090B .+A1=7R<3A(D)=A1:1090B 8%A1>4A1=A(2):A(D)=A1 BD LD=13 VA(D)=21200 `A(D)=41200 jD t A(D+3)=A(4) A(D+3)=1 A(D+3)=4  5510 0Z1=(D=1):Z2=(D=2):Z3=(D=3) X=114 GA((30*Z1)+(45-*Z2)+(60<*Z3)+(X-1))=A(9 +X) X  ?23692\,-1:''" Your hit points are .. ";S(2) ('" You have spells ...... ";S(1) 2'" You are on level ..... ";S(3) <'" You have gold pieces . ";S(4) F'" Monsters killed ...... ";S(5) P S(6)=01380d Z7" You also have a ";S(6)*25;"% luckstone" d(" Score now ............ ";S(7) n 3000 23692\,-1:''" ";7;4;1;" LEFT ";0;6;" ";4;1;" FORWARDS ";0;6;" ";4;1;" RIGHT ";0 D=13 D>1" "; A(D)=1" Corridor "; A(D)=2" Door "; A(D)=3" wall "; A(D)=4" Room "; A(D)=5" Stairs up"; A(D)=6" Stairs dn"; A(D)=7" Exit "; D  K23692\,-1:'''2;7;" What direction? ":S=0 ['1;7;" Left, Forwards, Right or Status" G$="lfrs":600X eX=031:8;:X:"LEFT"C$="l";"FORWARDS"C$="f";"RIGHT"C$="r";"STATUS"C$="s";S$ D=GS /D=41310:1410:1710 7A(D+3)2A(D+3)31765 0Z1=(D=1):Z2=(D=2):Z3=(D=3) X=114 ?A(9 +X)=A(30*Z1+45-*Z2+60<*Z3+X-1) X 1770*(A(D)=1)+1780*(A(D)=2)+2070*(A(D)=3)+2150f*(A(D)=4)+2370B *(A(D)=5)+2460 *(A(D)=6)+2480 *(A(D)=7)  \'2;7;" Door ... ";6;" ";1;" Open or Listen " G$="ol":600X >X=018:8;:X:"LISTEN ":A=GS &A=12150f 0A=2R1=A(D+3) l'"You hear "; v.R12R13"nothing":1980 R=A(6) "R>2"nothing":1980 '5610:500:M$>14 M$;:800  T'2;7;" Will you open it? ";6;" ";1;" (Y/N) " G$="yn":600X:A=GS A=12160p  7:''1;" ... Chicken! ":1410:1710 J:'"You can't move there dummy!":.3,-20:.6,-30  -A(6)=11410:1710 *'"but as you like walls ..." 4 120x >'"it falls over ..." H/D=A(20):'"you take ";D;" hp's damage" RS(2)=S(2)-D \200:1310 fR1=A(D+3) p:'''"The room "; z$R1=1"is empty":502:  "holds: "; 5R1=25610:500:M$>16: R1=2M$ 9R1=3''"Treasure + ";:5610:500:M$ <R1=4"Treasure":T1=500*S(3):T=0 5(C$="y"C$="o")(R1=2R1=3)2300 t''2;7;" What now .... "''1;" Go in, Leave, Help or Status " G$="glhs":600X YX=132 :8;:X:"GO IN"C$="g";"HELP"C$="h";"STATUS"C$="s";S$:A=GS #A=41310:2210 A=22060  AA=3R1<4'"The monster has ";D;" hp's":2210 .A=3R1=4R1=1:2160p R1=45010 "S=2S=0:40(: ~23692\,-1:''2;7;" Now what .... "''1;" Combat, Spell or Retreat ? " 2G$="csr":600X:A=GS:A=12800 FX=132 :8;:X:"SPELL"C$="s";"RETREAT"C$="r";S$ $/2600( *(A=2)+2350. *(A=3) .OA(6)<3''"TOUGH LUCK ... He attacks you!":70F:2800 3BRM=1:''''"With a burst of cowardly speed..":40(: 8 2060  BS(3)=S(3)-1 LS(3)>0 Vo''"The stairs are blocked!":.3,-20:.6,-30:S(3)=S(3)+1:120x `:1410:1710 !S(3)=S(3)+1: 1:4::3;7,,,,,,,,,,1,8;1;"** WELL DONE **";0;3,4;"** you got out alive **" E=1 1310  (mS(1)<1'"Er... you don't seem to have any":.3,-20:.6,-30:2300 2,S(1)=S(1)-1:S=S+1 <=5610:23692\,-1:''"The spell-blasted ";M$ PH=A(25) ZV10D=V1 dD=D-H nsD<1'"lies dead on the floor":S(5)=S(5)+1:S(7)=S(7)+S(3):5010 x)D>0'"is very angry ";:40( ?A(6)<3"... he attacks!":120x:2800 :V1=D:2300 I5610::500:'"You had a terrific battle with "''M$;" ...." 70F:V10D=V1 6S(2)>D'" and you killed him.":120x tS(2)>DS(5)=S(5)+1:S(2)=S(2)-D:S(7)=S(7)+S(3):5010 ''"but he killed you and took"''"all your treasure!":.3,-20:.6,-40(:S(4)=0:S(2)=0:1310 S(2)04500 E13060 ,S(2)<150S(2)=150 *S(1)<15S(1)=15 ֪S(3)=1:2;7'" Having left the catacombs, you can only enter again at level 1 but your hp's and spells have been replenished. " s''1;7;" Press ENTER to continue ";0;31;" or Q to SAVE character on tape " E1.1}L,32 E=1E=0:I=15:.09}8Q,20:.09}8Q,16:.09}8Q,28:I:.3,26:.5,22 "Z$:6:0:Z$="": Z$"q"3080 :"What is your name?",N$ &PN$>10 5,4;"Please shorten the name":70F:3100 0k:''''" INSERT AND REWIND DATA TAPE"'''" PRESS ";3;7;1;"ANY KEY";:" WHEN READY" D0:N$S() Na::''''" REWIND TAPE, SWAP LEADS, PRESS "'''" PLAY AND ENTER TO VERIFY" X N$:N$S() b>2:1:7::5,10 ;"THAT'S O.K." g10 ,9 ;3;7;1;"*************";11 ,9 ;"*BYE FOR NOW*";12 ,9 ;"*************";:250: "What is your name?",N$ UN$>10 5,2;"Name incorrect ... too long!":70F:4000 K:''''" INSERT AND REWIND DATA TAPE "''''" PRESS ANY KEY WHEN READY" "0::5,10 ;1;" ";6,10 ;" START TAPE ";7,10 ;" ":N$S() : X''2;7;" Will you play again? ";8;" ";1;" (Y/N) " G$="yn":600X GS=1 :3175g R1=240(: '"There are: "; 8R=(((*T1+10 )*A(S(3)/2))^2) @S(6)>0R=R+(((25*S(6))/100d)*R) tR;" gold pieces":S(7)=S(7)-(S(4)/100d)+((S(4)+R)/100d):S(4)=S(4)+R AT=0ƨA(100d)<15+S(3)*25090 T=070F:  X=1T R=A(10 ) HR=1'11 ;"+ a sword":S(2)=S(2)+A(120x) FR=2'11 ;"+ a wand":S(1)=S(1)+A(15) PR=3'11 ;"+ a suit of armour":S(2)=S(2)+A(90Z)  HR=4'11 ;"+ a scroll":S(1)=S(1)+A(12 ) OR=5'11 ;"+ some more spells":S(1)=S(1)+A(8) HR=6'11 ;"+ a potion":S(2)=S(2)+A(75K) (wR=7'11 ;"+ a special artifact":S(2)=S(2)+A(100d):S(1)=S(1)+A(12 ) 2.R=8'11 ;"+ a book":5300 <.R=9 '11 ;"+ a ring":5300 F#R=10 Z=A(6)/2 KTR=10 Z>S(6)'11 ;"+ a ";Z*25;" % luckstone":S(6)=Z Z"A(10 )=15090 dT0X n 120x: FA(2)=1S(2)=S(2)+A(80P):120x: 1S(1)=S(1)+A(10 ):120x:  Z=114 I:A(9 +Z)=A(I) Z  R=A(10 ) P=A(11 ):T=0 5R=1M$="Wraith":D=10 :T1=8000@: 7R=2M$="Vampire":D=20:T1=10000': 6R=3P<65A6010z:M$=M$+" Serpent": $R=4P<65A6110: &$R=5P<65A6310: 04R=6M$="Troll":D=16:T1=6000p: :3R=7M$="Kobold":D=1:T1=300,: D?R=8M$="Ghost":D=32 :T1=8000@:T=1: N)R=9 6510n:M$=M$+" Giant": X5R=10 M$="Hydra":D=502:T1=4000: bMR=11 P<65AM$="Intellect Devourer":D=20:T1=6000p: lER=12 M$="Salamander":D=20:T1=9000(#:T=2: v2R=13 M$="Zombie":D=8:T1=0: ;R=14M$="Aerial Servant":D=40(:T1=0: CR=15M$="Basilisk":D=10 :T1=6000p:T=1: DR=16M$="Beholder":D=42*:T1=15000::T=3: ER=17P<65A6610:M$=M$+" Elemental":T1=0: 6R=18M$="Ettin":D=39':T1=12000.: 8R=19M$="Gargoyle":D=10 :T1=1000: ;R=20M$="Giant Wolf":D=34":T1=12000.: AR=21P<65A67106:M$=M$+" Golem":T1=0: :R=22M$="Hell Hound":D=12 :T1=1000: %R=23P<65A6810: &R=24M$="Were-":6910: DR=25M$="Manticore":D=480:T1=8000@:T=1: BR=26M$="Medusa":D=15:T1=12000.:T=1: QR=27P<65AM$="Mind Flayer":D=480:T1=4000:T=2:  8R=28M$="Minotaur":D=10 :T1=5000: 5R=29M$="Mummy":D=12 :T1=5000:  1R=30M$="Orc":D=2:T1=500: *FR=31M$="Purple Worm":D=568:T1=9000(#:T=2: 4QR=32 P<65AM$="Umber Hulk":D=34":T1=40000@:T=2: >4R=33!M$="Wight":D=8:T1=8000@: HKR=34"P<65AM$="Xorn":D=34":T1=40000@:T=2: R,M$="Hobgoblin":D=6:T1=1000: zR=A(12 ) @R=1M$="Black":D=502:T1=60000`:T=2: @R=2M$="White":D=40(:T1=50000P:T=1: ?R=3M$="Blue":D=60<:T1=70000:T=2: @R=4M$="Green":D=70F:T1=80000@:T=3: 3M$="Red":D=80P:T1=90000/:T=4: R=A(13 ) P=A(19) PR=1P<5M$="Demogorgon":D=95_:T1=100000CP:T=6: LR=2P<5M$="Jubilex":D=80P:T1=810004:T=2: LR=3P<5M$="Orcus":D=105i:T1=150000|:T=7:  M$="Type" ?R=4M$=M$+" VI":D=60<:T1=60000`:T=3 $>R=5M$=M$+" V":D=502:T1=50000P:T=2 .?R=6M$=M$+" IV":D=40(:T1=40000@:T=1 85R=7M$=M$+" III":D=30:T1=300000u B4R=8M$=M$+" II":D=20:T1=20000 N L3R=9 M$=M$+" I":D=10 :T1=10000' V.R3R=A(15)+3:6170 `M$=M$+" DEMON": R=A(16) P=A(17) DR=1P<5M$="Asmodeus":D=110n:T1=170000&: NR=2P<5M$="Baalzebul":D=80P:T1=810004:T=5: MR=3P<5M$="Dispater":D=70F:T1=810004:T=3: KR=4P<5M$="Geryon":D=502:T1=810004:T=2: 8R=5M$="Barbed Devil":D=32 :T1=0: 6R=6M$="Bone Devil":D=35#:T1=0: 7R=7M$="Erinyes":D=16:T1=40000@: ;R=8M$="Horned Devil":D=35#:T1=5000:  DR=9 M$="Ice Devil":D=60<:T1=10000':T=3: ER=10 M$="Pit Fiend":D=65A:T1=12000.:T=4: #R=A(18)+4:6370 nR=A(19) x4R=1M$="Cloud":D=36$:T1=9000(#: 3R=2M$="Fire":D=30:T1=8000@: 4R=3M$="Frost":D=24:T1=8000@: 3R=4M$="Hill":D=16:T1=3000 : 4R=5M$="Stone":D=18:T1=4000: 5M$="Storm":D=42*:T1=10000':T=1: R=A(20) #R=1M$="Air":D=90Z: %R=2M$="Earth":D=65A: $R=3M$="Fire":D=480: M$="Water":D=60<: 6R=A(21) @$R=1M$="Clay":D=30: J%R=2M$="Flesh":D=32 : T$R=3M$="Iron":D=90Z: ^M$="Stone":D=24: D=A(22) 7D>6M$="Hobgoblin":D=6:T1=1000: 4M$="Lich":D=90Z:T1=85000&:T=5: R=A(23) 6R=1M$=M$+"bear":D=10 :T1=2500 : 6R=2M$=M$+"boar":D=12 :T1=3000 : 4R=3M$=M$+"rat":D=8:T1=2000: &7R=4M$=M$+"tiger":D=20:T1=5000: 0*M$=M$+"wolf":D=8:T1=2000:  {36$,100d,5,9 ,100d,6,10 ,100d,6,6,4,4,100d,5 telr sap*hAFM a Flesh GolemZqN# & dPGynC