max_cars% = 1
max_speed% = 14
max_speed2% = 15
()� �: � � �: � 25:� �$;" at line ";�:�
2� 28
<
� 27:�
F	�init
P	�race
Z�
d:
n
��init
x�ass
��draw_track
�� from_screen:�:�
�� cd% 20*max_cars%
�%� P1X%(max_cars%),P1Y%(max_cars%)
�%� P2X%(max_cars%),P2Y%(max_cars%)
�%� P3X%(max_cars%),P3Y%(max_cars%)
�� angle_data% 36*4*7
�t=angle_data%
�� a%=0 � 35
�A%=a%*36
�"� Three points to draw the car
�/t!0 = (��(A%-90)*10) + (��(A%-90)*10) * 320
�/t!4 = (��(A%+90)*10) + (��(A%+90)*10) * 320

/t!8 = (��(A%)*30)    + (��(A%)*30)    * 320

1� Two points to sense track for computer cars

0t!12=(��(A%-45)*125) + (��(A%-45)*125) * 320

"0t!16=(��(A%+45)*125) + (��(A%+45)*125) * 320

, � Two for movement (x,y)<<16

6t!20=��(A%)*(1<<16)

@t!24=��(A%)*(1<<16)

J:

T
t=t+28

^� a%

h�

r
p%=cd%

|� c=1 � max_cars%

�"� !p%,p%!4 : � x and y co-ords

�p%!8=90      : � angle

�p%!12=0      : � speed

�1p%!16=(max_speed% * 256) + �(400):� max_speed

�p%=p%+20

�� c

��

�:

�
��do_cars

�
p%=cd%

�� 9

�� c=1 � max_cars%

�X% = !p%

Y% = p%!4

A% = p%!8

&!t = angle_data% + (A%�36)*4*7
0
:9P1X%(c) = X%+��(A%-90)*10 : P1Y%(c) = Y%+��(A%-90)*10
D9P2X%(c) = X%+��(A%+90)*10 : P2Y%(c) = Y%+��(A%+90)*10
N6P3X%(c) = X%+��(A%)*30    : P3Y%(c) = Y%+��(A%)*30
Xbeamx% = X%+��A%*100
bbeamy% = Y%+��A%*100
l� P1X%(c),P1Y%(c)
v� P2X%(c),P2Y%(c)
�� 85,P3X%(c),P3Y%(c)
�p%=p%+20
�� c
�
�
p%=cd%
�� c=1 � max_cars%
�X% = !p%
�
Y% = p%!4
�
A% = p%!8
�S  = (p%!12) / 256
�MS = (p%!16) / 256
�&c%=�P3X%(c)+��A%*3,P3Y%(c)+��A%*3)
�f%=�

� c%<>0 �
X%=X%-��A%*S
Y%=Y%-��A%*S
 S=S*0.5
*� S<0 � S=0
4f%=�
>�
H
R� c=max_cars% �
\� �(-98) � A%=A%-8
f� �(-67) � A%=A%+8
p%� �(-80) � f% � S=S+0.8 � S=S*0.9
z� �(-105)� S=S-0.4
�
�/� S>max_speed2% � (� �(-99))� S=max_speed2%
��
�
�� S<MS � f% � S=S+0.8
�*C% = �X%+��(A%-45)*80,Y%+��(A%-45)*80)
�� C%<>0 � A%=A%+8
�*C% = �X%+��(A%+45)*80,Y%+��(A%+45)*80)
�� C%<>0 � A%=A%-8
��
�
�X%=X%+��A%*S
�Y%=Y%+��A%*S

