ZXTape! 0Created with Ramsoft MakeTZXLAND/SAGAN^^s` Z0:0:0:59999_:"":23659k\,0:21,0;:"" LS @T  d& B @@@ @@  x P()P0x @ Z @@@@@ @@  h@  4@RR   @@@  @x  a!@fa* T@L  @  @!  x@"@D @0  @ d  &L@n-@  @8 @  @P)PR ))P0   @<?@ -d Ȁ&  x< @@ @0 !Bx<h @@A@   E9 `( 0|@$   (!@A`0B$~ 0PP?` P8H@fPpPHW<@@b,@8 @,I9@@a F #H @ D@* ˀ @`` B @@a$"@   ?@ E@@@ECZ UHH@ @H@<@e BV@ +CTH@@ @@A*@@ @ DH@ @$ J@yô (  @$ @ 0  ?` @ F> 8d 0@  d$( @@@ @J  @ @@ $@ D @  @  @ @$$ @ IBr @ 'HH @H B@@S B*@ZLS eee923658j\,0:0:0:7:5 L23659k\,0:21,0;:"":23659k\,2:3 :23659k\,2 :11 :z=60000`:i=041):a:i+z,a:i 58:,123{,92\,111o,58:,124|,92\,103g,14,0,17,0,0,6,8,26,190,32 ,8,20,35#,5,32 247,6,0,201,35#,5,32 ,252,12 ,121y,254,21,32 ,229,6,0,14,100d,201 i(4,2):doo=1:ma=0:ex=100d:tr=0:wo=0:st=120x:k=0:set=0:s$(19,22) qswd=0:lc=23659k\:fl=1:a$(30,13 ):a(30):c=4:li=0:sto=0 Xp(3,2):b(10 ,2):w(3,6):w$(10 ):d(31) =x(10 ):y(10 ):m$(39',39'):dd=0  fa=0 "i=130:a:d(i)=a:i #255,34",546,165,86V,212,35#,65A,187,138,240,145,127,76L,165,139,546,199,206,23,149,179,235,37%,29,147,185,147,219,169 Mi=13:j=16:w(i,j)=d((*30)+1):j:i  85004! V:6,0;" Do you want Instructions (y/n) ":g$=:g$""32 !$g$=:g$="y"7000X:36$ "Xg$="n"0;6,0;" Please wait a moment ":36$ # 33! $ 1500:g$="y"7050 %):6,10 ;"Good luck" ' 1300 ( 300, d#k=0:a=140:w=w(c,fl) e f"" g0b=118:" ":b h"" iw=(w)/2:wɺ(w)a n&a=a+5:(w)=0177 x 105i "b=110 :b=3b b,5;"":b: "b=110 :b=3b 10 ,b;"":b: "b=110 :b=7b 15,b;"":b: $b=10 18:b=17b b,10 ;"":b: "b=515:b=8b 5,b;"":b: "b=110 :b=7b b,15;"":b: $b=10 18:b=13 b b,15;"":b: $b=10 19:b=13 b 10 ,b;"":b: Efl=119,12 ;"";1,19;"":189 od=fl/2-(fl/2) c=1fl=3c=3fl=4c=2fl=618-17*(od=0),19-18*(od0);"":189 -1,19;"";18,1;"" c*5+185 2,24;"CASTLE" 3,26;"OF" &4,24;"DEATH":210 2,24;"TOWER" 3,26;"OF" '4,24;"MARKEN":210 2,24;"CASTLE" 3,26;"OF" 4,24;"CELEST" 10 ,23;"FLOOR ";FL  0:23659k\,0 de=(ex/1000+tr/2500 ):le=((e)):14,24;"Rating:";15,27-le;e L20,0;"Stamina ";ST;" ":20,14;"Experience ";EX K21,0;"Wounds ";WO;" ":21,14;"Treasure ";TR $" " $" "; 23659k\,2 B16,24;"Links :";li;17,24;"stones:";sto  4:k=0:set=1280:land of sagan 4z$=" ":y=(*8)+8:i=122 <.353333255 6z$=""y=y-1:y<3y=3:255 z$="":257 8z$=""y=y+1:y>18y=18:253 z$="" s$(y,i)=z$:i >i=122:s$(1,i)="+":s$(19,i)="+":i >i=218:s$(i,1)="+":s$(i,22)="+":i i=13  2x=(*20)+2:y=(*17)+2  s$(y,x)" "266  0s$(y,x)="":p(i,1)=y:p(i,2)=x:i i=12 2x=(*20)+2:y=(*17)+2 s$(y,x)" "274 s$(y,x)="":i =x(c)=(*20)+2:s$(2,x(c))" "278 ^y(c)=1:b(4,1)=1:b(4,2)=x(c)-1:x(c)=x(c)-1 ?set=1::i=119:7;4;s$(i):i !M2,26;"LAND":3,27;"OF":4,26;"SAGAN" " ,#:c=4:250:220 120:8;b(c,1),b(c,2);"" 2k=11350F 3220:1000 4"k=1:fa=1380| 6 l=b(c,1):r=b(c,2) 7 z$=(l,r): 8Ws=(l/8):60012l,s*8+64@:60011k,(l/8-s)*256+r 9at=60000` ;at=4365m @at=5400 Ez$="+"450 Jat=0450 Mat=9 450 Oat=1450 Rat=3550& Tat=2380| Wz$="."500 Y"at=6at=7700 [c5360h ^ab(c,1)=20b(c,1)=0:ma=ma+2:y(c)=0:1200:3051 `cb(c,1)=-1b(c,1)=19:ma=ma-2:y(c)=19:1200:3051 bcb(c,2)=-1b(c,2)=19:ma=ma-1:x(c)=19:1200:3051 dab(c,2)=20b(c,2)=0:ma=ma+1:x(c)=0:1200:3051 h2000:8;y(c),x(c);w$(c):y(c)=b(c,1):x(c)=b(c,2):w$(c)=z$:z$=""w$(c)=(at+144):3051 i 3051 mci=13:b(c,1)+1=p(i,1)b(c,2)+1=p(i,2)370r pi r'c=i:fl=1:100d:w$(c)=" " wWb(c,1)=18:b(c,2)=12 :x(c)=12 :y(c)=18:3051 |Ufa=0:b(4,1)=y(4):b(4,2)=x(4):300,  c=5 Vy(c)=(*37%)+2:x(c)=(*37%)+2:m$(y(c),x(c))" "405 U:ma=0:1200:b(c,1)=y(c):b(c,2)=x(c):w$(c)=" ":3051 p23659k\,0:22,0;"You cannot go in that direction":b(c,1)=y(c):b(c,2)=x(c) -dl=4:800 :220:3073  &323659k\,0:fls=fl/2-(fl/2) )!b(c,1)>55600 +fls05622 -C22,0;"Do you wish to go down":do=2:5655 0fls0557- 2A22,0;"Do you wish to go up":do=1:5655 5""5655 7,="y"do=1fl=fl+1:580D 8,="y"do=2fl=fl-1:580D :C="n"220:b(c,1)=y(c):b(c,2)=x(c):3073 = 5677 DR220:100d:w$(c)="":y(c)=b(c,1):x(c)=b(c,2):3051 2000:8;y(c),x(c);w$(c):y(c)=b(c,1):x(c)=b(c,2):8;b(c,1),b(c,2);"":w$(c)=(at+144) ƹwo0lc,0:22,0;"The river of faith heals your wounds";:lc,2:wo=(wo-*20-5):wo=wo-wo*(wo<0):dl=3.5`:800 :3073  3073  'i=0dl*20:i:220: g$= *fa=0:g$"s"c51010 Ti=14:i(i,1)=b(c,1)i(i,2)=b(c,2)1007 i:doo=51008 <.92k1008 Ki(doo,1)=b(c,1):i(doo,2)=b(c,2):doo=doo+1 `lc,0:22,0;"You find an exit":dl=4:800 :fa=1:3084 rlc,0:22,0;"No exit here";:>.8L" but";:dl=4:800 :1400x:3073 #dl=4:800 :1000 7g$="y"b(c,1)=b(c,1)-1:1030 Zg$="u"b(c,1)=b(c,1)-1:b(c,2)=b(c,2)+1:1030 7g$="j"b(c,2)=b(c,2)+1:1030 Zg$="m"b(c,1)=b(c,1)+1:b(c,2)=b(c,2)+1:1030 g$="!"8600! 7g$="n"b(c,1)=b(c,1)+1:1030 Zg$="b"b(c,1)=b(c,1)+1:b(c,2)=b(c,2)-1:1030 7g$="g"b(c,2)=b(c,2)-1:1030 Zg$="t"b(c,1)=b(c,1)-1:b(c,2)=b(c,2)-1:1030  1000  3084  ""1050 3i=1502:g$=:g$=""i:tsl=1: tsl=0: #k=0:ma01240 y(c)>201225 x(c)>201220 ma=1:1237 ma=2:1237 x(c)>201235 ma=3:1237  ma=4 6y(c)=y(c)-1:y(c)>19y(c)=y(c)-19 6x(c)=x(c)-1:x(c)>19x(c)=x(c)-19  )0:6:ma*5+1240 N0,0;:i=120:m$(i,120):i:1265 O0,0;:i=120:m$(i,2039'):i:1265 O0,0;:i=2039':m$(i,120):i:1265 P0,0;:i=2039':m$(i,2039'):i:1265 g0:7:2,23;"MAZE OF";3,25;"THE";4,21;"BLACK ORDER"   1320( #i=125:a$(i),a(i):i ("5Fiend",15,"5Shade",20,"8Skeleton",22,"8Gargoyle",40(,"6Dragon",557,"3Imp",15,"5Ghost",20,"8Skeleton",22,"6Zombie",24,"6Wraith",0 --"6Zombie",24,"8Gargoyle",40(,";Ring Wraith",0,".85Y1400x U drd<.1}L1390n f23659k\,0:22,0;"A hoard of gold";:23659k\,2:tr=tr+(c*fl**20+100d):dl=2:800 : n23659k\,0:22,0;"A precious stone":23659k\,2:tr=tr+(c*fl**35#+100d):dl=2:800 : xN:1:23659k\,0:22,0;"Thou hast found an evil " z/c=2fl=6rd=10 :1410 |Qrd=(*5)+c*5-4:rd>c*5-3ƥ<.75@1404| va=a$(rd)-47/ +a$(rd,2va);:dl=8:800  de=rd:mst=a(rd) Bmst=0mps=(30*fl^.3/(+1)):1445 ?mps=0:mst=((st*.2~L)+mst*fl^.2~L/(+1)) Gex1=((mst+mps)*(fl^2+(2-(c=4))^2.2 )/4) 5e=(ex)/(10 )*2:<.51600@ R1:23659k\,0:22,0;"Attack or Retreat";:lc,2  1050 g$="r"1494 tsl=11495 g$"a"1600@ Zlc,0:1:22,0;"****Strike Quickly****";:lc,2:1050 tsl=11495 g$="r"1490 mst=0mps0swd=0lc,0:22,0;"Your sword is of no use here ";:lc,2:dl=4:800 :1600@ 'st=st-2:st09900& rd= Ig$="h"(rd<.5+e/80Pst>4*mst)fac=1:1480 Jg$="b"(rd<.73333+e/80Pst>4*mst)fac=.73333:1480 ]lc,0:22,0;"You missed it !!";:dl=5:800 :1600@ sda=((((st*)/3.5`)+e+((100d-wo)/10 ))*fac/1.2)-10 +swd*8:da<0da=0 nda=0lc,0:22,0;"You hit it but no damage....";:dl=4:800 :1600@ mst=0mps=mps-da:lc,0:22,0;1;"A hit doing ";da;" damage";:dl=4:800 :lc,2:mps0lc,0:22,0;:1;"Killing the ";a$(de,2va):lc,2:ex=ex+ex1:dl=5:800 : mst=01600@ mst=mst-da:lc,0:22,0;1;"A hit doing ";da;" damage";:dl=4:800 :lc,2:mst0lc,0:22,0;:1;"Killing the ";a$(de,2va):lc,2:ex=ex+ex1:dl=5:800 :  1600@ mst=0mps0da=(*13 )+5:lc,0:1;22,0;"A lightning bolt hits you as youflee doing ";da;" damage ";:wo=wo+da:lc,2:wo100d9000(# %mst=0mps01493 ԥda=(*15)+4:lc,0:22,0;"The creature hits as you flee inflicting ";da;" wounds";:lc,2:wo=wo+da:wo100d9000(# dl=8:800 : Olc,0:22,0;"You miserable coward";:lc,2:1493 jlc,0:22,0;"***** Too slow *****";:lc,2:dl=4:800 :1600@ qlc,0:22,0;"Too slow the creature hits again";:lc,2:dl=4:800 :1600@ Hi=139':m$(i)="":i 4xp=(*37%)+2:yp=(*37%)+2 k=1100d !dist=(*7)+5:rd= %rd<.25~dd21570" $rd<.5dd11555 %rd<.75@dd315851 dd=41515 Vi=1dist:m$(yp,xp)=" ":xp=xp+1:xp=39'xp=xp-1:1550  i dd=3:k: Vi=1dist:m$(yp,xp)=" ":yp=yp+1:yp=39'yp=yp-1:1565 i dd=1:k: "Ui=1dist:m$(yp,xp)=" ":yp=yp-1:yp=1yp=yp+1:1580, 'i ,dd=2:k: 1Ui=1dist:m$(yp,xp)=" ":xp=xp-1:xp=1xp=xp+1:1595; 6i ;dd=4:k: @c1:lc,0:22,0;"The creature attacks";:lc,2:dl=4:800  E%mst=0mps01730 J*mst=mst-1:mst11620T O1:lc,0:22,0;"Callapsing in the attempt";:lc,2:ex=(ex+ex1/1.5@):dl=4:800 : TRrd=(*15):lc,0:22,0;:1:rd*5+1630^ ^-"Your sword deflects the blow";:1720 c/"Your armour protects your skin";:1720 h'"A quick jump saves you";:1720 m-"A wild thrust ... but misses";:1720 r("But stumbles and misses";:1720 w,"It swings at you but misses";:1720 |/"A hit in the head";:fac=2:1705 1"A blow to your head";:fac=2:1705 0"A hit to your body";:fac=1:1705 4"A thrust to your chest";:fac=1:1705 3"A strike to your side";:fac=1:1705 3"It stabs at your side";:fac=1:1705 8"A strike to your left arm";:fac=.73333:1705 7"A blow to your sword arm";:fac=.73333:1705 -"Your right arm takes a hit";:fac=.73333 Clc,2:da=(((mst*10 *)-(st/10 )-e)*fac/28) Qda0lc,0:22,0:"Bruised but no damage";:1720 gwo=wo+da:lc,0:22,0:1;"You take ";da;" damage";:wo100d9000(# /lc,2:dl=4:800 :1458 ]1:lc,0:22,0;"A lightning bolt streaks towardsyou";:lc,2: 1da=(*10 )-3:dl=4:800  !mps=mps-(da1)*da/3 mps01615O n1:da0lc,0:22,0;"But just misses you";:dl=4:800 :1458 Glc,0:22,0;"It burns into your chest";:1715 -st=st+5:st>120xst=120x:  4special finds >%c=1fl-2li2150f C1c=2li=6flsto+12160p H0c=3li>1flli-12150f MHswd=0c=5ex/1000+tr/2500 >302190 R@ex/1000+tr/2500 >100drd<.85Y2170z \;rd=.3-(>.5)*.25~:1380d:3073 fdl1=0:lc,0:22,0;"You have found a link ":li=li+1:li=6"This is the final one";:dl1=5 k&dl=5+dl1:800 :3073 plc,0:22,0;"You have found a bracelet stone":sto=sto+1:dl=5:800 :sto=6lc,0:22,0;1;"The final stone. The Bracelet glows in your hand":dl=10 :800 :3073 u 3073 z!lc,0:22,0;1;" THE STAFF OF HEALTH WELL DONE YOUR QUEST IS OVER ";:lc,2:z=1100d:ex=ex+(*10000')+200:wo=wo-(*20):wo=wo*(wo1):20,25;ex;21,9 ;wo;" ";:.005y# =,.5:z |i=1300,:i elc,2::"YOU FINISHED YOU ADVENTURE WITH THE STAFF OF HEALTH" #swd=1"THE SWORD OF SAGAN" 2sto=6"THE COMPLETE BRACELET":2180 >li;" LINKS OF THE BRACELET "';sto;" STONES OF THE BRACELET" M"AN EXPERIENCE OF ";ex'"TREASURE AMOUNTING TO ";tr;" GOLD PIECES" 3"AND A RATING OF ";(ex/1000+tr/2500 )  "WELL DONE MASTER OF DESTINY"  2186 lc,0:1;22,0;"You have found the sacred sword of Sagan":lc,2:swd=1:dl=15:800  lc,0:22,0;1;"The sword glistens in your hand and feels light but strong":dl=15:800 :3073 5i:va=a$(i)-47/:a$(i,2va):5000 X0:0,0;" LAND OF SAGAN" bt';"Your quest in the Land of Sagan is to find the long lost Staff of Health This Staff was enchanted by a group from the Black order and has unlimited healing capabilities. The holder of thisstaff is therefore unable to contract any disease or illness or be injured in any way. That is your quest to find the lost staff" g';"The staff being so powerful willnot show itself to a novice adventurure you will need a rating of 100 before you are able to find it in one of the castles or in the maze or in thetower of Marken" hU23659k\,0:22,0;"Please wait a moment";:23659k\,2 l <lc,0:22,0;"Press any key to continue"; =""7052  lc,2 ?2,0;"During your quest you will meet many monsters. If you have surprise you will be asked attack or retreat press 'a' for attack or press 'r' for retreat if you do not have the surprise then the attacking monster will hit first. Once you attack you will be asked to Strike Quickly there isa time limit so you must press 'h' to attack the head or press 'b' to attack the body Attacking the head will do more damage but you are less likely to hit the head than the body "; u19,0;"You may retreat during a fight but the monster will have a clean hit at you as you flee "; <lc,0:22,0;"Press any key to continue"; =""7062  lc,2 2,0;"To move yourself '' use the following keys T Y U G J B N M To move into a castle '' just walk in to it, the same with the entrance to the maze '' The river '' has strong healing properties if you wash in it. The maze is magical and when youenter the maze you will appear at a different place each time to leave the maze use 's' to search for the exit. The maze isdisplayed a quarter at a time soto go to the next walk of the edge of the maze "; <lc,0:22,0;"Press any key to continue"; =""7071  lc,2 2,0;"Treasure there are two main treasures to be found The Bracelet of life and The Sword of Sagan The Bracelet was enchanted by Lord Sagan himself and has the power to ressurect the holder but only once it will then vanish and will have to be foundagain. The 6 links in the two castles and the stones in the tower. The links must be found in order the first two being found in the castle of Death. The sword is also enchanted and provides the only way to kill the wraiths which hide in the tower. The sword is hidden in the maze "; <lc,0:22,0;"Press any key to continue"; =""7079  lc,2 2,0;"In the castles there are steps going from floor to floor '' You will be asked if you wish togo up or if you wish to go down answer Yes to use the steps or Noto stay on the same floor To save the game type '!' You cannot save a game when you are fighting but can save it at any other time And don't forget if your wounds reach 100 your dead! Good luck and don't try to do to much until you have a fair bit of experience "; 'k$=" " 'lc,0:i=15:k$;:i 022,0;"Press any key to continue"; =""7099 lc,2: @Flc,2:"wo";wo:"ex";ex:"tr";tr:"li";li:"sto";sto:3073 !4Y:6;2;" Do you wish to start a saved game (y/n) " !>d$=:d$""8510>! !Cd$=:d$=""8515C! !Dd$="y"8521I! !Ed$="n"32 !H 8515C! !I1300:4,0;" START TAPE WITH SAVED GAME ON": "num"v():6,0;" LOADED 1st OK ":5,0;:"str"v$():7:6,0;" STOP TAPE":set=1:k=0 !J\do=v(90Z):ma=v(491):i=13:p(i,1)=v(491+i):p(i,2)=v(524+i):i:i=110 :x(i)=v(i):y(i)=v(i+10 ):b(i,1)=v(i+20):b(i,2)=v(i+30):i:c=v(480):ex=v(41)):tr=v(42*):wo=v(43+):st=v(44,):li=v(45-):sto=v(46.):fl=v(47/) !K~i=119:s$(i)=v$(i):i:i=110 :w$(i)=v$(i+19):i:i=139':m$(i)=v$(i+29):i !Mi=16:w(1,i)=v(60<+i):w(2,i)=v(66B+i):w(3,i)=v(72H+i):i:doo=v(80P):i=14:i(i,1)=v(80P+i):i(i,2)=v(84T+i):i !RJc=4250:8;b(c,1),b(c,2);"":3073 !\c<4100d:b(4,1)=x(4):b(4,2)=y(4):8;b(c,1),b(c,2);"":3073 !fb(4,1)=x(4):b(4,2)=y(4)::1200:8;b(c,1),b(c,2);"":3073 !7:lc,0:22,0;" SAVE ROUTINE INITIATED ";:lc,2 !Yv(90Z):v(491)=ma:i=13:v(491+i)=p(i,1):v(524+i)=p(i,2):i:i=110 :v(i)=x(i):v(i+10 )=y(i):v(i+20)=b(i,1):v(i+30)=b(i,2):i:v(480)=c:v(41))=ex:v(42*)=tr:v(43+)=wo:v(44,)=st:v(45-)=li:v(46.)=sto:v(47/)=fl !i=16:v(60<+i)=w(1,i):v(66B+i)=w(2,i):v(72H+i)=w(3,i):i:v(90Z)=do:v(80P)=doo:i=14:v(80P+i)=i(i,1):v(84T+i)=i(i,2):i !v$(68D,39'):i=119:v$(i)=s$(i):i:i=110 :v$(i+19)=w$(i):i:i=139':v$(i+29)=m$(i):i !"num"v():"str"v$(): !tlc,0:22,0;" VERIFY (Y/N) ";:lc,2 !="n"8645! !"y"8630! !:2,0;"IF READ ERROR OCCURS TYPE 'GO TO 8600' TO SAVE AGAIN REWIND TAPE AND START PLAYING";:7:""v():""v$() !3:6,0;" Continue playing (y/n) " !=""8650! !="y"8530R! ! ="n" ! 8650! #(qlc,2:0:21,9 ;"100":1:150::sto=66,0;5;0;"The Bracelet of Hope saves your worthless life and vanishes ":wo=0:st=120x:li=0:tr=0:'';" Go back to the Land of Sagan And take more care Press any key to continue ": #*sto690102# #-Jx(4)=(*20)+2:s$(2,x(4))" "9005-# #/sto=0:1:0:y(4)=1:b(4,1)=1:b(4,2)=x(4)-1:x(4)=x(4)-1:w$(4)=" ":300, #26,0;2;7;" The Land of Sagan defeats you Another adventure (y/n) " #<=""9020<# #F="y"6 UDG XR~~``0`@99}(lUUUU&d@@@@@~BfZBBBBbRJFB