>Shoot  Snake Shoot  Michael Foot 1988 (: 27:instr < TpB F *FX202,47 P *FX12,0 Z *FX11,0 d1:23;8202;0;0;0; n] X(102),Y(102),HI$(6),S%(6),L%(6):C=1:MX=19:MY=11:A=0:B=0:L=0:J=40:S=0:BX=19:BY=11 x6A%=16:HI$(A%)="SNAKE SHOOT":S%(A%)=0:L%(A%)=0: screen 2: MX,MY);"#" Etj@:P=2 10 2:C$:3,P);C$::P=2 10 2:C$:36,P);C$: 6187,967:1090,967:1090,347:187,347:187,967 S,N,A,K,E,S,H,O,O,T scores 26 .2:6,0)"SEGMENTS:";:1:15,0);10-L; '1:26,0);J-S;:2:" SHOTS " snake 2: MX,MY);"#":3 4,-5,10,1 G$=(0) G$="Z" A=-1 G$="X" A=1 G$="/" B=1 "G$=":" B=-1 ,A<>0 B<>0 target 6W BX=X(R-9+L) BY=Y(R-9+L) L=L+1:7:2:6,0)"SEGMENTS:";:1:15,0);10-L;" ":3 @ L>9 TfB JR=R+1: R>102 R=13 T d\@ ^ target h BX,BY);" " rBX=BX+A:BY=BY+B | BX<6 BX>33 A=0:tdA ) BY<2 BY>20 B=0:tdA  BX,BY);"+"  BX=MX:BY=MY:S=S+1 ,1:26,0);J-S;:2:" SHOTS ":3  S>(J-1) TfB  d\@  snake 1 X(R),Y(R));"O": X(R-10+L),Y(R-10+L));" "  0screen:R=33 6 -1:X(C)=R:Y(C)=2:C=C+1: =L%(6) (J-S)>=S%(6) enter 0mscores:1:15,9)"PRESS SPACE";:3: =32:26:J=40:C=1:MX=19:MY=11:A=0:B=0:L=0:S=0:BX=19:BY=11::tB@ :scores:28,0,31,39,22 D:2:16,0)"HI SCORES" N21:3,2)"No. NAME SHTS SEGS" XN3:Y%=16:4,Y%+2);Y%;" ";HI$(Y%),20);26);S%(Y%);32);L%(Y%):Y% b lenter:*FX21,0 v128,0,31,39,22::;"ENTER YOUR NAME : "NAME$ A%=0::A%=A%+1: L>=L%(A%) (J-S)>=S%(A%):B%=6A%+1-1:L%(B%)=L%(B%-1):S%(B%)=S%(B%-1):HI$(B%)=HI$(B%-1)::L%(A%)=L:S%(A%)=(J-S):HI$(A%)=NAME$: Pinstr:?&FE00=1:?&FE01=0:" " " SNAKE SHOOT SNAKE SHOOT " 28,0,23,39,7 '" Caught in the middle of a rectangular field with a small gun, you must try to escape by shooting the snake that patrols the outer perimeter. " '" But first the good news : the gun you are holding has controlable missiles "''" Now the bad news : the snake can only be destroyed by shooting the" " last segment of the tail section so to destroy the whole snake you must destroy all of the 10 sections" k'" PRESS SPACE TO CONTINUE ";:I%=040:1,-15,I%*2,1:?&FE00=1:?&FE01=I%:: =32 h:?&FE00=1:?&FE01=0:'" You are equiped with 40 bullets to shoot the snake so use them wisely" ڧ'" To control the missile use these keys Z - LEFT X - RIGHT : - UP / - DOWN " '" Included is a high score table which when read from left to right shows : "''" RANK No., NAMES, SHOTS LEFT AND SEGMENTS SHOT" n'" PRESS SPACE TO START ";:I%=4080:1,-15,I%*2,1:?&FE00=1:?&FE01=I%-40:: =32 a21:*K.0RESTORE640:I%=(2+!&1C)AND&FFFF:REPEATI%=I%-1:U.?I%=13:I%?1=&FF|MOLD|M40MODE7|MRUN|F|M *FX138,0,128