Invaders 47
900 PRINT"	DIRECT HIT ON COMMAND S
HIP = 200";
910 PRINT"	EACH COMPLETE MISS
= —10";
920 PRINT"	ZAPPED BY BY COMMAND SH
IP = —50	ZAPPED BY AN INVADER
= —20"
930 PEN 1
940 PEN 2:LOCATE 5,25:PRINT CHR$(24);"PR ESS ANY KEY TO START THE GAME";CHR$(24); :PEN 1
950 IF INKEY$<>"" THEN 950
960 IF INKEY$="" THEN 960 ELSE CLS
970 WINDOW #0,5,36,1,25:PAPER #0,0:PEN # 0,1
980 A=0:C=0:FX=0:L=0:P=7:0=6:T=2:U=1:V=5 :W=10:SC=0:XP=0:Z=1
990 J$=SPACE$(32)
1000 CLS:PEN 2:FOR X=1 TO 7:LOCATE 3,X:F OR Y= 1 TO 7: PRINT I$;:NEXT Y,X:PEN 1 1010 LOCATE 1,20:FOR X= 1 TO 6:PRINT D$; :NEXT:PRINT CHR$(241);CHR$(242)
1020 LOCATE 1,21:PEN 2:PRINT T$;:PEN 1 1030 LOCATE I,23:PEN 3:PRINT CHR$(24);"S CORE:";CHR$(24);:PEN 1:PRINT MID$(STR$(S C),2);:LOCATE 16,23:PRINT CHR$(24);"ROCK ET RESERVE:";CHR$(24);MID$(STR$(RR),2); 1040 GOTO 110
1050 LOCATE 1,6:PEN 2:PRINT"YOUR PLANET HAS BEEN TAKEN OVER.";:PEN 1
1060 PRINT:PRINT"YOU SCORED";SC;"USING"; 80—RR;"ROCKETS";:GOTO 1090
1070 LOCATE 1,6:PEN 3:PRINT CHR$(24);"YO
U HAVE WIPED OUT THE INVADERS,";CHR$(24) ;:PEN 1:PRINT:PRINT CHR$(24);"SCORED";SC ;"AND USED";80—RR;"ROCKETS";CHR$(24); 1080 LOCATE 2,10:PEN 2:PRINT"C O N G R A
TULATIONS";:PEN 1
1090 IF SC>HS THEN HS=SC
1100 TS=TS+SC
1110 LOCATE 13,12:PRINT"LAST SCORE	";
SC:LOCATE 13,13:PEN 3:PRINT"HIGHEST SCOR E ";HS:PEN 1:LOCATE 13,14:PEN 2:PRINT"TO TAL SCORE ";TS:PEN 1