258 Dogfight
810 RETURN
820 LOCATE 1,1:PEN 3:PRINT CHR$(24);" DOGFIGHT	";C
HR$(24);:PEN 1
830 LOCATE 14,5:PEN 2:PRINT"PLAYER CONTR OLS":PEN 1
840 LOCATE 10,8:PRINT CHR$(24);"UP	ARR
OW	 UP";CHR$(24)
850 LOCATE I0,9:PEN 3:PRINT CHR$(24);"DO WN ARROW	DOWN";CHR$(24);:PEN 1
860 LOCATE 10,10:PEN 2:PRINT CHR$(24);"S
PACE BAR	FIRE";CHR$(24);:PEN 1
870 LOCATE 1,15:PRINT"THE PLAYER CONTROL
S THE RED AIRCRAFT	AND THE COMPUTER C
ONTROLS THE DARK BLUE"
880 LOCATE 10,2I:PEN 3:PRINT CHRS(24);"P RESS ANY KEY TO START";CHR$(24);:PEN 1 890 IF INKEY$<>"" THEN 890
900 IF INKEY$=""THEN 900 ELSE CLS
910 RETURN
920 REM
930 G=1
940 P(1)=20:P(2)=1:0(1)=20:0(2)=31:P(3)=
P(1):P(4)=P(2):0(3)=0(1):0(4)=0(3) 950 A=1:AA=A
960 RESTORE:FOR X=I TO 16
970 READ N:D(X)=N
980 READ N:E(X)=N
990 NEXT X
1000 DATA 0,0,-1,-1,-1,-1,-1,-1,0,0,1,1, 1,1,1,1
1010 DATA 1,-1,1,-1,0,0,-1,1,-1,1,-1,1,0 ,0,1,-1
1020 F=0
1030 G$(1)=CHR$(A+230):G$(2)=CHR$(AA+238
1040 SYMBOL AFTER 230
1050 SYMBOL 231,0,15,132,255,0,15,0,0 1060 SYMBOL 232,8,26,52,9,18,164,64,0 1070 SYMBOL 233,84,84,116,84,16,16,16,84 1080 SYMBOL 234,16,72,36,208,72,36,2,4 1090 SYMBOL 235,0,240,0,255,33,240,0,0 1100 SYMBOL 236,0,2,37,72,144,36,88,16 1110 SYMBOL 237,12,8,8,8,42,46,42,42