MODE 7:OFF
ON ERROR REPORT:PRINT " at ";ERL:END
CLS
PRINT TAB(1,12);CHR$(141);CHR$(128);CHR$(132);CHR$(156);"KILLA THOMPSON"
PRINT TAB(1,13);CHR$(141);CHR$(128);CHR$(132);CHR$(156);"KILLA THOMPSON"
FOR X = 1 TO 300000
NEXT X
MODE 12:OFF
CLS
PRINT TAB(5,1);"INSTRUCTIONS"
PRINT "In this game, you aim to score as highly as posible."
PRINT "To do this you must hit the extremely highly monstrously"
PRINT "complex, highly sophisticated simulations. These targets,"
PRINT "Computer Aided Mind Influencing Limited Lifetime Appearances,"
PRINT "or 'CAMILLA' for short, will move across the screen.  Their"
PRINT "movement is slow to allow maximum chances of splattering them."
PRINT
PRINT "Click the left mouse button to continue":PRINT:PRINT:PRINT
REPEAT:MOUSE X,Y,B:UNTIL B=4
X=1:Y=1:XOLD=1:YOLD=1

FOR P=1 TO 1000

PROCDraw (P)
FOR M=1 TO 1000:NEXT
XOLD=X:YOLD=Y
MOUSE X,Y,B
GCOL 0:CIRCLE XOLD,YOLD,1
GCOL 7:CIRCLE X,Y,1
IF X>69+P AND X<189+P AND Y>40 AND Y<270 AND B=4 THEN
 FOR M=1 TO 600
  GCOL 1
  CIRCLEFILL 129+P,115,(2*M-1)
  GCOL 3
  CIRCLEFILL 129+P,115,2*M
 NEXT
 GCOL 0
 FOR M=1200 TO 1 STEP -1
  CIRCLE 129+P,115,M
 NEXT
 PRINT "BWAHAHAHAHA! YOU KILLED SMILLURRR!"
 END
ENDIF

NEXT
PRINT "Awww, come on, you don't want to be humane with her, do ya?!"
END





DEF PROCDraw (Q)
GCOL 0
RECTANGLEFILL 69+Q,40,120,230
GCOL 5
CIRCLEFILL 130+Q,200,30
GCOL 6
RECTANGLEFILL 70+Q,140,120,30
RECTANGLEFILL 100+Q,80,60,60
GCOL 4
RECTANGLEFILL 101+Q,40,60,40

ENDPROC