6 M **********************************************6M * KILLER GAME *6M * Written by: Scott Terry *6(M * (Note: use cursor pad with Num-Lock ON) *62M ********************************************** <M A-Z"FM XMAN(60),YMAN(60),SHIT(60)#PMLEVEL=5:XSIZE=80:YSIZE=25:SC=0 ZN"START"dN "SCREEN SETUP"nN "KILLER SETUP"xN"BEGIN MOVING"N "MOVE HOME" NDEAD=0N "MOVE KILLERS"(N FL=0  DEAD=0  "BEGIN MOVING",@N FL=1  "NEXT LEVEL" : "YOU LOSE!"TNZN"HOME AGAIN"ZNX=X2 : Y=Y2fN1@(X,Y) (2);|N"MOVE HOME"|N3 : 4 =""NA$= :  A$=""  N1@(X,Y)" "; : X2=X : Y2=Y?N (A$)+1 ,,,",,,^,6,@,J,T,OX=X-1:Y=Y+1: ^OY=Y+1: ^"OX=X+1:Y=Y+1: ^,"OX=X-1: ^6)OX=X+1: ^@0OX=X-1:Y=Y-1: ^J;OY=Y-1: ^TBOX=X+1:Y=Y-1^JO X<1  "HOME AGAIN"!hXO X>XSIZE-2  "HOME AGAIN"rmO Y=0  "HOME AGAIN"!|{O Y>YSIZE-3  "HOME AGAIN"O1@(X,Y)(2);OOK=(1,"QRTLS",A$) O K ,,,,0'O1@(X,Y)(2); :  "BEGIN MOVING"OOO"TELEPORT" OX= (XSIZE-2):Y= (YSIZE-3) P I=1  LEVEL P  X'P  XMAN(I)=X  YMAN(I)=Y  PP ]PI=1000cP1@(X,Y)(2);yP I,30 : 5 200&P 0P"SONIC"":P SFLAG=1   : SFLAG=1DPMOVE=1 :  "PLOT KILLERS"NP I=1  LEVELhXP  SHIT(I)=0  (X-XMAN(I))<=1  (Y-YMAN(I))<=1  SHIT(I)=2 : SC=SC+20 : 1@(56,YSIZE-1)SC;bNQl^QMOVE=0 :  "PLOT KILLERS"vgQI=500 : pQ"LAST STAND"pQ1@(X,Y)(2);Q "MOVE KILLERS"Q FL=0  DEAD=0  ,Q FL=1  "NEXT LEVEL" : "YOU LOSE!"Q"MOVE KILLERS"QMOVE=1 :  "PLOT KILLERS"Q I=1  LEVELQ  SHIT(I)=0&Q XMAN(I)=XMAN(I)-(XMAN(I)-X)&R YMAN(I)=YMAN(I)-(YMAN(I)-Y) ?R  :?R  X=XMAN(I)  Y=YMAN(I)  SHIT(I)<>2  DEAD = 1R RMOVE=0 :  "PLOT KILLERS"R I=LEVEL  2  -1 R  J=1  I-1)*R  SHIT(I)=2  SHIT(J)=2  z)4R  SHIT(I)=1  SHIT(J)=1  z1>1S  XMAN(I)=XMAN(J)  YMAN(I)=YMAN(J) HxS SHIT(I)=1 : SHIT(J)=1'RS 1@(XMAN(I),YMAN(I)) (15);)\S SC=SC+10 : 1@(56,YSIZE-1) SC;fS  500,20pS   zS J,I SFL=0S I=1  LEVELT  SHIT(I)=0  T$TFL=1 : +T"KILLER SETUP"Q+T I=1  LEVEL : XMAN(I)= (XSIZE-2) : YMAN(I)= (YSIZE-3) : SHIT(I)=0 : rTMOVE=0 :  "PLOT KILLERS"{T "TELEPORT"~T"PLOT KILLERS" ~TFL=1T I=1  LEVELT  SHIT(I)<>0  $T C$="X" : FL=0T  MOVE<>0  C$=" "T 1@(XMAN(I),YMAN(I))C$;$T.T8T"SCREEN SETUP" BTSFLAG=0$LT- 11 :  : * 0,0  1023,720 VU' ,,0e`U1@(0,YSIZE-1)"(T)eleport,(L)ast stand,(S)onic screwdriver Score: ";SC;" Killers: ";LEVEL;jAUtBU"NEXT LEVEL")~BU I=200  1800  40 :  I,7 : -aU I=1  5 :  300,30 :  330,30 : ULEVEL = LEVEL + 5U "START"U"YOU LOSE!" U IU J=1  IU F,D :  F,DUU U 7U 780,300U 760,300U 740,300 U 720,300U 700,500U 700,500(U 700,500