puckman O 0:a=144164 %b=07:c:a+b,c:b:a Ks=0:hs=0:T=160:B$(21,21):COUNT=30 lives=3  7000X 0,255,0,0,0,0,0,0,0,0,0,0,0,0,255,0,0,255,0,0,0,0,255,0,0,248,4,2,2,2,2,2 0,31,32 ,64@,64@,64@,64@,64@,0,63?,64@,128,128,64@,63?,0,0,252,2,1,1,2,252,0 2,2,2,2,2,4,248,0,64@,64@,64@,64@,64@,32 ,31,0,2,2,2,2,2,2,2,2 (e0,24,36$,66B,66B,66B,66B,66B,66B,66B,66B,66B,66B,36$,24,0,64@,64@,64@,64@,64@,64@,64@,64@,66B,66B,66B,66B,66B,66B,66B,66B,0,0,16,568,124|,568,16,0 224,60<,30,15,30,60<,24,0,0,0,34",119w,127,62>,28,8,0,24,60<,120x,240,120x,60<,24,16,568,124|,254,238,66B,0,0,568,126~,90Z,219,255,255,255,147,2,6,10 ,20,36$,68D,238,66B 7&1:1::7:0 <%B$(1)="" F%B$(2)=".................." P%B$(3)="......" Z%B$(4)=" . .. . " d%B$(5)="......" n%B$(6)="..................." x%B$(7)="......" %B$(8)="................" %B$(9 )="...." &B$(10 )=" ......... " &B$(11 )="..---.." &B$(12 )="/....... .......\" &B$(13 )="..---.." &B$(14)=" ..... ... " &B$(15)="...." &B$(16)=".................." &B$(17)="...." &B$(18)="................." &B$(19)="...." &B$(20)=" ............... " &B$(21)=" " ?N=121:N,1;B$(N):.05|L,N+15:N  y=14:x=12 :a$="" "Qgx=12 :gy=12 :gx1=12 :gy1=11 :C=1:D$=" ":E$=" " '#0,19;" HI-SCORE=";hs ,gx,gy;3;"" 6gx1,gy1;5;"" @y,x;6;a$ J$(*100d)=01000 T="2"1500 ^="1"1600@ h="0"1700 r="o"1800 |.B$(Y,X)="."s=s+1:.05|L,25 MB$(Y,X)=""s=s+10 :.1}L,25:.1}L,39':2000 OB$(Y,X)=""s=s+10 :T=T+10 :.1}L,28:.1}L,36$ .0,0;"LIVES=";lives;" SCORE=";s  B$(Y,X)=" " y,x;6;a$ s=T5000 GX,GY;;D$;GX1,GY1;E$ 157d47/d92\gy=gy+c:470 xd=b$(gx,gy-c):d47/d92\d<144d>157d47/d92\gy=gy-c:470 157d47/d92\gx=gx+c:470 yd=b$(gx-c,gy):d47/d92\d<144d>157d47/d92\gx=gx-c 157)gy1=gy1+c:500 xd=b$(gx1,gy1-c):d47/d92\d<144d>157d47/d92\gy1=gy1-c:500 157d47/d92\gx1=gx1+c:500 yd=b$(gx1-c,gy1):d47/d92\d<144d>157d47/d92\gx1=gx1-c COUNT=COUNT+1 COUNT30c=1 *c=-1GX,GY;4;1;""  c=1GX,GY;3;"" ,c=-1GX1,GY1;4;1;"" "c=1GX1,GY1;5;"" GX=yGY=x9000(# !GX1=yGY1=x9000(# &20:D$=B$(GX,GY):E$=B$(GX1,GY1):330J B$(14,11 )="" \14,11 ;2;"":.5,15:B$(14,11 )="."T=T-1 B$(14,11 )=""   Y,X;" " .B$(y,x+1)="."x=x+1:1530 .B$(y,x+1)=" "x=x+1:1530 "B$(y,x+1)=""x=x+1  B$(y,x+1)="\"x=2 a$=""  @ Y,X;" " E.B$(y,x-1)="."x=X-1:1630^ J.B$(y,x-1)=" "x=X-1:1630^ O.B$(y,x-1)=""x=X-1:1630^ T-B$(y,x-1)="/"x=20:1630^ Y"B$(y,x-1)=""x=X-1 ^a$="" h  Y,X;" " .B$(y-1,x)="."y=y-1:1725 .B$(y-1,x)=""y=y-1:1725 "B$(y-1,x)=" "y=y-1 a$=""   y,x;" "  .B$(y+1,x)="."y=y+1:1825! .B$(y+1,x)=""y=y+1:1825! "B$(y+1,x)=" "y=y+1 !a$="" &  C=-1  B$(Y,X)=" "  Y,X;A$ T=T+10 COUNT=0  Y>DD=D+G X>FF=F+H X5a<07060 a=a+1:a=a/10  @gy=xgx=ys=s+10 :t=t+10 :gy=12 :gx=12 :.05|L,20:.05|L,10 :.1}L,10 :550& Jgy1=xgx1=ys=s+10 :t=t+10 :gy1=11 :gx1=12 :.05|L,20:.05|L,10 :.1}L,10 :550& #(count308000@ #-LIVES=LIVES-1 #2?Y,X;1;A$:N=5020-1:.05|L,N:N #<lives09500% #F 270 % HS