DUN.MASTER g 0:0:0:65535:1;7;10 ,2;"THE DUNGEON MASTER IS LOADING";12 ,10 ;"PLEASE WAIT":0,0:"" FDM wu wuyu r(x)=(*x+1) . \]L^f^!]Ͱ]]6;^!]Ͱ]6;^͈] (/ (D (08:8A8[0O:\(y!~^XqOx(> >>> >!~^X6 #6*\|g6͞]:\ ͞]:\(:\z*\|g~~w!~^~ ~ bk#> O# ~^!~^!^A~ (0:8 # #~ #~ w# (:8 #p ( *K\!~^ *K\, ~@(#!@@6:\w U AM HHGGGGGGGGG TTTTTTTTTTNORTHSOUTHEASTWESTOPENCLOSELOOKUNLOCKBREAKLOCKKEEPSEARCHSAVEDROPRESTFUCKSHITSTATUSMAGICWEAPONFIGHTRUN . D"A @ @ @`````` ````$$<$$<<<<<<<$$$$$$$$<<(((((|(|((hhhc=hh p1pr=pr+w+d  e=z:j=of:d$(r,j)>""e=e+o j:r(x*q)nl8030^:l !r(q)"T"4250 "-9605%+z$:z$:e=z:z$:e4250 'iqa$(i+o)=""i=q ,k=oq:k:i:4e3 @pr=z:a=r(68D)-o:9500%+a:z$:1+((((2.2 *z$(th))/(p+o+z$(fv)/w))*v)*(v/z$(o))*z$(xg)/100d)>le4160@ Jgl+w+d:g,v;:c$:"Suddenly, a wandering"''d;:(gg+x):d+t,n;" appears !":j=nw+h:d$(r,j)""j T+d$(r,j)=a:d$(r,j+o)="":q+q:4e3 ^Y''" YOU SEE THE FOLLOWING EXITS:":x:t:F,o;"" `!k=vg:k,o;"";w+d;"":k a)n,o;"" c-z:v,h;"To the north : ";:c=o:4240 h*x,h;"To the south : ";:c=h:4240 r*s,h;"To the east : ";:c=t:4240 |8g,h;"To the west : ";:c=f:4240:d,z:o:s: 9570b%+d$(r,c):z$:z$: 2'" Sorry, I don't understand":i=q:4140, 1l$(w+w,t,w):l(w+w,n):m=z:i=nw+f:c=d$(r,i) c=255i=q:5030 c>2445030  c>195i=i+o:5030 "c<68Da=o:b=z:5050 :c>127i=i+o:c=c-t^s:b=o:a=d$(r,i):5050 i:m5200P:5e3  j=oa:9500%+c:b$:l(m+j,o)=b$(o):l(m+j,t)=b$(th):l(m+j,h)=b$(fv):l(m+j,f)=b$(xg):l(m+j,v)=b$(n):l$(m+j,o):l$(m+j,t):l(m+j,n)=i-(a>o) <bb$=j+"th":jl(m+j,f)l(m+j,x)=k:k=q k *k=r(l(m+j,f)):k"V"5315 5i=o:9608%+a$(o):z$:e=z:z$:e5315 md yd8e3@  5200P 7'" Sorry, I don't understand":a=oq:a:5200P /nf=o:8400 :69600:md5410"  *nf=o:8400 :7030v:5410" 'l:4190^:ww:a$(i+o)>"D"e=o: Sww+d:d$(r,c)q-q*(wt/w(ss))+(ag>p)*d*(ag-p)-((aghhhc=hh 8r1r1=r1-o:r1ss=ss-h :r2r2=r2-o:r2ss=ss+v <r3r3=r3-o:r3ab=ab+h @p47660 J+v$("41",d+o):j=om:b=(l(j,o)-r(x))+o T+v$(j,b)=o:b=b+l(j,o):b16)*(ss-16))+((ag>15)*(ag-15))-((ag<7)*(7-ag)):a=20-l(u,3)+o-le:a<2a=2 a>wbw5580 b=wdo=o:5540 ka5620 dodo=z:5620 " and missed" 7r(w)p+o)*(ss-p-o))):l(u,f)>z5970R md=o:c=o:'" The ";:c$=l$(u,o):(gg+x):'" is slain !":8150:a=(((2.2 *l(u,t))/(p+o+l(u,h)/w))*v)*(v/l(u,o))*(l(u,s)):8250: :ee=(ee+l(u,s)*a):gp=gp+k:m=l(u,n):6720@ }'" ";h;"The ";t;;:c$=l$(i,o):23695\,31:(gg+x)::l(i,g)l(i,g)=z:" picks up its"'" ";l$(i,t):5970R !" attacks with its"'" ";l$(i,t) a=r(w):b=k(l(i,x))-ac-ab b>waw5910 a=wdo=o:5875  ab59404 dodo=z:59404  M" and missed":r(w))" and struck home !":k=ww+d:o/q,k:k H'hc=hc-r(l(i,t))*(do+o):hchhhc=hh &d$(r,m)=whc=hc-d:hct))): %d$((d$(r,c+f)),(c+t-f*(c>t)))=b$: p3ss=ss-o:ssss=o ww:a$(i+o)>"D"e=o: ww+d:d$(r,c)=z62008 'd$(r,c)nd$(r,c)p'" O fool it is already open !":i=q: #d$(r,c)=pƨr(w)>wi/t62008 <d$(r,c)=pd$(r,c)=s:bd:b$=pb$=s:bd+t:6180$ r(d$(r,c)*h)>w6415 $='h;"You have opened it":bd:b$=d$(r,c)b$=(b$+h):bd+t .d$(r,c)=(d$(r,c)+h): 8 i=q:'h;"You can't open it": Bww:a$(i+o)>"D"c=o: LFww+d:d$(r,c)=zd$(r,c)=p'h;"You can't close the wall !":i=q: Q8d$(r,c)(d+t)'h;"You can't close it":i=q: `r(d$(r,c)*h)>w6415 j='h;"You have closed it":bd:b$=d$(r,c)b$=(b$-h):bd+t td$(r,c)=(d$(r,c)-h): ~ww:a$(i+o)>"D"e=o: Bww+d:ïd$(r,c)d$(r,c)>(d+t)'h;"You can't unlock it":i=q: 1d$(r,c)>x'h;"It is already unlocked":i=q: "r(q*h)>ag+ii*t+le*p6420 Uee=ee+q:'h;"You have unlocked it":bd:b$=d$(r,c)b$=(b$+h*(o+(b$<""))):bd+t +d$(r,c)=(d$(r,c)+h*(o+(d$(r,c)<""))): ww:a$(i+o)>"D"e=o: >ww+d:d$(r,c)>nd$(r,c)<""'h;"You can't lock it":i=q: ='h;"You have locked it":bd:b$=d$(r,c)b$=(b$-h):bd+t d$(r,c)=(d$(r,c)-h): ww:a$(i+o)>"D"e=o: 9ww+d:d$(r,c)=(d+h)'h;"It is already broken":i=q: 8d$(r,c)>nd$(r,c)p'h;"It is already open":i=q: Jpr=pr+d:ïd$(r,c)'h;"You cannot break down"'h;"the wall !":i=q: 7t+(ss>p+o)+(ss>d+n)+(ss>w+t)-(sswi*h+le*x6485U <j=of:d$(r,j)pj ACjv'h;"Careful searching reveals a "'" door hidden in the "; F6480P+j Q"NORTH wall":8280X R"EAST wall":8280X S"SOUTH wall":8280X T"WEST wall":8280X U^'h;"After examining every wall"'h;"there appears to be no"'h;"hidden doors." :8280X ZIhc=hc+o:pr=pr+w:'h;"Time passes as you rest.":8280X :7e3X d,'h;o;o;"Mind your language, please !": n a$(i+o)=" "i=i+o:6510n sBa$(i+o)<"0"a$(i+o)>"9"'h;"Which do you want ? ";:gg::i=z x-e=z:j=i+o32 :a$(j)"0"a$(j)"9"j j=i+oe=o: c=a$(i+oj-o):i=j-o:  a$(i+o)=" "i=i+o:6510n @a$(i+o)<"0"a$(i+o)>"9"'h;"How many do you want ? ";:gg: i=z:6520x 6880:d$(r,n)="" #m=g:6510n:ec67106 m=m+o:c=c-o:d$(r,m)="" "cm=m+(d$(r,m)>""):6570 -c=o:d$(r,m)>""6550:e67106 (z$=(d$(r,m)-128*(d$(r,m)>"")) !c>oc>d$(r,m+o)c=d$(r,m+o) +z$="s"6720@:trn=trn+c:6672 z$>"t"6680 z$>"X"6660 Cc>d+x-nw'h;"You can't carry so many"'h;"weapons.":67106 66720@:j=oc:nw=nw+o:w$(nw)=z$:j:6672  6560 ;c>d+x-np'h;"You can't carry so much magic":67106 *6720@:j=oc:np=np+o:m$(np)=z$:j d$(r,n)=""  6560 ïn$6730J:6700, "0d$(r,m)=n$:9535?%+n$:n$:wt=wt-n$(hv) ,N9535?%+z$:n$=z$:z$:ac=z$(t):wt=wt+z$(hv):s$=z$(x):6672 6i=q: @d$(r,m)>""6740T J&d$(r,m)=d$(r,m+o):d$(r,d+p)="": TWd$(r,m+o)-c=od$(r,m)=(d$(r,m)-128):d$(r,m+o)=d$(r,m+t):d$(r,d+p)="": YEd$(r,m+o)-c=zd$(r,m)=d$(r,m+t):d$(r,n+p)="":d$(r,d+p)="": ^d$(r,m+o)=(d$(r,m+o)-c): h@a$(i+o)<"S"a$(i+o)>"T"'h;"Weapon or Magic ? ";:gg::i=z r |=6760h:i=i+o:z$=a$(i):z$"S"z$"T"e=o:67106 }l::z$="T"6785 ~0np'h;"You have no magic items":67106 :j=onp:z$=m$(j):z$"Y"z$"j"z$=d$(t^g,z$-84T) =9533=%+z$:z$:" ";j;" ";z$(v):j:z$="S":6787 ,nw'h;"You have no weapons":67106 4j=onw:9532<%+w$(j):z$:" ";j;" ";z$(g):j 6510n:e67106 z$="S"6820 4cc>nw'h;"There is no such weapon":67106 0z$=w$(c):nw=nw-o:w$(c)=w$(c+o):6840 8cc>np'h;"There is no such magic item":67106 $z$=m$(c):np=np-o:m$(c)=m$(c+o) =j=gn+p:d$(r,j)=""d$(r,j)=z$:d$(r,j+o)="":67106 dd$(r,j)=z$d$(r,n+p)=""d$(r,j+o)=d$(r,j):d$(r,j+o)=t:d$(r,j)=(z$+128):67106 Ad$(r,j)=(z$+128)d$(r,j+o)=(d$(r,j+o)+o):67106 j:67106 6880:8280X Dd$(r,n)=""'h;"You can see nothing of"'h;"special interest.": Ol:'h;"You search the room and see:"'':m=z:j=nd+p:m=m+o:d$(r,j)="": 6" ";m;" ";:z$=(d$(r,j)-128*(d$(r,j)>"")) (z$"Y"z$"j"z$=d$(t^g,z$-84T) >z$>"t""A set of ";:9535?%+z$:z$:z$(x):6950& d$(r,j)>""d$(r,j+o);  d$(r,j)"""A"; O9532<%+z$+(z$>"X"):b$:" ";b$(v+h*(z$<"Y"));:d$(r,j)>"""s";:j=j+o  &j 0Xl:'" You search your pack and find":np" that you have no magic items":67106 :[" the following magic items:"::j=onp:z$=m$(j):z$"Y"z$"j"z$=d$(t^g,z$-84T) ?(9533=%+z$:z$:h;j;" ";z$(v):j D=6510n:c>np'h;"There is no such potion":67106 Ic67106 N3e=7023o:9533=%+m$(c):z$:z$(f):e=z Xhc>hhhc=hh bhcnw'h;"There is no such weapon":67106 )o$9532<%+o$:z$:wt=wt-z$(vs) \9532<%+w$(c):z$:wt=wt+z$(vs):ws=z$(t):wd=z$(hf):t$=z$(g):z$=o$:o$=w$(c) "ïz$w$(c)=w$(c+o):nw=nw-o:  w$(c)=z$: e:hc=hc+r(d): e:p3=z:hc=hh: e:ch=ch-r(f):che:ss=ss-r(f):ssf)  he=he-h*(he>f)  ag=ag-h*(ag>f)  wi=wi-h*(wi>f) ii=ii-h*(ii>f) ss=ss-h*(ss>f) hc=hc-h*(hc>f)  fr(t)=oa=67C+r(w+o):9532<%+a:z$:b=(z$(hf)/z$(t)*67C):z$=z$(g):7720( Wa=116t+r(d+o):9534>%+a:z$:b=((d-z$(t))*17):z$="set of "+z$(x) (0l:h,v;o;"A Trader has arrived.":7750F 2Ya=88X+r(d+g):9533=%+d$(t^g,a-84T):z$:z$=z$(v):b=23*(v+r(d)) <%l:h,v;o;"A Warlock has arrived." F*'h;"He is selling ";:8220 :h;z$ K0'h;"He is asking for ";b;" gold"'h;"pieces." M/'h;"You have ";gp;" gold piece";:gp>o"s"; P6''h;"Do you want to buy it (Y/N)":8900":y Z^'h;"How much are you prepared"'h;"to offer ? "''h;:gg:i=z:6520x:e7770 Z _7c>gp''h;"You can't afford that much !":8280X dL(.75@+r(w+v)/q)*b>c''h;"Your offer has been refused.":8280X nz$=a:z$>"t"7850 xz$>"X"7830 Bnw=d+x'h;"You cannot carry so many"'h;"weapons.":8280X  nw=nw+o:w$(nw)=z$:7870 9np=d+x'h;"You can't carry so much magic":8280X  np=np+o:m$(np)=z$:7870 )n$9534>%+n$:n$:wt=wt-n$(hv) B9534>%+z$:n$=z$:z$:ac=z$(t):wt=wt+z$(hv):s$=z$(x) 9'h;"Your offer has been accepted":gp=gp-c:8280X Jl:d,F;"Game,Character or Abort";d+t,s;"(Press G, C or A)" $y=o:8300l :"A"7940 Gl+w:d,n;"Are you sure ?";d+t,n;"(Press Y or N)":8900":yz  "G"7970" "DM"3500 :l:d,n;"Verify ? (Y/N)":8900":yd+t,h;"Rewind tape and press PLAY";p,h;"(Type 7950 on error)":23659k\,t:"DM":23659k\,z  ""C"7900 ,l$(37%,w):l$(o)=ss:l$(t)=ii:l$(h)=wi:l$(f)=ag:l$(v)=he:l$(x)=ch:l$(s)=hc:l$(g)=hh:l$(n)=ee:l$(d)=gp:l$(d+o)=ac:l$(d+t)=ab:l$(d+h,o)=±s$:l$(d+h,t)=s$:l$(p,o)=±t$:l$(p,t)=t$:l$(p+o)=wt:l$(d+x)=nl:l$(d+s)=m$:l$(d+g)=w$:l$(d+n)=nw:l$(w)=np:l$(w+o)=pr:l$(w+t)=o$:l$(w+h)=n$:l$(w+f)=ws:l$(w+v)=wd:l$(w+x)=le:l$(w+s)=p1:l$(w+g)=p2:l$(w+n)=p3:l$(w+d)=p4:l$(w+d+o)=p5 1l$(w+d+s)=trn:l$(t^v)=r1:l$(w+d+h)=r2:l$(w+p)=r3:l$(w+d+v)=r4:l$(w+d+x)=c2:u$l$():l:d,n;"Verify ? (Y/N)":8900":yd+t,h;"Rewind tape and press PLAY";p,h;"(Type 7980 on error)":23659k\,t:u$l$():23659k\,t 6 @l+w:9720%+v*le-(le557)*(le-557):z$:x,p-((z$+o+u$)/2);o;z$;" ";u$;g,g;"Thou art slain";d,d+o;"Level ";le;d+t,g;"Experience ";ee JZj=ow+x:װ"48443144431842242243184848"(j)/x,"BIBIIINRIIIIURNURNIIIIBIBI"(j)-70F:j T23659k\,t:3000 ^l+w+d:x:le=le+1:9300T$:6,(8-u$/t);"CONGRATULATIONS, ";U$'';"THOU ART ELEVATED TO THE RANK OF";10 ,(15-z$/2);:o;z$:nl=(nl*1.5@+v*q):j=ow+d:.1}L,j:j ha=p+o:b=(le-o)*h:j=ob-(b>70F)*(b-70F):װ"42142144444214214484214214444421421448421444214442144a421444214442144a"(j)/12 ,"LPQSUWXSWUSSQPPNLIGLPQSUWXSWUSSQPPNLLLKKLNGLLNPLNNPQNSLLNPLNNPQNSSSSSL"(J)-58::j r+a=r(d)+(he>p)*(he-p):hc=hc+a:hh=hh+a: |Hl+w+d:d,o;o;s;"You have completed your quest";d+t,d+o;"Well done" c=f/h:a=v/h:b=d+t:j=oq+f:װ"51a1a136351339351a1a13635133b51a1a136351339351a1a13635133b3cc3cccccc5cccc3333cccc633333cccc3cccc3cc33339"(j)/10 ,"KIKIKLNNPKKNKIKLKLKLNPPRNNGINKIKIKLNNPKKNKIKLKLKLNPPRNNGINPPRNNPLKLNKIGIKGKIRPNPRNSNSNSNPNLKKIKLNLKIPNUS"(j)-58::j 7900:3000 dl:h,f;"LOADING IN A CHARACTER":9200#:d+n,z;"Loading Character: Please wait":""l$() ss=l$(o):ii=l$(t):wi=l$(h):ag=l$(f):he=l$(v):ch=l$(x):hc=l$(s):hh=l$(g):ee=l$(n):gp=l$(d):ac=l$(d+o):ab=l$(d+t):s$=l$(d+h)(t̯l$(d+h)+o):t$=l$(p)(t̯l$(p)+o):wt=l$(p+o):nl=l$(p+t):m$=l$(p+h):w$=l$(p+f):nw=l$(p+v):np=l$(w):pr=l$(w+o) o$=l$(w+t,o):n$=l$(w+h,o):ws=l$(w+f):wd=l$(w+v):le=l$(w+x):p1=l$(w+s):p2=l$(w+g):p3=l$(w+n):p4=l$(w+d):p5=l$(w+d+o):r1=l$(w+d+t):r2=l$(w+d+h):r3=l$(w+p):r4=l$(w+d+v):c2=l$(w+d+x) trn=l$(w+d+s): 4j=os:װ"6633339"(j)/x,"IEDBADB"(j)-70F:j: 3c$(o)="A"c$(o)="E"c$(o)="O"c$(o)="U""An ";:  "A ";: 1z$(o)="a"z$(o)="e"z$(o)="o"z$(o)="u""an": &"a": :kl+d+w:d,f;"You search the body and";d+t,f;"find ";:k=(l(u,s)*a/s):k"no gold pieces.":8280X D)k=o"only one gold piece.":8280X Nk;" gold pieces." X:#1;o,z;o;s;z;f;"Press any key to continue " l23557\8300l vþ23557\8310v  m=ou=o: .j=om-o:l$(j,o)(v)=l$(j+o,o)(v)j:u=o: bl+w::z(g):y=o:j=om:z(y)=j:l$(j,o)(o)"1"" ";y;" The ";:c$=l$(j,o):(gg+x):8440 .l$(j,o)(v)=l$(j+o,o)(v)j=j+o:8420 6" ";y;" One of the ";:c$=l$(j,o)(v):(gg+x):"s"; y=y+o::j !O'" Which do you wish to attack ";:gg:i=z:6520x:cc>y-o8410 ! u=z(c): !4rtrn=z:le=o:c=8600!:c:ss=a:c:ii=a:c:wi=a:c:ag=a:c:he=a:c:ch=a:hh=d+r(d)+(he>p)*(he-p):hc=hh !/a=r(x):b=a:i=oh:m=r(x):a=a+m:md+t9030F# #Zu$=a$(oj-t) #dn,o;"Please enter dungeon file name"''" (Press ENTER for next on tape)";d+h,d+o;"";d+h,d+o;:(gg+h):j=o32 :a$(j)""j #nj=tz$="":9100# #x%j>d+tp-o,z;"";x,z:9060d# #z$=a$(oj-o) #al+w+d::t,v;"LOADING IN A DUNGEON":9200#:d+n,z;"Loading dungeon: Please wait":z$d$() #[l:n,x;"Do you wish to load "''" a character from tape ?"''d;"PRESS Y or N":"8900" #$y'd;"Please wait.":85004! #y8100 #pl+d+w:g,s-u$/t;"YOUR QUEST, ";u$;" IS TO";d,h;"COLLECT ";d$(256,o);" TURQUOISE RINGS":8280X # 8700! # #8d+t,o;"""R"" (for 'RUN') followed by ENTER";d+o,o;"then rewind the tape and press";d+x,o;o;"Start the tape recorder and ";d+s,o;"press any key on the computer";z;v,o;"If the following error report appears at the foot of the screen:"''" ";o;"R Tape loading error": 23659k\,t:8300l $T59720%+v*le-v*(le557)*(le-557):z$: %*"430 2 600","Ankheg@","menacing pincers" %-"3 6 6 400","Carniverous ape@","hairy arms" %'"910 4 490","Basilisk@","toothy jaws" %""412 6 540","Cave bear@","claws" % ("7 8 4 100","Fire beetle@","mandibles" %!3"720 3 460","Boring beetle@","powerful mandibles" %")"330 0 750","Beholder@","chilling gaze" %#*"4 6 5 320","Blink dog@","snapping jaws" %$'"7 8 5 251","Bugbear@ ","morningstar" %%("348-2 720","Bulette@","crushing jaws" %&1"1 4 3 250","Carrion crawler@","wavy tentacles" %'1"910 9 20","Giant centipede@","poisonous feet" %('"2 8 2 720","Chimera@","claws & jaws" %),"313 6 500","Cockatrice@","flapping wings" %*-"355-83000","Demogorgon@","slimy tentacles" %+/"740-71250","Jubilex@","poisonous excretions" %,%"3 4 7 80","Manes@","clawed hands" %-$"550-62251","Orcus@","chaos staff" %.$"215-4 800","Render@","bony hands" %/("533-2 721","Balrog@","long fire whip" %0+"570-73000","Asmodeus@","finger of death" %1'"812-1 720","Bone devil@","bone hook" %2*"328-32001","Geryon@","trumpet of power" %3)"520-31040","Pit fiend@","clawed wings" %42"5 8 2 480","Displacer beast@","horny tentacles" %5-"428 3 640","Black dragon@","spitting acid" %6-"434 2 800","Blue dragon@","lightning bolt" %7,"430 2 720","Green dragon@","Chlorine gas" %8*"430 2 720","Red dragon@","fiery breath" %9,"426 3 561","White dragon@","cone of cold" %:."940 21280","Earth elemental@","stony fists" %;,"534 21280","Fire elemental@","fire bolts" %<,"2 6 5 360","Gargoyle@","scratching hands" %=%"3 6 6 160","Ghoul@","filthy claws" %>#"7 8 5 161","Gnoll@","Battle axe" %?%"6 6 6 71","Goblin@","spiked club" %@/"510 4 560","Hell hound@","great black teeth" %A'"6 8 5 91","Hobgoblin@","heavy club" %B%"3 4 7 41","Kobold@","teeny sword" %C)"918 4 490","Leucrotta@","sharp hooves" %D#"545 01001","Lich@","magic staff" %E,"3 6 4 171","3 Headed Knight@","shrubbery" %F("325 5 480","Medusa@","poisonous hair" %G$"515 6 511","Minotaur@","huge axe" %H%"712 7 480","Mummy@","scabrous arm" %I-"310-4 540","Hell horse@","slashing hooves" %J"610 5 331","Ogre@","spear" %K"5 8 6 81","Orc@","sword" %L%"3 3 7 40","Rat@","nibbling teeth" %M'"350-5 500","Big rat@","strong teeth" %N+"740 0 960","Roper@","powerful tentacles" %O#"810 5 181","Sahuagin@","trident" %P,"512 2 630","Salamander@","tongue of fire" %Q("3 310 70","Shadow@","chilling touch" %R'"7 6 7 81","Skeleton@","bony rapier" %S-"3 9 8 90","Large spider@","venomous bite" %T-"325 4 360","Giant spider@","venemous bite" %U)"3 8 8 90","Stirge@","spiky proboscis" %V'"548-31761","Titan@","colossal sword" %W)"215 3 960","Trapper@ ","folding edges" %X'"712 5 161","Troglodyte@","stone axe" %Y%"312 4 600","Troll@","claws & bite" %Z."312 2 720","Umber hulk@","crushing pincers" %['"320 1 670","Vampire@","bloody teeth" %\""315 5 350","Wight@","icy touch" %]2"316-8 720","Will-o-wisp@","Lightning discharge" %^""210-2 630","Xorn@","stony jaws" %_)"9 8 8 160","Zombie@","rotting fingers" %b"Wall" %c "Wood door" %d "Iron door" %e"Stone door" %f "Wood door" %g "Iron door" %h"Stone door" %i "Wood door" %j "Iron door" %k"Stone door" %l "Open door" %m "Open door" %n "Open door" %o"Broken door" %p"Wall" %q "Opening" %r "Stairs up" %s"Stairs down" %t "Archway" %u "Archway" %v "Archway" %"0204010dagger" %"0708075battle axe" %"0920150great axe" %"0406030club" %"0405050hammer" %"0606020javelin" %"0707100mace" %"0708125morningstar" %"1112080pike" %"0408040scimitar" %"0608050spear" %"0812050spetum" %"0512060longsword" %"0308035shortsword" %"10182502-handed sword" %"0712050trident" %"0715060cold spear" %"0325045holy avenger" %"0517100axe of destruction" %"0525050vorpal blade" %"0220030sword of lightening" %"7100Strawberry potion" %"7110Raspberry potion" %"7120Garlic potion" %"7140Chocolate potion" %"7150Lime potion" %"7160Egg potion" %"7170Blackberry potion" %"7180Cinnamon potion" %"7190Pineapple potion" %"7282Lemon potion" %"7220Orange potion" %"7200Banana potion" %"7210Grape potion" %"7230Fig potion" %"7310Plum potion" %"7290Rice potion" %"7300Gritty potion" %"7320Cherry potion" %"7330Astral escape spell" %"7380Rod of blasting" %"7420Rod of annihilation" %"7460Amulet of finding" %"7480Ruby ring" %"7510Diamond ring" %"7540Sapphire ring" %"7570Emerald ring" %"0000Torquoise ring" %"7620Curse scroll" %" 5200orcmail" %" 4100elfmail" %" 3200dwarfmail" %" 2250platemail" %" 1200+1 platemail" %" 0200+2 platemail" %"-1150+3 platemail" %"-2150+4 platemail" %"-2 75mithril platemail" %"-3100+5 platemail" %"-5150platemail of power" %"6000" %"6020" %"6040" %"6060" %"6130" %"6210" %"6875" %"6270" %"6360" %"6320" %"6560" %"6450" %"7900" %"6780" %"6490" %"6500" %"6500" %"8700" %"6960" %"7030" %"8700" %"5320" %"5330" %"5380" %"5340" %"150","250","250","350","350","500","500","500","500","600","600","700","700","850","1e3","1250","1500","1750","2e3","2500","3500","5e3","5500","6500","8e3","9500","12500","15500" %>"6","7","8","15","31","47","63","79","95","111","127","9999" %:"21","20","19","18","16","15","13","12","10","9","8","7" % "Novice" &"Apprentice" & "Fighter" & "Swordsman" &"Fiend slayer" &"Fighter-magician" &"Swordthain" & "Master swordsman" &>"Hero" &R"Dragonslayer" &\"Super hero" &"Wizard-lord" '"Master of creation" YDUNGEON 1 EN= J&ZuD Cd \Y KsleZ _ H  Zw   uL j` 7  Q  7Z_]hsJ\Zo` i ,=Z gqZ ]ily ^w6Wsd{_6vjasG w4pY r!7Z "!#\a"$K #En >&k %''t j&o(Zm ')C_ (+7X9hsj ),p?d +-.rgK,s[ ,/-Y .05`r 1/[ha 02 0k 0 q00h[ $ }s$ ހ d بg< 0$ { $ ,,,-,,,-,,,- ,,,-$,,,,,,,, ,,,,,,,,,,,, ,,,,,,,-! ,,,-%,,,- $,,,- !),,,-$,,,- , @H@E1]<HD4. d HH0HDHD@. d HH >>> >!~^X6 #6*\|g6͞]:\ ͞]:\(:\z*\|g~~w!~^~ ~ bk#> O# ~^!~^!^A~ (0:8 # #~ #~ w# (:8 #p ( *K\!~^ *K\, ~@(#!@@6:\w 1 1 ZZZZZZ TTTTTTTTTTTTTTNORTHSOUTHEASTWESTOPENCLOSELOOKUNLOCKBREAKLOCKKEEPSEARCHSAVEDROPRESTFUCKSHITSTATUSMAGICWEAPONFIGHTRUN  D"A @ @ @``````````$$<$$<<<<<<<$$$$$$$$<<(((((|(|((11 500  @j=223659k\,1:""d$():23659k\,0: F23659k\,1:a$(1j-1)d$():23659k\,0  ### Create ###  8810j" 5,0;" How many rooms do you want in"''" your dungeon ";:85004!:em>255'1;"Illegal entry , please try again":1,0:1000 m %i=1:d$(256,4)=m  8810j" 84,0;"The object of the DUNGEON MASTER"''"is to collect a number of"''"torquoise rings."''"Please enter the number required"''"to complete your dungeon ";:85004!:emm>2012 ,25;"";14,0;1;"Illegal entry , please try again":1,0:1007 d$(256,1)=m  8810j" 5,1;"Please enter the % probability"''" of a Trader appearing ";:85004!:em>100d7,23;"";9 ,0;1;"Illegal entry , please try again":1,0:1025 d$(256,2)=m  8810j" 5,1;"Please enter the % probability"''" of a Warlock appearing ";:85004!:em>100d7,24;"";9 ,0;1;"Illegal entry , please try again":1,0:1045 $d$(256,3)=m Bi=i̯d$(256,4) L 5000 V z$="6"i ["z$="7"d$(256,4)=i ` ### Look ###  8810j" 5,0;" Please input the room which "''" you want to look at ";8;8;8;8;:85004!:em>d$(256,4)'1;"Illegal entry , please try again":1,0:1200 m d$(m,1)="" i=m:4000 Ć23659k\,0:22,1'"Do you want to copy to printer";:8900":y23659k\,1::23659k\,0   ### Extend ###  8810j" 10 ,0;"By how many rooms do you want to"''"extend the dungeon ";8;8;8;8;:85004!:em+d$(256,4)>255'1;"Illegal entry , please try again":1,0:1300 m ,d$(256,4)=01005 Ui=d$(256,4)+1:d$(256,4)=(d$(256,4)+m) (8810j":6,0;"The number of torquoise rings"''"required is ";d$(256,1);10 ,0;"Do you want to change this (Y/N)":8900":y1007 2 1025 w### Modify ### x 8810j" z8,0;"Please enter the room number of"''"the room you wish to modify ";:85004!:em>d$(256,4)'1;"Illegal entry , please try again":1,0:1400x {m i=m:5000: ### Append ###  8810j" 8,0;"Please enter the room number of"''"the room you wish to append ";:85004!:em>d$(256,4)'1;"Illegal entry , please try again":1,0:1500 m d$(m,1)="" 1210:5040: ?### Save ### @6j=522:d$(256,j)=(84T+j):j Ea8810j":''''" Do you want to swap the names"''" of the potions":8900":y1650r Jj=118 O$8810j":9621%+j:z$:z$: Tm=118:9621%+m:z$:m;3;z$:m:'"Which do you want ";:85004!:emm>181;"Illegal entry , please retype":1,0:1615O ^'d$(256,4+j)=(m+88X) hj ri8810j":''''" Please enter dungeon file name"''"";:23795\:j=132 :a$(j)""j |]j=2j>12 1;"Illegal entry , please retype":1,0:1650r Q23659k\,2:y=1:a$(1j-2)d$():23659k\,0 2'" Verify (Press Y or N)":8900":y F23659k\,2:a$(1j-1)d$():23659k\,0  ### Quit ### D8810j":'''''6;"Are you sure ? (Y/N)":8900":y  0  0: ### Look at maze ### *8810j":12 ;1;"Room ";i %" Exit Exit type To room"; ""North ";:k=1:4200h ""East ";:k=2:4200h ""South ";:k=3:4200h ""West ";:k=4:4200h H"---------ROOM CONTENTS---------";:j=9 24:d$(i,j)="" +k=d$(i,j)-128*(d$(i,j)>127) k>67C4100 E9500%+k:c$,c$:d$(i,j)<"""A ";:23798\::4190^ ;j=j+1:d$(i,j);" ";:23798\:"s":4190^ k>116t4130" g9532<%+k+(k>88X):z$:z$=z$(1+7*(k<89Y)):d$(i,j)<"""A ";z$:4190^ .j=j+1:d$(i,j);" ";z$;"s":4190^ ",9535?%+k:z$:"A Set of ";z$(6) ^j g### Exits ### hE9570b%+d$(i,k):z$:z$;27;:d$(i,k)d$(i,k+4); r: ### Set up room ### j=124  d$(i,j)="" j 8810j":19,0;"Room ";i;8;" exit to the ";0,0;:a=0:j=020:j>3j<7j 1a=a+1:9570b%+j:y$:a;3;y$:j ik=1:z$="North":5100:z$="East":5100:z$="South":5100:z$="West":5100 A8810j":5,0;"Choose from one of the following" '10 ;"1 = Monster"''10 ;"2 = Weapon"''10 ;"3 = Potion"''10 ;"4 = Other magic"''10 ;"5 = Armour"''10 ;"6 = Finish"''10 ;"7 = Quit" *0:z$=:z$<"1"z$>"7"5060 z$="6"z$="7" 5900 +100d*z$  5040 ### Exits ### @19,21;z$;:0:" ";21,0;""; l21,0;"Which do you want ";:85004!:emm>181:1,0:5100  Ad$(i,k)=(m-1+3*(m>4)):m=15150 k"To which room number ";:85004!:emm>d$(256,4)1:1,0:5100 #d$(i,k+4)=m:k=k+1: o### Monster ### p8810j":6,4;"Class 1 208 + points";8,4;"Class 2 90-207 points";10 ,4;"Class 3 28-89 points";12 ,4;"Class 4 0-27 points";16,1;"Please choose which class(1-4)" s*0:x$=:x$<"1"x$>"4"6003s uP8810j":" Monster Armour Hit Class Points" za=0:j=067C ?9500%+j:z$,c$::z$(1)x$j=j+1:6020 a=a+1:j+1;3;:23798\:22-z$(23);z$(23);30-z$(4);z$(4) a<17j g'"Which do you want (0 to quit) ";8;8;:85004!:em<1m>68D6080  n=m-1 Y"How many monsters do you want ";8;8;:85004!:m<16080 jem>51;"Illegal entry , please try again";19,0;:1,0:6005u  7000X  ### Weapon ### 18810j":" Weapon Speed Damage"; ޠj=121:9599%+j:z$:j;3;z$(8);24-z$(2);z$(2);30-z$(34);z$(34):j 6"Which do you want ";:85004!:emm>21 Bn=m+67C:"How many weapons do you want ";:85004!:m *em>51,0:6100  7000X  7### Potion ### 8Y8810j":1,0;:j=118:9621%+j:z$:j;3;z$:j: Bf20,0;"";20,0;"Which potion do you want ";:85004!:emm>18 LYn=m+88X:"";20,0'"How many potions do you want ";:85004!:m Qjem>51;"Illegal entry , please try again";20,0;:1,0:6210B V 7000X ` ### Other magic ### Y8810j":4,0;:j=110 :9639%+j:z$:j;3;z$:j: c"Which item do you want ";8;8;8;8;:85004!:emm>10 in=m+106j:"How many items do you want ";8;8;8;8;:85004!:m kem>5'1;"Illegal entry , please try again";15,0;:1,0:6300  7000X  ### Armour ### 8810j":" Armour Armour Weight Class":j=111 :9651%+j:z$:j;3;z$(6);24-z$(2);z$(2);31-z$(35);z$(35):j:  6"Which do you want ";:85004!:emm>11 (n=m+116t:m=1:7000X: W### Put in maze ### X!m=1m:o=9 23 b:d$(i,o)=""d$(i,o)=n:d$(i,o+1)="":7060 l=d$(i,o)=(n+128)d$(i,o+1)=57100 vQd$(i,o)=(n+128)d$(i,o+1)=(d$(i,o+1)+1):7060 o=237080 md$(i,o)=nd$(i,o)=(n+128):d$(i,o+2)=d$(i,o+1):d$(i,o+1)=2:7060 o m  `8810j":10 ,1;"There is no room left in this"''" room,press 'ENTER' for menu" "0:13 7090  ~8810j":10 ,1;"The room can't hold the extra"''" number of your item."''" Press 'ENTER' for the menu" "0:13 7090  !3### Input Number ### !4Ge=0:23795\::m=132 :a$(m)"0"a$(m)"9"m !>m=1e=1: !Hm=a$(1m-1): "`### CLS Routines ### "jj0,0;:23692\,255:23659k\,0:0:1:7:23801\: "### Y or N ### "="Y"y=1: "="N"y=0: " 8900" %"1 2 60","Ankheg@" %"3 6 40","Carniverous ape@" %"4 4 49","Basilisk@" %"3 6 54","Cave bear@" % "4 4 10","Fire beetle@" %!"3 3 46","Boring beetle@" %""1 0 75","Beholder@" %#"3 5 32","Blink dog@" %$"4 5 25","Bugbear@" %%"1-2 72","Bulette@" %&"3 3 25","Carrion crawler@" %'"4 9 2","Giant centipede@" %("2 2 72","Chimera@" %)"2 6 50","Cockatrice@" %*"1-8300","Demogorgon@" %+"1-7125","Jubilex@" %,"4 7 8","Manes@" %-"1-6225","Orcus@" %."2-4 80","Render@" %/"2-2 72","Balrog@" %0"1-7300","Asmodeus@" %1"3-1 72","Bone devil@" %2"1-3200","Geryon@" %3"2-3104","Pit fiend@" %4"3 2 48","Displacer beast@" %5"2 3 64","Black dragon@" %6"1 2 80","Blue dragon@" %7"1 2 72","Green dragon@" %8"1 2 72","Red dragon@" %9"2 3 56","White dragon@" %:"2 2128","Earth elemental@" %;"1 2128","Fire elemental@" %<"3 5 36","Gargoyle@" %="4 6 16","Ghoul@" %>"4 5 16","Gnoll@" %?"4 6 7","Goblin@" %@"3 4 56","Hell hound@" %A"4 5 9","Hobgoblin@" %B"4 7 4","Kobold@" %C"3 4 49","Leucrotta@" %D"1 0100","Lich@" %E"3 4 17","Evil warrior@" %F"1 5 48","Medusa@" %G"3 6 51","Minotaur@" %H"3 7 48","Mummy@" %I"2-4 54","Hell horse@" %J"3 5 33","Ogre@" %K"4 6 8","Orc@" %L"4 7 4","Rat@" %M"1-5 50","Big rat@" %N"2 0 96","Roper@" %O"4 5 18","Sahuagin@" %P"3 2 63","Salamander@" %Q"410 7","Shadow@" %R"4 7 8","Skeleton@" %S"3 8 9","Large spider@" %T"2 4 36","Giant spider@" %U"3 8 9","Stirge@" %V"1-3176","Titan@" %W"1 3 96","Trapper@" %X"4 5 16","Troglodyte@" %Y"2 4 60","Troll@" %Z"2 2 72","Umber hulk@" %["2 1 67","Vampire@" %\"2 5 35","Wight@" %]"2-8 72","Will-o-wisp@" %^"2-2 63","Xorn@" %_"4 8 16","Zombie@" %b"Wall" %c"Wood door (locked)" %d"Iron door (locked)" %e"Stone door (locked)" %i"Wood door (closed)" %j"Iron door (closed)" %k"Stone door (closed)" %l"Wood door (Open)" %m"Iron door (Open)" %n"Stone door (Open)" %o"Broken door" %p"Secret door" %q "Opening" %r "Stairs up" %s"Stairs down" %t "Archway" %u"Archway (good)" %v"Archway (bad)" %"0204010Dagger" %"0708075Battle axe" %"0920150Great axe" %"0406030Club" %"0405050Hammer" %"0606020Javelin" %"0707100Mace" %"0708125Morningstar" %"1112080Pike" %"0408040Scimitar" %"0608050Spear" %"0812050Spetum" %"0512060Longsword" %"0308035Shortsword" %"10182502-Handed sword" %"0712050Trident" %"0715060Cold spear" %"0325045Holy avenger" %"0517100Axe of destruction" %"0525050Vorpal blade" %"0220030Sword of lightening" %"Strawberry potion" %"Raspberry potion" %"Garlic potion" %"Chocolate potion" %"Lime potion" %"Egg potion" %"Blackberry potion" %"Cinnamon potion" %"Pineapple potion" %"Lemon potion" %"Orange potion" %"Banana potion" %"Grape potion" %"Fig potion" %"Plum potion" %"Rice potion" %"Gritty potion" %"Cherry potion" %"Astral escape spell" %"Rod of blasting" %"Rod of annihilation" %"Amulet of finding" % "Ruby ring" %"Diamond ring" %"Sapphire ring" %"Emerald ring" %"Torquoise ring" %"Curse scroll" %" 5200orcmail" %" 4100elfmail" %" 3200dwarfmail" %" 2250platemail" %" 1200+1 platemail" %" 0200+2 platemail" %"-1150+3 platemail" %"-2150+4 platemail" %"-2 75mithril platemail" %"-3100+5 platemail" %"-5150platemail of power" SDUNGEON 1 EN= J&ZuD Cd \Y KsleZ _ H  Zw   uL j` 7  Q  7Z_]hsJ\Zo` i ,=Z gqZ ]ily ^w6Wsd{_6vjasG w4pY r!7Z "!#\a"$K #En >&k %''t j&o(Zm ')C_ (+7X9hsj ),p?d +-.rgK,s[ ,/-Y .05`r 1/[ha 02 0k 0 q00h[ $ }s$ ހ d بg< 0$ { $ ,,,-,,,-,,,- ,,,-$,,,,,,,, ,,,,,,,,,,,, ,,,,,,,-! ,,,-%,,,- $,,,- !),,,-$,,,- , @H@E1]<HD4. d HH0HDHD@. d HH