ZXTape! 0Created with Ramsoft MakeTZXSTAR-TREK 1%10/9/82Impact Software *32767:7:7:0: :'" STAR TREK" (,"Level?";x:x<1x>10 40( <6l=524-(x*2):m=(2000-(130*x)) F=a(64@):b(3):c(3):d(7):r(3) Pk(x)=(*x)+1 Z$e=5000:f=8:h=0 d's=0:g=3000 +k(500) n!h=0:i=0:j=0 s a=164@:ll=0 xn=k(100d) n<5ll=1:j=j+ll ,o=k(m):p=0:o>119w160 p=(o/40()+1:i=i+p a(a)=100d*p+10 *ll a 3a=164@:x=k(3):a(a)=a(a)+x:a 2370B <x=k(8):y=k(8):u=k(8):v=k(8) ra(x+(y-1)*8)=(a(x+(y-1)*8))a(x+(y-1)*8)=a(x+(y-1)*8)+.5 (:a=18:b=18 "".";:b:a:a , "12345678" 69dh=(a(x+(y-1)*8)):dh<100d360h J@xx=(dh/100d):a=1xx:b=k(8):c=k(8) Tb=vc=u330J ^Nr(a)=b*10 +c:c-1,b-1;"K":c(a)=k(200)+450:a hD((dh-(((dh/100d))*100d))/10 )1370r mu-1,v;"B":h=1 rz=dh-(dh/10 )*10 |[a=1z:b=k(8):c=k(8):b(a)=c*10 +b:c-1,b-1;"*":a u-1,v-1;"E" 723692\,255:0,0;''''''''''" " h=12320 dh<100d710 "Klingon Attack" /a=13:r(a)=0a:620l +h=05600 ,8"Starbase protects Enterprise.":2320 :710 0Sb=3040(:.04|# =,b:b:b=40(30-1:.04|# =,b:b :-t=(c(a)/k(5)):t=0t=1 DXt;" Units from Klingon at x:";:c=(r(a)/10 ):d=r(a)-c*10 :d;"y:";c:e=e-t ]3t>199z=k(7):d(z)=d(z)+k(3) ba le<1630v m,z=17:d(z)0910 qz:710 v:b$="***BANG***" w3,0;" ";:a=110 :.1}L,-20-a:b$(a);:a:''"The Enterprise now destroyed." ,"Another game?";a$:a$<1680 #a$(1)="Y"a$(1)="y" >:0:7:0:10 ,10 ;"GOODBYE!":  "Orders?" $a=125:r$=:r$=""a dh<100d770 9a=2030:.02{# =,a:a:r$=""715 r$=""715  r$="e"r$="E"700 r$="s"r$="S"260 r$="r"r$="R"1020  &r$="w"r$="W"h=0:1570" *&r$="t"r$="T"h=0:1980 4r$="p"r$="P"13302 >r$="l"r$="L"1120` Hr$="g"r$="G"1260 R 715 z=1"WARP ENGINES"  Z=2"TORPEDO TUBES" Z=3"PHASERS" %Z=4"LONG-RANGE SCANNER" #Z=5"COMPUTER DISPLAY"  Z=6"UPPER SHIELDS" "Z=7"LOWER SHIELDS" d(z)=0 3"Damaged.":d(z);" STARDATE";:D(Z)1"S"; " FOR REPAIR.": :"STARDATE ";G '"Time Remaining:";l:"Alert Status:"; -h=1"Docked":2320 :1090B $4l<6e<2501 2;"RED":1090B .*l<11 4;"GREEN":1090B 80;6;"YELLOW" B<"Klingons:";i:"Energy:";e:"Torpedoes:";f:"Starbases:";j V(dh=a(x+(y-1)*8):510 `I:23692\,255:z=4:940:d(z)01110V t 1170 ~?a<1b<1a>8b>8a$="000":1165  a$=(a(a+(b-1)*8)) ra(a+(b-1)*8)=(a(a+(b-1)*8))a(a+(b-1)*8)=a(a+(b-1)*8)+.5 =w=(a$):w<10 x$="00"+a$(1):a$=x$:1165 Fw>9 w<100dx$="0"+a$(12):a$=x$:1165 #a$=a$(13):" ";a$;: &a=x-1:b=y+1:1150~ a=x:1150~ a=x+1:1150~  :a=x-1:b=y:1150~ a=x:1150~ a=x+1:1150~: &a=x-1:b=y-1:1150~ a=x:1150~ 'a=x+1:1150~::1110V I:23692\,255:z=5:950:d(z)01110V 5a=81-1:b=18:zz=a  Ba(b+(a-1)*8)ɺ(a(b+(a-1)*8))1310 "?";:1320( 5a(b+(a-1)*8)>99c"K";:1320( #"."; (gb:zz:a:"12345678":10 -(y+1),x-1;"E":0,0;''''''''''" ":1110V 2I:23692\,255:z=3:930:d(z)01110V F7"Units to fire?";z:1420:z=01110V P(z<1000+k(200)1390n Zf"Phasers overloaded!":e=e-(z/3):d(3)=k(3):d(3);:1005:1110V n0a(x+(y-1)*8)>100d1450 x6"Fired at empty space.":e=e-(z/3):710 (e+10 )>z/3 #"Not enough energy.":z=0: a=13 r(a)=0a:1110V qb=(z/k(5)):b;" Units hit klingon at x:";:c=(r(a)/10 ):d=r(a)-c*10 :d;"y:";c:c(a)=c(a)-b c(a)>11550 R(A)=0:"***DESTROYED***":s=-30-10 :.05|L,s:s:a(x+(y-1)*8)=a(x+(y-1)*8)-100d:i=i-1:i=01900l  1460 C"**DAMAGED**":s=2030:.02{# =,s:s:a:1110V "/:23692\,255:z=1:910 ,;"Sector distance?";iq:iq<0iq>64@1580, 6+d(1)0iq>21610J @ 1630^ J"Two at most.":1580, ^ e>(iq*iq/2)1660| h "Not enough fuel.":1580, iq=01110 V 7"Course?(0-360)";s:s<0s>360h1700 s=360h-s:s=s/180 b=(iq*(s*)):c=(iq*(s*)) !b>-1b<1b=0 !c>-1c<1c=0 u=u+c:v=v+b:6000p (u)uu=(u) (v)vv=(v) <e=e-(iq*iq/2):l=l-1:g=g+1:2340$ 4a=17:d(a)0d(a)=d(a)-1 a:l=01850: 5x<1y<1x>8y>81810  260 g:"COMPUTER PRINTOUT:You left the galaxy.I brought you back.":a=1199:a:240 :I:".Time ran out.The ";i;" remaining":i=1"klingon":1890b D "klingons" b$"took over the galaxy.":675 lT:"You succeeded in your mission.":l<3"You only just made it.":675 l>9 1970 &"You did so efficiently.":675  "A good,quick job.":675 6z=2:920:d(2)01110V f>02020 !"Out of torpedoes.":1110V  f=f-1 6"Course(0-360)";z:z<0z>360h2030 a=18:r=u:s=v:r=r+((((360h-z)/180)*)*a):s=s+((((360h-z)/180)*)*a):(r+s*10 ); 45b=13:(r+s*10 )=r(b)2270 pb:a:" MISS":1110V :r(b)=0:" HIT":i=i-1:i=01900l v"Klingon destroyed.":a=1502:a:a(x+(y-1)*8)=a(x+(y-1)*8)-100d:1110V ?s=17:d(s)=0:s:e=5000:f=8: $.5,0:.2~L,5:.73333,10 :.5,9 :.5,5:.5,2:.5,7:.73333,12 :.73333,16: B=:"Klingons:";i;" Starbases:";j:'" HIT A KEY TO START" L=""2380L V 240 pv<9 6100 z&v=v-8:x=x+1:6000p v>062008 &v=v+8:x=x-1:6100 8u<9 6300 B&u=u-8:y=y-1:62008  u>0 &u=u+8:y=y+1:6300 bThe Quest =  3/9/82 by Ian Richards for Impact Software wm(41)):b(2):a$(11 ,13 ):b$(8,12 ):s(12 ):g(6):e(2):n(2) =:8,3;"Play,Load,Save or End?" 236099\,100d: n$=:n$=""20 n$="E"n$="e" *n$="e":9 ,10 ;"GOODBYE!": !n$="L"n$="l" %n$="P"n$="p" 'n$="S"n$="s" (n$="l"9600% 2n$="s"9500% <n$="p"80P F 20 P-::"Please wait.":"Setting up the rooms." Z*a=62000063500 :a,36$:a dn=13379 nb=(1500*)+620000 xb<63200110n b,28:n=n-1 a=2933! b=(*1500)+620000 b36$150 )b,a:n=n-1:0,0;n:a (a=114:b=1513 c=(*1500)+620000 c36$190 2c,a:n=n-1:0,0;n;" ":b:a )a=1526:b=1513 c=(*1500)+620000 c36$230 2c,a:n=n-1:0,0;n;" ":b:a a=15 c=(*1500)+620000 c36$270 "5c,27:n=n-1:0,0;n;" ":a 6Z"rat.","giant-spider.","vampire.","devil.","werewolf.","scorpion.","hobgoblin.","demon." @$"cyclops.","gargoyle.","minotaur." JX"ruby red.","emerald.","pearl.","diamond.","black pearl.","saphire.","onyx.","zyrcon." Ta=111 :a$(a):a ^a=18:b$(a):a Eb(1)=5:c=3:d=1000:l=1:f=300, Ga=16:g(a)=35#+((200*)+1)/10 :a &a=0:o=0:p=0:q=0:r=0:t=0:u=0:v=0:w=0:x=0:y=0:z=0 X*:e(1)=8:n(1)=1 b?23674z\,0:23673y\,0:23672x\,0 l%23692\,255:"Next move?" v'" E:-Elixir" '" M:-Move on" '" U:-Update" '" X:-Exit" n$=:n$=""660 n$="E"n$="e" n$="M"n$="m" n$="X"n$="x" 23692\,255 s(4)=0 n$="x"10 n$="e"8204 n$="U"n$="u"720 !n$="m"a=a+1:1060$  660 2:"Food:>";g(1);" Drink:>";g(2) @s=65536*23674z\+256*23673y\+23672x\ s(3)=(s/(502*60<*60<)):s(4)=((s-(502*60<*60<*s(3)))/(502*60<)):j=s-((s(3)*502*60<*60<)+(502*60<*(s(4)))) <j=(j/502): "Time:>";s(3);":";s(4);":";j '"Precious stones:>";o 3'"Strength:>";g(3);" Stamina:>";g(4) '"Intelligence:>";g(5) '"Dexterity:>";g(6) #'"Gold pieces:>";d;" Elixirs:>";p #'"Flares:>";c;" Spells:>";q  '"No. of moves;>";a '"Monsters killed:>";r  9'"Arrows:>";b(1);" Magic arrows:>";b(2) *'"Next move?":660 4$:"Do you want to take an elixir?" >n$=:n$=""830> Rn$="n"810* Wn$="Y"880p \n$="y"880p an$="N"810* f 830> pp>0900 z8'"Unfortunately,you don't have anyelixirs.":810* :"For what?"  '''" 1)Strength" '" 2)Stamina" '" 3)Dexterity" '" 4)Intelligence" '" 5)Food" '" 6)Drink" n$=:n$=""970  p=p-1 )n$="1"g(3)=100d:810* )n$="2"g(4)=100d:810* )n$="3"g(6)=100d:810* )n$="4"g(5)=100d:810* )n$="5"g(1)=100d:810* )n$="6"g(2)=100d:810*  970 $C23692\,255::'"(x,y)=(";e(1);",";n(1);")" 8"f>0l=1:1110V B*l=0:'"You no longer have a lamp." L"It has burnt out." V''" N:>North" `'" S:>South" j'" W:>West" t'" E:>East" ~$l=1'" L:>Lamp" n$=:n$=""1160 n$="N"n$="n" n$="S"n$="s" n$="W"n$="w" n$="E"n$="e" n$="L"n$="l" 3n$="n"n(1)=n(1)+1:1240 3n$="s"n(1)=n(1)-1:1270 3n$="e"e(1)=e(1)+1:1300 3n$="w"e(1)=e(1)-1:1320( !n$="l"f=f-1:1340<  1160 Mn(1)>60<"Dead end.":n(1)=n(1)-1:1260  1960 "Next move?":1160 ?n(1)<1e(1)=8h=11 :1970 An(1)<1n(1)=1:"Dead end.":1260  1960 5e(1)>25e(1)=e(1)-25  1960 (4e(1)<1e(1)=e(1)+25 2 1960 <$l=0'"No lamp.":1260 F$:'"Shine it in which direction?"; K.n(2)=n(1):e(2)=e(1) Pn$=:n$=""1360P Qn$="N"n$="n" Rn$="S"n$="s" Sn$="W"n$="w" Tn$="E"n$="e" Z3n$="n"n(2)=n(1)+1:1420 d3n$="s"n(2)=n(1)-1:1450 n3n$="e"e(2)=e(1)+1:1500 x3n$="w"e(2)=e(1)-1:1520  1360P !n(2)>60<1440  1540 +n$:"That way is a dead end.":1110V 3n(2)<1e(2)=81480  n(2)<11440  1540 :'"That way is the exit,guarded by the dreaded minotaur."  1110V 5e(2)>25e(2)=e(2)-25  1540 4e(2)<1e(2)=e(2)+25 n$ 5'"That is chamber (";e(2);",";n(2);")." M(61999/+e(2)+(n(2)-1)*25)>9 1570" *'"There is a monster there.":1110V "N(61999/+e(2)+(n(2)-1)*25)>1715906 ,7'"There you will find a precious stone.":1110V 6N(61999/+e(2)+(n(2)-1)*25)>181610J @7'"There are some gold pieces there.":1110V JN(61999/+e(2)+(n(2)-1)*25)>191630^ T9'"In that direction you will find elixirs.":1110V ^N(61999/+e(2)+(n(2)-1)*25)>201650r h.'"A cross lies in that chamber.":1110V rN(61999/+e(2)+(n(2)-1)*25)>211670 |7'"You shall find a magic-ring there.":1110V N(61999/+e(2)+(n(2)-1)*25)>221700  '"There you shall find one of" $"Odin's thunderbolts.":1110V N(61999/+e(2)+(n(2)-1)*25)>241720 7'"There you will find food,or drink.":1110V (61999/+e(2)+(n(2)-1)*25)<200ƾ(61999/+e(2)+(n(2)-1)*25)>251740 0'"In that direction lies a chest.":1110V N(61999/+e(2)+(n(2)-1)*25)>261770 >'"There is magic to be found in that chamber.":1110V N(61999/+e(2)+(n(2)-1)*25)>271800 >'"There is a trader waiting in that chamber.":1110V N(61999/+e(2)+(n(2)-1)*25)>281820  1560 N(61999/+e(2)+(n(2)-1)*25)>3018400 & 1580, 0N(61999/+e(2)+(n(2)-1)*25)>32 1860D : 1750 DN(61999/+e(2)+(n(2)-1)*25)>33!1890b N$'"In that chamber lies the mighty" X'"hammer of the god Thor.":1110V bN(61999/+e(2)+(n(2)-1)*25)=34"1920 lN(61999/+e(2)+(n(2)-1)*25)=35#1940 v 1950 N'"There you will find the legendary head of the Medusa.":1110V E'"Hurry,for there you will find that which you seek.":1110V ('"It is an empty chamber.":1110V Ns(4)=0:g(3)=g(3)-(((20*)+1)/10 ) :g(4)=g(4)-(((20*)+1)/10 ) :g(6)=g(6)-(((20*)+1)/10 ) :g(5)=g(5)-(((10 *)+1)/10 ) 9g(1)=g(1)-(((5*)+1)/10 ) 9g(2)=g(2)-(((5*)+1)/10 )  9000(# Rh=(61999/+e(1)+(n(1)-1)*25):h>9 2000 '"There is a monster here.":s(4)=l:l=-10 30:.03{u\,l:l:l=29-10 -1:.03{u\,l:l:l=s(4) A:"The monster is a ";a$(h):i=1111o:i:4700\ Sh=(61999/+e(1)+(n(1)-1)*25):h>172040 o=o+1:h=h-9 ='"Here there is ";:h=2h=7"an ";:2030 "a "; Sb$(h):(61999/+e(1)+(n(1)-1)*25),36$:620l h>182080  &s(4)=(*1000)+200  6:"You have just found ";s(4):" gold-pieces." \d=d+s(4):(61999/+e(1)+(n(1)-1)*25),36$:620l  h>192110> *!s(4)=(*2)+1 /D'"You have found ";s(4);" elixir";:s(4)>1"s"; 4a".":p=p+s(4):(61999/+e(1)+(n(1)-1)*25),36$:620l >h>202170z Ht=12150f R*t=1::''"You have found a cross." \L(61999/+e(1)+(n(1)-1)*25),36$:620l f%:''"There is a cross here,but you" p3"already have one so you leave it.":2140\ zh>212210 u=12200 ;u=1::''"You have found a magic-ring.":2140\ 1:''"There is a magic-ring,but you":2160p h>222240 1v=v+1::''"You have found one of Odin's" "thunderbolts.":2140\ h>232400` <:'"You have found some food.Do you want to take it?(Y/N)" n$=:n$=""2260 n$="Y"n$="y" n$="N"n$="n" n$="n"2140\ n$="y"2320  23608 !s(4)=(*2)+1 ,s=-1912 :".";:.02{# =,s:s  s(4)=12380L $9'"It was poisoned,and you now feelhungrier and weaker." .:g(3)=g(3)-(((*502)+1)/10 ) 8Fg(1)=g(1)-(((*502)+1)/10 ):2140\ L%"It was O.K.You feel less hungry."; VFg(1)=g(1)+(((*502)+1)/10 ):2140\ `h>242550 j,:"You have found something to drink." t"Do you want to drink it?" ~n$=:n$=""2430~ n$="Y"n$="y"2480 n$="N"n$="n"2140\ 2430~ !s(4)=(*2)+1 5s=12 -19-1:".";:.02{# =,s:s s(4)=12540 t'"The drink was poisoned.You feel thirstier and clumsier.":g(6)=g(6)-((502*)+1)/10 Dg(2)=g(2)-((*502)+1)/10 :2140\ q'"It was O.K.You don't feel so thirsty.":g(2)=g(2)+((*502)+1)/10 :2140\ $h>25h2552940| 6:"You have found a chest.Do you want to open it?" n$=:n$=""2570 n$="Y"n$="y"2630F n$="N"n$="n"26102 ( 2570 2%"What a coward you are!":620l F?i=20-11 -1:"*";:.01z# =,(i*3):i Kh=252650Z P""The chest is empty.":620l Za61999/+e(1)+(n(1)-1)*25,255:s(4)=(*5)+1 n,s(4)=12750 :2770 x,s(4)=22750 :2810 s(4)=32880@ :"Thank you.I am a wizard and I had been trapped in that chest for ";(*502)+10 ;" years.":"As a reward I am giving you":s(4)=(*1000)+10 7s(4);" gold-pieces.":d=d+s(4):620l K:"A bad decision.";:i=1491:".";:.02{# =,41)-i:i: "The chest blew up in your face, making you feel weaker and dumber.":g(5)=g(5)-(((*60<)+1)/10 ):g(3)=g(3)-(((*60<)+1)/10 ):i=199c:i:2140\ "When you opened the chest an entirely harmless hobbit jumped out and ran away,but you got such a fright that you":s(4)=(900*)+100d:s(4)>ds(4)=d s(4)=d28706 ,J"dropped ";s(4);" of your gold-pieces.":d=d-s(4):620l 6:"dropped all of your gold-pieces.":d=0:620l @e:"Excellent decision.";:i=145-:"+";:.02{# =,i:i:s(4)=(*3)+2 Jr"Lady luck obviously likes you. You have just found ";s(4):"precious stones.":o=o+s(4):620l |h>262990 @s(4)=(*2)+1:s(4)/5,s(4) J"You have found ";s(4);:s(4)=1" spell.":2980 " spells." q=q+s(4):2140\ h>274440X ;:"You have found a trader. Do you want to trade?" n$=:n$=""3020 n$="N"n$="n"620l n$="Y"n$="y"3070 3020 o=03170b >s(4)=(*500)+500:s(3)=s(4)*o /"Will you accept ";s(3):" gold-pieces" &?"for your ";o;" precious stone";:o1"s?":31200 +"" 0n$=:n$=""31200 :n$="N"n$="n"3170b Dn$="Y"n$="y"3160X N 31200 X/o=0:d=d+s(3):s(7)=0 b-'"You have the following purchase options." l'" 1)Potions" v'" 2)Magic Wares" '" 3)Weapons" '" 4)Elixirs" ('" 5)Quit trading" !''"You have ";d;" gold-pieces." n$=:n$=""3260 n$="1"3340 n$="2"3610 n$="3"38902 6n$="4"3810 2n$="5":3720  3260 W:"These potions,which increase thechosen quality,cost 49 gold-pieces each." 4''" A)Strength" >'" B)Stamina" H'" C)Dexterity" R'" D)Intelligence" \#''"Q to quit buying potions." fn$=:n$=""3430f p'n$="a"n$="A"3500 :3510 z'n$="b"n$="B"3500 :3560 'n$="c"n$="C"3500 :3580 'n$="d"n$="D"3500 :3600 n$="q"n$="Q":3170b 3430f "How many?";s(4): #s(4)*491>d3530 3550 :"You can't afford that many. Try again.":33804 Ig(3)=g(3)+s(4):d=d-(491*s(4)):3340 #s(4)*491>d3530 Ig(4)=g(4)+s(4):d=d-(491*s(4)):3340 #s(4)*491>d3530 Ig(6)=g(6)+s(4):d=d-(491*s(4)):3340 #s(4)*491>d3530 Ig(5)=g(5)+s(4):d=d-(491*s(4)):3340 D:"You can buy flares or spells. Both cost 74 gold-pieces each." .B"How many flares?";s(4):s(4)*74J>d3660L B5c=c+s(4):d=d-s(4)*74J:3680` L+"You can't afford that many.":3630. `N"How many spells do you want?";s(4):d10496)3740  620l d"Before I finally depart,would you like to buy another lamp?It will cost you 10497 gold-pieces." n$=:n$=""3770 0n$="N"n$="n":'''" Goodbye.":620l Yn$="Y"n$="y":'''" Goodbye.":d=d-10497):l=1:f=200:620l  3770 :"A wise move if I may say so,Sir.These top quality elixirs come at the extremely reasonable price of only 587 gold-pieces each.":d<587K"Unfortunately you can't afford any.":i=1111o:i::3170b  D"How many elixirs?";s(4):s(4)*587K>d3880( Od=d-s(4)*587K:p=p+s(4):i=199c:i::3170b (,'"You can't afford that many.":3850  2 F!'''" A) Arrows->170 each" P%'" B) Magic Arrows->275 each" Z('" C) Bottles of acid->487 each" d'" D) Dagger->811" n'" E) Axe->1017" x'" F) Mace->2981" '" G) Broadsword->7542" #''"Q to quit buying weapons." n$=:n$=""3990 n$="Q"n$="q":3170b n$="A"n$="a"4090 n$="B"n$="b"4170J n$="C"n$="c"4210r n$="D"n$="d"4250 n$="E"n$="e"4300 n$="F"n$="f"4340 n$="G"n$="g"4380  3990 <"How many?";s(4):s(4)*170>d4120 Hd=d-s(4)*170:b(1)=b(1)+s(4):4130" D21,0;"You can't afford that.":i=1123{:i "S21,0;1;"What next?";0;" ":3990 J<"How many?";s(4):s(4)*275>d4120 ^Hd=d-s(4)*275:b(2)=b(2)+s(4):4130" r<"How many?";s(4):s(4)*487>d4120 6d=d-s(4)*487:w=w+s(4):4130" x=04270 O21,0;"You already have one.":i=1111o:i:4130" 811+>d4120 jd=d-811+:x=1:21,0;"You now have a dagger.":i=1111o:i:4130" y04260 1017>d4120 iy=1:d=d-1017:21,0;"You now have an axe.":i=1111o:i:4130" z04260 2981 >d4120 iz=1:d=d-2981 :21,0;"You now have a mace.":i=1111o:i:4130"  s(6)04260 &7542v>d4120 0xs(6)=1:d=d-7542v:21,0;"You now have a broadsword.":i=1111o:i:4130" Xh>284460l bh=10 :1970 lh>294490 vJ:"Well done.You have found the orange Orb.":o=o+1:2140\ h>304520 o:"You have found the fabled moonstone,which has many magicalpowers.":s(7)=1:2140\ h>314550 Rs(8)=1::"You have just found a powerful lucky charm.":2140\ h>32 4580 ns(11 )=1::"You have found a magic-harp, which has many and varied capabilities.":2140\ h>33!4610 ps(12 )=1::"You have just found the legendary hammer of the viking God,Thor.":2140\ h>34"4650*  s(9 )=1::"You have just found a truly awsome weapon;the 'Medusa' shield of the greek goddess, Athene.":2140\ *h>35#4690R 4s(10 )=1::"Your quest is almost at an end. You have found the grail.All youneed do now is escape with it.":2140\ R*:"This is an empty chamber.":620l \3j=200+40(*h:h=11 j=j+240 a :c$="" p'"You have the following options.";'"" zu14750 +c$=c$+"Aa":" A)Show the magic-ring."  s(6)14790 +c$=c$+"Bb":" B)Use your broadsword." t14820 'c$=c$+"Cc":" C)Show your cross." x14850 'c$=c$+"Dd":" D)Use your dagger."  b(1)<14880 %c$=c$+"Ee":" E)Fire an arrow." c<14910. %c$=c$+"Ff":" F)Light a flare." .z14940L 8%c$=c$+"Gg":" G)Use your mace." Ly14970j V$c$=c$+"Hh":" H)Use your axe." jq<15000 t#c$=c$+"Ii":" I)Try a spell." &c$=c$+"Jj":" J)Try bribing it."  b(2)<15050 *c$=c$+"Kk":" K)Fire a magic-arrow." !s(12 )15080 )c$=c$+"Ll":" L)Use Thor's hammer." w<15110 0c$=c$+"Mm":" M)Throw an acid-bottle." v<15140 *c$=c$+"Nn":" N)Hurl a thunderbolt."  s(9 )151702 0c$=c$+"Oo":" O)Show the 'Medusa' shield." 2*h11 c$=c$+"Rr":" R)Retreat" Fd$=:d$=""5190F P(k=1̱c$:c$(k)d$k:5190F  d$"A"d$"a"5400 h75320 N"The power of the ring was such that it has killed the hobgoblin." Tr=r+1:i=145-:.03{u\,(*70F)-30:i::2140\ c"Unfortunately,all ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i h9 "s":5340 " " ܹ"are immune to its power.It comestowards you and inflicts a woundon your arm,weakening you.":i=199c:i:g(3)=g(3)-2.1fff:s(4)=99.9G:9000(# d$"B"d$"b"5740l 5410":5500| "a"Hit it where?":'" 1)Head":'" 2)Limbs":'" 3)Body" ,n$=:n$=""5420, Tn$="1"k=1: ^n$="2"k=2: hn$="3"k=3: r 5420, |!h=1k=15520  5550 ?"You sliced the rat's head clean off,killing it.":5300 !h=2k=25570  5590 J"You struck it a powerful blow which it couldn't survive.":5300 j=j-100d j>05660 G"In its already weakened state that blow was enough to finish it." h=10 8050r h=11 8140  5300 L"You greatly weakened it,but":g(6)>(h*5+15)5710N 0"it still got in a blow on your head,which has made you dumber.":i=199c:i:g(5)=g(5)-1.7Y:s(4)=99.9G:9000(# Nu"it still came towards you. However,you had no difficulty in avoiding it.":i=1111o:i:4705a ld$"C"d$"c"5860 vh35790 I"Upon seeing the cross the vampire crumbled to dust.":5300 U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i " totally ignored":"it and leapt at you,inflicting a deep body-wound,which has slowed you down and weakened you.":g(3)=g(3)-3.9y:g(6)=g(6)-3.1Ffff:s(4)=99.9G:i=199c:i:9000(# d$"d"d$"D"5890 &5410":j=j-502:5600 d$"e"d$"E"6120  bb(1)=b(1)-1:"You fire";:i=829:0,i;" ->":.02{# =,i:i */s=(*4)+1:s45960H 4"and miss.":6060 H"and hit.":j=j-30 \j<16030 fU"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i po" makes a":"half-hearted attempt to attack you,but you evade it easily.":i=199c:i:4705a @"It was already weak,and your arrow killed it.":5630 U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i " came straight":"at you and gave you a savage blow on the leg,making you less mobile.":g(6)=g(6)-.9ffff:g(3)=g(3)-3:s(4)=99.9G:i=199c:i:9000(# d$"f"d$"F"6350 $$c=c-1:h16220L .l"In the light from the flare you can see that the rat has a weak head.":i=199c:i:4705a Lh26260t VM"You see that the spider has weaklimbs.":i=199c:i:4705a th=56290 ~h=66310  6330 Q"You see that the werewolf has a weak head.":i=199c:i:4705a d"The flare's light shows you thatthe scorpion has a weak body.":i=199c:i:4705a `"You can see that it has a stronghead and a powerful body.":i=199c:i:4705a d$"g"d$"G"6500d -5410":h=6k=36390  6420 \"The mace hit heavily into the scorpion's body,inflicting a fatal wound.":5300 j=j-40( j<16470F (j"The force with which you hit it was enough to temporarily stun it.":i=199c:i:4705a FF"The powerful blow from the mace was enough to kill it.":5630 dd$"h"d$"H"6620 n-5410":h=5k=16540 x 6570 ^"You embedded the axe deep in theskull of the werewolf,causing instant death.":5300 %j=j-60<:j>16440( l"In its already weak condition the loss of blood from the axe wound was enough to kill it.":5630 d$"I"d$"i"6840 $q=q-1:h>66780| /s=(*3)+1:s=36690" "Unable to resist the power of your spell,the ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i (" ":"collapsed and died.":5300 "%j=j-45-:j<16660 6S"It survived your spell but is much weaker.":i=199c:i:4705a |U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i " totally ignored":"your spell and gave you a savageblow on the chest,which severelywinded you.":g(3)=g(3)-2.2 :g(4)=g(4)-3.6ffff:s(4)=99.9G:i=199c:i:9000(# d$"J"d$"j"7030v h>47010b &s=(300,*)+100d:s>ds=d Q"It says it will leave if you give it ";s;" gold-pieces..":"Will you?(Y/N)" n$=:n$=""6900 n$="Y"n$="y"6940 n$="N"n$="n"69600  6900 H"It thanks you and goes on its way.":d=d-s:r=r-1:5300 0U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i :" was very":"annoyed at you refusing and dealt you a fierce blow in the face making you feel dumber.":g(6)=g(6)-2.1fff:s(4)=99.9G:i=199c:i:9000(# bU"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i lO" says that all it":"wants is your life.":i=199c:i:4705a vd$"k"d$"K"7130 b(2)=b(2)-1:"You fire";:i=298-1:0,(37%-i);" ->":.02{# =,i:i:s(4)=(*10 )+1:s(4)9 7110 "and miss.":6060 &"and hit.":j=j-65A:5980\ d$"L"d$"l"7330 h=11 7200  "The might of the hammer was enough to utterly destroy it,butalso the hammer shattered into myriad pieces.":s(12 )=0:5630  $j=j-200:s(12 )=0 *X"The hammer shattered on contact with the minotaur,but it also":j<17310 H"took a great toll on the minotaur.It was still able, however,to give you a powerful blow in the stomach.":g(3)=g(3)-.9ffff:g(4)=g(4)-1.1 :g(6)=g(6)-.4L:s(4)=99.9G:i=1111o:i:9000 (# $"killed the minotaur.":5630 d$"m"d$"M"7540t "You throw":w=w-1:i=35#546:0,(i-25);" ":.02{# =,i:i:s(4)=(*4)+1:s=47490B 1"and hit.":j=j-25:j<17470. U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i x" survived the":"acid-attack,but luckily for you it was too shocked to retaliate.":i=199c:i:4705a .U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i 8;" has died from":"its frightful acid-burns.":5630 B"and miss.":"Despite the fumes from the acid the ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i L" still attacked":"giving you a bad head wound.":g(6)=g(6)-2.3333:s(4)=99.9G:i=199c:i:9000(# td$"N"d$"n"77302 ~v=v-1:"You hurl it":i=36$557:0,(i-25);" *":.02{# =,i:i:.1}L,-40(:.1}L,-30:.1}L,-40(:s(4)=(*3)+1:s=37690  1"and hit.":j=j-35#:j<17670 U"The ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i T" survived but":"was too stunned to hit back.":i=199c:i:4705a <"The shock was too great for it, and it died.":5630  "and miss.":"Although you missed completely, the ";a$(h);:i=13 4-1:a$(h,i)=" "a$(h,i)="."(8);:i L" was too surprised":"to do anything.":i=199c:i:4705a 2d$"o"d$"O"7870 <h>37790n Fb"The hideous sight of the shield was too much for it,and it fell dead at your feet.":5630 n%j=j-502:j<17750F "For a moment,on seeing the shield,it went mad and leapt at you.It did you no harm but the shield was knocked from your hands and you were unable to find it again.":s(9 )=0:i=1150:i:4705a /s=(*2)+1:s=17940 V"You managed to get away without any difficulty.":i=188X:i:7970" p"As you were leaving,it leapt at you,inflicting a deep wound in your back."::g(3)=g(3)-2.1fff ".s(1)=e(1):s(2)=n(1) ,s=(*4)+1 6*s=1s(1)=s(1)-1 @*s=2s(1)=s(1)+1 J*s=3s(2)=s(2)+1 T*s=4s(2)=s(2)-1 Y5s(1)>25s(1)=s(1)-25 [4s(1)<1s(1)=s(1)+25 \!s(2)>60<7970" ] s(2)<17970" h:e(1)=s(1):n(1)=s(2):1960 rFs=(*4)+1:s(1)=e(1):s(2)=n(1) |*s=1s(1)=s(1)-1 *s=2s(2)=s(2)-1 *s=3s(1)=s(1)+1 *s=4s(2)=s(2)+1 5s(1)>25s(1)=s(1)-25 4s(1)<1s(1)=s(1)+25 !s(2)>60<8050r  s(2)<18050r K61999/+s(1)+(s(2)-1)*25,35#:5300 &r=r+1:i=199c:i: N"Congratulations on killing the minotaur.":s(10 )=182400 w'''"Unfortunately you failed to bring back the grail.":''" Hit a key to see what you did do." =""8190  9280@$ 0)''''" ";:e$="YOU GOT THE GRAIL!!!" Ds=120:x=(s/3)+1:x:1;e$(s);:e=21302:.01z# =,(e*2):.01z# =,-30:e:s v@'''" Extremely well done. " 9400$ #(!g(3)<.1}L9080x# #2!g(4)<.1}L9090# #";g(1);" Drink:>";g(2) $K@s=65536*23674z\+256*23673y\+23672x\ $Ls(3)=(s/(502*60<*60<)):s(4)=((s-(502*60<*60<*s(3)))/(502*60<)):j=s-((s(3)*502*60<*60<)+(502*60<*(s(4)))) $O<j=(j/502): "Time:>";s(3);":";s(4);":";j $T'"Precious stones:>";o $^3'"Strength:>";g(3);" Stamina:>";g(4) $h'"Intelligence:>";g(5) $r#'"Gold pieces:>";d;" Elixirs:>";p $|#'"Flares:>";c;" Spells:>";q $'"No. of moves;>";a $'"Monsters killed:>";r $9'"Arrows:>";b(1);" Magic arrows:>";b(2) $-"Another game?";n$:n$<19410$ $#n$(1)="y"n$(1)="Y" $n$="e":30 %m(1)=a:m(2)=b(1):m(3)=b(2):m(4)=c:m(5)=d:m(6)=e(1):m(7)=e(2):m(8)=f:i=16:m(8+i)=g(i):i %&m(16)=l:m(17)=n(1):m(18)=n(2):m(19)=o:m(20)=p:m(21)=q:m(22)=r:i=112 :m(22+i)=s(i):i %0im(35#)=t:m(36$)=u:m(37%)=v:m(38&)=w:m(39')=x:m(40()=y:m(41))=z %:1"File name?";x$:x$>10 x$=x$(10 ) %Dx$m() %Nx$620000,1500 %XK"Put the tape to the correct place and then hit a key to verify." %b=""9570b% %lx$m() %vx$620000,1500 % 10 %1"File name?";x$:x$>10 x$=x$(10 ) %x$m() %x$620000,1500 %a=m(1):b(1)=m(2):b(2)=m(3):c=m(4):d=m(5):e(1)=m(6):e(2)=m(7):f=m(8):i=16:g(i)=m(8+i):i %l=m(16):n(1)=m(17):n(2)=m(18):o=m(19):p=m(20):q=m(21):r=m(22):i=112 :s(i)=m(i+22):i %tt=m(35#):u=m(36$):v=m(37%):w=m(38&):x=m(39'):y=m(40():z=m(41)):620l