ZXTape! 0Created with Ramsoft MakeTZXPACMAN  uo vj Maze Man  Tudor Costigan Wn=1000:n$=n:23692\,255:236099\,10 :23658j\,8 5j=32 :kk=3:i=0:b=0:d$="" 6:7:2: <$4300:u=05::u F 0 Z61;1;" PACMAN - By T.M.Costigan " d: n"Skill level ";1;"?" x" Hard,Medium,Easy (H,M,E) " 0 c$= ""145 c$"H"c$"M"c$"E"11 ,0;1;" H,M,or E only please!":250:11 ,0;" ":130 c$="H"ww=0 c$="M"ww=25 c$="E"ww=502 10 ,27;c$ 3700t q=16:x$ "z=07:X:x$+z,x:z q 2:"Do you wish instructions (Y/N) ";1;"?" =""240 c$= c$="N"450 c$"Y"240 " ,":1;" INSTRUCTIONS " 64:"To move up","Press '";1;"A";0;"'" @4"To move down","Press '";1;"Z";0;"'" J5"To move right","Press '";1;"M";0;"'" T4"To move left","Press '";1;"N";0;"'" h,:" ";1;"*";0;" = 10 points" r+" ";1;"O";0;" = 100 points" |+" ";1;"!";0;" = 200 points" /:1;" PRESS ANY KEY TO CONTINUE " ""435  0 :l=6:k=19  "######################" "#********************#" "#*###*###*##*###*###*#" "#O###************###O#" "#*****#*######*#*****#" "#*###*#********#*###*#" "#*******######*******#" "###*#*#*# #*#*#*###" " *#***# #***#* " "###*#*#*# #*#*#*###" "#*****#*######*#*****#" "#*#*#***** ******#*#*#" "#O#*#*##*####*##*#*#O#"  "#*#*#************#*#*#" "#******########******#"  "#*####*########*####*#" *"#*####*########*####*#" 4"#********************#" >"######################" n7::4:1 xd=119 ?e$:s=122:e$(s)="#"e$(s)=" "7:4  d=12 s=11 4 'd,8+s;e$(s);:4:1 s:17;8 d 7:2 h1,0;1;"Maze Man";1;2,3;"By";0;3,1;"T.M.C." @L5,0;1;"HI SCORE";6,1;0;7;n$ J78,1;1;"SCORE";9 ,1;b T9 ,19;kk;"" ^ 4 |s=0200:s "y=18:x=20:y,x;"" u=0ww:u .02{# =,4 x$=  x$=""x$= x$""d$=""  y,x;" " x$="M"d$="M"1800 x$="N"d$="N"1820 x$="A"d$="A"18400 x$="Z"d$="Z"1860D  2160p  x=x+1 'ss=((y,x)):ss32 1900l  y,x;""  21004  x=x-1 &'ss=((y,x)):ss32 1950 ( y,x;"" + 21004 0 y=y-1 :'ss=((y,x)):ss32 2000 < y,x;"" ? 21004 D y=y+1 N'ss=((y,x)):ss32 2050 P y,x;"" S 21004 l4ss=42*i=i+1:b=b+10 :1812 qLss=79Ob=b+100d:.5,5:.5,7:1812 vJss=33!b=b+200:1,5:1,7:1812 {&ss=35#x=x-1:1812  1812 4ss=42*i=i+1:b=b+10 :1832( Lss=79Ob=b+100d:.5,5:.5,7:1832( Jss=33!b=b+200:1,5:1,7:1832( &ss=35#x=x+1:1832(  1832( 4ss=42*i=i+1:b=b+10 :1852< Lss=79Ob=b+100d:.5,5:.5,7:1852< Jss=33!b=b+200:1,5:1,7:1852< &ss=35#y=y+1:1852<  1852< 4ss=42*i=i+1:b=b+10 :1872P Lss=79Ob=b+100d:.5,5:.5,7:1872P  Jss=33!b=b+200:1,5:1,7:1872P &ss=35#y=y-1:1872P  1872P 4x$""d$=x$ 7Ay=9 x=31y,x;" ":x=9 :9 ,9 ;"" :By=9 x=8y,x;" ":x=30:9 ,30;"" >[i=502i=100di=15012 ,19;1;7;"!":i=i+1 Hn(i=60<i=110ni=160)(y12 x=19)(l12 k19)12 ,19;" " RKq$=17+7+b+17+4:9 ,1;0;q$ W#b>n6,1;0;q$ \_i=1868,15;1;1;7;"WELL DONE":i=0:2142^ ] 2150f ^9aa=.125}:bb=.25~:cc=.375?:dd=.5 _z=12 acc,0:aa,-4:dd,-4:dd,0:cc,-4:aa,-4:dd,-4:cc,0:aa,0:dd,2:dd,-1:bb,0:bb,4:1,0 bz d{cc,-1:aa,0:dd,2:dd,2:bb,4:bb,0:dd,2:dd,2:cc,-1:aa,0:dd,2:dd,2:bb,4:bb,0:dd,2:dd,2:cc,0:aa,-1:dd,-4:dd,2:dd,0:dd,2:dd,4:cc,0:aa,-1:dd,-4:bb,5:bb,2:dd,0:dd,-1:dd,0 e 510 p y,x;"" q.02{# =,0 ul-y>02410j zl-y<02510 k-x>02210 k-x<02310  2650Z  k=k-1 qa=1:qb=0 sd=((l,k)) &sd=35#k=k+1:2190  26102  k=k+1 qa=-1:qb=0 $sd=((l,k)) .&sd=35#k=k-1:1750 8 26102 j l=l-1 tqa=0:qb=1 sd=((l,k)) &sd=35#l=l+1:2170z 26102 l=l+1 qa=0:qb=-1 sd=((l,k)) &sd=35#l=l-1:2180 21sd=32 2700 :j=32 :1750 <1sd=42*2700 :j=42*:1750 F1sd=79O2700 :j=79O:1750 P1sd=33!2700 :j=32 :1750 Z!l=yk=x2700 :2710 d 1750 l+qb,k+qa;j:l,k;"": kk=kk-1 i=0 a=07 I.02{# =,0:a:.02{# =,1:7-a:.02{# =,4: a T6:.05|L,0:7:.05|L,1:2:2,3: kk>0510 "You ended with ";b;" points." 1n