ZXTape! 0Created with Ramsoft MakeTZXDragon !r! 2:0:4: J3,10 ;"DRAGON MAZE";1;3,10 ;"___________" (<7:7,2;"The Object of the Game is to" 2J9 ,2;"get past the ";4;"Dragon ";7;"and reach" <,11 ,2;"the Exit on the right." FR21,0;4;0;127;" 1982 MACRONICS SYSTEMS LIMITED" P n=0 ZY2:::::::::::::::::n=n+1:4:n=n:n=n:0:n<599W90Z d3y(160):x(160):m$(21,31) m="M":m,187:m+1,85U:m+2,238:m+3,85U:m+4,187:m+5,85U:m+6,238:m+7,85U 0i$="":n=132 :i$=i$+156:n &B$=" " 0:0:4: :y=121:m$(y)=i$(131):m$(y):y #y=10 :x=16:i=2 2l=1:s$=128:lf=0:rf=0 2000 T6:21,0;4;0;"STUDY THE MAZE":1,-20:1.25 ,-22:1.5@,-24:1.75`,-26 rg="G":g,126~:g+1,102f:g+2,102f:g+3,66B:g+4,66B:g+5,102f:g+6,102f:g+7,60< wg$=150 |*d="D":d,231:d+1,102f )d+2,60<:d+3,126~ )d+4,90Z:d+5,126~ (d+6,60<:d+7,24 d$=147 Xy=119:y,1;6;b$(129):.05|L,-17-y:y x=2:y=220 m$(y,x)s$y +y-1,x-1;2;7;g$ 621,0;2;0;"There you are "  6050  U=30 V=202-1 M$(V,U)S$V :21,14;4;0;"-ENTER THE DRAGON"  6100 N=19 &+V-1,U-1;4;0;d$ + 5 0+V-1,U-1;0;4;D$ 5 5 :N DV-1,U;S$ Nm$(v,31)=s$ X21,0;b$ b(w$=156:a=0:wf=0  3000 wf=18204  4000 wf=0640 6100:n=09 'd+6,60<:d+7,0 76000p:v-1,u-1;0;4;d$ (d+6,36$:d+7,24 +v-1,u-1;0;4;d$ n _21,0;0;4;"The ";1;"Dragon";0;" got you,start again?" y$:y$"y" (0:7:21,0;b$ *21,0;"Same Maze? (y or n)" y$:y$"y"  5000:340T 440:7:21,0;B$:62008 >]21,0;5;1;1;"You Win!";0;0;" Start again?" H 750  6 %m$(y,x)=s$:y-1,x-1;S$ 1dy=0:dx=0:2050+(4*) dx=ix<29:2120H dy=iy<19:2120H dx=-ix>3:2120H >dy=-iy>3 Hm$(y+dy,x+dx)=s$2230 RQm$(y+dy/2,x+dx/2)=s$:y+dy/2-1,x+dx/2-1;s$ f-y=y+dy:x=x+dx:y(l)=y:x(l)=x:l=l+1 7lf=lf+(1x=2):rf=rf+(1x=30) .1}L,x-y:2010 lf>1rf>1 n=(l-2)*+1 y=y(n) x=x(n)  2000 q21,0;0;b$;21,0;7;1;"Your Move";0;" cursor keys, no shift" y$=:y$=""3020 721,0;0;b$:dy=0:dx=0 y$="7"dy=-1 y$="6"dy=1 y$="8"dx=1 y$="5"dx=-1 &m$(y+dy,x+dx)S$3180l 0Y-1,X-1;S$ :Y=Y+DY:X=X+DX N+y-1,x-1;2;7;G$ XX=313230 b l621,0;2;0;"***BAD MOVE***" v9y+dy-1,x+dx-1;0;4;156 ,n=16:.1}L,-13 :n  WF=1 6y-1,x-1;2;7;1;g$:  DV=(Y-V)  DU=(X-U) S=(+0.5) V-1,U-1;S$ DU=04070 'M$(V+(DVS),U+(DUS))W$4170J DV=04090  S=1-S 'M$(V+(DVS),U+(DUS))W$4170J  A=A+1 A>84220| S=(+0.5) 'M$(V-(DVS),U+(DUS))=W$4090 " V=V-(DVS) , U=U-(DUS) 6U>30U=30 @ 4190^ J V=V+(DVS) T u=u+(dus) ^+v-1,u-1;0;4;d$ hv=yu=xwf=1 r | a=0 @21,0;3;0;1;" ANGRY DRAGON " =v-1,u-1;4;2;1;1;d$ ;m=04:n=2431:.02{# =,n:n:m v-1,u-1;s$  4170J  y=121 4;0;m$(y) y: pb=.001wn zb,1:b,502:b,10 :b,2:b,491:b,11 :b,3:b,480:b,12 :b,47/:b,4:b,13 :b,46.  .5,0:.5,0:.25~,-1:.25~,0:.5,2:1,-3:.75@,-5: Ԯ.1}L,24:.1}L,24:.1}L,24:.15~,24:.2~L,21:.2~L,21:.2~L,19:.2~L,19:.3,21: 8Q7,3,4,1,5,2,7,2,0,4 B2,1,4,1,5,1,7,1,5,2,4,2,4,4,2,4 L4,1,5,1,7,1,9 ,1,7,2,7,2,12 ,4,7,4 Va5,2,4,1,5,1,2,4,0,1,0,8 `-m=127:n,d:d/5,n:m:: #          #        ͐I B x ilsSgGdpDu WasbwnYn