WORM  0:0:0::10 ,0;7;" WORM is LOADING -- PLEASE WAIT ":20,0;:"":20,0;:"" )WORM @ 0 000 00000 000 000 00000 00? 0 0 0 00000000 00? 0 0 0 00000000 000 00 ?0 ?0?000 0 00 ?0 ?0?000 ?00 000000?00?00 000000?00<<<<<<<DD<<<<<<}}}}}}}c}?A?}cTT~~~~~~~c~ZB<<~c<<<<<<<<<<<<<?<0 000 00000000 000?B0 000 00000000 000?0 000 00000000 000?0 000 00000000 0000 ?00 000 ?0 ?00 000 ?0 B?00 000 ?0 <?00 000 ?&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&:::::::WORM S$S$U$.h=0:w$="":8000@:85004! 0:0::21,0;7;1;"By Jason Holt.":n=0213:m=031:n,m;6;"";n,m;2;"":m:n:.3,0:.3,2:.3,5 ol=1:b=0:s=0::11 ,3;7;1;"Enter number men (3 to 6).":10 g=4:7:0:7:100d:b=0:n=120:.03{u\,0:.03{u\,3:n:6:1:7::x=11 :y=15:300, 400:x1,y1;"";x,y;6;w$(d):.01z# =,0:.01z# =,-8:>.9ffffx1,y1;6;"":<.3l<5x1,y1;1;5;"" (a=14s=s+100d:b=b+1 $a=141b=10 1000 a=15s$=""9000(# 5 1:0: ="3"w=3: ="4"w=4: ="5"w=5: ="6"w=6:  10 d:7,9 ;"SCORE=";s;9 ,9 ;"BONUS=";b;11 ,9 ;"WORMS";":"(w+1);13 ,9 ;"LAP=";l:s=s+b:15,9 ;"SCORE=";s: ,U5:d=14:x,y;w$(d):.3,0:.3,-8:"" 6d:300, 5:x1=x:y1=y:x=x+(d=2)-(d=3):y=y+(d=4)-(d=1):x=-1x=22y=32 y=-19000(# 9a=(x,y):s$=(x,y):b$=:b$>"4"b$<"9"d=b$-4  0:2:6:b=b*500:100d:n=110 :.05|L,*10 -10 :n:.5,-10 ::g=1000:b=0:m=6+4*l:n=120:*20,*30;7;"":n:n=1m Qx=(*22):y=(*32 ):(x,y)=""(x=11 y=15)1001 9x,y;6;"":n:x=11 :y=15:300, 400:x1,y1;7;"";x,y;0;w$(d):.03{u\,-15:.03{u\,-20:a=22s$=""b=b+1:s=s+100d:.03{u\,0:b=m2000 a=239000(#  1003 b=b*500:6:6:0:100d:n=120:.01z# =,n:.01z# =,-n:n::0,0;"":n=1172:n,0;" ";n+1,0;" ":n ђ" ":n=1174:m=1274:n,m;1;"":m:n <b=0:x=11 :y=15:300,:g=2000 s400:x1,y1;3;"";x,y;2;w$(d):.03{u\,-11 :.03{u\,-13 :.03{u\,-15 Ta=491.02{# =,-35#:b=b+1:b=35#b=7000X:3000 s$" "a4919000(#  2003 0:0:7:100d:n=110 :.1}L,*10 :n:23692\,-1:n=120::n:x=11 :y=031 +x,y;4;"":<.2~L3010 y Rx=11 :y=0:300,:g=3000 :300,:d=19000(# r400:x1,y1;5;"";x,y;7;w$(d):.08}# =,-11 :.08}# =,-30:.08}# =,-0 s$""9000(# 'y=31b=10000':4000 3004 _x=x+(<.5x20)-(<.5x1):x,y;4;"":<.33002 3010 g=4000:1:3:7:100d:200:n=210-1:n,0;1;" ":n:.3,0::n=130:*20,*30;"":n:m=3:b=3:x=11 :y=15:300, 400:x1,y1;" ";x1,y1;6;(""ƥ<.2~L);x,y;0;w$(d);m,b;5;1;"*":.01z# =,3:.04|# =,-3:m=xy=bb=15000::5000 m,b;1;7;"*":m=m+(<.5m<19)-(<.5m>1):b=b+(<.5b<29)-(<.5b>1):s$=""9000(# s=s+502:4001 %x=3:0:0:7:100d:n=.30-.05|L:n,0:n,-2:n,0:n,-5:n:n=15:.02{# =,0:.02{# =,-2:.02{# =,0:.02{# =,-5:n::2:7:n=021:n,0;" ":n b=0:g=5000 y=(*4)+1 x=x+(="8")-(="5"):b=b+2:s$=(5,x):21,0;"";5,x;0;"";21,y;" ":.05|L,0:.05|L,2:6000p:s$""y=x:x=5:9000(# o5,x;4;"":23692\,-1:0:21,0;::2:<.733335003 n=14:x=x+(="8")-(="5"):s$=(5,x):21,0;" ";5,x;0;"";21,*3+1;(""ƥ<.1}L):.04|# =,-2:.04|# =,0:s$=""y=5:x=5:9000(# 5,x;4;"":23692\,-1:0:21,0::2:b=b+5:n:b>1000s=s+25000a:6000p  5002 p2:7:g=6000p:n=521:n,0;" ":n:23692\,-1:" ":n=113 :.07}\(,-3:.07}\(,-2:21,0:" ";5,x;"";4,x;" ":n:b=(*10 )+18:n=1421:.07}\(,-5:.07}\(,0:5,x;"";4,x;" ";21,0:"";b;"";31;"":n qn=513 :n-1,x;" ";n,x;"":.03{u\,0:.03{u\,2:n:13 ,x;" ":n=021:n,0;1;1;" ":n:4 r@"":7:x=13 :y=1:0:x,y;"":0 swy=y+1:x,y;"";x,y-1;1;"":.1}L,-10 :.1}L,-5:(14,y)=" "6050 t="7"6010z u 6003s zx=x-1:y=y+1:x,y;"";x+1,y-1;1;"":.1}L,-15:.1}L,-10 :x=06050 {="7"6010z |x=x+1:y=y+1:x,y;"";x-1,y-1;1;"":.1}L,-15:.1}L,-10 :y=316050 }x=13 7000X ~ 6012| Ux=x+121:x,y;"";x-1,y;1;"":.3,x:x:9000(# XCb=yb+1=yb=40000@:l=l+1:w=w+1:4 Y 6050 @n="a""j"+7 A x:n,x:n B C60<,125},255,255,255,255,126~,60<,0,99c,255,240,240,255,99c,0,60<,126~,126~,60<,36$,36$,102f,102f,0,198,255,15,15,255,198,0,102f,102f,36$,36$,60<,126~,126~,60<,126~,1,121y,133,165,153,129,126~,68D,186,186,84T,16,19,20,24,60<,102f,195,153,153,195,102f,60<,24,126~,114r,207,243,78N,126~,24,255,255,195,195,195,195,255,255 !4o5:7:0::0,12 ;"WORM"'5;"":9100# !5Z'"Instructions:"''"Scene:1-Eat the for points and eat 10 or 1 to get to next set." !61"Scene:2-Eat the flowers avoid the rocks ." !7$"Scene:3-Eat flowers miss wall ." !8""Scene:4-Move along windy path." !9#"Scene:5-Eat the blue dandelion." !:)"Scene:6-Work down to undergroundcave." !;T"Scene:7-Jump the gap, any key tobegin, 7 for up, take finger off 7 for down." !?#0;7;1;"Press any key to begin.........." !?1:0: #(#b=0:x>21x=21 #)x<0x=0 #*y<0y=0 #+y>31y=31 #,x,y;0;7;1;1;w$(d):n=110 :.1}L,-15:n:0:7:0:w=w-1:100d:n=110 :.15~,-20:n #-x=3:w>0g #. h