!p%=X%
p%!4=Y%
p%!8=A%
$p%!12=S * 256
.p%=p%+20
8� c
B
L�
V:
`
��race
jS1%=1:S2%=2
tbeamx%=-1000
~beamy%=-1000
��
�-Ȗ:ș 6,112,S1%:ș 6,113,S2%:�:Ȕ S1%,S2%
�� 15:ȏȐ beamx%,beamy%,100
�� to_screen
��do_cars
�� �
��
�:
�	��ass
�� code% 1024,L% -1
�� pass=0 � 2 � 2
�P%=code%

[OPT pass

.from_screen
ADR R0,scr
ADR R1,base
(SWI &31
2LDR R12,base
<LDR R11,size
FADD R11,R11,R12
PLDR R10,t_a
Z	.loop
dLDMIA R12!,{R0-R9}
nSTMIA R10!,{R0-R9}
xCMP R12,R11
�BLT loop
�MOV PC,R14
�
�.to_screen
�ADR R0,scr
�ADR R1,base
�SWI &31
�LDR R12,base
�LDR R11,size
�ADD R11,R11,R12
�LDR R10,t_a
�	.loop
�LDMIA R10!,{R0-R4}
LDMIA R12,{R5-R9}
� R0,R0,R5
� R1,R1,R6
"� R2,R2,R7
,� R3,R3,R8
6� R4,R4,R9
@STMIA R12!,{R0-R4}
JCMP R12,R11
TBLT loop
^MOV PC,R14
h
r.scr EQUD 148
|     EQUD -1
�
�.base EQUD 0
�.size EQUD (640*480)/2
�.t_a  EQUD track%
�]
�4� pass=0 � ș &31,scr,base:� track% (!size) + 12
�
� pass
��
�:
�
� 900,180
�
� 900,120
�
� 850,180
�
� 850,120

� 800,180

� 800,120

� 750,180
&
� 750,120
0
� 600,180
:
� 600,120
D:
N��draw_track
X
� R,X,Y,A
bA=90
l� 10,0,255,0
v� 9,0,128,255
�� 10
�ȓȐ 0,0,1279,959
�� 0
�
R = 60
�X = 640
�Y = 150
�ȏȐ X,Y,R
��
�� �(-80) �
�� �(-98) � A=A-3
�� �(-67) � A=A+3
�
X=X+��A*6
�
Y=Y+��A*6
ȏȐ X,Y,R
T=�
��T+2<�
 �
*� �(-99)
4� from_screen
>�
�

00000000  0d 00 0a 11 6d 61 78 5f  63 61 72 73 25 20 3d 20  |....max_cars% = |
00000010  31 0d 00 14 13 6d 61 78  5f 73 70 65 65 64 25 20  |1....max_speed% |
00000020  3d 20 31 34 0d 00 1e 14  6d 61 78 5f 73 70 65 65  |= 14....max_spee|
00000030  64 32 25 20 3d 20 31 35  0d 00 28 29 ee 20 85 3a  |d2% = 15..(). .:|
00000040  20 ee 20 85 20 87 3a 20  eb 20 32 35 3a f1 20 f6  | . . .: . 25:. .|
00000050  24 3b 22 20 61 74 20 6c  69 6e 65 20 22 3b 9e 3a  |$;" at line ";.:|
00000060  e0 0d 00 32 08 eb 20 32  38 0d 00 3c 0a eb 20 32  |...2.. 28..<.. 2|
00000070  37 3a 87 0d 00 46 09 f2  69 6e 69 74 0d 00 50 09  |7:...F..init..P.|
00000080  f2 72 61 63 65 0d 00 5a  05 e0 0d 00 64 05 3a 0d  |.race..Z....d.:.|
00000090  00 6e 0a dd f2 69 6e 69  74 0d 00 78 08 f2 61 73  |.n...init..x..as|
000000a0  73 0d 00 82 0f f2 64 72  61 77 5f 74 72 61 63 6b  |s.....draw_track|
000000b0  0d 00 8c 15 d6 20 66 72  6f 6d 5f 73 63 72 65 65  |..... from_scree|
000000c0  6e 3a db 3a 87 0d 00 96  16 de 20 63 64 25 20 32  |n:.:...... cd% 2|
000000d0  30 2a 6d 61 78 5f 63 61  72 73 25 0d 00 a0 25 de  |0*max_cars%...%.|
000000e0  20 50 31 58 25 28 6d 61  78 5f 63 61 72 73 25 29  | P1X%(max_cars%)|
000000f0  2c 50 31 59 25 28 6d 61  78 5f 63 61 72 73 25 29  |,P1Y%(max_cars%)|
00000100  0d 00 aa 25 de 20 50 32  58 25 28 6d 61 78 5f 63  |...%. P2X%(max_c|
00000110  61 72 73 25 29 2c 50 32  59 25 28 6d 61 78 5f 63  |ars%),P2Y%(max_c|
00000120  61 72 73 25 29 0d 00 b4  25 de 20 50 33 58 25 28  |ars%)...%. P3X%(|
00000130  6d 61 78 5f 63 61 72 73  25 29 2c 50 33 59 25 28  |max_cars%),P3Y%(|
00000140  6d 61 78 5f 63 61 72 73  25 29 0d 00 be 18 de 20  |max_cars%)..... |
00000150  61 6e 67 6c 65 5f 64 61  74 61 25 20 33 36 2a 34  |angle_data% 36*4|
00000160  2a 37 0d 00 c8 11 74 3d  61 6e 67 6c 65 5f 64 61  |*7....t=angle_da|
00000170  74 61 25 0d 00 d2 0f e3  20 61 25 3d 30 20 b8 20  |ta%..... a%=0 . |
00000180  33 35 0d 00 dc 0c 41 25  3d 61 25 2a 33 36 0d 00  |35....A%=a%*36..|
00000190  e6 22 f4 20 54 68 72 65  65 20 70 6f 69 6e 74 73  |.". Three points|
000001a0  20 74 6f 20 64 72 61 77  20 74 68 65 20 63 61 72  | to draw the car|
000001b0  0d 00 f0 2f 74 21 30 20  3d 20 28 b5 b2 28 41 25  |.../t!0 = (..(A%|
000001c0  2d 39 30 29 2a 31 30 29  20 2b 20 28 9b b2 28 41  |-90)*10) + (..(A|
000001d0  25 2d 39 30 29 2a 31 30  29 20 2a 20 33 32 30 0d  |%-90)*10) * 320.|
000001e0  00 fa 2f 74 21 34 20 3d  20 28 b5 b2 28 41 25 2b  |../t!4 = (..(A%+|
000001f0  39 30 29 2a 31 30 29 20  2b 20 28 9b b2 28 41 25  |90)*10) + (..(A%|
00000200  2b 39 30 29 2a 31 30 29  20 2a 20 33 32 30 0d 01  |+90)*10) * 320..|
00000210  04 2f 74 21 38 20 3d 20  28 b5 b2 28 41 25 29 2a  |./t!8 = (..(A%)*|
00000220  33 30 29 20 20 20 20 2b  20 28 9b b2 28 41 25 29  |30)    + (..(A%)|
00000230  2a 33 30 29 20 20 20 20  2a 20 33 32 30 0d 01 0e  |*30)    * 320...|
00000240  31 f4 20 54 77 6f 20 70  6f 69 6e 74 73 20 74 6f  |1. Two points to|
00000250  20 73 65 6e 73 65 20 74  72 61 63 6b 20 66 6f 72  | sense track for|
00000260  20 63 6f 6d 70 75 74 65  72 20 63 61 72 73 0d 01  | computer cars..|
00000270  18 30 74 21 31 32 3d 28  b5 b2 28 41 25 2d 34 35  |.0t!12=(..(A%-45|
00000280  29 2a 31 32 35 29 20 2b  20 28 9b b2 28 41 25 2d  |)*125) + (..(A%-|
00000290  34 35 29 2a 31 32 35 29  20 2a 20 33 32 30 0d 01  |45)*125) * 320..|
000002a0  22 30 74 21 31 36 3d 28  b5 b2 28 41 25 2b 34 35  |"0t!16=(..(A%+45|
000002b0  29 2a 31 32 35 29 20 2b  20 28 9b b2 28 41 25 2b  |)*125) + (..(A%+|
000002c0  34 35 29 2a 31 32 35 29  20 2a 20 33 32 30 0d 01  |45)*125) * 320..|
000002d0  2c 20 f4 20 54 77 6f 20  66 6f 72 20 6d 6f 76 65  |, . Two for move|
000002e0  6d 65 6e 74 20 28 78 2c  79 29 3c 3c 31 36 0d 01  |ment (x,y)<<16..|
000002f0  36 17 74 21 32 30 3d b5  b2 28 41 25 29 2a 28 31  |6.t!20=..(A%)*(1|
00000300  3c 3c 31 36 29 0d 01 40  17 74 21 32 34 3d 9b b2  |<<16)..@.t!24=..|
00000310  28 41 25 29 2a 28 31 3c  3c 31 36 29 0d 01 4a 05  |(A%)*(1<<16)..J.|
00000320  3a 0d 01 54 0a 74 3d 74  2b 32 38 0d 01 5e 08 ed  |:..T.t=t+28..^..|
00000330  20 61 25 0d 01 68 05 f7  0d 01 72 0a 70 25 3d 63  | a%..h....r.p%=c|
00000340  64 25 0d 01 7c 15 e3 20  63 3d 31 20 b8 20 6d 61  |d%..|.. c=1 . ma|
00000350  78 5f 63 61 72 73 25 0d  01 86 22 f3 20 21 70 25  |x_cars%...". !p%|
00000360  2c 70 25 21 34 20 3a 20  f4 20 78 20 61 6e 64 20  |,p%!4 : . x and |
00000370  79 20 63 6f 2d 6f 72 64  73 0d 01 90 1a 70 25 21  |y co-ords....p%!|
00000380  38 3d 39 30 20 20 20 20  20 20 3a 20 f4 20 61 6e  |8=90      : . an|
00000390  67 6c 65 0d 01 9a 1a 70  25 21 31 32 3d 30 20 20  |gle....p%!12=0  |
000003a0  20 20 20 20 3a 20 f4 20  73 70 65 65 64 0d 01 a4  |    : . speed...|
000003b0  31 70 25 21 31 36 3d 28  6d 61 78 5f 73 70 65 65  |1p%!16=(max_spee|
000003c0  64 25 20 2a 20 32 35 36  29 20 2b 20 b3 28 34 30  |d% * 256) + .(40|
000003d0  30 29 3a f4 20 6d 61 78  5f 73 70 65 65 64 0d 01  |0):. max_speed..|
000003e0  ae 0c 70 25 3d 70 25 2b  32 30 0d 01 b8 07 ed 20  |..p%=p%+20..... |
000003f0  63 0d 01 c2 05 e1 0d 01  cc 05 3a 0d 01 d6 0d dd  |c.........:.....|
00000400  f2 64 6f 5f 63 61 72 73  0d 01 e0 0a 70 25 3d 63  |.do_cars....p%=c|
00000410  64 25 0d 01 ea 07 e6 20  39 0d 01 f4 15 e3 20 63  |d%..... 9..... c|
00000420  3d 31 20 b8 20 6d 61 78  5f 63 61 72 73 25 0d 01  |=1 . max_cars%..|
00000430  fe 0c 58 25 20 3d 20 21  70 25 0d 02 08 0d 59 25  |..X% = !p%....Y%|
00000440  20 3d 20 70 25 21 34 0d  02 12 0d 41 25 20 3d 20  | = p%!4....A% = |
00000450  70 25 21 38 0d 02 1c 04  0d 02 26 21 74 20 3d 20  |p%!8......&!t = |
00000460  61 6e 67 6c 65 5f 64 61  74 61 25 20 2b 20 28 41  |angle_data% + (A|
00000470  25 81 33 36 29 2a 34 2a  37 0d 02 30 04 0d 02 3a  |%.36)*4*7..0...:|
00000480  39 50 31 58 25 28 63 29  20 3d 20 58 25 2b b5 b2  |9P1X%(c) = X%+..|
00000490  28 41 25 2d 39 30 29 2a  31 30 20 3a 20 50 31 59  |(A%-90)*10 : P1Y|
000004a0  25 28 63 29 20 3d 20 59  25 2b 9b b2 28 41 25 2d  |%(c) = Y%+..(A%-|
000004b0  39 30 29 2a 31 30 0d 02  44 39 50 32 58 25 28 63  |90)*10..D9P2X%(c|
000004c0  29 20 3d 20 58 25 2b b5  b2 28 41 25 2b 39 30 29  |) = X%+..(A%+90)|
000004d0  2a 31 30 20 3a 20 50 32  59 25 28 63 29 20 3d 20  |*10 : P2Y%(c) = |
000004e0  59 25 2b 9b b2 28 41 25  2b 39 30 29 2a 31 30 0d  |Y%+..(A%+90)*10.|
000004f0  02 4e 36 50 33 58 25 28  63 29 20 3d 20 58 25 2b  |.N6P3X%(c) = X%+|
00000500  b5 b2 28 41 25 29 2a 33  30 20 20 20 20 3a 20 50  |..(A%)*30    : P|
00000510  33 59 25 28 63 29 20 3d  20 59 25 2b 9b b2 28 41  |3Y%(c) = Y%+..(A|
00000520  25 29 2a 33 30 0d 02 58  18 62 65 61 6d 78 25 20  |%)*30..X.beamx% |
00000530  3d 20 58 25 2b b5 b2 41  25 2a 31 30 30 0d 02 62  |= X%+..A%*100..b|
00000540  18 62 65 61 6d 79 25 20  3d 20 59 25 2b 9b b2 41  |.beamy% = Y%+..A|
00000550  25 2a 31 30 30 0d 02 6c  15 ec 20 50 31 58 25 28  |%*100..l.. P1X%(|
00000560  63 29 2c 50 31 59 25 28  63 29 0d 02 76 15 ec 20  |c),P1Y%(c)..v.. |
00000570  50 32 58 25 28 63 29 2c  50 32 59 25 28 63 29 0d  |P2X%(c),P2Y%(c).|
00000580  02 80 18 f0 20 38 35 2c  50 33 58 25 28 63 29 2c  |.... 85,P3X%(c),|
00000590  50 33 59 25 28 63 29 0d  02 8a 0c 70 25 3d 70 25  |P3Y%(c)....p%=p%|
000005a0  2b 32 30 0d 02 94 07 ed  20 63 0d 02 9e 04 0d 02  |+20..... c......|
000005b0  a8 0a 70 25 3d 63 64 25  0d 02 b2 15 e3 20 63 3d  |..p%=cd%..... c=|
000005c0  31 20 b8 20 6d 61 78 5f  63 61 72 73 25 0d 02 bc  |1 . max_cars%...|
000005d0  0c 58 25 20 3d 20 21 70  25 0d 02 c6 0d 59 25 20  |.X% = !p%....Y% |
000005e0  3d 20 70 25 21 34 0d 02  d0 0d 41 25 20 3d 20 70  |= p%!4....A% = p|
000005f0  25 21 38 0d 02 da 16 53  20 20 3d 20 28 70 25 21  |%!8....S  = (p%!|
00000600  31 32 29 20 2f 20 32 35  36 0d 02 e4 16 4d 53 20  |12) / 256....MS |
00000610  3d 20 28 70 25 21 31 36  29 20 2f 20 32 35 36 0d  |= (p%!16) / 256.|
00000620  02 ee 26 63 25 3d b0 50  33 58 25 28 63 29 2b b5  |..&c%=.P3X%(c)+.|
00000630  b2 41 25 2a 33 2c 50 33  59 25 28 63 29 2b 9b b2  |.A%*3,P3Y%(c)+..|
00000640  41 25 2a 33 29 0d 02 f8  08 66 25 3d b9 0d 03 02  |A%*3)....f%=....|
00000650  0d e7 20 63 25 3c 3e 30  20 8c 0d 03 0c 10 58 25  |.. c%<>0 .....X%|
00000660  3d 58 25 2d b5 b2 41 25  2a 53 0d 03 16 10 59 25  |=X%-..A%*S....Y%|
00000670  3d 59 25 2d 9b b2 41 25  2a 53 0d 03 20 0b 53 3d  |=Y%-..A%*S.. .S=|
00000680  53 2a 30 2e 35 0d 03 2a  0f e7 20 53 3c 30 20 8c  |S*0.5..*.. S<0 .|
00000690  20 53 3d 30 0d 03 34 08  66 25 3d a3 0d 03 3e 05  | S=0..4.f%=...>.|
000006a0  cd 0d 03 48 04 0d 03 52  13 e7 20 63 3d 6d 61 78  |...H...R.. c=max|
000006b0  5f 63 61 72 73 25 20 8c  0d 03 5c 16 e7 20 a6 28  |_cars% ...\.. .(|
000006c0  2d 39 38 29 20 8c 20 41  25 3d 41 25 2d 38 0d 03  |-98) . A%=A%-8..|
000006d0  66 16 e7 20 a6 28 2d 36  37 29 20 8c 20 41 25 3d  |f.. .(-67) . A%=|
000006e0  41 25 2b 38 0d 03 70 25  e7 20 a6 28 2d 38 30 29  |A%+8..p%. .(-80)|
000006f0  20 80 20 66 25 20 8c 20  53 3d 53 2b 30 2e 38 20  | . f% . S=S+0.8 |
00000700  8b 20 53 3d 53 2a 30 2e  39 0d 03 7a 16 e7 20 a6  |. S=S*0.9..z.. .|
00000710  28 2d 31 30 35 29 8c 20  53 3d 53 2d 30 2e 34 0d  |(-105). S=S-0.4.|
00000720  03 84 04 0d 03 8e 2f e7  20 53 3e 6d 61 78 5f 73  |....../. S>max_s|
00000730  70 65 65 64 32 25 20 80  20 28 ac 20 a6 28 2d 39  |peed2% . (. .(-9|
00000740  39 29 29 8c 20 53 3d 6d  61 78 5f 73 70 65 65 64  |9)). S=max_speed|
00000750  32 25 0d 03 98 05 cc 0d  03 a2 04 0d 03 ac 19 e7  |2%..............|
00000760  20 53 3c 4d 53 20 80 20  66 25 20 8c 20 53 3d 53  | S<MS . f% . S=S|
00000770  2b 30 2e 38 0d 03 b6 2a  43 25 20 3d 20 b0 58 25  |+0.8...*C% = .X%|
00000780  2b b5 b2 28 41 25 2d 34  35 29 2a 38 30 2c 59 25  |+..(A%-45)*80,Y%|
00000790  2b 9b b2 28 41 25 2d 34  35 29 2a 38 30 29 0d 03  |+..(A%-45)*80)..|
000007a0  c0 15 e7 20 43 25 3c 3e  30 20 8c 20 41 25 3d 41  |... C%<>0 . A%=A|
000007b0  25 2b 38 0d 03 ca 2a 43  25 20 3d 20 b0 58 25 2b  |%+8...*C% = .X%+|
000007c0  b5 b2 28 41 25 2b 34 35  29 2a 38 30 2c 59 25 2b  |..(A%+45)*80,Y%+|
000007d0  9b b2 28 41 25 2b 34 35  29 2a 38 30 29 0d 03 d4  |..(A%+45)*80)...|
000007e0  15 e7 20 43 25 3c 3e 30  20 8c 20 41 25 3d 41 25  |.. C%<>0 . A%=A%|
000007f0  2d 38 0d 03 de 05 cd 0d  03 e8 04 0d 03 f2 10 58  |-8.............X|
00000800  25 3d 58 25 2b b5 b2 41  25 2a 53 0d 03 fc 10 59  |%=X%+..A%*S....Y|
00000810  25 3d 59 25 2b 9b b2 41  25 2a 53 0d 04 06 0a 21  |%=Y%+..A%*S....!|
00000820  70 25 3d 58 25 0d 04 10  0b 70 25 21 34 3d 59 25  |p%=X%....p%!4=Y%|
00000830  0d 04 1a 0b 70 25 21 38  3d 41 25 0d 04 24 11 70  |....p%!8=A%..$.p|
00000840  25 21 31 32 3d 53 20 2a  20 32 35 36 0d 04 2e 0c  |%!12=S * 256....|
00000850  70 25 3d 70 25 2b 32 30  0d 04 38 07 ed 20 63 0d  |p%=p%+20..8.. c.|
00000860  04 42 04 0d 04 4c 05 e1  0d 04 56 05 3a 0d 04 60  |.B...L....V.:..`|
00000870  0a dd f2 72 61 63 65 0d  04 6a 0f 53 31 25 3d 31  |...race..j.S1%=1|
00000880  3a 53 32 25 3d 32 0d 04  74 10 62 65 61 6d 78 25  |:S2%=2..t.beamx%|
00000890  3d 2d 31 30 30 30 0d 04  7e 10 62 65 61 6d 79 25  |=-1000..~.beamy%|
000008a0  3d 2d 31 30 30 30 0d 04  88 05 f5 0d 04 92 2d c8  |=-1000........-.|
000008b0  96 3a c8 99 20 36 2c 31  31 32 2c 53 31 25 3a c8  |.:.. 6,112,S1%:.|
000008c0  99 20 36 2c 31 31 33 2c  53 32 25 3a db 3a c8 94  |. 6,113,S2%:.:..|
000008d0  20 53 31 25 2c 53 32 25  0d 04 9c 1f e6 20 31 35  | S1%,S2%..... 15|
000008e0  3a c8 8f c8 90 20 62 65  61 6d 78 25 2c 62 65 61  |:.... beamx%,bea|
000008f0  6d 79 25 2c 31 30 30 0d  04 a6 0f d6 20 74 6f 5f  |my%,100..... to_|
00000900  73 63 72 65 65 6e 0d 04  b0 0c f2 64 6f 5f 63 61  |screen.....do_ca|
00000910  72 73 0d 04 ba 07 fd 20  a3 0d 04 c4 05 e1 0d 04  |rs..... ........|
00000920  ce 05 3a 0d 04 d8 09 dd  f2 61 73 73 0d 04 e2 16  |..:......ass....|
00000930  de 20 63 6f 64 65 25 20  31 30 32 34 2c 4c 25 20  |. code% 1024,L% |
00000940  2d 31 0d 04 ec 14 e3 20  70 61 73 73 3d 30 20 b8  |-1..... pass=0 .|
00000950  20 32 20 88 20 32 0d 04  f6 0c 50 25 3d 63 6f 64  | 2 . 2....P%=cod|
00000960  65 25 0d 05 00 0d 5b 4f  50 54 20 70 61 73 73 0d  |e%....[OPT pass.|
00000970  05 0a 10 2e 66 72 6f 6d  5f 73 63 72 65 65 6e 0d  |....from_screen.|
00000980  05 14 0e 41 44 52 20 52  30 2c 73 63 72 0d 05 1e  |...ADR R0,scr...|
00000990  0f 41 44 52 20 52 31 2c  62 61 73 65 0d 05 28 0b  |.ADR R1,base..(.|
000009a0  53 57 49 20 26 33 31 0d  05 32 10 4c 44 52 20 52  |SWI &31..2.LDR R|
000009b0  31 32 2c 62 61 73 65 0d  05 3c 10 4c 44 52 20 52  |12,base..<.LDR R|
000009c0  31 31 2c 73 69 7a 65 0d  05 46 13 41 44 44 20 52  |11,size..F.ADD R|
000009d0  31 31 2c 52 31 31 2c 52  31 32 0d 05 50 0f 4c 44  |11,R11,R12..P.LD|
000009e0  52 20 52 31 30 2c 74 5f  61 0d 05 5a 09 2e 6c 6f  |R R10,t_a..Z..lo|
000009f0  6f 70 0d 05 64 16 4c 44  4d 49 41 20 52 31 32 21  |op..d.LDMIA R12!|
00000a00  2c 7b 52 30 2d 52 39 7d  0d 05 6e 16 53 54 4d 49  |,{R0-R9}..n.STMI|
00000a10  41 20 52 31 30 21 2c 7b  52 30 2d 52 39 7d 0d 05  |A R10!,{R0-R9}..|
00000a20  78 0f 43 4d 50 20 52 31  32 2c 52 31 31 0d 05 82  |x.CMP R12,R11...|
00000a30  0c 42 4c 54 20 6c 6f 6f  70 0d 05 8c 0e 4d 4f 56  |.BLT loop....MOV|
00000a40  20 50 43 2c 52 31 34 0d  05 96 04 0d 05 a0 0e 2e  | PC,R14.........|
00000a50  74 6f 5f 73 63 72 65 65  6e 0d 05 aa 0e 41 44 52  |to_screen....ADR|
00000a60  20 52 30 2c 73 63 72 0d  05 b4 0f 41 44 52 20 52  | R0,scr....ADR R|
00000a70  31 2c 62 61 73 65 0d 05  be 0b 53 57 49 20 26 33  |1,base....SWI &3|
00000a80  31 0d 05 c8 10 4c 44 52  20 52 31 32 2c 62 61 73  |1....LDR R12,bas|
00000a90  65 0d 05 d2 10 4c 44 52  20 52 31 31 2c 73 69 7a  |e....LDR R11,siz|
00000aa0  65 0d 05 dc 13 41 44 44  20 52 31 31 2c 52 31 31  |e....ADD R11,R11|
00000ab0  2c 52 31 32 0d 05 e6 0f  4c 44 52 20 52 31 30 2c  |,R12....LDR R10,|
00000ac0  74 5f 61 0d 05 f0 09 2e  6c 6f 6f 70 0d 05 fa 16  |t_a.....loop....|
00000ad0  4c 44 4d 49 41 20 52 31  30 21 2c 7b 52 30 2d 52  |LDMIA R10!,{R0-R|
00000ae0  34 7d 0d 06 04 15 4c 44  4d 49 41 20 52 31 32 2c  |4}....LDMIA R12,|
00000af0  7b 52 35 2d 52 39 7d 0d  06 0e 0e 80 20 52 30 2c  |{R5-R9}..... R0,|
00000b00  52 30 2c 52 35 0d 06 18  0e 80 20 52 31 2c 52 31  |R0,R5..... R1,R1|
00000b10  2c 52 36 0d 06 22 0e 80  20 52 32 2c 52 32 2c 52  |,R6..".. R2,R2,R|
00000b20  37 0d 06 2c 0e 80 20 52  33 2c 52 33 2c 52 38 0d  |7..,.. R3,R3,R8.|
00000b30  06 36 0e 80 20 52 34 2c  52 34 2c 52 39 0d 06 40  |.6.. R4,R4,R9..@|
00000b40  16 53 54 4d 49 41 20 52  31 32 21 2c 7b 52 30 2d  |.STMIA R12!,{R0-|
00000b50  52 34 7d 0d 06 4a 0f 43  4d 50 20 52 31 32 2c 52  |R4}..J.CMP R12,R|
00000b60  31 31 0d 06 54 0c 42 4c  54 20 6c 6f 6f 70 0d 06  |11..T.BLT loop..|
00000b70  5e 0e 4d 4f 56 20 50 43  2c 52 31 34 0d 06 68 04  |^.MOV PC,R14..h.|
00000b80  0d 06 72 11 2e 73 63 72  20 45 51 55 44 20 31 34  |..r..scr EQUD 14|
00000b90  38 0d 06 7c 10 20 20 20  20 20 45 51 55 44 20 2d  |8..|.     EQUD -|
00000ba0  31 0d 06 86 04 0d 06 90  10 2e 62 61 73 65 20 45  |1.........base E|
00000bb0  51 55 44 20 30 0d 06 9a  1a 2e 73 69 7a 65 20 45  |QUD 0.....size E|
00000bc0  51 55 44 20 28 36 34 30  2a 34 38 30 29 2f 32 0d  |QUD (640*480)/2.|
00000bd0  06 a4 15 2e 74 5f 61 20  20 45 51 55 44 20 74 72  |....t_a  EQUD tr|
00000be0  61 63 6b 25 0d 06 ae 05  5d 0d 06 b8 34 e7 20 70  |ack%....]...4. p|
00000bf0  61 73 73 3d 30 20 8c 20  c8 99 20 26 33 31 2c 73  |ass=0 . .. &31,s|
00000c00  63 72 2c 62 61 73 65 3a  de 20 74 72 61 63 6b 25  |cr,base:. track%|
00000c10  20 28 21 73 69 7a 65 29  20 2b 20 31 32 0d 06 c2  | (!size) + 12...|
00000c20  0a ed 20 70 61 73 73 0d  06 cc 05 e1 0d 06 d6 05  |.. pass.........|
00000c30  3a 0d 06 e0 0d dc 20 39  30 30 2c 31 38 30 0d 06  |:..... 900,180..|
00000c40  ea 0d dc 20 39 30 30 2c  31 32 30 0d 06 f4 0d dc  |... 900,120.....|
00000c50  20 38 35 30 2c 31 38 30  0d 06 fe 0d dc 20 38 35  | 850,180..... 85|
00000c60  30 2c 31 32 30 0d 07 08  0d dc 20 38 30 30 2c 31  |0,120..... 800,1|
00000c70  38 30 0d 07 12 0d dc 20  38 30 30 2c 31 32 30 0d  |80..... 800,120.|
00000c80  07 1c 0d dc 20 37 35 30  2c 31 38 30 0d 07 26 0d  |.... 750,180..&.|
00000c90  dc 20 37 35 30 2c 31 32  30 0d 07 30 0d dc 20 36  |. 750,120..0.. 6|
00000ca0  30 30 2c 31 38 30 0d 07  3a 0d dc 20 36 30 30 2c  |00,180..:.. 600,|
00000cb0  31 32 30 0d 07 44 05 3a  0d 07 4e 10 dd f2 64 72  |120..D.:..N...dr|
00000cc0  61 77 5f 74 72 61 63 6b  0d 07 58 0d ea 20 52 2c  |aw_track..X.. R,|
00000cd0  58 2c 59 2c 41 0d 07 62  08 41 3d 39 30 0d 07 6c  |X,Y,A..b.A=90..l|
00000ce0  10 fb 20 31 30 2c 30 2c  32 35 35 2c 30 0d 07 76  |.. 10,0,255,0..v|
00000cf0  11 fb 20 39 2c 30 2c 31  32 38 2c 32 35 35 0d 07  |.. 9,0,128,255..|
00000d00  80 08 e6 20 31 30 0d 07  8a 15 c8 93 c8 90 20 30  |... 10........ 0|
00000d10  2c 30 2c 31 32 37 39 2c  39 35 39 0d 07 94 07 e6  |,0,1279,959.....|
00000d20  20 30 0d 07 9e 0a 52 20  3d 20 36 30 0d 07 a8 0b  | 0....R = 60....|
00000d30  58 20 3d 20 36 34 30 0d  07 b2 0b 59 20 3d 20 31  |X = 640....Y = 1|
00000d40  35 30 0d 07 bc 0e c8 8f  c8 90 20 58 2c 59 2c 52  |50........ X,Y,R|
00000d50  0d 07 c6 05 f5 0d 07 d0  0e e7 20 a6 28 2d 38 30  |.......... .(-80|
00000d60  29 20 8c 0d 07 da 14 e7  20 a6 28 2d 39 38 29 20  |) ...... .(-98) |
00000d70  8c 20 41 3d 41 2d 33 0d  07 e4 14 e7 20 a6 28 2d  |. A=A-3..... .(-|
00000d80  36 37 29 20 8c 20 41 3d  41 2b 33 0d 07 ee 0d 58  |67) . A=A+3....X|
00000d90  3d 58 2b b5 b2 41 2a 36  0d 07 f8 0d 59 3d 59 2b  |=X+..A*6....Y=Y+|
00000da0  9b b2 41 2a 36 0d 08 02  0e c8 8f c8 90 20 58 2c  |..A*6........ X,|
00000db0  59 2c 52 0d 08 0c 07 54  3d 91 0d 08 16 0b f5 fd  |Y,R....T=.......|
00000dc0  54 2b 32 3c 91 0d 08 20  05 cd 0d 08 2a 0c fd 20  |T+2<... ....*.. |
00000dd0  a6 28 2d 39 39 29 0d 08  34 11 d6 20 66 72 6f 6d  |.(-99)..4.. from|
00000de0  5f 73 63 72 65 65 6e 0d  08 3e 05 e1 0d ff        |_screen..>....|
00000dee