ZXTape! 0Created with Ramsoft MakeTZXADVENTURE d d523693\,0:0:23624H\,0: n\7;1;10 ,8;"PROGRAM LOADING";13 ,10 ;"PLEASE WAIT" x0,0;:"" )23659k\,1:21,0; "" LOGO @ `0 aq?  J<0?<?7ǀ  000 p0 0?  .><0?<?ec  0  χp0< <?0?<0? ?>7> Mp  0 @ 8D0< <?0?<k0? ??ͳ8~  0 @d۞?7??0???1?  `@ >>$۸?0???ja|`@@8<|q`??<` 1pÃ``x;?|8q8xÃ``f;?|p0a<<aA" !"@A$0a```xA" !"@A$``` !(" @!" !(" @!"?!8<@|P"?!8<@|P" ! !(( @!0" `ÁÀfd` !(( @!0" c @"$@!$ ǁǃ`` @"$@!$ !&fd` @;r?|?# # @;r?|?#GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCDEDEDEDEDEDEDEDEDEDEGGCCCCCCCCCCEDEDEDEDEDEDEDEDEDEDGGCCCCCCCCCCGGGGGGGGGGGGGGGGGGGGGGCCCCCCCCCCGGGGGGGGGGGGGGGGGGGGGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCCFFFFFFFFFFFFFFFFFFFFCCCCCGGCCCCCFFFFFFFFFFFFFFFFFFFFCCCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGCCCCEEEEEEEEEEEEEEEEEEEEEECCCCGGCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG6ADVENTURE >n>>  1983 M.J. Levers n59999_:9500% x9000(# 8000@ 7000X 1000 6000p  130 4x=15:i$=:i$>"4"i$<"9"1020 0x:i$="":2000:timewater1900l  1010 i=i$:od=d:oa=a:d=d+(i=6d<14)-(i=7d>3):a=a+(i=8a<26)-(i=5a>5):a=5d=3keyd=od:a=oa:1010 1d=3a=5key5500|:1900l keyd=kda=kal=scroll:#1;6;" You have found the key ":x=2040(.4L:.01z# =,x:x:key=1 od,oa;(4a$(od+1,oa+1)="")+(6a$(od+1,oa+1)="");a$(od+1,oa+1);7;0;1;d,a;""(i-4):(.1}Ldet)+(.01z# =det),(((kd-d)+(ka-a))det)+(502det)  2000 timewater1900l Nb$=a$(d+1,a+1):b$=""3000 :strength01900l $b$=""5000 .1000 l time=time-1:water=water-(i$<"9"i$>"4"):score=time+water+strength+loot:8;8;18,4;strength;" ";18,12 ;time;" ";18,19;water;" ";18,26;score;" " T .1}L,0 ?x=115:d=c(x,1)a=c(x,2)3040 x: ruin=x Ml=scroll:#1;1,0;" You have entered a ruin.":l=scroll 2#1;1,0;" You see:":l=scroll @c(ruin,3)=-1#1;1,2;"Nothing." _c(ruin,3)=2z=(*20)+2:#1;1,0;z;" gold coins ";6;" ":#1;scroll-288 ,0;"worth ";z*502;" pts.":loot=loot+502*z:water=water+1:2000:502:#1;scroll-288 ,0;"You take the coins...":c(ruin,3)=1:<.8L3900< pc(ruin,3)=3z=(*500)+502:#1;1,0;" some valuable jewels ";3;" ";2;" ";7;"":#1;scroll-288 ,0;"worth ";z;" pts.":loot=loot+z:water=water+1:2000:502:#1;scroll-288 ,0;"You take the jewels...":c(ruin,3)=1:<.63900< oc(ruin,3)#1;1,0;1;" WOW!!! ":x=13:y=305022:.01z# =,y:.01z# =,y-4:y:x:#1;scroll-288 ,0;" A metal detector!!!":100d:#1;scroll-288 ,0;" You take the detector..":502:.1}L,0:c(ruin,3)=-1:det=1:3900< &%c(ruin,3)=14000 <..2~L,-20:.2~L,-24: a#1;1,0;m$(ruin),#1;scroll-288 ,0;"with strength ";s(ruin) Rx=13:.3,-30:.4L,-32 :.3,-35#:x =#1;scroll-288 ,0;" Press A to attack." 'x=1502:="a"4060 x:4070 ܄#1;scroll-288 ,0;" You attack...":z=(*(strength/1.5@))+10 :s(ruin)=s(ruin)-z:#1;scroll-288 ,0;" Enemy's strength is ";s(ruin):.1}L,-7:s(ruin)0#1;scroll-288 ,0;" It is dead..":x=010 :.05|L,x:.01z# =,502-x:x:score=score+200:c(ruin,3)=-1:4900$ 0<.6#1;scroll-288 ,0;" You are attacked...":.2~L,-45-:strength=strength-(*s(ruin)+10 ):water=water+1:2000:strength0#1;scroll-288 ,0;1;" You are killed... ":.73333,-40(:.8L,-43+:4900$ <.08}# =#1;scroll-288 ,0;" Your enemy is stunned...";#1;scroll-288 ,0;"Continue to fight? (y/n)":.2~L,0:.2~L,0:.2~L,0:.4L,-2:502:0:="n"4900$  4040 $ F#1;scroll-288 ,0;" You've arrived at an oasis..." Ex=13:d=o(x,1)a=o(x,2)oas=x:5040 x o(oas,3)#1;scroll-288 ,0;" But the water is all gone...":x=0-10 -1:.1}L,x:x:502:5480h water=water+o(oas,3):o(oas,3)=0:#1;scroll-288 ,0;" There is plenty of water..":.2~L,30:2000 h%.2~L,0:.2~L,-1 r I.1}L,5:.1}L,5:.1}L,5:.4L,10 R5:.1}L,5:.1}L,5:.1}L,5:.4L,10 !x=15:l=scroll:x 5710N:x=14:x$:#1;scroll-288 ,0;x$:10 :y=010 2:.01z# =,y:y:x score=score+1000 x=13:y=030:.01z# =,y:.01z# =,y-10 :y:y=60<40(-1:.01z# =,y:.01z# =,y-10 :y:x Ng" "," "," " X$"YOU HAVE MANAGED TO RESCUE FARAH"   z8:8:x=15:l=scroll:x:"l"+1,23:strength018,0;1;1;" " |:time018,8;1;1;" " ~<water018,15;1;1;" " 0:5 kx=3020-1:y=xx+5:.01z# =,y:.01z# =,y-2:.01z# =,y+10 :y:x +x=110 :l=scroll:6510n y=0:x=140(:x$:254,y:#1;1,1;2;5;x$:4:l=scroll:y=y+(y<4)-(4y=4):x !23693\,71G:0: scorehigh62008 k5;" " x1,0:'" YOU HAVE ATTAINED THE HIGHEST"''" SCORE. PLEASE ENTER YOUR NAME"''" BELOW (12 CHARACTERS MAXIMUM)" <6;"Your name: ";x$:x$=""űx$>12 6090 high=score:h$=x$  6210B 8x=1100d:x BJ.1}L,0:.1}L,0:.2~L,10 :.3,20 L#x$="HIGH SCORE: "+high+" by "+h$ V)'6'((32 -x$)/2);x$ `$'" Press ENTER for another game.." j13 6250j t(.1}L,9 :"l"+1,4 n#" " x#" " #" " #" " #" " #" " #" " )" ",x$,x$ #" " #" " #" " #" " #" " #" " #" " e" ",x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$,x$  b!23693\,40(:5: l1x=118:x-1,0;a$(x):x vx=115:1;4;0;1;c(x,1),c(x,2);" ":x:x=13:1;1;6;0;o(x,1),o(x,2);" ":x 13,5;2;7;1;"" <d,a;7;1;1;1;""(i-4) B18,0;1;7;1,,:8:8 ~18,0;" ST:";strength;18,9 ;"TM:";time;18,16;"WT:";water;18,23;"SC:";score 7510V:x=14:x$:#1;1,0;x$:.1}L,x:10 :l=scroll:x:#1;1,0;0;7;1;"PLEASE PRESS ANY KEY TO CONTINUE":5:0:x=15:l=scroll:x :.1}L,0:.1}L,1:.1}L,2 VR" ST = Your strength"," TM = Time left"," WT = Water left"," SC = Current score"  Js(15):m$(15,20):o(3,3):c(15,3):a$(18,32 ):8510>!:x=117:a$(x):x Ta$(4,6)="" ^x=110 hqy=(*22)+5:z=(*12 )+3:(z<6y<8)a$(z+1,y+1)""8040h rcc(x,1)=z:c(x,2)=y:c(x,3)=1+(*3):a$(z+1,y+1)="":x |<c((*8)+1,3)=0:x=13 ry=(*22)+5:z=(*12 )+3:(z<9 y<12 )a$(z+1,y+1)""8070 do(x,1)=z:o(x,2)=y:o(x,3)=5+(*20):a$(z+1,y+1)="":x x=11 15 qy=(*22)+5:z=(*12 )+3:(z<6y<8)a$(z+1,y+1)""8086 Vc(x,1)=z:c(x,2)=y:c(x,3)=1:a$(z+1,y+1)="":x #x=115:m$(x),s(x):x cloot=0:strength=1000:water=502:time=200:score=strength+water+time+loot -d=4:a=6:od=d:oa=a:i=8 key=0:ka=(*22)+5:kd=(*12 )+3:(ka<16kd<10 )a$(kd+1,ka+1)""8120 det=0 !>" " !H#" " !R#" " !\ " " !f!" " !p!" " !z$" " !!" " !!" " !#" " !"" " !"" " ! " " !#" " !#" " !!" " !$" " !"a giant mantis",570:,"a griffin",850R,"an orc",690,"a dragon",1000,"a giant crab",350^,"a man-eating slug",300,,"a phoenix",700,"a giant spider",550& !"a giant ant",400,"a giant tortoise",200,"a lycanthrope",880p,"Doctor Marko",500,"an evil troglodyte",666,"a giant gorilla",950,"Orville",100d " #2gz$=" " #<`y$=" " #FD1;5;z$''y$'4'" Copyright  1983 M. J. Levers" #P-6;"________________________________" #U<12 ,0;"DO YOU REQUIRE INSTRUCTIONS? Y/N" #V5I$=:I$"y"I$"n".003xD,0:9046V# #Wi$="n"9060d# #Z}9410$:x=191[:x$:#1;1,0;x$:90Z-(502x$=""):l=scroll+scroll:502:x #d"l"+1,4 #n414,0;" PLEASE PRESS ENTER TO BEGIN." #x13 9080x# #).5,-20:14,0,, $" Once upon a time there lived a","beautiful maiden called Farah.","She was hopelessly in love with","the respected and popular Prince","Pastor of Tharl and their wedd-","ing had just been announced.","However, Farah had a secret" $ "admirer called Doctor Marko and","when he heard that she was to","wed the Prince he was filled","with hatred. He decided to kid-","nap Farah and take her to an","island far away from the happy","kingdom of Tharl and the Prince."," The day of the wedding came and" $"just before the ceremony, the","evil Doctor broke into Farah's","room and kidnapped her."," The Prince was heartbroken when","he heard of the abduction of his","future wife and he swore to","find her even if it took him the" $"rest of his life..."," For two years the Prince","searched and then tragedy struck","he was shipwrecked while on his","way across the Charklian Sea to","the land of Krathon. Luckily","he was washed onto an un-","charted island. For several days","he wandered through the under-","growth until he came across a","tower. He looked up and to his","utter amazement he saw Farah","staring from a high window." $H" He quickly caught her attention","and asked how he could rescue","her. She told him that Dr. Marko","had locked her in there and that","he had the key. She also told","him that he had gone off on an","expedition across the island so","he would have to go after him to","get the key.....",""," In this game you play the part" $""of the Prince and you must find","the evil Doctor, take the key ","and unlock the tower's door ","to release your true love."," This may sound simple but there","is a catch - the island is","inhabited by various nasty","monsters who will try to kill","you. You may however fight back." $" You have a limited time to find","the key and rescue Farah - if","this runs out the game ends.","You also have a limited water","supply which may be replenished","at an oasis - ","There are 15 ruins dotted around","the island - You may find","treasure (or nasties!) in these." % " Scoring: Your score is based on","the following factors...","-1- Time remaining,","-2- Water left,","-3- Your current strength, and","-4- The amount of treasure you"," are carrying.","You receive BONUS points if you","rescue Farah and when you find","the key." %q" MOVEMENT: This is achieved via","the cursor keys, 5,6,7 and 8.","When you are attacked you may","fight back by pressing the A key","(without CAPS SHIFT). If you","manage to stun your opponent you","will be asked whether you wish","to continue fighting. Press N","for No or any other key for Yes.","GOOD LUCK... a knighthood awaits","all those who are successful!!!" %"","","","","","" % %&R23658j\,0::0:0:7:23693\,7:0: %+P'''" * CONTRAST SOFTWARE PRESENTS *  |||||| ADVENTURE ISLAND ||||||"''" ****** BY M. J. LEVERS ******"''''"   WHILE I LOAD THE USER GRAPHICS" %-2236066\,96`:236077\,233:"" %0,9710%:x="a""l"+7:y:x,y:x %::scroll="l" %D"high=0:h$="Sir Clive" %7165,y,255,66B,y,90Z,y,126~ %O568,124|,238,206,238,198,124|,568 &G8,28,546,123{,62>,28,8,0 & 50,y,y,192,191,201,0,y &A0,y,16,480,127,480,16,0 & 416,y,y,y,124|,568,16,0 &*40,16,568,124|,16,y,y,y &4?0,y,8,12 ,254,12 ,8,0 &>K126~,66B,98b,66B,78N,98b,66B,126~ &H<112p,138,535,77M,4,y,y,31 &RU0,12 ,513,192,12 ,513,192,0 &f6,12 ,205,0,14,201,0,y & 'D"ADVENTURE"110n:"CHARSET"6e4`,768: >  1983 M. J. LEVERS CHARSET `꾀!((((((((||BH$J P Rv @   T88T @`` @||p||||<|(H|||||||~| @  @  ``|||8D""<""