Advertisement
felixnardella

Maze 10liners_3_compress

Jan 27th, 2020
125
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.58 KB | None | 0 0
  1. 1?"{clear}{white} maze by felix use i,j,k,l to move{down*2}":a=1186
  2. 2fOz=0to39:pO1104+z,86:pO1984+z,86:pO55376+z,1:pO56256+z,1:nE:a(0)=-1:a(1)=-40
  3. 3a(2)=1:a(3)=40:fOf=1to21:?"V{reverse on}{yellow}{space*38}{white}{reverse off}V";:nE
  4. 4j=int(rN(0)*4):g=j
  5. 5b=a+a(j)*2:ifpE(b)=160tHpOb,j:pOa+a(j),32:a=b:gO4
  6. 6j=(j+1)*-(j<3):on-(j<>g)gO5:l=1223:j=pE(a):pOa,32:ifj<4tHa=a-a(j)*2:gO4
  7. 7pOl,32:x=rN(1)*720:on-(pE(1223+x)<>32)gO7:l=1223+x:pOl,42:pOa,94:j=3
  8. 8gEz$:ifz$<>""tHs=aS(z$):e=saN1:c=s-75+e
  9. 9b=a+c*(39*e+1):on-(pE(b)<>86aNpE(b)<>160)gO10:gO8
  10. 10on-(pE(b)=42)gO7:pOb,94:pOa,32:a=b:gO8
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement