� >STARFIGHT
 �  (C) Copyright
  �  BY N.WESTLEY & C.WESTLEY
( 
2  �  Configurations .........
< �  SCREENSIZE 20
F �  SPRITESIZE 20
P 
�
 � 12 : �
� *SLOAD titlescr
� *SCHOOSE titlescr
� 
�	 �ass
� 

 � &ED,0,0

 

 �=0

" ud=1:shades=0

, �

6 � shades=0 ud=1

@ � shades=8 ud=-1

J �

T
 COL=8

^ �

h tint=COL+shades

r � tint>15 � tint=30-tint

| � L=0 � 250:�

�" � COL,tint<<4,tint<<4,tint<<4

� COL+=1

�
 � COL=16

� shades+=ud

� � shades=8 � shades=0

�
 � �>2000

� 

� � X=1 � 150

� � fall

�5 � X<=100 � � L=1 � 20: � 7:� 69,�(1279),�(360):�

� �

� 

� �redefine_numbers
 *SLOAD gamescr
 *SMERGE hiscr
 *CHANNELVOICE 1 6
& *CHANNELVOICE 2 7
0 *CHANNELVOICE 3 8
: *CHANNELVOICE 4 9
D	 Ƞ 4
N *LOAD CODE
X � &9800
b 
l �
v 
� � �ass
� � code% 200
� � PASS=0 � 2 � 2
�
 P%=code%
� [OPT PASS
�
 .fall
� LDR R1,start
� LDR R2,end
� LDR R3,addr
� ADR R4,fall_seq
� MOV R5,#0
�
 .loop
� LDR R6,[R4,R5]
 ADD R7,R3,R6
 CMP R7,R2

 BGT next
  LDR R8,[R3]
* STR R8,[R7]
4 MOV R8,#0
> STR R8,[R3]
H
 .next
R SUB R3,R3,#4
\ ADD R5,R5,#4
f CMP R5,#64
p
 �Q R5,#0
z CMP R3,R1
�
 BGE loop
� MOV R15,R14
� 
� .start EQUD &1FE4800
� .end EQUD &1FEC000
� .addr EQUD &1FEC000
� .fall_seq
�* EQUD 640:EQUD 960:EQUD 1600:EQUD 1280
�) EQUD 640:EQUD 1600:EQUD 960:EQUD 640
�* EQUD 960:EQUD 1600:EQUD 1280:EQUD 640
�* EQUD 1600:EQUD 1280:EQUD 640:EQUD 960
� 
� ]
 �
 �
 
$ � �redefine_numbers
.* � 23,48,254,198,198,198,198,198,254,0
8% � 23,49,112,48,48,48,48,48,254,0
B& � 23,50,254,6,6,254,192,192,254,0
L" � 23,51,254,6,6,126,6,6,254,0
V( � 23,52,192,192,204,204,254,12,12,0
`& � 23,53,254,192,192,254,6,6,254,0
j* � 23,54,254,192,192,254,198,198,254,0
t � 23,55,254,6,6,14,6,6,6,0
~* � 23,56,254,198,198,254,198,198,254,0
�& � 23,57,254,198,198,254,6,6,254,0
� �
�

00000000  0d 00 0a 11 20 f4 20 3e  53 54 41 52 46 49 47 48  |.... . >STARFIGH|
00000010  54 0d 00 14 15 20 f4 20  20 28 43 29 20 43 6f 70  |T.... .  (C) Cop|
00000020  79 72 69 67 68 74 0d 00  1e 20 20 f4 20 20 42 59  |yright...  .  BY|
00000030  20 4e 2e 57 45 53 54 4c  45 59 20 26 20 43 2e 57  | N.WESTLEY & C.W|
00000040  45 53 54 4c 45 59 0d 00  28 05 20 0d 00 32 20 20  |ESTLEY..(. ..2  |
00000050  f4 20 20 43 6f 6e 66 69  67 75 72 61 74 69 6f 6e  |.  Configuration|
00000060  73 20 2e 2e 2e 2e 2e 2e  2e 2e 2e 0d 00 3c 15 20  |s ...........<. |
00000070  f4 20 20 53 43 52 45 45  4e 53 49 5a 45 20 32 30  |.  SCREENSIZE 20|
00000080  0d 00 46 15 20 f4 20 20  53 50 52 49 54 45 53 49  |..F. .  SPRITESI|
00000090  5a 45 20 32 30 0d 00 50  05 20 0d 00 c8 0d 20 eb  |ZE 20..P. .... .|
000000a0  20 31 32 20 3a 20 87 0d  00 d2 14 20 2a 53 4c 4f  | 12 : ..... *SLO|
000000b0  41 44 20 74 69 74 6c 65  73 63 72 0d 00 dc 16 20  |AD titlescr.... |
000000c0  2a 53 43 48 4f 4f 53 45  20 74 69 74 6c 65 73 63  |*SCHOOSE titlesc|
000000d0  72 0d 00 e6 05 20 0d 00  f0 09 20 f2 61 73 73 0d  |r.... .... .ass.|
000000e0  00 fa 05 20 0d 01 04 0e  20 f0 20 26 45 44 2c 30  |... .... . &ED,0|
000000f0  2c 30 0d 01 0e 05 20 0d  01 18 08 20 d1 3d 30 0d  |,0.... .... .=0.|
00000100  01 22 12 20 75 64 3d 31  3a 73 68 61 64 65 73 3d  |.". ud=1:shades=|
00000110  30 0d 01 2c 06 20 f5 0d  01 36 14 20 e7 20 73 68  |0..,. ...6. . sh|
00000120  61 64 65 73 3d 30 20 75  64 3d 31 0d 01 40 15 20  |ades=0 ud=1..@. |
00000130  e7 20 73 68 61 64 65 73  3d 38 20 75 64 3d 2d 31  |. shades=8 ud=-1|
00000140  0d 01 4a 06 20 f5 0d 01  54 0a 20 43 4f 4c 3d 38  |..J. ...T. COL=8|
00000150  0d 01 5e 06 20 f5 0d 01  68 14 20 74 69 6e 74 3d  |..^. ...h. tint=|
00000160  43 4f 4c 2b 73 68 61 64  65 73 0d 01 72 1d 20 e7  |COL+shades..r. .|
00000170  20 74 69 6e 74 3e 31 35  20 8c 20 74 69 6e 74 3d  | tint>15 . tint=|
00000180  33 30 2d 74 69 6e 74 0d  01 7c 12 20 e3 20 4c 3d  |30-tint..|. . L=|
00000190  30 20 b8 20 32 35 30 3a  ed 0d 01 86 22 20 fb 20  |0 . 250:...." . |
000001a0  43 4f 4c 2c 74 69 6e 74  3c 3c 34 2c 74 69 6e 74  |COL,tint<<4,tint|
000001b0  3c 3c 34 2c 74 69 6e 74  3c 3c 34 0d 01 90 0b 20  |<<4,tint<<4.... |
000001c0  43 4f 4c 2b 3d 31 0d 01  9a 0d 20 fd 20 43 4f 4c  |COL+=1.... . COL|
000001d0  3d 31 36 0d 01 a4 0f 20  73 68 61 64 65 73 2b 3d  |=16.... shades+=|
000001e0  75 64 0d 01 ae 1a 20 fd  20 73 68 61 64 65 73 3d  |ud.... . shades=|
000001f0  38 20 84 20 73 68 61 64  65 73 3d 30 0d 01 b8 0d  |8 . shades=0....|
00000200  20 fd 20 91 3e 32 30 30  30 0d 01 c2 05 20 0d 01  | . .>2000.... ..|
00000210  cc 10 20 e3 20 58 3d 31  20 b8 20 31 35 30 0d 01  |.. . X=1 . 150..|
00000220  d6 0b 20 d6 20 66 61 6c  6c 0d 01 e0 35 20 e7 20  |.. . fall...5 . |
00000230  58 3c 3d 31 30 30 20 8c  20 e3 20 4c 3d 31 20 b8  |X<=100 . . L=1 .|
00000240  20 32 30 3a 20 e6 20 37  3a f0 20 36 39 2c b3 28  | 20: . 7:. 69,.(|
00000250  31 32 37 39 29 2c b3 28  33 36 30 29 3a ed 0d 01  |1279),.(360):...|
00000260  ea 06 20 ed 0d 01 f4 05  20 0d 01 fe 16 20 f2 72  |.. ..... .... .r|
00000270  65 64 65 66 69 6e 65 5f  6e 75 6d 62 65 72 73 0d  |edefine_numbers.|
00000280  02 08 13 20 2a 53 4c 4f  41 44 20 67 61 6d 65 73  |... *SLOAD games|
00000290  63 72 0d 02 12 12 20 2a  53 4d 45 52 47 45 20 68  |cr.... *SMERGE h|
000002a0  69 73 63 72 0d 02 1c 16  20 2a 43 48 41 4e 4e 45  |iscr.... *CHANNE|
000002b0  4c 56 4f 49 43 45 20 31  20 36 0d 02 26 16 20 2a  |LVOICE 1 6..&. *|
000002c0  43 48 41 4e 4e 45 4c 56  4f 49 43 45 20 32 20 37  |CHANNELVOICE 2 7|
000002d0  0d 02 30 16 20 2a 43 48  41 4e 4e 45 4c 56 4f 49  |..0. *CHANNELVOI|
000002e0  43 45 20 33 20 38 0d 02  3a 16 20 2a 43 48 41 4e  |CE 3 8..:. *CHAN|
000002f0  4e 45 4c 56 4f 49 43 45  20 34 20 39 0d 02 44 09  |NELVOICE 4 9..D.|
00000300  20 c8 a0 20 34 0d 02 4e  0f 20 2a 4c 4f 41 44 20  | .. 4..N. *LOAD |
00000310  43 4f 44 45 0d 02 58 0c  20 d6 20 26 39 38 30 30  |CODE..X. . &9800|
00000320  0d 02 62 05 20 0d 02 6c  06 20 e0 0d 02 76 05 20  |..b. ..l. ...v. |
00000330  0d 02 80 0b 20 dd 20 f2  61 73 73 0d 02 8a 10 20  |.... . .ass.... |
00000340  de 20 63 6f 64 65 25 20  32 30 30 0d 02 94 15 20  |. code% 200.... |
00000350  e3 20 50 41 53 53 3d 30  20 b8 20 32 20 88 20 32  |. PASS=0 . 2 . 2|
00000360  0d 02 9e 0d 20 50 25 3d  63 6f 64 65 25 0d 02 a8  |.... P%=code%...|
00000370  0e 20 5b 4f 50 54 20 50  41 53 53 0d 02 b2 0a 20  |. [OPT PASS.... |
00000380  2e 66 61 6c 6c 0d 02 bc  11 20 4c 44 52 20 52 31  |.fall.... LDR R1|
00000390  2c 73 74 61 72 74 0d 02  c6 0f 20 4c 44 52 20 52  |,start.... LDR R|
000003a0  32 2c 65 6e 64 0d 02 d0  10 20 4c 44 52 20 52 33  |2,end.... LDR R3|
000003b0  2c 61 64 64 72 0d 02 da  14 20 41 44 52 20 52 34  |,addr.... ADR R4|
000003c0  2c 66 61 6c 6c 5f 73 65  71 0d 02 e4 0e 20 4d 4f  |,fall_seq.... MO|
000003d0  56 20 52 35 2c 23 30 0d  02 ee 0a 20 2e 6c 6f 6f  |V R5,#0.... .loo|
000003e0  70 0d 02 f8 13 20 4c 44  52 20 52 36 2c 5b 52 34  |p.... LDR R6,[R4|
000003f0  2c 52 35 5d 0d 03 02 11  20 41 44 44 20 52 37 2c  |,R5].... ADD R7,|
00000400  52 33 2c 52 36 0d 03 0c  0e 20 43 4d 50 20 52 37  |R3,R6.... CMP R7|
00000410  2c 52 32 0d 03 16 0d 20  42 47 54 20 6e 65 78 74  |,R2.... BGT next|
00000420  0d 03 20 10 20 4c 44 52  20 52 38 2c 5b 52 33 5d  |.. . LDR R8,[R3]|
00000430  0d 03 2a 10 20 53 54 52  20 52 38 2c 5b 52 37 5d  |..*. STR R8,[R7]|
00000440  0d 03 34 0e 20 4d 4f 56  20 52 38 2c 23 30 0d 03  |..4. MOV R8,#0..|
00000450  3e 10 20 53 54 52 20 52  38 2c 5b 52 33 5d 0d 03  |>. STR R8,[R3]..|
00000460  48 0a 20 2e 6e 65 78 74  0d 03 52 11 20 53 55 42  |H. .next..R. SUB|
00000470  20 52 33 2c 52 33 2c 23  34 0d 03 5c 11 20 41 44  | R3,R3,#4..\. AD|
00000480  44 20 52 35 2c 52 35 2c  23 34 0d 03 66 0f 20 43  |D R5,R5,#4..f. C|
00000490  4d 50 20 52 35 2c 23 36  34 0d 03 70 0d 20 ec 51  |MP R5,#64..p. .Q|
000004a0  20 52 35 2c 23 30 0d 03  7a 0e 20 43 4d 50 20 52  | R5,#0..z. CMP R|
000004b0  33 2c 52 31 0d 03 84 0d  20 42 47 45 20 6c 6f 6f  |3,R1.... BGE loo|
000004c0  70 0d 03 8e 10 20 4d 4f  56 20 52 31 35 2c 52 31  |p.... MOV R15,R1|
000004d0  34 0d 03 98 05 20 0d 03  a2 19 20 2e 73 74 61 72  |4.... .... .star|
000004e0  74 20 45 51 55 44 20 26  31 46 45 34 38 30 30 0d  |t EQUD &1FE4800.|
000004f0  03 ac 17 20 2e 65 6e 64  20 45 51 55 44 20 26 31  |... .end EQUD &1|
00000500  46 45 43 30 30 30 0d 03  b6 18 20 2e 61 64 64 72  |FEC000.... .addr|
00000510  20 45 51 55 44 20 26 31  46 45 43 30 30 30 0d 03  | EQUD &1FEC000..|
00000520  c0 0e 20 2e 66 61 6c 6c  5f 73 65 71 0d 03 ca 2a  |.. .fall_seq...*|
00000530  20 45 51 55 44 20 36 34  30 3a 45 51 55 44 20 39  | EQUD 640:EQUD 9|
00000540  36 30 3a 45 51 55 44 20  31 36 30 30 3a 45 51 55  |60:EQUD 1600:EQU|
00000550  44 20 31 32 38 30 0d 03  d4 29 20 45 51 55 44 20  |D 1280...) EQUD |
00000560  36 34 30 3a 45 51 55 44  20 31 36 30 30 3a 45 51  |640:EQUD 1600:EQ|
00000570  55 44 20 39 36 30 3a 45  51 55 44 20 36 34 30 0d  |UD 960:EQUD 640.|
00000580  03 de 2a 20 45 51 55 44  20 39 36 30 3a 45 51 55  |..* EQUD 960:EQU|
00000590  44 20 31 36 30 30 3a 45  51 55 44 20 31 32 38 30  |D 1600:EQUD 1280|
000005a0  3a 45 51 55 44 20 36 34  30 0d 03 e8 2a 20 45 51  |:EQUD 640...* EQ|
000005b0  55 44 20 31 36 30 30 3a  45 51 55 44 20 31 32 38  |UD 1600:EQUD 128|
000005c0  30 3a 45 51 55 44 20 36  34 30 3a 45 51 55 44 20  |0:EQUD 640:EQUD |
000005d0  39 36 30 0d 03 f2 05 20  0d 03 fc 06 20 5d 0d 04  |960.... .... ]..|
000005e0  06 06 20 ed 0d 04 10 06  20 e1 0d 04 1a 05 20 0d  |.. ..... ..... .|
000005f0  04 24 18 20 dd 20 f2 72  65 64 65 66 69 6e 65 5f  |.$. . .redefine_|
00000600  6e 75 6d 62 65 72 73 0d  04 2e 2a 20 ef 20 32 33  |numbers...* . 23|
00000610  2c 34 38 2c 32 35 34 2c  31 39 38 2c 31 39 38 2c  |,48,254,198,198,|
00000620  31 39 38 2c 31 39 38 2c  31 39 38 2c 32 35 34 2c  |198,198,198,254,|
00000630  30 0d 04 38 25 20 ef 20  32 33 2c 34 39 2c 31 31  |0..8% . 23,49,11|
00000640  32 2c 34 38 2c 34 38 2c  34 38 2c 34 38 2c 34 38  |2,48,48,48,48,48|
00000650  2c 32 35 34 2c 30 0d 04  42 26 20 ef 20 32 33 2c  |,254,0..B& . 23,|
00000660  35 30 2c 32 35 34 2c 36  2c 36 2c 32 35 34 2c 31  |50,254,6,6,254,1|
00000670  39 32 2c 31 39 32 2c 32  35 34 2c 30 0d 04 4c 22  |92,192,254,0..L"|
00000680  20 ef 20 32 33 2c 35 31  2c 32 35 34 2c 36 2c 36  | . 23,51,254,6,6|
00000690  2c 31 32 36 2c 36 2c 36  2c 32 35 34 2c 30 0d 04  |,126,6,6,254,0..|
000006a0  56 28 20 ef 20 32 33 2c  35 32 2c 31 39 32 2c 31  |V( . 23,52,192,1|
000006b0  39 32 2c 32 30 34 2c 32  30 34 2c 32 35 34 2c 31  |92,204,204,254,1|
000006c0  32 2c 31 32 2c 30 0d 04  60 26 20 ef 20 32 33 2c  |2,12,0..`& . 23,|
000006d0  35 33 2c 32 35 34 2c 31  39 32 2c 31 39 32 2c 32  |53,254,192,192,2|
000006e0  35 34 2c 36 2c 36 2c 32  35 34 2c 30 0d 04 6a 2a  |54,6,6,254,0..j*|
000006f0  20 ef 20 32 33 2c 35 34  2c 32 35 34 2c 31 39 32  | . 23,54,254,192|
00000700  2c 31 39 32 2c 32 35 34  2c 31 39 38 2c 31 39 38  |,192,254,198,198|
00000710  2c 32 35 34 2c 30 0d 04  74 1f 20 ef 20 32 33 2c  |,254,0..t. . 23,|
00000720  35 35 2c 32 35 34 2c 36  2c 36 2c 31 34 2c 36 2c  |55,254,6,6,14,6,|
00000730  36 2c 36 2c 30 0d 04 7e  2a 20 ef 20 32 33 2c 35  |6,6,0..~* . 23,5|
00000740  36 2c 32 35 34 2c 31 39  38 2c 31 39 38 2c 32 35  |6,254,198,198,25|
00000750  34 2c 31 39 38 2c 31 39  38 2c 32 35 34 2c 30 0d  |4,198,198,254,0.|
00000760  04 88 26 20 ef 20 32 33  2c 35 37 2c 32 35 34 2c  |..& . 23,57,254,|
00000770  31 39 38 2c 31 39 38 2c  32 35 34 2c 36 2c 36 2c  |198,198,254,6,6,|
00000780  32 35 34 2c 30 0d 04 92  06 20 e1 0d ff           |254,0.... ...|
0000078d