ZXTape!3-D o 5  """a" k0:0:0:0:2:2:0::7,7;"3-D LABYRINTH" [m(11 ,16):a(4):i$(1):b$="":c$="" 8"Lnge(2-16)?",u:u=u:u<2u>1620 (9"Breite(2-11)?",t:t=t:t<2t>11 40( 2N:8,1;"Bitte warte,weil ich erst das Labyrinth zeichnen muss" n2:x=(t/2):y=(u/2):m(x,y)=5 xCb=0:xx>1m(x-1,y)=0b=b+1:a(b)=2 8yy>1m(x,y-1)=0b=b+1:a(b)=4 b0230 &b=m(x,y):2000:x1=-x1:y1=-y1 "x1=0y1=0340T x=x+x1:y=y+y1:120x !b=a((*b)+1):2000 %x=x+x1:y=y+y1:m(x,y)=b:120x T]l=t+1:m=u+1:x=t:y=u:x2=-1:y2=0:1:4::4000 ^Q1,11 ;"Viel Glck!";18,10 ;"Drcke eine Taste":0 r<:1:i=021:i,31;"":i:0 x2=0750  q=x+x2*3:v=y+x2:z=y-x2 *i=xqx2:s=4-(i-x)*x2:3100 w=i+x2 )b=m(i,y):2000:y1=-x2a=1 7v>0v0w0v0v0z0w0z0z0w0w0v.21004:a=02700 :930 RPa=0:w>0w0v0v0z0w0z0z0w0wty<1y>u1430 F a=0 Py2=01400x Z(b=m(x,y):2000:y1=y2a=1 d,b=m(x,y-y2):2000:y1=-y2a=1 n 1420 x(b=m(x,y):2000:x1=x2a=1 ,b=m(x-x2,y):2000:x1=-x2a=1 a=1370r x=x-x2:y=y-y2 ,7,4;"Richtung nicht waehlbar"  1130j x1=0:y1=0 b=1x1=1 b=2x1=-1 b=3y1=1 b=4y1=-1  4j=cd >C21-j,j;"":a=0j-9 >-1j-9 ,j;"" Hj: j=cd U21-j,30-j;"":a=0j-9 >-1j-9 ,30-j;"" j: $n=d-c:k=ef:k,c;b$(n);"":k: `2n=30-d:p=d-c:k=ef:k,n;"";b$(p):k: ?f,c;""(8-d+c):j=ef-1:j,d;"":j ^d-c>0j=20-((d-c)/2+d)-1:n=d-c:k=11 -jj:k,c;b$(n);"":k  (Ip=30-d:f,p;""(d-c+1):j=ef-1:j,p;"":j 2^d-c>0j=20-((d-c)/2+d)-1:n=d-c:k=11 -jj:k,p;"";b$(n):k < j=ef:j,d;"":j: $r=30-d:j=ef:j,r;"":j: T<n=d+1:p=29-d*2:k=ef:k,n;b$(p):k: 0f+1,d+1;c$(29-d*2): Ia=0:c=16-2^s:d=16-2^(s-1)-1 &:f=20-d:e=0:d-8>-1e=d-8 0 3:r=9 -(t/2):p=15-(u/2) bk=1+rt+r:k,p;"";k,u+1+p;"":k:k=1+pu+p:r,k;"";t+1+r,k;"":k #1:k=1t:j=1u b=m(k,j):2000 g=r+k::h=j+p  g,h;"" 'x1=1g,h;"";g-1,h;"" (x1=-1g,h;"";g+1,h;"" 'y1=1g,h;"";g,h-1;"" (y1=-1g,h;"";g,h+1;"" j:k x2=1i$="" x2=-1i$="^" y2=1i$="" y2=-1i$="" "S1;x+r,y+p;i$;0;1+r,1+p;"":0:r,1+p;" " , C1,0,0,-1,-1,0,0,1 ps3:5::7,3;"Du bist aus dem Labyrinth";11 ;" entkommen":i=1400:i: u ^BCutxyblmrpg hLabyrinth Xo @@ ????????~~*  $8