ȗ� 2
�9
�1,&80,&80,&80
(�2,&B0,&B0,&B0
2�3,&00,&90,&10
<�4,&E0,&00,&00
F�5,&F0,&B0,&00
P�6,&F0,&F0,&00
Z�7,&00,&40,&A0
d�8,&00,&F0,&00
n�9,&00,&B0,&60
x�10,&40,&90,&F0
��11,&70,&00,&D0
��12,&B0,&70,&00
��13,&F0,&90,&00
��14,&E0,&00,&E0
��15,&F0,&F0,&F0
�"*CHANNELVOICE 1 StringLib-Soft
�Q� code% &10000,screen% 23400,ballb% 8,batb% 84,bad1b% 100,bad2b% 100,tokb% 45
�+�("LOAD <Obey$Dir>.Screens "+�~screen%)
�*SLOAD <Obey$Dir>.Sprites
�'�23,224,247,247,247,0,127,127,127,0
�'�23,225,247,247,247,0,126,126,126,0
�)�23,226,0,&7F,&7F,&7F,&7F,&7F,&7F,&7F
�)�23,227,0,&FF,&FF,&FF,&FF,&FF,&FF,&FF
�!�23,228,&80,&80,&80,0,0,0,0,0

$�23,229,119,119,119,0,63,63,63,0

�23,1,0|

� pass=0 � 2 � 2

"P%=code%

,
[OPT pass

6.score EQUD 0

@.tempx EQUD 0

J.framecount EQUD 0

T.bounceadr EQUD bounce

^.i1nadr EQUD i1n

h.i1hadr EQUD i1h

r.iconxadr EQUD iconxtable

|.iconyadr EQUD iconytable

�.bl1x     EQUD 0

�.bl1y     EQUD 0

�.bl2x     EQUD 0

�.bl2y     EQUD 0

�.mstop EQUD &1FD8000

�.vdublk EQUD 149:EQUD -1

�.vduout EQUD 0:EQUD 0

�.ballXm EQUD 640

�.ballYm EQUD 320

�.batXm  EQUD 0

�.batYm  EQUD 96

�.bad1Xm EQUD 128

�.bad1Ym EQUD 704
.bad2Xm EQUD 768
.bad2Ym EQUD 256
.tokXm  EQUD 0
&.tokYm  EQUD 0
0.tokabs   EQUD 0
:.tokadr   EQUD to1
D.tokbadr  EQUD tokb%
N.ballabs EQUD 0
X.balladr EQUD ball
b.ballbadr EQUD ballb%
l.batabs  EQUD 0
v.batadr  EQUD bat
�.batbadr  EQUD batb%
�.b1adr   EQUD b1
�.bl1adr  EQUD bl1
�.ex1adr EQUD ex1
�.ex2adr EQUD ex1
�.bad1abs   EQUD 0
�.bad1badr    EQUD bad1b%
�.bad2abs   EQUD 0
�.bad2badr    EQUD bad2b%
�.blocksadr EQUD blocks
�.screen EQUD screen%
�.iconxtable EQUD 992
�
EQUD 1056

EQUD 1120
EQUD 992

EQUD 1056
 
EQUD 1120
*EQUD 992
4
EQUD 1056
>
EQUD 1120
H.iconytable EQUD 272
REQUD 272
\EQUD 272
fEQUD 208
pEQUD 208
zEQUD 208
�EQUD 144
�EQUD 144
�EQUD 144
�.Xmadr EQUD ballXm
�.b1      EQUS "b1 "+�0
�.b2      EQUS "b2 "+�0
�.b3      EQUS "b3 "+�0
�.b4      EQUS "b4 "+�0
�.bl1     EQUS "bl4"+�0
�.bl2     EQUS "bl2"+�0
�.bl3     EQUS "bl4"+�0
�.bl4     EQUS "bl4"+�0
�.ex1     EQUS "ex1"+�0
.ex2     EQUS "ex2"+�0
.ex3     EQUS "bx "+�0
.ex4     EQUS "bx "+�0
$.bat     EQUS "ba1"+�0
..ba2    EQUS "ba2"+�0
8.ba3    EQUS "ba3"+�0
B.ba4    EQUS "ba4"+�0
L.ba5    EQUS "ba5"+�0
V.ba6    EQUS "ba6"+�0
`.ball    EQUS "bal"+�0
j.to1     EQUS "to1"+�0
t.to2     EQUS "to2"+�0
~.to3     EQUS "to3"+�0
�.to4     EQUS "to4"+�0
�.to5     EQUS "to3"+�0
�.to6     EQUS "to2"+�0
�.to7     EQUS "to1"+�0
�.i1n     EQUS "i1n"+�0
�.i2n     EQUS "i2n"+�0
�.i3n     EQUS "i3n"+�0
�.i4n     EQUS "i4n"+�0
�.i5n     EQUS "i5n"+�0
�.i6n     EQUS "i6n"+�0
�.i7n     EQUS "i7n"+�0
�.i8n     EQUS "i8n"+�0
.i9n     EQUS "i9n"+�0

.i1h      EQUS "i1h"+�0
.i2h      EQUS "i2h"+�0
.i3h      EQUS "i3h"+�0
(.i4h      EQUS "i4h"+�0
2.i5h      EQUS "i5h"+�0
<.i6h      EQUS "i6h"+�0
F.i7h      EQUS "i7h"+�0
P.i8h      EQUS "i8h"+�0
Z.i9h      EQUS "i9h"+�0
d.screenlevel EQUB 0
n.Ex1num EQUB 0
x.Ex2num EQUB 0
�.Blnum EQUB 0
�.BallVX EQUB 2
�.BallVY EQUB 16
�.Bad1VX EQUB 4
�.Bad1VY EQUB 4
�.Bad2VX EQUB 4
�.Bad2VY EQUB 4
�.Bad1frame EQUB 0
�.Bad2frame EQUB 1
�.Tokframe EQUB 0
�.Iconframe EQUB 255
�.Batframe EQUB 0
�.Hits EQUB 0 ;Hit counter
.Balls EQUB 5
.Pitch EQUB 0
	ALIGN
".blocks EQUS �236,�0)
,C.bounce EQUS �16+�16+�8+�8+�4+�4+�4+�2+�2+�2+�4+�4+�4+�8+�8+�16
6EQUS �32,�1)
@	ALIGN
J".start STMFD R13!,{R0-R12,R14}
T ADR R0,vdublk
^ ADR R1,vduout
h SWI &31
r LDR R0,vduout
| STR R0,mstop
�BL setup
�
B newball
�.positions STMFD R13!,{R14}
�LDR R2,balladr
�LDR R3,[R6,#0]
�LDR R4,[R6,#4]
�BL spriteplot ;Draw ball
�TST R12,#8 ;Test ex1flag
�LDRNEB R1,Ex1num
�LDRNE R2,ex1adr
�LDREQB R1,Bad1frame
�LDREQ R2,b1adr
�:.drawbad1 ADD R2,R2,R1,LSL#2 ;Get bad1's address in R2
LDR R3,[R6,#16]
LDR R4,[R6,#20]
BL spriteplot ;Draw bad1
&TST R12,#16 ;Test ex2flag
0LDRNEB R1,Ex2num
:LDRNE R2,ex2adr
DLDREQB R1,Bad2frame
NLDREQ R2,b1adr
X:.drawbad2 ADD R2,R2,R1,LSL#2 ;Get bad2's address in R2
bLDR R3,[R6,#24]
lLDR R4,[R6,#28]
vBL spriteplot ;Draw bad2
�LDRB R1,Batframe
�LDR R2,batadr
�ADD R2,R2,R1,LSL#2
�LDR R3,[R6,#8]
�LDR R4,[R6,#12]
�BL spriteplot ;Draw bat
�TST R12,#8192 ;Iconflag
�
BEQ dotok
�LDRB R1,Iconframe
�CMP R1,#255
�BEQ firsticon
�LDR R2,i1nadr
�5ADD R2,R2,R1,LSL#2 ;Get normal icon address in R2
LDR R5,iconxadr
LDR R3,[R5,R1,LSL#2]
LDR R5,iconyadr
 LDR R4,[R5,R1,LSL#2]
*BL spriteplot
4LDRB R1,Iconframe
>ADD R1,R1,#1
H
CMP R1,#9
R.firsticon �Q R1,#0
\STRB R1,Iconframe
fLDR R2,i1hadr
p:ADD R2,R2,R1,LSL#2 ;Get highlighted icon address in R2
zLDR R5,iconxadr
�LDR R3,[R5,R1,LSL#2]
�LDR R5,iconyadr
�LDR R4,[R5,R1,LSL#2]
�BL spriteplot
�%BIC R12,R12,#8192 ;Clear iconflag
�$.dotok TST R12,#64 ;Test tokflag
�BEQ exitpos
�LDRB R1,Tokframe
�LDR R2,tokadr
�-ADD R2,R2,R1,LSL#2 ;Get tok address in R2
�LDR R3,[R6,#32]
�LDR R4,[R6,#36]
�BL spriteplot ;Draw tok
	.exitpos LDMFD R13!,{R15}
	=.loop LDR R0,framecount ;Main loop **********************
	ADD R0,R0,#1
	$STR R0,framecount
	.�S R0,R0,#7
	8&�REQ R12,R12,#32768 ;Set frameflag
	B)BICNE R12,R12,#32768 ;Clear frameflag
	LLDR R0,ballXm
	VLDR R1,ballYm
	`LDRB R2,BallVX
	jLDRB R3,BallVY
	t'.ballcalc TST R12,#1 ;Test ballxdir
	~SUBEQ R0,R0,R2
	�ADDNE R0,R0,R2
	�STR R0,ballXm
	�TST R12,#2 ;Test ballydir
	�SUBEQ R1,R1,R3
	�ADDNE R1,R1,R3
	�STR R1,ballYm
	�BL batcalc
	�STR R0,batXm
	�TST R12,#8 ;Test ex1flag
	�
BNE doex1
	�BEQ dobad1
	�#.bad2calc TST R12,#16 ;Ex2 flag

BNE doex2

BEQ dobad2
!.movetok TST R12,#64 ;Tokflag
BEQ movedone
(LDRB R0,Tokframe
2LDR R2,tokYm
<BL tokcalc
FSTRB R0,Tokframe
PSTR R2,tokYm
Z.movedone LDR R6,Xmadr
d&BL getback ;Get shadow backgrounds
n>BL positions ;New position for shadow sprites using X&Ys's
xBL scorecalc
�TST R12,#128
�
BLNE beep
�MOV R0,#19
�	SWI 6
�BL resback
�BL blocksub
�BL collisions
�TST R12,#131072
�
BEQ extra
�LDRB R0,Balls
�SUB R0,R0,#1
�STRB R0,Balls
�ADD R0,R0,#30
)SWI 256+31:SWI 0:SWI 256+9:SWI 256+32
LDRB R0,Balls

CMP R0,#0
"BEQ gameover
,
B newball
6.extra LDRB R0,Iconframe
@
CMP R0,#0
JBNE noextra
TTST R12,#65536
^BEQ noextra
h
MOV R0,#8
rSTRB R0,BallVY
|.noextra LDRB R0,Hits
�
CMP R0,#0
�BNE notfin
�LDRB R0,screenlevel
�ADD R0,R0,#1
�STRB R0,screenlevel
�BL setup
�
B newball
�.notfin SWI &2C
�
 BCC loop
�!.exit LDMFD R13!,{R0-R12,R15}
�.batcalc MOV R0,#0
�BIC R12,R12,#65536
�'SWI &1C ;Get mouseX,Y,B in R0,R1,R2
;BIC R0,R0,#3
CMP R0,#784
MOVCS R0,#784
&
CMP R2,#0
0�RNE R12,R12,#65536
:TST R12,#32768
DBEQ batexit
NLDRB R3,Batframe
X TST R12,#262144 ;Updown flag
bADDNE R3,R3,#1
lSUBEQ R3,R3,#1
v
CMP R3,#5
�,BICEQ R12,R12,#262144 ;Clear updown flag
�
CMP R3,#0
��REQ R12,R12,#262144
�STRB R3,Batframe
�.batexit MOV R15,R14
�.spriteplot MOV R0,#34
�
MOV R1,#0
�
MOV R5,#8
�SWI &2E
�MOV R15,R14
� .collisions STMFD R13!,{R14}
�LDR R0,ballXm
�LDR R1,ballYm

LDR R2,batXm

LDR R3,batYm

MOV R6,#108

 MOV R7,#24

*
BL col

4BEQ missedbat

>SUB R4,R0,R2

HSTR R4,tempx

RADD R4,R4,#16

\LDR R6,bounceadr

fCMP R4,#64

p!�RGT R12,R12,#1 ;Pos ballxdir

z"BICLE R12,R12,#1 ;Neg ballxdir

�LDRB R5,[R6,R4,LSR#3]

�STRB R5,BallVX

�SUB R5,R5,#1

�BIC R0,R0,R5

�STR R0,ballXm

�(�R R12,R12,#130 ;Pos ballydir & beep

�B blocksdone

�).missedbat TST R12,#4 ;Test blockflag

�BNE blocksdone

�
MOV R4,#0

�STR R4,bl1x

�STR R4,bl2x

�TST R12,#1; Test ballxdir
SUBEQ R2,R0,#32
SUBNE R2,R0,#16
TST R12,#2; Test ballydir
$SUBEQ R3,R1,#384
.SUBNE R3,R1,#368
8
CMP R3,#0
BBMI blocksdone
L� R6,R2,#63
V� R7,R3,#31
`�RS R8,R6,R7
jBEQ doxy
t
CMP R6,#0
~BEQ dox
�
CMP R7,#0
�BNE blocksdone
�.doy MOV R5,R3,LSR#5
�TST R12,#2 ;Test ballydir
�SUBEQ R5,R5,#1
�SUB R2,R0,#32
�MOV R4,R2,LSR#6
�BL bloc
�BEQ doy2
�STR R6,bl1x
�STR R7,bl1y
��R R12,R12,#4 ;Set blflag
.doy2 SUB R2,R0,#16

MOV R4,R2,LSR#6
BL bloc

BEQ ycalc
(STR R6,bl2x
2STR R7,bl2y
<�R R12,R12,#4 ;Set blflag
F".ycalc TST R12,#4 ;Test blflag
P#�NE R12,R12,#2 ;Invert ballydir
ZB blocksdone
d.dox MOV R4,R2,LSR#6
nTST R12,#1 ;Test ballxdir
xSUBEQ R4,R4,#1
�SUB R3,R1,#368
�MOV R5,R3,LSR#5
�BL bloc
�BEQ dox2
�STR R6,bl1x
�STR R7,bl1y
��R R12,R12,#4 ;Set blflag
�.dox2 SUB R3,R1,#384
�MOV R5,R3,LSR #5
�BL bloc
�
BEQ xcalc
�STR R6,bl2x
�STR R7,bl2y
�R R12,R12,#4 ;Set blflag
".xcalc TST R12,#4 ;Test blflag
#�NE R12,R12,#1 ;Invert ballxdir
"B blocksdone
,.doxy MOV R4,R2,LSR#6
6TST R12,#1 ;Test ballxdir
@SUBEQ R4,R4,#1
JMOV R5,R3,LSR#5
TTST R12,#2 ;Test ballydir
^SUBNE R5,R5,#1
hBL bloc
r
BEQ doxy2
|STR R6,bl1x
�STR R7,bl1y
��R R12,R12,#4 ;Set blflag
�.doxy2 MOV R5,R3,LSR#5
�TST R12,#2 ;Test ballydir
�SUBEQ R5,R5,#1
�MOV R4,R2,LSR#6
�TST R12,#1 ;Test ballxdir
�SUBNE R4,R4,#1
�BL bloc
�
BNE okyar
�TST R12,#4 ;Test blflag
�#�NE R12,R12,#1 ;Invert ballxdir
�B xycalc
.okyar STR R6,bl2x
STR R7,bl2y
TST R12,#4 ;Test blflag
&#�NE R12,R12,#1 ;Invert ballxdir
0!� R12,R12,#2 ;Invert ballydir
:�R R12,R12,#4 ;Set blflag
D#.xycalc TST R12,#4 ;Test blflag
NBNE blocksdone
XMOV R4,R2,LSR#6
bMOV R5,R3,LSR#5
lTST R12,#1 ;Test ballxdir
vSUBEQ R4,R4,#1
�TST R12,#2 ;Test ballydir
�SUBEQ R5,R5,#1
�BL bloc
�BEQ blocksdone
�STR R6,bl1x
�STR R7,bl1y
�"� R12,R12,#3 ;Invert X&Y dirs.
��R R12,R12,#4 ;Set blflag
�(.blocksdone TST R12,#8 ;Test ex1flag
�BNE dobad2col
�LDR R2,bad1Xm
�LDR R3,bad1Ym
�MOV R6,#60
MOV R7,#60

BL col
BEQ dobad2col
 '�R R12,R12,#136 ;Set ex1flag & beep
*MOV R7,#128
4STRB R7,Pitch
>!� R12,R12,#2 ;Invert ballydir
HLDR R8,score
RADD R8,R8,#100
\STR R8,score
f(.dobad2col TST R12,#16 ;Test ex2flag
pBNE tokcol
zLDR R2,bad2Xm
�LDR R3,bad2Ym
�
BL col
�BEQ tokcol
�LDR R8,score
�ADD R8,R8,#100
�STR R8,score
�'�R R12,R12,#144 ;Set ex2flag & beep
�MOV R7,#160
�STRB R7,Pitch
�!� R12,R12,#2 ;Invert ballydir
� .tokcol TST R12,#64 ;Tokflag
�BEQ bounds
�LDR R2,tokYm
CMP R2,#128
BGT bounds
LDR R2,tokXm
$LDR R3,batXm
.ADD R4,R2,#36
8ADD R5,R3,#108
BCMP R2,R5 ;Tokleft-batright
LBPL bounds
VCMP R3,R4 ;Batleft-tokright
`BPL bounds
j"�R R12,R12,#8192 ;Set iconflag
t"BIC R12,R12,#64 ;Clear tokflag
~.bounds CMP R0,#32
�"�REQ R12,R12,#1 ;Pos. ballxdir
�CMP R0,#848
�#BICEQ R12,R12,#1 ;Neg. ballxdir
�
CMP R1,#0
�
BNE testy
� �R R12,R12,#2 ;Pos. ballydir
�
SWI 256+7
�MOV R4,#16
�STRB R4,BallVY
�$�R R12,R12,#131072 ;Set ballflag
�.testy CMP R1,#976
�#BICEQ R12,R12,#2 ;Neg. ballydir
.colsdone LDMFD R13!,{R15}

.tokcalc ADD R0,R0,#1

CMP R0,#6
�Q R0,#0
(SUB R2,R2,#8
2CMP R2,#16
<$BICLT R12,R12,#64 ;Clear tokflag
FMOV R15,R14
P.getback STMFD R13!,{R14}
ZLDR R1,[R6,#0]
dLDR R2,[R6,#4]
nBL convert
xSTR R0,ballabs
�LDR R1,ballbadr
�MOV R2,#2 ;Ball width
�MOV R3,#4 ;Ball height
�BL getb
�LDR R1,[R6,#8]
�LDR R2,[R6,#12]
�BL convert
�STR R0,batabs
�LDR R1,batbadr
�MOV R2,#14 ;Bat width
�MOV R3,#6 ;Bat height
�BL getb
�LDR R1,[R6,#16]
LDR R2,[R6,#20]
BL convert
STR R0,bad1abs
"LDR R1,bad1badr
,MOV R2,#7 ;Bad width
6MOV R3,#14 ;Bad height
@BL getb
JLDR R1,[R6,#24]
TLDR R2,[R6,#28]
^BL convert
hSTR R0,bad2abs
rLDR R1,bad2badr
|MOV R2,#7 ;Bad width
�MOV R3,#14 ;Bad height
�BL getb
�TST R12,#64 ;Tokflag
�BEQ getbexit
�LDR R1,[R6,#32]
�LDR R2,[R6,#36]
�BL convert
�STR R0,tokabs
�LDR R1,tokbadr
�MOV R2,#5 ;Tok width
�MOV R3,#9 ;Tok height
�BL getb
�.getbexit LDMFD R13!,{R15}
.resback STMFD R13!,{R14}
LDR R0,ballabs
LDR R1,ballbadr
&MOV R2,#2 ;Ball width
0MOV R3,#4 ;Ball height
:BL resb
DLDR R0,batabs
NLDR R1,batbadr
XMOV R2,#14 ;Bat width
bMOV R3,#6 ;Bat height
lBL resb
vLDR R0,bad1abs
�LDR R1,bad1badr
�MOV R2,#7 ;Bad width
�MOV R3,#14 ;Bad height
�BL resb
�LDR R0,bad2abs
�LDR R1,bad2badr
�MOV R2,#7 ;Bad width
�MOV R3,#14 ;Bad height
�BL resb
�TST R12,#64 ;Tokflag
�BEQ resbexit
�LDR R0,tokabs
�LDR R1,tokbadr

MOV R2,#5

MOV R3,#9
BL resb
 .resbexit LDMFD R13!,{R15}
*.convert MOV R0,R2,LSR#2
4RSB R0,R0,#255
>MOV R3,#160
HMUL R4,R3,R0
RADD R0,R4,R1,LSR#3
\LDR R3,mstop
fADD R0,R0,R3
pMOV R15,R14
z.getb MOV R4,#0
�MOV R5,#0 ;Zero counters
�.getbloop LDRB R7,[R0,R4]
�STRB R7,[R1],#1
�ADD R4,R4,#1
�
CMP R2,R4
�BCS getbloop
�ADD R5,R5,#1
�
CMP R3,R5
�SUBNE R0,R0,#160
�MOVNE R4,#0
�BNE getbloop
�MOV R15,R14
�.resb MOV R4,#0
MOV R5,#0 ;Zero counters
.resbloop LDRB R7,[R1],#1
STRB R7,[R0,R4]
$ADD R4,R4,#1
.
CMP R2,R4
8BCS resbloop
BADD R5,R5,#1
L
CMP R3,R5
VSUBNE R0,R0,#160
`MOVNE R4,#0
jBNE resbloop
tMOV R15,R14
~.blocksub STMFD R13!,{R14}
�LDRB R8,Hits
� BIC R12,R12,#4 ;Clear blflag
�LDR R2,bl1adr
�.trybl1 LDR R3,bl1x
�
CMP R3,#0
�BEQ trybl2
�LDR R4,bl1y
�BL spriteplot
�SUB R8,R8,#1
�.trybl2 LDR R3,bl2x
�
CMP R3,#0
�BEQ noblocks
LDR R4,bl2y

BL spriteplot
SUB R8,R8,#1
.noblocks STRB R8,Hits
(LDMFD R13!,{R15}
2 .col ADD R4,R3,R7 ;R4=objtop
<ADD R5,R1,#16 ;R5=balltop
FCMP R1,R4 ;Ballbot-objtop
P
BPL nocol
ZCMP R3,R5 ;Objbot-balltop
d
BPL nocol
nADD R4,R2,R6 ;R4=objright
xADD R5,R0,#16 ;R5=ballright
�"CMP R0,R4 ;Ball left-obj right
�
BPL nocol
� CMP R2,R5 ;Objleft-ballright
�
BPL nocol
��R R12,R12,#32 ;Set colflag
�.nocol TST R12,#32 ;Colflag
�"BIC R12,R12,#32 ;Clear colflag
�MOV R15,R14
�.bloc CMP R4,#0
�BMI retbloc
�CMP R4,#13
�BEQ retbloc
�CMP R5,#17
BGT retbloc

CMP R5,#0
BMI retbloc
"LDR R6,blocksadr
,MOV R7,#13
6MLA R8,R7,R5,R6
@LDRB R7,[R8,R4]
JMOV R6,R7,LSR#4 ;R6=colour
T�S R7,R7,#15 ;R7=block type
^BEQ retbloc
h'�R R12,R12,#160 ;Set colflag & beep
rSTRB R6,Pitch
|CMP R7,#15
�BEQ indest
�SUBS R7,R7,#1
�BNE indest
�STRB R7,[R8,R4]
�MOV R6,R4,LSL#6
�MOV R7,R5,LSL#5
�ADD R6,R6,#36
�ADD R7,R7,#384
�TST R12,#64
�BNE havetok
�TST R12,#32768 ;Frameflag
�"�RNE R12,R12,#64 ;Set tok flag
�STRNE R6,tokXm
STRNE R7,tokYm
.havetok LDR R8,score
ADD R8,R8,#10
&STR R8,score
0!.retbloc TST R12,#32 ;Colflag
:"BIC R12,R12,#32 ;Clear colflag
DMOV R15,R14
N.indest ADD R6,R7,R6,LSR#4
XSTRB R6,[R8,R4]
b
MOV R6,#0
lTST R12,#32 ;Colflag
v"BIC R12,R12,#32 ;Clear colflag
�MOV R15,R14
�.setup LDRB R0,screenlevel
�ADD R0,R0,#1
�ADR R1,framestring
�
MOV R2,#4
�SWI &D5
�ADD R2,R2,#26
�STRB R2,form+1
�	SWI 1
�D.form EQUB 31:EQUB 0:EQUB 16:EQUB 17:EQUB 4:EQUB 9:EQUB 9:EQUB 9
�.framestring EQUD 0
�LDRB R0,screenlevel
�.SWI 256+30:SWI 256+10:SWI 256+10:SWI 256+9
MOV R6,#0 ;Zero Y counter
 MOV R7,#0 ;Zero hits counter
MOV R1,#234
 LDR R2,screen
*.MLA R3,R0,R1,R2 ;R3=pointer to first block
4LDR R4,blocksadr
>ADD R4,R4,#221
H.Cloop1 MOV R5,#0
R.Cloop2 LDRB R0,[R3],#1
\
CMP R0,#1
f"ADDGT R7,R7,#1 ;Increment hits
pSWI 256+17
z	SWI 0
�SWI 256+226:SWI 256+227
�
MOV R1,#1
�
CMP R0,#2
��Q R1,#4
�
CMP R0,#1
�
�Q R1,#15
�
CMP R0,#0
��Q R1,R0
�ADD R1,R1,R0,LSL#4
�STRB R1,[R4],#1
�ADD R5,R5,#1
�CMP R5,#13
�BNE Cloop2
	SWI 3

SWI 256+9
SUB R4,R4,#26
$ADD R6,R6,#1
.CMP R6,#18
8BNE Cloop1
BSWI 256+17
LMOV R0,#15
V	SWI 0
`STRB R7,Hits
jB iconreset
t'.newball TST R12,#131072 ;Ball flag
~BLNE iconreset
�MOV R12,#6144 ;Zero flags
��R R12,R12,#262144
�MOV R0,#16
�STRB R0,BallVY
�BL batcalc
�TST R12,#65536
�BEQ wait
�(BIC R12,R12,#65536 ;Clear buttonflag
�!�R R12,R12,#2 ;Pos ball Y dir
�
MOV R0,#0
�STRB R0,BallVX
STRB R0,Batframe
(
B loop
2.wait STR R0,batXm
<ADD R0,R0,#40
FSTR R0,ballXm
PMOV R1,#128
ZSTR R1,ballYm
dLDR R6,Xmadr
nBL getback
xBL positions
�MOV R0,#19
�	SWI 6
�BL resback
�
B newball
�.scorecalc LDR R0,score
�ADR R1,scorestring
�
MOV R2,#8
�SWI &D8
�ADD R2,R2,#26
�STRB R2,format+1
�	SWI 1
�F.format EQUB 31:EQUB 0:EQUB 12:EQUB 17:EQUB 6:EQUB 9:EQUB 9:EQUB 9
�.scorestring EQUD 0:EQUD 0
MOV R15,R14
.gameover SWI 1
}EQUB 31:EQUB 9:EQUB 2:EQUB 71:EQUB 65:EQUB 77:EQUB 69:EQUB 32:EQUB 79:EQUB 86:EQUB 69:EQUB 82:EQUB 0:EQUB 0:EQUB 0:EQUB 0
"
MOV R0,#5
,STRB R0,Balls
6.goloop BL batcalc
@TST R12,#65536
JBEQ goloop
T	SWI 1
^aEQUB 31:EQUB 30:EQUB 12:EQUB 48:EQUB 48:EQUB 48:EQUB 48:EQUB 48:EQUB 48:EQUB 48:EQUB 0:EQUB 0
h
MOV R0,#0
rSTR R0,score
|STRB R0,screenlevel
�LDR R2,balladr
�MOV R3,#968
�MOV R4,#720
�BL spriteplot
�ADD R3,R3,#32
�BL spriteplot
�ADD R3,R3,#32
�BL spriteplot
�ADD R3,R3,#32
�BL spriteplot
�ADD R3,R3,#32
�BL spriteplot
�BL setup
 
B newball
 %.doex1 TST R12,#32768 ;Frame flag
 BEQ bad2calc
 &LDRB R0,Ex1num
 0ADD R0,R0,#1
 :�S R0,R0,#3
 DSTRB R0,Ex1num
 NBNE bad2calc
 X!BIC R12,R12,#8 ;Clear ex1flag
 bMOV R0,#128
 lSTR R0,bad1Xm
 vMOV R0,#704
 �STR R0,bad1Ym
 �.ex1exit B bad2calc
 �&.doex2  TST R12,#32768 ;Frame flag
 �BEQ movetok
 �LDRB R0,Ex2num
 �ADD R0,R0,#1
 ��S R0,R0,#3
 �STRB R0,Ex2num
 �BNE movetok
 �"BIC R12,R12,#16 ;Clear ex2flag
 �MOV R0,#768
 �STR R0,bad2Xm
 �MOV R0,#752
!STR R0,bad2Ym
!.ex2exit B movetok
!%.dobad1 TST R12,#32768 ;Frameflag
! BEQ movebad1
!*LDRB R0,Bad1frame
!4ADD R0,R0,#1
!>� R0,R0,#3
!HSTRB R0,Bad1frame
!R.movebad1 LDR R1,bad1Xm
!\LDR R2,bad1Ym
!fLDRB R3,Bad1VX
!pLDRB R4,Bad1VY
!zTST R12,#512 ;Bad1 xdir
!�SUBEQ R1,R1,R3
!�ADDNE R1,R1,R3
!�TST R12,#1024 ;Bad1 ydir
!�SUBEQ R2,R2,R4
!�ADDNE R2,R2,R4
!�STR R1,bad1Xm
!�STR R2,bad1Ym
!�CMP R1,#800
!�$BICEQ R12,R12,#512 ;Neg bad1xdir
!�CMP R1,#32
!�#�REQ R12,R12,#512 ;Pos bad1xdir
!�CMP R2,#960
!�%BICEQ R12,R12,#1024 ;Neg bad1ydir
"CMP R2,#160
"$�REQ R12,R12,#1024 ;Pos bad1ydir
"B bad2calc
"$%.dobad2 TST R12,#32768 ;Frameflag
".BEQ movebad2
"8LDRB R0,Bad2frame
"BADD R0,R0,#1
"L� R0,R0,#3
"VSTRB R0,Bad2frame
"`.movebad2 LDR R1,bad2Xm
"jLDR R2,bad2Ym
"tLDRB R3,Bad2VX
"~LDRB R4,Bad2VY
"�TST R12,#2048 ;Bad2 xdir
"�SUBEQ R1,R1,R3
"�ADDNE R1,R1,R3
"�TST R12,#4096 ;Bad2 ydir
"�SUBEQ R2,R2,R4
"�ADDNE R2,R2,R4
"�STR R1,bad2Xm
"�STR R2,bad2Ym
"�CMP R1,#800
"�%BICEQ R12,R12,#2048 ;Neg bad2xdir
"�CMP R1,#32
"�$�REQ R12,R12,#2048 ;Pos bad2xdir
#CMP R2,#960
#
%BICEQ R12,R12,#4096 ;Neg bad2ydir
#CMP R2,#160
#$�REQ R12,R12,#4096 ;Pos bad2ydir
#(
B movetok
#2.iconreset STMFD R13!,{R14}
#<LDRB R1,Iconframe
#FCMP R1,#255
#PBEQ iconresetexit
#ZLDR R2,i1nadr
#dADD R2,R2,R1,LSL#2
#nLDR R5,iconxadr
#xLDR R3,[R5,R1,LSL#2]
#�LDR R5,iconyadr
#�LDR R4,[R5,R1,LSL#2]
#�BL spriteplot
#�MOV R0,#255
#�STRB R0,Iconframe
#�#.iconresetexit LDMFD R13!,{R15}
#�.beep SWI &42 ;Read time
#�� R1,R0,#60
#�MOV R0,#213
#�	SWI 6
#�
SWI 256+7
#�BIC R12,R12,#128 ;Beepflag
#�MOV R15,R14
#�]
$	�pass
$�"Sound Y/N ",A$
$#� A$="N" � A$="n" �  *AUDIO OFF
$�128:�:�13
$�I%=0�27:�224:�:�228:�
$")�I%=0�27:�225:��26,�32);:�229,228:�:�
$,$�5:�900,376:�900,1023:�1279,1023
$6+�13:ȓ904,374,372,643:ȓ908,378,364,635
$@$�5:�912,380:�1268,380:�1268,1007
$J�13:�30,10)"SCORE"
$T�6:�30,12)"0000000"
$^�14:�30,14)"FRAME"
$h�4:�30,16)"001"
$r*SCHOOSE BAL
$|H�&ED,968,720:�&ED,1000,720:�&ED,1032,720:�&ED,1064,720:�&ED,1096,720
$�*SCHOOSE I1N
$��&ED,992,272
$�*SCHOOSE I2N
$��&ED,1056,272
$�*SCHOOSE I3N
$��&ED,1120,272
$�*SCHOOSE I4N
$��&ED,992,208
$�*SCHOOSE I5N
$��&ED,1056,208
$�*SCHOOSE I6N
$��&ED,1120,208
$�*SCHOOSE I7N
%�&ED,992,144
%*SCHOOSE I8N
%�&ED,1056,144
%&*SCHOOSE I9N
%0�&ED,1120,144
%:*SCHOOSE IMP
%D�&ED,928,820
%N"�6:�976,130:�976,344:�1192,344
%X*�8:ȓ980,130,212,212:ȓ984,134,204,204
%b#�6:�988,138:�1184,138:�1184,334
%v� start
%��
�

00000000  0d 00 0a 09 c8 97 88 20  32 0d 00 14 06 eb 39 0d  |....... 2.....9.|
00000010  00 1e 12 fb 31 2c 26 38  30 2c 26 38 30 2c 26 38  |....1,&80,&80,&8|
00000020  30 0d 00 28 12 fb 32 2c  26 42 30 2c 26 42 30 2c  |0..(..2,&B0,&B0,|
00000030  26 42 30 0d 00 32 12 fb  33 2c 26 30 30 2c 26 39  |&B0..2..3,&00,&9|
00000040  30 2c 26 31 30 0d 00 3c  12 fb 34 2c 26 45 30 2c  |0,&10..<..4,&E0,|
00000050  26 30 30 2c 26 30 30 0d  00 46 12 fb 35 2c 26 46  |&00,&00..F..5,&F|
00000060  30 2c 26 42 30 2c 26 30  30 0d 00 50 12 fb 36 2c  |0,&B0,&00..P..6,|
00000070  26 46 30 2c 26 46 30 2c  26 30 30 0d 00 5a 12 fb  |&F0,&F0,&00..Z..|
00000080  37 2c 26 30 30 2c 26 34  30 2c 26 41 30 0d 00 64  |7,&00,&40,&A0..d|
00000090  12 fb 38 2c 26 30 30 2c  26 46 30 2c 26 30 30 0d  |..8,&00,&F0,&00.|
000000a0  00 6e 12 fb 39 2c 26 30  30 2c 26 42 30 2c 26 36  |.n..9,&00,&B0,&6|
000000b0  30 0d 00 78 13 fb 31 30  2c 26 34 30 2c 26 39 30  |0..x..10,&40,&90|
000000c0  2c 26 46 30 0d 00 82 13  fb 31 31 2c 26 37 30 2c  |,&F0.....11,&70,|
000000d0  26 30 30 2c 26 44 30 0d  00 8c 13 fb 31 32 2c 26  |&00,&D0.....12,&|
000000e0  42 30 2c 26 37 30 2c 26  30 30 0d 00 96 13 fb 31  |B0,&70,&00.....1|
000000f0  33 2c 26 46 30 2c 26 39  30 2c 26 30 30 0d 00 a0  |3,&F0,&90,&00...|
00000100  13 fb 31 34 2c 26 45 30  2c 26 30 30 2c 26 45 30  |..14,&E0,&00,&E0|
00000110  0d 00 aa 13 fb 31 35 2c  26 46 30 2c 26 46 30 2c  |.....15,&F0,&F0,|
00000120  26 46 30 0d 00 ab 22 2a  43 48 41 4e 4e 45 4c 56  |&F0..."*CHANNELV|
00000130  4f 49 43 45 20 31 20 53  74 72 69 6e 67 4c 69 62  |OICE 1 StringLib|
00000140  2d 53 6f 66 74 0d 00 b4  51 de 20 63 6f 64 65 25  |-Soft...Q. code%|
00000150  20 26 31 30 30 30 30 2c  73 63 72 65 65 6e 25 20  | &10000,screen% |
00000160  32 33 34 30 30 2c 62 61  6c 6c 62 25 20 38 2c 62  |23400,ballb% 8,b|
00000170  61 74 62 25 20 38 34 2c  62 61 64 31 62 25 20 31  |atb% 84,bad1b% 1|
00000180  30 30 2c 62 61 64 32 62  25 20 31 30 30 2c 74 6f  |00,bad2b% 100,to|
00000190  6b 62 25 20 34 35 0d 00  be 2b ff 28 22 4c 4f 41  |kb% 45...+.("LOA|
000001a0  44 20 3c 4f 62 65 79 24  44 69 72 3e 2e 53 63 72  |D <Obey$Dir>.Scr|
000001b0  65 65 6e 73 20 22 2b c3  7e 73 63 72 65 65 6e 25  |eens "+.~screen%|
000001c0  29 0d 00 c8 1d 2a 53 4c  4f 41 44 20 3c 4f 62 65  |)....*SLOAD <Obe|
000001d0  79 24 44 69 72 3e 2e 53  70 72 69 74 65 73 0d 00  |y$Dir>.Sprites..|
000001e0  d2 27 ef 32 33 2c 32 32  34 2c 32 34 37 2c 32 34  |.'.23,224,247,24|
000001f0  37 2c 32 34 37 2c 30 2c  31 32 37 2c 31 32 37 2c  |7,247,0,127,127,|
00000200  31 32 37 2c 30 0d 00 dc  27 ef 32 33 2c 32 32 35  |127,0...'.23,225|
00000210  2c 32 34 37 2c 32 34 37  2c 32 34 37 2c 30 2c 31  |,247,247,247,0,1|
00000220  32 36 2c 31 32 36 2c 31  32 36 2c 30 0d 00 e6 29  |26,126,126,0...)|
00000230  ef 32 33 2c 32 32 36 2c  30 2c 26 37 46 2c 26 37  |.23,226,0,&7F,&7|
00000240  46 2c 26 37 46 2c 26 37  46 2c 26 37 46 2c 26 37  |F,&7F,&7F,&7F,&7|
00000250  46 2c 26 37 46 0d 00 f0  29 ef 32 33 2c 32 32 37  |F,&7F...).23,227|
00000260  2c 30 2c 26 46 46 2c 26  46 46 2c 26 46 46 2c 26  |,0,&FF,&FF,&FF,&|
00000270  46 46 2c 26 46 46 2c 26  46 46 2c 26 46 46 0d 00  |FF,&FF,&FF,&FF..|
00000280  fa 21 ef 32 33 2c 32 32  38 2c 26 38 30 2c 26 38  |.!.23,228,&80,&8|
00000290  30 2c 26 38 30 2c 30 2c  30 2c 30 2c 30 2c 30 0d  |0,&80,0,0,0,0,0.|
000002a0  01 04 24 ef 32 33 2c 32  32 39 2c 31 31 39 2c 31  |..$.23,229,119,1|
000002b0  31 39 2c 31 31 39 2c 30  2c 36 33 2c 36 33 2c 36  |19,119,0,63,63,6|
000002c0  33 2c 30 0d 01 0e 0c ef  32 33 2c 31 2c 30 7c 0d  |3,0.....23,1,0|.|
000002d0  01 18 14 e3 20 70 61 73  73 3d 30 20 b8 20 32 20  |.... pass=0 . 2 |
000002e0  88 20 32 0d 01 22 0c 50  25 3d 63 6f 64 65 25 0d  |. 2..".P%=code%.|
000002f0  01 2c 0d 5b 4f 50 54 20  70 61 73 73 0d 01 36 11  |.,.[OPT pass..6.|
00000300  2e 73 63 6f 72 65 20 45  51 55 44 20 30 0d 01 40  |.score EQUD 0..@|
00000310  11 2e 74 65 6d 70 78 20  45 51 55 44 20 30 0d 01  |..tempx EQUD 0..|
00000320  4a 16 2e 66 72 61 6d 65  63 6f 75 6e 74 20 45 51  |J..framecount EQ|
00000330  55 44 20 30 0d 01 54 1a  2e 62 6f 75 6e 63 65 61  |UD 0..T..bouncea|
00000340  64 72 20 45 51 55 44 20  62 6f 75 6e 63 65 0d 01  |dr EQUD bounce..|
00000350  5e 14 2e 69 31 6e 61 64  72 20 45 51 55 44 20 69  |^..i1nadr EQUD i|
00000360  31 6e 0d 01 68 14 2e 69  31 68 61 64 72 20 45 51  |1n..h..i1hadr EQ|
00000370  55 44 20 69 31 68 0d 01  72 1d 2e 69 63 6f 6e 78  |UD i1h..r..iconx|
00000380  61 64 72 20 45 51 55 44  20 69 63 6f 6e 78 74 61  |adr EQUD iconxta|
00000390  62 6c 65 0d 01 7c 1d 2e  69 63 6f 6e 79 61 64 72  |ble..|..iconyadr|
000003a0  20 45 51 55 44 20 69 63  6f 6e 79 74 61 62 6c 65  | EQUD iconytable|
000003b0  0d 01 86 14 2e 62 6c 31  78 20 20 20 20 20 45 51  |.....bl1x     EQ|
000003c0  55 44 20 30 0d 01 90 14  2e 62 6c 31 79 20 20 20  |UD 0.....bl1y   |
000003d0  20 20 45 51 55 44 20 30  0d 01 9a 14 2e 62 6c 32  |  EQUD 0.....bl2|
000003e0  78 20 20 20 20 20 45 51  55 44 20 30 0d 01 a4 14  |x     EQUD 0....|
000003f0  2e 62 6c 32 79 20 20 20  20 20 45 51 55 44 20 30  |.bl2y     EQUD 0|
00000400  0d 01 ae 18 2e 6d 73 74  6f 70 20 45 51 55 44 20  |.....mstop EQUD |
00000410  26 31 46 44 38 30 30 30  0d 01 b8 1c 2e 76 64 75  |&1FD8000.....vdu|
00000420  62 6c 6b 20 45 51 55 44  20 31 34 39 3a 45 51 55  |blk EQUD 149:EQU|
00000430  44 20 2d 31 0d 01 c2 19  2e 76 64 75 6f 75 74 20  |D -1.....vduout |
00000440  45 51 55 44 20 30 3a 45  51 55 44 20 30 0d 01 cc  |EQUD 0:EQUD 0...|
00000450  14 2e 62 61 6c 6c 58 6d  20 45 51 55 44 20 36 34  |..ballXm EQUD 64|
00000460  30 0d 01 d6 14 2e 62 61  6c 6c 59 6d 20 45 51 55  |0.....ballYm EQU|
00000470  44 20 33 32 30 0d 01 e0  12 2e 62 61 74 58 6d 20  |D 320.....batXm |
00000480  20 45 51 55 44 20 30 0d  01 ea 13 2e 62 61 74 59  | EQUD 0.....batY|
00000490  6d 20 20 45 51 55 44 20  39 36 0d 01 f4 14 2e 62  |m  EQUD 96.....b|
000004a0  61 64 31 58 6d 20 45 51  55 44 20 31 32 38 0d 01  |ad1Xm EQUD 128..|
000004b0  fe 14 2e 62 61 64 31 59  6d 20 45 51 55 44 20 37  |...bad1Ym EQUD 7|
000004c0  30 34 0d 02 08 14 2e 62  61 64 32 58 6d 20 45 51  |04.....bad2Xm EQ|
000004d0  55 44 20 37 36 38 0d 02  12 14 2e 62 61 64 32 59  |UD 768.....bad2Y|
000004e0  6d 20 45 51 55 44 20 32  35 36 0d 02 1c 12 2e 74  |m EQUD 256.....t|
000004f0  6f 6b 58 6d 20 20 45 51  55 44 20 30 0d 02 26 12  |okXm  EQUD 0..&.|
00000500  2e 74 6f 6b 59 6d 20 20  45 51 55 44 20 30 0d 02  |.tokYm  EQUD 0..|
00000510  30 14 2e 74 6f 6b 61 62  73 20 20 20 45 51 55 44  |0..tokabs   EQUD|
00000520  20 30 0d 02 3a 16 2e 74  6f 6b 61 64 72 20 20 20  | 0..:..tokadr   |
00000530  45 51 55 44 20 74 6f 31  0d 02 44 18 2e 74 6f 6b  |EQUD to1..D..tok|
00000540  62 61 64 72 20 20 45 51  55 44 20 74 6f 6b 62 25  |badr  EQUD tokb%|
00000550  0d 02 4e 13 2e 62 61 6c  6c 61 62 73 20 45 51 55  |..N..ballabs EQU|
00000560  44 20 30 0d 02 58 16 2e  62 61 6c 6c 61 64 72 20  |D 0..X..balladr |
00000570  45 51 55 44 20 62 61 6c  6c 0d 02 62 19 2e 62 61  |EQUD ball..b..ba|
00000580  6c 6c 62 61 64 72 20 45  51 55 44 20 62 61 6c 6c  |llbadr EQUD ball|
00000590  62 25 0d 02 6c 13 2e 62  61 74 61 62 73 20 20 45  |b%..l..batabs  E|
000005a0  51 55 44 20 30 0d 02 76  15 2e 62 61 74 61 64 72  |QUD 0..v..batadr|
000005b0  20 20 45 51 55 44 20 62  61 74 0d 02 80 18 2e 62  |  EQUD bat.....b|
000005c0  61 74 62 61 64 72 20 20  45 51 55 44 20 62 61 74  |atbadr  EQUD bat|
000005d0  62 25 0d 02 8a 14 2e 62  31 61 64 72 20 20 20 45  |b%.....b1adr   E|
000005e0  51 55 44 20 62 31 0d 02  94 15 2e 62 6c 31 61 64  |QUD b1.....bl1ad|
000005f0  72 20 20 45 51 55 44 20  62 6c 31 0d 02 9e 14 2e  |r  EQUD bl1.....|
00000600  65 78 31 61 64 72 20 45  51 55 44 20 65 78 31 0d  |ex1adr EQUD ex1.|
00000610  02 a8 14 2e 65 78 32 61  64 72 20 45 51 55 44 20  |....ex2adr EQUD |
00000620  65 78 31 0d 02 b2 15 2e  62 61 64 31 61 62 73 20  |ex1.....bad1abs |
00000630  20 20 45 51 55 44 20 30  0d 02 bc 1c 2e 62 61 64  |  EQUD 0.....bad|
00000640  31 62 61 64 72 20 20 20  20 45 51 55 44 20 62 61  |1badr    EQUD ba|
00000650  64 31 62 25 0d 02 c6 15  2e 62 61 64 32 61 62 73  |d1b%.....bad2abs|
00000660  20 20 20 45 51 55 44 20  30 0d 02 d0 1c 2e 62 61  |   EQUD 0.....ba|
00000670  64 32 62 61 64 72 20 20  20 20 45 51 55 44 20 62  |d2badr    EQUD b|
00000680  61 64 32 62 25 0d 02 da  1a 2e 62 6c 6f 63 6b 73  |ad2b%.....blocks|
00000690  61 64 72 20 45 51 55 44  20 62 6c 6f 63 6b 73 0d  |adr EQUD blocks.|
000006a0  02 e4 18 2e 73 63 72 65  65 6e 20 45 51 55 44 20  |....screen EQUD |
000006b0  73 63 72 65 65 6e 25 0d  02 ee 18 2e 69 63 6f 6e  |screen%.....icon|
000006c0  78 74 61 62 6c 65 20 45  51 55 44 20 39 39 32 0d  |xtable EQUD 992.|
000006d0  02 f8 0d 45 51 55 44 20  31 30 35 36 0d 03 02 0d  |...EQUD 1056....|
000006e0  45 51 55 44 20 31 31 32  30 0d 03 0c 0c 45 51 55  |EQUD 1120....EQU|
000006f0  44 20 39 39 32 0d 03 16  0d 45 51 55 44 20 31 30  |D 992....EQUD 10|
00000700  35 36 0d 03 20 0d 45 51  55 44 20 31 31 32 30 0d  |56.. .EQUD 1120.|
00000710  03 2a 0c 45 51 55 44 20  39 39 32 0d 03 34 0d 45  |.*.EQUD 992..4.E|
00000720  51 55 44 20 31 30 35 36  0d 03 3e 0d 45 51 55 44  |QUD 1056..>.EQUD|
00000730  20 31 31 32 30 0d 03 48  18 2e 69 63 6f 6e 79 74  | 1120..H..iconyt|
00000740  61 62 6c 65 20 45 51 55  44 20 32 37 32 0d 03 52  |able EQUD 272..R|
00000750  0c 45 51 55 44 20 32 37  32 0d 03 5c 0c 45 51 55  |.EQUD 272..\.EQU|
00000760  44 20 32 37 32 0d 03 66  0c 45 51 55 44 20 32 30  |D 272..f.EQUD 20|
00000770  38 0d 03 70 0c 45 51 55  44 20 32 30 38 0d 03 7a  |8..p.EQUD 208..z|
00000780  0c 45 51 55 44 20 32 30  38 0d 03 84 0c 45 51 55  |.EQUD 208....EQU|
00000790  44 20 31 34 34 0d 03 8e  0c 45 51 55 44 20 31 34  |D 144....EQUD 14|
000007a0  34 0d 03 98 0c 45 51 55  44 20 31 34 34 0d 03 a2  |4....EQUD 144...|
000007b0  16 2e 58 6d 61 64 72 20  45 51 55 44 20 62 61 6c  |..Xmadr EQUD bal|
000007c0  6c 58 6d 0d 03 ac 1a 2e  62 31 20 20 20 20 20 20  |lXm.....b1      |
000007d0  45 51 55 53 20 22 62 31  20 22 2b bd 30 0d 03 b6  |EQUS "b1 "+.0...|
000007e0  1a 2e 62 32 20 20 20 20  20 20 45 51 55 53 20 22  |..b2      EQUS "|
000007f0  62 32 20 22 2b bd 30 0d  03 c0 1a 2e 62 33 20 20  |b2 "+.0.....b3  |
00000800  20 20 20 20 45 51 55 53  20 22 62 33 20 22 2b bd  |    EQUS "b3 "+.|
00000810  30 0d 03 ca 1a 2e 62 34  20 20 20 20 20 20 45 51  |0.....b4      EQ|
00000820  55 53 20 22 62 34 20 22  2b bd 30 0d 03 d4 1a 2e  |US "b4 "+.0.....|
00000830  62 6c 31 20 20 20 20 20  45 51 55 53 20 22 62 6c  |bl1     EQUS "bl|
00000840  34 22 2b bd 30 0d 03 de  1a 2e 62 6c 32 20 20 20  |4"+.0.....bl2   |
00000850  20 20 45 51 55 53 20 22  62 6c 32 22 2b bd 30 0d  |  EQUS "bl2"+.0.|
00000860  03 e8 1a 2e 62 6c 33 20  20 20 20 20 45 51 55 53  |....bl3     EQUS|
00000870  20 22 62 6c 34 22 2b bd  30 0d 03 f2 1a 2e 62 6c  | "bl4"+.0.....bl|
00000880  34 20 20 20 20 20 45 51  55 53 20 22 62 6c 34 22  |4     EQUS "bl4"|
00000890  2b bd 30 0d 03 fc 1a 2e  65 78 31 20 20 20 20 20  |+.0.....ex1     |
000008a0  45 51 55 53 20 22 65 78  31 22 2b bd 30 0d 04 06  |EQUS "ex1"+.0...|
000008b0  1a 2e 65 78 32 20 20 20  20 20 45 51 55 53 20 22  |..ex2     EQUS "|
000008c0  65 78 32 22 2b bd 30 0d  04 10 1a 2e 65 78 33 20  |ex2"+.0.....ex3 |
000008d0  20 20 20 20 45 51 55 53  20 22 62 78 20 22 2b bd  |    EQUS "bx "+.|
000008e0  30 0d 04 1a 1a 2e 65 78  34 20 20 20 20 20 45 51  |0.....ex4     EQ|
000008f0  55 53 20 22 62 78 20 22  2b bd 30 0d 04 24 1a 2e  |US "bx "+.0..$..|
00000900  62 61 74 20 20 20 20 20  45 51 55 53 20 22 62 61  |bat     EQUS "ba|
00000910  31 22 2b bd 30 0d 04 2e  19 2e 62 61 32 20 20 20  |1"+.0.....ba2   |
00000920  20 45 51 55 53 20 22 62  61 32 22 2b bd 30 0d 04  | EQUS "ba2"+.0..|
00000930  38 19 2e 62 61 33 20 20  20 20 45 51 55 53 20 22  |8..ba3    EQUS "|
00000940  62 61 33 22 2b bd 30 0d  04 42 19 2e 62 61 34 20  |ba3"+.0..B..ba4 |
00000950  20 20 20 45 51 55 53 20  22 62 61 34 22 2b bd 30  |   EQUS "ba4"+.0|
00000960  0d 04 4c 19 2e 62 61 35  20 20 20 20 45 51 55 53  |..L..ba5    EQUS|
00000970  20 22 62 61 35 22 2b bd  30 0d 04 56 19 2e 62 61  | "ba5"+.0..V..ba|
00000980  36 20 20 20 20 45 51 55  53 20 22 62 61 36 22 2b  |6    EQUS "ba6"+|
00000990  bd 30 0d 04 60 1a 2e 62  61 6c 6c 20 20 20 20 45  |.0..`..ball    E|
000009a0  51 55 53 20 22 62 61 6c  22 2b bd 30 0d 04 6a 1a  |QUS "bal"+.0..j.|
000009b0  2e 74 6f 31 20 20 20 20  20 45 51 55 53 20 22 74  |.to1     EQUS "t|
000009c0  6f 31 22 2b bd 30 0d 04  74 1a 2e 74 6f 32 20 20  |o1"+.0..t..to2  |
000009d0  20 20 20 45 51 55 53 20  22 74 6f 32 22 2b bd 30  |   EQUS "to2"+.0|
000009e0  0d 04 7e 1a 2e 74 6f 33  20 20 20 20 20 45 51 55  |..~..to3     EQU|
000009f0  53 20 22 74 6f 33 22 2b  bd 30 0d 04 88 1a 2e 74  |S "to3"+.0.....t|
00000a00  6f 34 20 20 20 20 20 45  51 55 53 20 22 74 6f 34  |o4     EQUS "to4|
00000a10  22 2b bd 30 0d 04 92 1a  2e 74 6f 35 20 20 20 20  |"+.0.....to5    |
00000a20  20 45 51 55 53 20 22 74  6f 33 22 2b bd 30 0d 04  | EQUS "to3"+.0..|
00000a30  9c 1a 2e 74 6f 36 20 20  20 20 20 45 51 55 53 20  |...to6     EQUS |
00000a40  22 74 6f 32 22 2b bd 30  0d 04 a6 1a 2e 74 6f 37  |"to2"+.0.....to7|
00000a50  20 20 20 20 20 45 51 55  53 20 22 74 6f 31 22 2b  |     EQUS "to1"+|
00000a60  bd 30 0d 04 b0 1a 2e 69  31 6e 20 20 20 20 20 45  |.0.....i1n     E|
00000a70  51 55 53 20 22 69 31 6e  22 2b bd 30 0d 04 ba 1a  |QUS "i1n"+.0....|
00000a80  2e 69 32 6e 20 20 20 20  20 45 51 55 53 20 22 69  |.i2n     EQUS "i|
00000a90  32 6e 22 2b bd 30 0d 04  c4 1a 2e 69 33 6e 20 20  |2n"+.0.....i3n  |
00000aa0  20 20 20 45 51 55 53 20  22 69 33 6e 22 2b bd 30  |   EQUS "i3n"+.0|
00000ab0  0d 04 ce 1a 2e 69 34 6e  20 20 20 20 20 45 51 55  |.....i4n     EQU|
00000ac0  53 20 22 69 34 6e 22 2b  bd 30 0d 04 d8 1a 2e 69  |S "i4n"+.0.....i|
00000ad0  35 6e 20 20 20 20 20 45  51 55 53 20 22 69 35 6e  |5n     EQUS "i5n|
00000ae0  22 2b bd 30 0d 04 e2 1a  2e 69 36 6e 20 20 20 20  |"+.0.....i6n    |
00000af0  20 45 51 55 53 20 22 69  36 6e 22 2b bd 30 0d 04  | EQUS "i6n"+.0..|
00000b00  ec 1a 2e 69 37 6e 20 20  20 20 20 45 51 55 53 20  |...i7n     EQUS |
00000b10  22 69 37 6e 22 2b bd 30  0d 04 f6 1a 2e 69 38 6e  |"i7n"+.0.....i8n|
00000b20  20 20 20 20 20 45 51 55  53 20 22 69 38 6e 22 2b  |     EQUS "i8n"+|
00000b30  bd 30 0d 05 00 1a 2e 69  39 6e 20 20 20 20 20 45  |.0.....i9n     E|
00000b40  51 55 53 20 22 69 39 6e  22 2b bd 30 0d 05 0a 1b  |QUS "i9n"+.0....|
00000b50  2e 69 31 68 20 20 20 20  20 20 45 51 55 53 20 22  |.i1h      EQUS "|
00000b60  69 31 68 22 2b bd 30 0d  05 14 1b 2e 69 32 68 20  |i1h"+.0.....i2h |
00000b70  20 20 20 20 20 45 51 55  53 20 22 69 32 68 22 2b  |     EQUS "i2h"+|
00000b80  bd 30 0d 05 1e 1b 2e 69  33 68 20 20 20 20 20 20  |.0.....i3h      |
00000b90  45 51 55 53 20 22 69 33  68 22 2b bd 30 0d 05 28  |EQUS "i3h"+.0..(|
00000ba0  1b 2e 69 34 68 20 20 20  20 20 20 45 51 55 53 20  |..i4h      EQUS |
00000bb0  22 69 34 68 22 2b bd 30  0d 05 32 1b 2e 69 35 68  |"i4h"+.0..2..i5h|
00000bc0  20 20 20 20 20 20 45 51  55 53 20 22 69 35 68 22  |      EQUS "i5h"|
00000bd0  2b bd 30 0d 05 3c 1b 2e  69 36 68 20 20 20 20 20  |+.0..<..i6h     |
00000be0  20 45 51 55 53 20 22 69  36 68 22 2b bd 30 0d 05  | EQUS "i6h"+.0..|
00000bf0  46 1b 2e 69 37 68 20 20  20 20 20 20 45 51 55 53  |F..i7h      EQUS|
00000c00  20 22 69 37 68 22 2b bd  30 0d 05 50 1b 2e 69 38  | "i7h"+.0..P..i8|
00000c10  68 20 20 20 20 20 20 45  51 55 53 20 22 69 38 68  |h      EQUS "i8h|
00000c20  22 2b bd 30 0d 05 5a 1b  2e 69 39 68 20 20 20 20  |"+.0..Z..i9h    |
00000c30  20 20 45 51 55 53 20 22  69 39 68 22 2b bd 30 0d  |  EQUS "i9h"+.0.|
00000c40  05 64 17 2e 73 63 72 65  65 6e 6c 65 76 65 6c 20  |.d..screenlevel |
00000c50  45 51 55 42 20 30 0d 05  6e 12 2e 45 78 31 6e 75  |EQUB 0..n..Ex1nu|
00000c60  6d 20 45 51 55 42 20 30  0d 05 78 12 2e 45 78 32  |m EQUB 0..x..Ex2|
00000c70  6e 75 6d 20 45 51 55 42  20 30 0d 05 82 11 2e 42  |num EQUB 0.....B|
00000c80  6c 6e 75 6d 20 45 51 55  42 20 30 0d 05 8c 12 2e  |lnum EQUB 0.....|
00000c90  42 61 6c 6c 56 58 20 45  51 55 42 20 32 0d 05 96  |BallVX EQUB 2...|
00000ca0  13 2e 42 61 6c 6c 56 59  20 45 51 55 42 20 31 36  |..BallVY EQUB 16|
00000cb0  0d 05 a0 12 2e 42 61 64  31 56 58 20 45 51 55 42  |.....Bad1VX EQUB|
00000cc0  20 34 0d 05 aa 12 2e 42  61 64 31 56 59 20 45 51  | 4.....Bad1VY EQ|
00000cd0  55 42 20 34 0d 05 b4 12  2e 42 61 64 32 56 58 20  |UB 4.....Bad2VX |
00000ce0  45 51 55 42 20 34 0d 05  be 12 2e 42 61 64 32 56  |EQUB 4.....Bad2V|
00000cf0  59 20 45 51 55 42 20 34  0d 05 c8 15 2e 42 61 64  |Y EQUB 4.....Bad|
00000d00  31 66 72 61 6d 65 20 45  51 55 42 20 30 0d 05 d2  |1frame EQUB 0...|
00000d10  15 2e 42 61 64 32 66 72  61 6d 65 20 45 51 55 42  |..Bad2frame EQUB|
00000d20  20 31 0d 05 dc 14 2e 54  6f 6b 66 72 61 6d 65 20  | 1.....Tokframe |
00000d30  45 51 55 42 20 30 0d 05  e6 17 2e 49 63 6f 6e 66  |EQUB 0.....Iconf|
00000d40  72 61 6d 65 20 45 51 55  42 20 32 35 35 0d 05 f0  |rame EQUB 255...|
00000d50  14 2e 42 61 74 66 72 61  6d 65 20 45 51 55 42 20  |..Batframe EQUB |
00000d60  30 0d 05 fa 1d 2e 48 69  74 73 20 45 51 55 42 20  |0.....Hits EQUB |
00000d70  30 20 3b 48 69 74 20 63  6f 75 6e 74 65 72 0d 06  |0 ;Hit counter..|
00000d80  04 11 2e 42 61 6c 6c 73  20 45 51 55 42 20 35 0d  |...Balls EQUB 5.|
00000d90  06 0e 11 2e 50 69 74 63  68 20 45 51 55 42 20 30  |....Pitch EQUB 0|
00000da0  0d 06 18 09 41 4c 49 47  4e 0d 06 22 19 2e 62 6c  |....ALIGN.."..bl|
00000db0  6f 63 6b 73 20 45 51 55  53 20 c4 32 33 36 2c bd  |ocks EQUS .236,.|
00000dc0  30 29 0d 06 2c 43 2e 62  6f 75 6e 63 65 20 45 51  |0)..,C.bounce EQ|
00000dd0  55 53 20 bd 31 36 2b bd  31 36 2b bd 38 2b bd 38  |US .16+.16+.8+.8|
00000de0  2b bd 34 2b bd 34 2b bd  34 2b bd 32 2b bd 32 2b  |+.4+.4+.4+.2+.2+|
00000df0  bd 32 2b bd 34 2b bd 34  2b bd 34 2b bd 38 2b bd  |.2+.4+.4+.4+.8+.|
00000e00  38 2b bd 31 36 0d 06 36  10 45 51 55 53 20 c4 33  |8+.16..6.EQUS .3|
00000e10  32 2c bd 31 29 0d 06 40  09 41 4c 49 47 4e 0d 06  |2,.1)..@.ALIGN..|
00000e20  4a 22 2e 73 74 61 72 74  20 53 54 4d 46 44 20 52  |J".start STMFD R|
00000e30  31 33 21 2c 7b 52 30 2d  52 31 32 2c 52 31 34 7d  |13!,{R0-R12,R14}|
00000e40  0d 06 54 12 20 41 44 52  20 52 30 2c 76 64 75 62  |..T. ADR R0,vdub|
00000e50  6c 6b 0d 06 5e 12 20 41  44 52 20 52 31 2c 76 64  |lk..^. ADR R1,vd|
00000e60  75 6f 75 74 0d 06 68 0c  20 53 57 49 20 26 33 31  |uout..h. SWI &31|
00000e70  0d 06 72 12 20 4c 44 52  20 52 30 2c 76 64 75 6f  |..r. LDR R0,vduo|
00000e80  75 74 0d 06 7c 11 20 53  54 52 20 52 30 2c 6d 73  |ut..|. STR R0,ms|
00000e90  74 6f 70 0d 06 86 0c 42  4c 20 73 65 74 75 70 0d  |top....BL setup.|
00000ea0  06 90 0d 42 20 6e 65 77  62 61 6c 6c 0d 06 9a 1f  |...B newball....|
00000eb0  2e 70 6f 73 69 74 69 6f  6e 73 20 53 54 4d 46 44  |.positions STMFD|
00000ec0  20 52 31 33 21 2c 7b 52  31 34 7d 0d 06 a4 12 4c  | R13!,{R14}....L|
00000ed0  44 52 20 52 32 2c 62 61  6c 6c 61 64 72 0d 06 ae  |DR R2,balladr...|
00000ee0  12 4c 44 52 20 52 33 2c  5b 52 36 2c 23 30 5d 0d  |.LDR R3,[R6,#0].|
00000ef0  06 b8 12 4c 44 52 20 52  34 2c 5b 52 36 2c 23 34  |...LDR R4,[R6,#4|
00000f00  5d 0d 06 c2 1c 42 4c 20  73 70 72 69 74 65 70 6c  |]....BL spritepl|
00000f10  6f 74 20 3b 44 72 61 77  20 62 61 6c 6c 0d 06 cc  |ot ;Draw ball...|
00000f20  1c 54 53 54 20 52 31 32  2c 23 38 20 3b 54 65 73  |.TST R12,#8 ;Tes|
00000f30  74 20 65 78 31 66 6c 61  67 0d 06 d6 14 4c 44 52  |t ex1flag....LDR|
00000f40  4e 45 42 20 52 31 2c 45  78 31 6e 75 6d 0d 06 e0  |NEB R1,Ex1num...|
00000f50  13 4c 44 52 4e 45 20 52  32 2c 65 78 31 61 64 72  |.LDRNE R2,ex1adr|
00000f60  0d 06 ea 17 4c 44 52 45  51 42 20 52 31 2c 42 61  |....LDREQB R1,Ba|
00000f70  64 31 66 72 61 6d 65 0d  06 f4 12 4c 44 52 45 51  |d1frame....LDREQ|
00000f80  20 52 32 2c 62 31 61 64  72 0d 06 fe 3a 2e 64 72  | R2,b1adr...:.dr|
00000f90  61 77 62 61 64 31 20 41  44 44 20 52 32 2c 52 32  |awbad1 ADD R2,R2|
00000fa0  2c 52 31 2c 4c 53 4c 23  32 20 3b 47 65 74 20 62  |,R1,LSL#2 ;Get b|
00000fb0  61 64 31 27 73 20 61 64  64 72 65 73 73 20 69 6e  |ad1's address in|
00000fc0  20 52 32 0d 07 08 13 4c  44 52 20 52 33 2c 5b 52  | R2....LDR R3,[R|
00000fd0  36 2c 23 31 36 5d 0d 07  12 13 4c 44 52 20 52 34  |6,#16]....LDR R4|
00000fe0  2c 5b 52 36 2c 23 32 30  5d 0d 07 1c 1c 42 4c 20  |,[R6,#20]....BL |
00000ff0  73 70 72 69 74 65 70 6c  6f 74 20 3b 44 72 61 77  |spriteplot ;Draw|
00001000  20 62 61 64 31 0d 07 26  1d 54 53 54 20 52 31 32  | bad1..&.TST R12|
00001010  2c 23 31 36 20 3b 54 65  73 74 20 65 78 32 66 6c  |,#16 ;Test ex2fl|
00001020  61 67 0d 07 30 14 4c 44  52 4e 45 42 20 52 31 2c  |ag..0.LDRNEB R1,|
00001030  45 78 32 6e 75 6d 0d 07  3a 13 4c 44 52 4e 45 20  |Ex2num..:.LDRNE |
00001040  52 32 2c 65 78 32 61 64  72 0d 07 44 17 4c 44 52  |R2,ex2adr..D.LDR|
00001050  45 51 42 20 52 31 2c 42  61 64 32 66 72 61 6d 65  |EQB R1,Bad2frame|
00001060  0d 07 4e 12 4c 44 52 45  51 20 52 32 2c 62 31 61  |..N.LDREQ R2,b1a|
00001070  64 72 0d 07 58 3a 2e 64  72 61 77 62 61 64 32 20  |dr..X:.drawbad2 |
00001080  41 44 44 20 52 32 2c 52  32 2c 52 31 2c 4c 53 4c  |ADD R2,R2,R1,LSL|
00001090  23 32 20 3b 47 65 74 20  62 61 64 32 27 73 20 61  |#2 ;Get bad2's a|
000010a0  64 64 72 65 73 73 20 69  6e 20 52 32 0d 07 62 13  |ddress in R2..b.|
000010b0  4c 44 52 20 52 33 2c 5b  52 36 2c 23 32 34 5d 0d  |LDR R3,[R6,#24].|
000010c0  07 6c 13 4c 44 52 20 52  34 2c 5b 52 36 2c 23 32  |.l.LDR R4,[R6,#2|
000010d0  38 5d 0d 07 76 1c 42 4c  20 73 70 72 69 74 65 70  |8]..v.BL spritep|
000010e0  6c 6f 74 20 3b 44 72 61  77 20 62 61 64 32 0d 07  |lot ;Draw bad2..|
000010f0  80 14 4c 44 52 42 20 52  31 2c 42 61 74 66 72 61  |..LDRB R1,Batfra|
00001100  6d 65 0d 07 8a 11 4c 44  52 20 52 32 2c 62 61 74  |me....LDR R2,bat|
00001110  61 64 72 0d 07 94 16 41  44 44 20 52 32 2c 52 32  |adr....ADD R2,R2|
00001120  2c 52 31 2c 4c 53 4c 23  32 0d 07 9e 12 4c 44 52  |,R1,LSL#2....LDR|
00001130  20 52 33 2c 5b 52 36 2c  23 38 5d 0d 07 a8 13 4c  | R3,[R6,#8]....L|
00001140  44 52 20 52 34 2c 5b 52  36 2c 23 31 32 5d 0d 07  |DR R4,[R6,#12]..|
00001150  b2 1b 42 4c 20 73 70 72  69 74 65 70 6c 6f 74 20  |..BL spriteplot |
00001160  3b 44 72 61 77 20 62 61  74 0d 07 bc 1b 54 53 54  |;Draw bat....TST|
00001170  20 52 31 32 2c 23 38 31  39 32 20 3b 49 63 6f 6e  | R12,#8192 ;Icon|
00001180  66 6c 61 67 0d 07 c6 0d  42 45 51 20 64 6f 74 6f  |flag....BEQ doto|
00001190  6b 0d 07 d0 15 4c 44 52  42 20 52 31 2c 49 63 6f  |k....LDRB R1,Ico|
000011a0  6e 66 72 61 6d 65 0d 07  da 0f 43 4d 50 20 52 31  |nframe....CMP R1|
000011b0  2c 23 32 35 35 0d 07 e4  11 42 45 51 20 66 69 72  |,#255....BEQ fir|
000011c0  73 74 69 63 6f 6e 0d 07  ee 11 4c 44 52 20 52 32  |sticon....LDR R2|
000011d0  2c 69 31 6e 61 64 72 0d  07 f8 35 41 44 44 20 52  |,i1nadr...5ADD R|
000011e0  32 2c 52 32 2c 52 31 2c  4c 53 4c 23 32 20 3b 47  |2,R2,R1,LSL#2 ;G|
000011f0  65 74 20 6e 6f 72 6d 61  6c 20 69 63 6f 6e 20 61  |et normal icon a|
00001200  64 64 72 65 73 73 20 69  6e 20 52 32 0d 08 02 13  |ddress in R2....|
00001210  4c 44 52 20 52 35 2c 69  63 6f 6e 78 61 64 72 0d  |LDR R5,iconxadr.|
00001220  08 0c 18 4c 44 52 20 52  33 2c 5b 52 35 2c 52 31  |...LDR R3,[R5,R1|
00001230  2c 4c 53 4c 23 32 5d 0d  08 16 13 4c 44 52 20 52  |,LSL#2]....LDR R|
00001240  35 2c 69 63 6f 6e 79 61  64 72 0d 08 20 18 4c 44  |5,iconyadr.. .LD|
00001250  52 20 52 34 2c 5b 52 35  2c 52 31 2c 4c 53 4c 23  |R R4,[R5,R1,LSL#|
00001260  32 5d 0d 08 2a 11 42 4c  20 73 70 72 69 74 65 70  |2]..*.BL spritep|
00001270  6c 6f 74 0d 08 34 15 4c  44 52 42 20 52 31 2c 49  |lot..4.LDRB R1,I|
00001280  63 6f 6e 66 72 61 6d 65  0d 08 3e 10 41 44 44 20  |conframe..>.ADD |
00001290  52 31 2c 52 31 2c 23 31  0d 08 48 0d 43 4d 50 20  |R1,R1,#1..H.CMP |
000012a0  52 31 2c 23 39 0d 08 52  17 2e 66 69 72 73 74 69  |R1,#9..R..firsti|
000012b0  63 6f 6e 20 ec 51 20 52  31 2c 23 30 0d 08 5c 15  |con .Q R1,#0..\.|
000012c0  53 54 52 42 20 52 31 2c  49 63 6f 6e 66 72 61 6d  |STRB R1,Iconfram|
000012d0  65 0d 08 66 11 4c 44 52  20 52 32 2c 69 31 68 61  |e..f.LDR R2,i1ha|
000012e0  64 72 0d 08 70 3a 41 44  44 20 52 32 2c 52 32 2c  |dr..p:ADD R2,R2,|
000012f0  52 31 2c 4c 53 4c 23 32  20 3b 47 65 74 20 68 69  |R1,LSL#2 ;Get hi|
00001300  67 68 6c 69 67 68 74 65  64 20 69 63 6f 6e 20 61  |ghlighted icon a|
00001310  64 64 72 65 73 73 20 69  6e 20 52 32 0d 08 7a 13  |ddress in R2..z.|
00001320  4c 44 52 20 52 35 2c 69  63 6f 6e 78 61 64 72 0d  |LDR R5,iconxadr.|
00001330  08 84 18 4c 44 52 20 52  33 2c 5b 52 35 2c 52 31  |...LDR R3,[R5,R1|
00001340  2c 4c 53 4c 23 32 5d 0d  08 8e 13 4c 44 52 20 52  |,LSL#2]....LDR R|
00001350  35 2c 69 63 6f 6e 79 61  64 72 0d 08 98 18 4c 44  |5,iconyadr....LD|
00001360  52 20 52 34 2c 5b 52 35  2c 52 31 2c 4c 53 4c 23  |R R4,[R5,R1,LSL#|
00001370  32 5d 0d 08 a2 11 42 4c  20 73 70 72 69 74 65 70  |2]....BL spritep|
00001380  6c 6f 74 0d 08 ac 25 42  49 43 20 52 31 32 2c 52  |lot...%BIC R12,R|
00001390  31 32 2c 23 38 31 39 32  20 3b 43 6c 65 61 72 20  |12,#8192 ;Clear |
000013a0  69 63 6f 6e 66 6c 61 67  0d 08 b6 24 2e 64 6f 74  |iconflag...$.dot|
000013b0  6f 6b 20 54 53 54 20 52  31 32 2c 23 36 34 20 3b  |ok TST R12,#64 ;|
000013c0  54 65 73 74 20 74 6f 6b  66 6c 61 67 0d 08 c0 0f  |Test tokflag....|
000013d0  42 45 51 20 65 78 69 74  70 6f 73 0d 08 ca 14 4c  |BEQ exitpos....L|
000013e0  44 52 42 20 52 31 2c 54  6f 6b 66 72 61 6d 65 0d  |DRB R1,Tokframe.|
000013f0  08 d4 11 4c 44 52 20 52  32 2c 74 6f 6b 61 64 72  |...LDR R2,tokadr|
00001400  0d 08 de 2d 41 44 44 20  52 32 2c 52 32 2c 52 31  |...-ADD R2,R2,R1|
00001410  2c 4c 53 4c 23 32 20 3b  47 65 74 20 74 6f 6b 20  |,LSL#2 ;Get tok |
00001420  61 64 64 72 65 73 73 20  69 6e 20 52 32 0d 08 e8  |address in R2...|
00001430  13 4c 44 52 20 52 33 2c  5b 52 36 2c 23 33 32 5d  |.LDR R3,[R6,#32]|
00001440  0d 08 f2 13 4c 44 52 20  52 34 2c 5b 52 36 2c 23  |....LDR R4,[R6,#|
00001450  33 36 5d 0d 08 fc 1b 42  4c 20 73 70 72 69 74 65  |36]....BL sprite|
00001460  70 6c 6f 74 20 3b 44 72  61 77 20 74 6f 6b 0d 09  |plot ;Draw tok..|
00001470  06 1d 2e 65 78 69 74 70  6f 73 20 4c 44 4d 46 44  |...exitpos LDMFD|
00001480  20 52 31 33 21 2c 7b 52  31 35 7d 0d 09 10 3d 2e  | R13!,{R15}...=.|
00001490  6c 6f 6f 70 20 4c 44 52  20 52 30 2c 66 72 61 6d  |loop LDR R0,fram|
000014a0  65 63 6f 75 6e 74 20 3b  4d 61 69 6e 20 6c 6f 6f  |ecount ;Main loo|
000014b0  70 20 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |p **************|
000014c0  2a 2a 2a 2a 2a 2a 2a 2a  0d 09 1a 10 41 44 44 20  |********....ADD |
000014d0  52 30 2c 52 30 2c 23 31  0d 09 24 15 53 54 52 20  |R0,R0,#1..$.STR |
000014e0  52 30 2c 66 72 61 6d 65  63 6f 75 6e 74 0d 09 2e  |R0,framecount...|
000014f0  0f 80 53 20 52 30 2c 52  30 2c 23 37 0d 09 38 26  |..S R0,R0,#7..8&|
00001500  84 52 45 51 20 52 31 32  2c 52 31 32 2c 23 33 32  |.REQ R12,R12,#32|
00001510  37 36 38 20 3b 53 65 74  20 66 72 61 6d 65 66 6c  |768 ;Set framefl|
00001520  61 67 0d 09 42 29 42 49  43 4e 45 20 52 31 32 2c  |ag..B)BICNE R12,|
00001530  52 31 32 2c 23 33 32 37  36 38 20 3b 43 6c 65 61  |R12,#32768 ;Clea|
00001540  72 20 66 72 61 6d 65 66  6c 61 67 0d 09 4c 11 4c  |r frameflag..L.L|
00001550  44 52 20 52 30 2c 62 61  6c 6c 58 6d 0d 09 56 11  |DR R0,ballXm..V.|
00001560  4c 44 52 20 52 31 2c 62  61 6c 6c 59 6d 0d 09 60  |LDR R1,ballYm..`|
00001570  12 4c 44 52 42 20 52 32  2c 42 61 6c 6c 56 58 0d  |.LDRB R2,BallVX.|
00001580  09 6a 12 4c 44 52 42 20  52 33 2c 42 61 6c 6c 56  |.j.LDRB R3,BallV|
00001590  59 0d 09 74 27 2e 62 61  6c 6c 63 61 6c 63 20 54  |Y..t'.ballcalc T|
000015a0  53 54 20 52 31 32 2c 23  31 20 3b 54 65 73 74 20  |ST R12,#1 ;Test |
000015b0  62 61 6c 6c 78 64 69 72  0d 09 7e 12 53 55 42 45  |ballxdir..~.SUBE|
000015c0  51 20 52 30 2c 52 30 2c  52 32 0d 09 88 12 41 44  |Q R0,R0,R2....AD|
000015d0  44 4e 45 20 52 30 2c 52  30 2c 52 32 0d 09 92 11  |DNE R0,R0,R2....|
000015e0  53 54 52 20 52 30 2c 62  61 6c 6c 58 6d 0d 09 9c  |STR R0,ballXm...|
000015f0  1d 54 53 54 20 52 31 32  2c 23 32 20 3b 54 65 73  |.TST R12,#2 ;Tes|
00001600  74 20 62 61 6c 6c 79 64  69 72 0d 09 a6 12 53 55  |t ballydir....SU|
00001610  42 45 51 20 52 31 2c 52  31 2c 52 33 0d 09 b0 12  |BEQ R1,R1,R3....|
00001620  41 44 44 4e 45 20 52 31  2c 52 31 2c 52 33 0d 09  |ADDNE R1,R1,R3..|
00001630  ba 11 53 54 52 20 52 31  2c 62 61 6c 6c 59 6d 0d  |..STR R1,ballYm.|
00001640  09 c4 0e 42 4c 20 62 61  74 63 61 6c 63 0d 09 ce  |...BL batcalc...|
00001650  10 53 54 52 20 52 30 2c  62 61 74 58 6d 0d 09 d8  |.STR R0,batXm...|
00001660  1c 54 53 54 20 52 31 32  2c 23 38 20 3b 54 65 73  |.TST R12,#8 ;Tes|
00001670  74 20 65 78 31 66 6c 61  67 0d 09 e2 0d 42 4e 45  |t ex1flag....BNE|
00001680  20 64 6f 65 78 31 0d 09  ec 0e 42 45 51 20 64 6f  | doex1....BEQ do|
00001690  62 61 64 31 0d 09 f6 23  2e 62 61 64 32 63 61 6c  |bad1...#.bad2cal|
000016a0  63 20 54 53 54 20 52 31  32 2c 23 31 36 20 3b 45  |c TST R12,#16 ;E|
000016b0  78 32 20 66 6c 61 67 0d  0a 00 0d 42 4e 45 20 64  |x2 flag....BNE d|
000016c0  6f 65 78 32 0d 0a 0a 0e  42 45 51 20 64 6f 62 61  |oex2....BEQ doba|
000016d0  64 32 0d 0a 14 21 2e 6d  6f 76 65 74 6f 6b 20 54  |d2...!.movetok T|
000016e0  53 54 20 52 31 32 2c 23  36 34 20 3b 54 6f 6b 66  |ST R12,#64 ;Tokf|
000016f0  6c 61 67 0d 0a 1e 10 42  45 51 20 6d 6f 76 65 64  |lag....BEQ moved|
00001700  6f 6e 65 0d 0a 28 14 4c  44 52 42 20 52 30 2c 54  |one..(.LDRB R0,T|
00001710  6f 6b 66 72 61 6d 65 0d  0a 32 10 4c 44 52 20 52  |okframe..2.LDR R|
00001720  32 2c 74 6f 6b 59 6d 0d  0a 3c 0e 42 4c 20 74 6f  |2,tokYm..<.BL to|
00001730  6b 63 61 6c 63 0d 0a 46  14 53 54 52 42 20 52 30  |kcalc..F.STRB R0|
00001740  2c 54 6f 6b 66 72 61 6d  65 0d 0a 50 10 53 54 52  |,Tokframe..P.STR|
00001750  20 52 32 2c 74 6f 6b 59  6d 0d 0a 5a 1a 2e 6d 6f  | R2,tokYm..Z..mo|
00001760  76 65 64 6f 6e 65 20 4c  44 52 20 52 36 2c 58 6d  |vedone LDR R6,Xm|
00001770  61 64 72 0d 0a 64 26 42  4c 20 67 65 74 62 61 63  |adr..d&BL getbac|
00001780  6b 20 3b 47 65 74 20 73  68 61 64 6f 77 20 62 61  |k ;Get shadow ba|
00001790  63 6b 67 72 6f 75 6e 64  73 0d 0a 6e 3e 42 4c 20  |ckgrounds..n>BL |
000017a0  70 6f 73 69 74 69 6f 6e  73 20 3b 4e 65 77 20 70  |positions ;New p|
000017b0  6f 73 69 74 69 6f 6e 20  66 6f 72 20 73 68 61 64  |osition for shad|
000017c0  6f 77 20 73 70 72 69 74  65 73 20 75 73 69 6e 67  |ow sprites using|
000017d0  20 58 26 59 73 27 73 0d  0a 78 10 42 4c 20 73 63  | X&Ys's..x.BL sc|
000017e0  6f 72 65 63 61 6c 63 0d  0a 82 10 54 53 54 20 52  |orecalc....TST R|
000017f0  31 32 2c 23 31 32 38 0d  0a 8c 0d 42 4c 4e 45 20  |12,#128....BLNE |
00001800  62 65 65 70 0d 0a 96 0e  4d 4f 56 20 52 30 2c 23  |beep....MOV R0,#|
00001810  31 39 0d 0a a0 09 53 57  49 20 36 0d 0a aa 0e 42  |19....SWI 6....B|
00001820  4c 20 72 65 73 62 61 63  6b 0d 0a b4 0f 42 4c 20  |L resback....BL |
00001830  62 6c 6f 63 6b 73 75 62  0d 0a be 11 42 4c 20 63  |blocksub....BL c|
00001840  6f 6c 6c 69 73 69 6f 6e  73 0d 0a c8 13 54 53 54  |ollisions....TST|
00001850  20 52 31 32 2c 23 31 33  31 30 37 32 0d 0a d2 0d  | R12,#131072....|
00001860  42 45 51 20 65 78 74 72  61 0d 0a dc 11 4c 44 52  |BEQ extra....LDR|
00001870  42 20 52 30 2c 42 61 6c  6c 73 0d 0a e6 10 53 55  |B R0,Balls....SU|
00001880  42 20 52 30 2c 52 30 2c  23 31 0d 0a f0 11 53 54  |B R0,R0,#1....ST|
00001890  52 42 20 52 30 2c 42 61  6c 6c 73 0d 0a fa 11 41  |RB R0,Balls....A|
000018a0  44 44 20 52 30 2c 52 30  2c 23 33 30 0d 0b 04 29  |DD R0,R0,#30...)|
000018b0  53 57 49 20 32 35 36 2b  33 31 3a 53 57 49 20 30  |SWI 256+31:SWI 0|
000018c0  3a 53 57 49 20 32 35 36  2b 39 3a 53 57 49 20 32  |:SWI 256+9:SWI 2|
000018d0  35 36 2b 33 32 0d 0b 0e  11 4c 44 52 42 20 52 30  |56+32....LDRB R0|
000018e0  2c 42 61 6c 6c 73 0d 0b  18 0d 43 4d 50 20 52 30  |,Balls....CMP R0|
000018f0  2c 23 30 0d 0b 22 10 42  45 51 20 67 61 6d 65 6f  |,#0..".BEQ gameo|
00001900  76 65 72 0d 0b 2c 0d 42  20 6e 65 77 62 61 6c 6c  |ver..,.B newball|
00001910  0d 0b 36 1c 2e 65 78 74  72 61 20 4c 44 52 42 20  |..6..extra LDRB |
00001920  52 30 2c 49 63 6f 6e 66  72 61 6d 65 0d 0b 40 0d  |R0,Iconframe..@.|
00001930  43 4d 50 20 52 30 2c 23  30 0d 0b 4a 0f 42 4e 45  |CMP R0,#0..J.BNE|
00001940  20 6e 6f 65 78 74 72 61  0d 0b 54 12 54 53 54 20  | noextra..T.TST |
00001950  52 31 32 2c 23 36 35 35  33 36 0d 0b 5e 0f 42 45  |R12,#65536..^.BE|
00001960  51 20 6e 6f 65 78 74 72  61 0d 0b 68 0d 4d 4f 56  |Q noextra..h.MOV|
00001970  20 52 30 2c 23 38 0d 0b  72 12 53 54 52 42 20 52  | R0,#8..r.STRB R|
00001980  30 2c 42 61 6c 6c 56 59  0d 0b 7c 19 2e 6e 6f 65  |0,BallVY..|..noe|
00001990  78 74 72 61 20 4c 44 52  42 20 52 30 2c 48 69 74  |xtra LDRB R0,Hit|
000019a0  73 0d 0b 86 0d 43 4d 50  20 52 30 2c 23 30 0d 0b  |s....CMP R0,#0..|
000019b0  90 0e 42 4e 45 20 6e 6f  74 66 69 6e 0d 0b 9a 17  |..BNE notfin....|
000019c0  4c 44 52 42 20 52 30 2c  73 63 72 65 65 6e 6c 65  |LDRB R0,screenle|
000019d0  76 65 6c 0d 0b a4 10 41  44 44 20 52 30 2c 52 30  |vel....ADD R0,R0|
000019e0  2c 23 31 0d 0b ae 17 53  54 52 42 20 52 30 2c 73  |,#1....STRB R0,s|
000019f0  63 72 65 65 6e 6c 65 76  65 6c 0d 0b b8 0c 42 4c  |creenlevel....BL|
00001a00  20 73 65 74 75 70 0d 0b  c2 0d 42 20 6e 65 77 62  | setup....B newb|
00001a10  61 6c 6c 0d 0b cc 13 2e  6e 6f 74 66 69 6e 20 53  |all.....notfin S|
00001a20  57 49 20 26 32 43 0d 0b  d6 0d 20 42 43 43 20 6c  |WI &2C.... BCC l|
00001a30  6f 6f 70 0d 0b e0 21 2e  65 78 69 74 20 4c 44 4d  |oop...!.exit LDM|
00001a40  46 44 20 52 31 33 21 2c  7b 52 30 2d 52 31 32 2c  |FD R13!,{R0-R12,|
00001a50  52 31 35 7d 0d 0b ea 16  2e 62 61 74 63 61 6c 63  |R15}.....batcalc|
00001a60  20 4d 4f 56 20 52 30 2c  23 30 0d 0b f4 16 42 49  | MOV R0,#0....BI|
00001a70  43 20 52 31 32 2c 52 31  32 2c 23 36 35 35 33 36  |C R12,R12,#65536|
00001a80  0d 0b fe 27 53 57 49 20  26 31 43 20 3b 47 65 74  |...'SWI &1C ;Get|
00001a90  20 6d 6f 75 73 65 58 2c  59 2c 42 20 69 6e 20 52  | mouseX,Y,B in R|
00001aa0  30 2c 52 31 2c 52 32 0d  0c 08 11 3b 42 49 43 20  |0,R1,R2....;BIC |
00001ab0  52 30 2c 52 30 2c 23 33  0d 0c 12 0f 43 4d 50 20  |R0,R0,#3....CMP |
00001ac0  52 30 2c 23 37 38 34 0d  0c 1c 11 4d 4f 56 43 53  |R0,#784....MOVCS|
00001ad0  20 52 30 2c 23 37 38 34  0d 0c 26 0d 43 4d 50 20  | R0,#784..&.CMP |
00001ae0  52 32 2c 23 30 0d 0c 30  17 84 52 4e 45 20 52 31  |R2,#0..0..RNE R1|
00001af0  32 2c 52 31 32 2c 23 36  35 35 33 36 0d 0c 3a 12  |2,R12,#65536..:.|
00001b00  54 53 54 20 52 31 32 2c  23 33 32 37 36 38 0d 0c  |TST R12,#32768..|
00001b10  44 0f 42 45 51 20 62 61  74 65 78 69 74 0d 0c 4e  |D.BEQ batexit..N|
00001b20  14 4c 44 52 42 20 52 33  2c 42 61 74 66 72 61 6d  |.LDRB R3,Batfram|
00001b30  65 0d 0c 58 20 54 53 54  20 52 31 32 2c 23 32 36  |e..X TST R12,#26|
00001b40  32 31 34 34 20 3b 55 70  64 6f 77 6e 20 66 6c 61  |2144 ;Updown fla|
00001b50  67 0d 0c 62 12 41 44 44  4e 45 20 52 33 2c 52 33  |g..b.ADDNE R3,R3|
00001b60  2c 23 31 0d 0c 6c 12 53  55 42 45 51 20 52 33 2c  |,#1..l.SUBEQ R3,|
00001b70  52 33 2c 23 31 0d 0c 76  0d 43 4d 50 20 52 33 2c  |R3,#1..v.CMP R3,|
00001b80  23 35 0d 0c 80 2c 42 49  43 45 51 20 52 31 32 2c  |#5...,BICEQ R12,|
00001b90  52 31 32 2c 23 32 36 32  31 34 34 20 3b 43 6c 65  |R12,#262144 ;Cle|
00001ba0  61 72 20 75 70 64 6f 77  6e 20 66 6c 61 67 0d 0c  |ar updown flag..|
00001bb0  8a 0d 43 4d 50 20 52 33  2c 23 30 0d 0c 94 18 84  |..CMP R3,#0.....|
00001bc0  52 45 51 20 52 31 32 2c  52 31 32 2c 23 32 36 32  |REQ R12,R12,#262|
00001bd0  31 34 34 0d 0c 9e 14 53  54 52 42 20 52 33 2c 42  |144....STRB R3,B|
00001be0  61 74 66 72 61 6d 65 0d  0c a8 18 2e 62 61 74 65  |atframe.....bate|
00001bf0  78 69 74 20 4d 4f 56 20  52 31 35 2c 52 31 34 0d  |xit MOV R15,R14.|
00001c00  0c b2 1a 2e 73 70 72 69  74 65 70 6c 6f 74 20 4d  |....spriteplot M|
00001c10  4f 56 20 52 30 2c 23 33  34 0d 0c bc 0d 4d 4f 56  |OV R0,#34....MOV|
00001c20  20 52 31 2c 23 30 0d 0c  c6 0d 4d 4f 56 20 52 35  | R1,#0....MOV R5|
00001c30  2c 23 38 0d 0c d0 0b 53  57 49 20 26 32 45 0d 0c  |,#8....SWI &2E..|
00001c40  da 0f 4d 4f 56 20 52 31  35 2c 52 31 34 0d 0c e4  |..MOV R15,R14...|
00001c50  20 2e 63 6f 6c 6c 69 73  69 6f 6e 73 20 53 54 4d  | .collisions STM|
00001c60  46 44 20 52 31 33 21 2c  7b 52 31 34 7d 0d 0c ee  |FD R13!,{R14}...|
00001c70  11 4c 44 52 20 52 30 2c  62 61 6c 6c 58 6d 0d 0c  |.LDR R0,ballXm..|
00001c80  f8 11 4c 44 52 20 52 31  2c 62 61 6c 6c 59 6d 0d  |..LDR R1,ballYm.|
00001c90  0d 02 10 4c 44 52 20 52  32 2c 62 61 74 58 6d 0d  |...LDR R2,batXm.|
00001ca0  0d 0c 10 4c 44 52 20 52  33 2c 62 61 74 59 6d 0d  |...LDR R3,batYm.|
00001cb0  0d 16 0f 4d 4f 56 20 52  36 2c 23 31 30 38 0d 0d  |...MOV R6,#108..|
00001cc0  20 0e 4d 4f 56 20 52 37  2c 23 32 34 0d 0d 2a 0a  | .MOV R7,#24..*.|
00001cd0  42 4c 20 63 6f 6c 0d 0d  34 11 42 45 51 20 6d 69  |BL col..4.BEQ mi|
00001ce0  73 73 65 64 62 61 74 0d  0d 3e 10 53 55 42 20 52  |ssedbat..>.SUB R|
00001cf0  34 2c 52 30 2c 52 32 0d  0d 48 10 53 54 52 20 52  |4,R0,R2..H.STR R|
00001d00  34 2c 74 65 6d 70 78 0d  0d 52 11 41 44 44 20 52  |4,tempx..R.ADD R|
00001d10  34 2c 52 34 2c 23 31 36  0d 0d 5c 14 4c 44 52 20  |4,R4,#16..\.LDR |
00001d20  52 36 2c 62 6f 75 6e 63  65 61 64 72 0d 0d 66 0e  |R6,bounceadr..f.|
00001d30  43 4d 50 20 52 34 2c 23  36 34 0d 0d 70 21 84 52  |CMP R4,#64..p!.R|
00001d40  47 54 20 52 31 32 2c 52  31 32 2c 23 31 20 3b 50  |GT R12,R12,#1 ;P|
00001d50  6f 73 20 62 61 6c 6c 78  64 69 72 0d 0d 7a 22 42  |os ballxdir..z"B|
00001d60  49 43 4c 45 20 52 31 32  2c 52 31 32 2c 23 31 20  |ICLE R12,R12,#1 |
00001d70  3b 4e 65 67 20 62 61 6c  6c 78 64 69 72 0d 0d 84  |;Neg ballxdir...|
00001d80  19 4c 44 52 42 20 52 35  2c 5b 52 36 2c 52 34 2c  |.LDRB R5,[R6,R4,|
00001d90  4c 53 52 23 33 5d 0d 0d  8e 12 53 54 52 42 20 52  |LSR#3]....STRB R|
00001da0  35 2c 42 61 6c 6c 56 58  0d 0d 98 10 53 55 42 20  |5,BallVX....SUB |
00001db0  52 35 2c 52 35 2c 23 31  0d 0d a2 10 42 49 43 20  |R5,R5,#1....BIC |
00001dc0  52 30 2c 52 30 2c 52 35  0d 0d ac 11 53 54 52 20  |R0,R0,R5....STR |
00001dd0  52 30 2c 62 61 6c 6c 58  6d 0d 0d b6 28 84 52 20  |R0,ballXm...(.R |
00001de0  52 31 32 2c 52 31 32 2c  23 31 33 30 20 3b 50 6f  |R12,R12,#130 ;Po|
00001df0  73 20 62 61 6c 6c 79 64  69 72 20 26 20 62 65 65  |s ballydir & bee|
00001e00  70 0d 0d c0 10 42 20 62  6c 6f 63 6b 73 64 6f 6e  |p....B blocksdon|
00001e10  65 0d 0d ca 29 2e 6d 69  73 73 65 64 62 61 74 20  |e...).missedbat |
00001e20  54 53 54 20 52 31 32 2c  23 34 20 3b 54 65 73 74  |TST R12,#4 ;Test|
00001e30  20 62 6c 6f 63 6b 66 6c  61 67 0d 0d d4 12 42 4e  | blockflag....BN|
00001e40  45 20 62 6c 6f 63 6b 73  64 6f 6e 65 0d 0d de 0d  |E blocksdone....|
00001e50  4d 4f 56 20 52 34 2c 23  30 0d 0d e8 0f 53 54 52  |MOV R4,#0....STR|
00001e60  20 52 34 2c 62 6c 31 78  0d 0d f2 0f 53 54 52 20  | R4,bl1x....STR |
00001e70  52 34 2c 62 6c 32 78 0d  0d fc 1d 54 53 54 20 52  |R4,bl2x....TST R|
00001e80  31 32 2c 23 31 3b 20 54  65 73 74 20 62 61 6c 6c  |12,#1; Test ball|
00001e90  78 64 69 72 0d 0e 06 13  53 55 42 45 51 20 52 32  |xdir....SUBEQ R2|
00001ea0  2c 52 30 2c 23 33 32 0d  0e 10 13 53 55 42 4e 45  |,R0,#32....SUBNE|
00001eb0  20 52 32 2c 52 30 2c 23  31 36 0d 0e 1a 1d 54 53  | R2,R0,#16....TS|
00001ec0  54 20 52 31 32 2c 23 32  3b 20 54 65 73 74 20 62  |T R12,#2; Test b|
00001ed0  61 6c 6c 79 64 69 72 0d  0e 24 14 53 55 42 45 51  |allydir..$.SUBEQ|
00001ee0  20 52 33 2c 52 31 2c 23  33 38 34 0d 0e 2e 14 53  | R3,R1,#384....S|
00001ef0  55 42 4e 45 20 52 33 2c  52 31 2c 23 33 36 38 0d  |UBNE R3,R1,#368.|
00001f00  0e 38 0d 43 4d 50 20 52  33 2c 23 30 0d 0e 42 12  |.8.CMP R3,#0..B.|
00001f10  42 4d 49 20 62 6c 6f 63  6b 73 64 6f 6e 65 0d 0e  |BMI blocksdone..|
00001f20  4c 0f 80 20 52 36 2c 52  32 2c 23 36 33 0d 0e 56  |L.. R6,R2,#63..V|
00001f30  0f 80 20 52 37 2c 52 33  2c 23 33 31 0d 0e 60 10  |.. R7,R3,#31..`.|
00001f40  84 52 53 20 52 38 2c 52  36 2c 52 37 0d 0e 6a 0c  |.RS R8,R6,R7..j.|
00001f50  42 45 51 20 64 6f 78 79  0d 0e 74 0d 43 4d 50 20  |BEQ doxy..t.CMP |
00001f60  52 36 2c 23 30 0d 0e 7e  0b 42 45 51 20 64 6f 78  |R6,#0..~.BEQ dox|
00001f70  0d 0e 88 0d 43 4d 50 20  52 37 2c 23 30 0d 0e 92  |....CMP R7,#0...|
00001f80  12 42 4e 45 20 62 6c 6f  63 6b 73 64 6f 6e 65 0d  |.BNE blocksdone.|
00001f90  0e 9c 18 2e 64 6f 79 20  4d 4f 56 20 52 35 2c 52  |....doy MOV R5,R|
00001fa0  33 2c 4c 53 52 23 35 0d  0e a6 1d 54 53 54 20 52  |3,LSR#5....TST R|
00001fb0  31 32 2c 23 32 20 3b 54  65 73 74 20 62 61 6c 6c  |12,#2 ;Test ball|
00001fc0  79 64 69 72 0d 0e b0 12  53 55 42 45 51 20 52 35  |ydir....SUBEQ R5|
00001fd0  2c 52 35 2c 23 31 0d 0e  ba 11 53 55 42 20 52 32  |,R5,#1....SUB R2|
00001fe0  2c 52 30 2c 23 33 32 0d  0e c4 13 4d 4f 56 20 52  |,R0,#32....MOV R|
00001ff0  34 2c 52 32 2c 4c 53 52  23 36 0d 0e ce 0b 42 4c  |4,R2,LSR#6....BL|
00002000  20 62 6c 6f 63 0d 0e d8  0c 42 45 51 20 64 6f 79  | bloc....BEQ doy|
00002010  32 0d 0e e2 0f 53 54 52  20 52 36 2c 62 6c 31 78  |2....STR R6,bl1x|
00002020  0d 0e ec 0f 53 54 52 20  52 37 2c 62 6c 31 79 0d  |....STR R7,bl1y.|
00002030  0e f6 1d 84 52 20 52 31  32 2c 52 31 32 2c 23 34  |....R R12,R12,#4|
00002040  20 3b 53 65 74 20 62 6c  66 6c 61 67 0d 0f 00 17  | ;Set blflag....|
00002050  2e 64 6f 79 32 20 53 55  42 20 52 32 2c 52 30 2c  |.doy2 SUB R2,R0,|
00002060  23 31 36 0d 0f 0a 13 4d  4f 56 20 52 34 2c 52 32  |#16....MOV R4,R2|
00002070  2c 4c 53 52 23 36 0d 0f  14 0b 42 4c 20 62 6c 6f  |,LSR#6....BL blo|
00002080  63 0d 0f 1e 0d 42 45 51  20 79 63 61 6c 63 0d 0f  |c....BEQ ycalc..|
00002090  28 0f 53 54 52 20 52 36  2c 62 6c 32 78 0d 0f 32  |(.STR R6,bl2x..2|
000020a0  0f 53 54 52 20 52 37 2c  62 6c 32 79 0d 0f 3c 1d  |.STR R7,bl2y..<.|
000020b0  84 52 20 52 31 32 2c 52  31 32 2c 23 34 20 3b 53  |.R R12,R12,#4 ;S|
000020c0  65 74 20 62 6c 66 6c 61  67 0d 0f 46 22 2e 79 63  |et blflag..F".yc|
000020d0  61 6c 63 20 54 53 54 20  52 31 32 2c 23 34 20 3b  |alc TST R12,#4 ;|
000020e0  54 65 73 74 20 62 6c 66  6c 61 67 0d 0f 50 23 82  |Test blflag..P#.|
000020f0  4e 45 20 52 31 32 2c 52  31 32 2c 23 32 20 3b 49  |NE R12,R12,#2 ;I|
00002100  6e 76 65 72 74 20 62 61  6c 6c 79 64 69 72 0d 0f  |nvert ballydir..|
00002110  5a 10 42 20 62 6c 6f 63  6b 73 64 6f 6e 65 0d 0f  |Z.B blocksdone..|
00002120  64 18 2e 64 6f 78 20 4d  4f 56 20 52 34 2c 52 32  |d..dox MOV R4,R2|
00002130  2c 4c 53 52 23 36 0d 0f  6e 1d 54 53 54 20 52 31  |,LSR#6..n.TST R1|
00002140  32 2c 23 31 20 3b 54 65  73 74 20 62 61 6c 6c 78  |2,#1 ;Test ballx|
00002150  64 69 72 0d 0f 78 12 53  55 42 45 51 20 52 34 2c  |dir..x.SUBEQ R4,|
00002160  52 34 2c 23 31 0d 0f 82  12 53 55 42 20 52 33 2c  |R4,#1....SUB R3,|
00002170  52 31 2c 23 33 36 38 0d  0f 8c 13 4d 4f 56 20 52  |R1,#368....MOV R|
00002180  35 2c 52 33 2c 4c 53 52  23 35 0d 0f 96 0b 42 4c  |5,R3,LSR#5....BL|
00002190  20 62 6c 6f 63 0d 0f a0  0c 42 45 51 20 64 6f 78  | bloc....BEQ dox|
000021a0  32 0d 0f aa 0f 53 54 52  20 52 36 2c 62 6c 31 78  |2....STR R6,bl1x|
000021b0  0d 0f b4 0f 53 54 52 20  52 37 2c 62 6c 31 79 0d  |....STR R7,bl1y.|
000021c0  0f be 1d 84 52 20 52 31  32 2c 52 31 32 2c 23 34  |....R R12,R12,#4|
000021d0  20 3b 53 65 74 20 62 6c  66 6c 61 67 0d 0f c8 18  | ;Set blflag....|
000021e0  2e 64 6f 78 32 20 53 55  42 20 52 33 2c 52 31 2c  |.dox2 SUB R3,R1,|
000021f0  23 33 38 34 0d 0f d2 14  4d 4f 56 20 52 35 2c 52  |#384....MOV R5,R|
00002200  33 2c 4c 53 52 20 23 35  0d 0f dc 0b 42 4c 20 62  |3,LSR #5....BL b|
00002210  6c 6f 63 0d 0f e6 0d 42  45 51 20 78 63 61 6c 63  |loc....BEQ xcalc|
00002220  0d 0f f0 0f 53 54 52 20  52 36 2c 62 6c 32 78 0d  |....STR R6,bl2x.|
00002230  0f fa 0f 53 54 52 20 52  37 2c 62 6c 32 79 0d 10  |...STR R7,bl2y..|
00002240  04 1d 84 52 20 52 31 32  2c 52 31 32 2c 23 34 20  |...R R12,R12,#4 |
00002250  3b 53 65 74 20 62 6c 66  6c 61 67 0d 10 0e 22 2e  |;Set blflag...".|
00002260  78 63 61 6c 63 20 54 53  54 20 52 31 32 2c 23 34  |xcalc TST R12,#4|
00002270  20 3b 54 65 73 74 20 62  6c 66 6c 61 67 0d 10 18  | ;Test blflag...|
00002280  23 82 4e 45 20 52 31 32  2c 52 31 32 2c 23 31 20  |#.NE R12,R12,#1 |
00002290  3b 49 6e 76 65 72 74 20  62 61 6c 6c 78 64 69 72  |;Invert ballxdir|
000022a0  0d 10 22 10 42 20 62 6c  6f 63 6b 73 64 6f 6e 65  |..".B blocksdone|
000022b0  0d 10 2c 19 2e 64 6f 78  79 20 4d 4f 56 20 52 34  |..,..doxy MOV R4|
000022c0  2c 52 32 2c 4c 53 52 23  36 0d 10 36 1d 54 53 54  |,R2,LSR#6..6.TST|
000022d0  20 52 31 32 2c 23 31 20  3b 54 65 73 74 20 62 61  | R12,#1 ;Test ba|
000022e0  6c 6c 78 64 69 72 0d 10  40 12 53 55 42 45 51 20  |llxdir..@.SUBEQ |
000022f0  52 34 2c 52 34 2c 23 31  0d 10 4a 13 4d 4f 56 20  |R4,R4,#1..J.MOV |
00002300  52 35 2c 52 33 2c 4c 53  52 23 35 0d 10 54 1d 54  |R5,R3,LSR#5..T.T|
00002310  53 54 20 52 31 32 2c 23  32 20 3b 54 65 73 74 20  |ST R12,#2 ;Test |
00002320  62 61 6c 6c 79 64 69 72  0d 10 5e 12 53 55 42 4e  |ballydir..^.SUBN|
00002330  45 20 52 35 2c 52 35 2c  23 31 0d 10 68 0b 42 4c  |E R5,R5,#1..h.BL|
00002340  20 62 6c 6f 63 0d 10 72  0d 42 45 51 20 64 6f 78  | bloc..r.BEQ dox|
00002350  79 32 0d 10 7c 0f 53 54  52 20 52 36 2c 62 6c 31  |y2..|.STR R6,bl1|
00002360  78 0d 10 86 0f 53 54 52  20 52 37 2c 62 6c 31 79  |x....STR R7,bl1y|
00002370  0d 10 90 1d 84 52 20 52  31 32 2c 52 31 32 2c 23  |.....R R12,R12,#|
00002380  34 20 3b 53 65 74 20 62  6c 66 6c 61 67 0d 10 9a  |4 ;Set blflag...|
00002390  1a 2e 64 6f 78 79 32 20  4d 4f 56 20 52 35 2c 52  |..doxy2 MOV R5,R|
000023a0  33 2c 4c 53 52 23 35 0d  10 a4 1d 54 53 54 20 52  |3,LSR#5....TST R|
000023b0  31 32 2c 23 32 20 3b 54  65 73 74 20 62 61 6c 6c  |12,#2 ;Test ball|
000023c0  79 64 69 72 0d 10 ae 12  53 55 42 45 51 20 52 35  |ydir....SUBEQ R5|
000023d0  2c 52 35 2c 23 31 0d 10  b8 13 4d 4f 56 20 52 34  |,R5,#1....MOV R4|
000023e0  2c 52 32 2c 4c 53 52 23  36 0d 10 c2 1d 54 53 54  |,R2,LSR#6....TST|
000023f0  20 52 31 32 2c 23 31 20  3b 54 65 73 74 20 62 61  | R12,#1 ;Test ba|
00002400  6c 6c 78 64 69 72 0d 10  cc 12 53 55 42 4e 45 20  |llxdir....SUBNE |
00002410  52 34 2c 52 34 2c 23 31  0d 10 d6 0b 42 4c 20 62  |R4,R4,#1....BL b|
00002420  6c 6f 63 0d 10 e0 0d 42  4e 45 20 6f 6b 79 61 72  |loc....BNE okyar|
00002430  0d 10 ea 1b 54 53 54 20  52 31 32 2c 23 34 20 3b  |....TST R12,#4 ;|
00002440  54 65 73 74 20 62 6c 66  6c 61 67 0d 10 f4 23 82  |Test blflag...#.|
00002450  4e 45 20 52 31 32 2c 52  31 32 2c 23 31 20 3b 49  |NE R12,R12,#1 ;I|
00002460  6e 76 65 72 74 20 62 61  6c 6c 78 64 69 72 0d 10  |nvert ballxdir..|
00002470  fe 0c 42 20 78 79 63 61  6c 63 0d 11 08 16 2e 6f  |..B xycalc.....o|
00002480  6b 79 61 72 20 53 54 52  20 52 36 2c 62 6c 32 78  |kyar STR R6,bl2x|
00002490  0d 11 12 0f 53 54 52 20  52 37 2c 62 6c 32 79 0d  |....STR R7,bl2y.|
000024a0  11 1c 1b 54 53 54 20 52  31 32 2c 23 34 20 3b 54  |...TST R12,#4 ;T|
000024b0  65 73 74 20 62 6c 66 6c  61 67 0d 11 26 23 82 4e  |est blflag..&#.N|
000024c0  45 20 52 31 32 2c 52 31  32 2c 23 31 20 3b 49 6e  |E R12,R12,#1 ;In|
000024d0  76 65 72 74 20 62 61 6c  6c 78 64 69 72 0d 11 30  |vert ballxdir..0|
000024e0  21 82 20 52 31 32 2c 52  31 32 2c 23 32 20 3b 49  |!. R12,R12,#2 ;I|
000024f0  6e 76 65 72 74 20 62 61  6c 6c 79 64 69 72 0d 11  |nvert ballydir..|
00002500  3a 1d 84 52 20 52 31 32  2c 52 31 32 2c 23 34 20  |:..R R12,R12,#4 |
00002510  3b 53 65 74 20 62 6c 66  6c 61 67 0d 11 44 23 2e  |;Set blflag..D#.|
00002520  78 79 63 61 6c 63 20 54  53 54 20 52 31 32 2c 23  |xycalc TST R12,#|
00002530  34 20 3b 54 65 73 74 20  62 6c 66 6c 61 67 0d 11  |4 ;Test blflag..|
00002540  4e 12 42 4e 45 20 62 6c  6f 63 6b 73 64 6f 6e 65  |N.BNE blocksdone|
00002550  0d 11 58 13 4d 4f 56 20  52 34 2c 52 32 2c 4c 53  |..X.MOV R4,R2,LS|
00002560  52 23 36 0d 11 62 13 4d  4f 56 20 52 35 2c 52 33  |R#6..b.MOV R5,R3|
00002570  2c 4c 53 52 23 35 0d 11  6c 1d 54 53 54 20 52 31  |,LSR#5..l.TST R1|
00002580  32 2c 23 31 20 3b 54 65  73 74 20 62 61 6c 6c 78  |2,#1 ;Test ballx|
00002590  64 69 72 0d 11 76 12 53  55 42 45 51 20 52 34 2c  |dir..v.SUBEQ R4,|
000025a0  52 34 2c 23 31 0d 11 80  1d 54 53 54 20 52 31 32  |R4,#1....TST R12|
000025b0  2c 23 32 20 3b 54 65 73  74 20 62 61 6c 6c 79 64  |,#2 ;Test ballyd|
000025c0  69 72 0d 11 8a 12 53 55  42 45 51 20 52 35 2c 52  |ir....SUBEQ R5,R|
000025d0  35 2c 23 31 0d 11 94 0b  42 4c 20 62 6c 6f 63 0d  |5,#1....BL bloc.|
000025e0  11 9e 12 42 45 51 20 62  6c 6f 63 6b 73 64 6f 6e  |...BEQ blocksdon|
000025f0  65 0d 11 a8 0f 53 54 52  20 52 36 2c 62 6c 31 78  |e....STR R6,bl1x|
00002600  0d 11 b2 0f 53 54 52 20  52 37 2c 62 6c 31 79 0d  |....STR R7,bl1y.|
00002610  11 bc 22 82 20 52 31 32  2c 52 31 32 2c 23 33 20  |..". R12,R12,#3 |
00002620  3b 49 6e 76 65 72 74 20  58 26 59 20 64 69 72 73  |;Invert X&Y dirs|
00002630  2e 0d 11 c6 1d 84 52 20  52 31 32 2c 52 31 32 2c  |......R R12,R12,|
00002640  23 34 20 3b 53 65 74 20  62 6c 66 6c 61 67 0d 11  |#4 ;Set blflag..|
00002650  d0 28 2e 62 6c 6f 63 6b  73 64 6f 6e 65 20 54 53  |.(.blocksdone TS|
00002660  54 20 52 31 32 2c 23 38  20 3b 54 65 73 74 20 65  |T R12,#8 ;Test e|
00002670  78 31 66 6c 61 67 0d 11  da 11 42 4e 45 20 64 6f  |x1flag....BNE do|
00002680  62 61 64 32 63 6f 6c 0d  11 e4 11 4c 44 52 20 52  |bad2col....LDR R|
00002690  32 2c 62 61 64 31 58 6d  0d 11 ee 11 4c 44 52 20  |2,bad1Xm....LDR |
000026a0  52 33 2c 62 61 64 31 59  6d 0d 11 f8 0e 4d 4f 56  |R3,bad1Ym....MOV|
000026b0  20 52 36 2c 23 36 30 0d  12 02 0e 4d 4f 56 20 52  | R6,#60....MOV R|
000026c0  37 2c 23 36 30 0d 12 0c  0a 42 4c 20 63 6f 6c 0d  |7,#60....BL col.|
000026d0  12 16 11 42 45 51 20 64  6f 62 61 64 32 63 6f 6c  |...BEQ dobad2col|
000026e0  0d 12 20 27 84 52 20 52  31 32 2c 52 31 32 2c 23  |.. '.R R12,R12,#|
000026f0  31 33 36 20 3b 53 65 74  20 65 78 31 66 6c 61 67  |136 ;Set ex1flag|
00002700  20 26 20 62 65 65 70 0d  12 2a 0f 4d 4f 56 20 52  | & beep..*.MOV R|
00002710  37 2c 23 31 32 38 0d 12  34 11 53 54 52 42 20 52  |7,#128..4.STRB R|
00002720  37 2c 50 69 74 63 68 0d  12 3e 21 82 20 52 31 32  |7,Pitch..>!. R12|
00002730  2c 52 31 32 2c 23 32 20  3b 49 6e 76 65 72 74 20  |,R12,#2 ;Invert |
00002740  62 61 6c 6c 79 64 69 72  0d 12 48 10 4c 44 52 20  |ballydir..H.LDR |
00002750  52 38 2c 73 63 6f 72 65  0d 12 52 12 41 44 44 20  |R8,score..R.ADD |
00002760  52 38 2c 52 38 2c 23 31  30 30 0d 12 5c 10 53 54  |R8,R8,#100..\.ST|
00002770  52 20 52 38 2c 73 63 6f  72 65 0d 12 66 28 2e 64  |R R8,score..f(.d|
00002780  6f 62 61 64 32 63 6f 6c  20 54 53 54 20 52 31 32  |obad2col TST R12|
00002790  2c 23 31 36 20 3b 54 65  73 74 20 65 78 32 66 6c  |,#16 ;Test ex2fl|
000027a0  61 67 0d 12 70 0e 42 4e  45 20 74 6f 6b 63 6f 6c  |ag..p.BNE tokcol|
000027b0  0d 12 7a 11 4c 44 52 20  52 32 2c 62 61 64 32 58  |..z.LDR R2,bad2X|
000027c0  6d 0d 12 84 11 4c 44 52  20 52 33 2c 62 61 64 32  |m....LDR R3,bad2|
000027d0  59 6d 0d 12 8e 0a 42 4c  20 63 6f 6c 0d 12 98 0e  |Ym....BL col....|
000027e0  42 45 51 20 74 6f 6b 63  6f 6c 0d 12 a2 10 4c 44  |BEQ tokcol....LD|
000027f0  52 20 52 38 2c 73 63 6f  72 65 0d 12 ac 12 41 44  |R R8,score....AD|
00002800  44 20 52 38 2c 52 38 2c  23 31 30 30 0d 12 b6 10  |D R8,R8,#100....|
00002810  53 54 52 20 52 38 2c 73  63 6f 72 65 0d 12 c0 27  |STR R8,score...'|
00002820  84 52 20 52 31 32 2c 52  31 32 2c 23 31 34 34 20  |.R R12,R12,#144 |
00002830  3b 53 65 74 20 65 78 32  66 6c 61 67 20 26 20 62  |;Set ex2flag & b|
00002840  65 65 70 0d 12 ca 0f 4d  4f 56 20 52 37 2c 23 31  |eep....MOV R7,#1|
00002850  36 30 0d 12 d4 11 53 54  52 42 20 52 37 2c 50 69  |60....STRB R7,Pi|
00002860  74 63 68 0d 12 de 21 82  20 52 31 32 2c 52 31 32  |tch...!. R12,R12|
00002870  2c 23 32 20 3b 49 6e 76  65 72 74 20 62 61 6c 6c  |,#2 ;Invert ball|
00002880  79 64 69 72 0d 12 e8 20  2e 74 6f 6b 63 6f 6c 20  |ydir... .tokcol |
00002890  54 53 54 20 52 31 32 2c  23 36 34 20 3b 54 6f 6b  |TST R12,#64 ;Tok|
000028a0  66 6c 61 67 0d 12 f2 0e  42 45 51 20 62 6f 75 6e  |flag....BEQ boun|
000028b0  64 73 0d 12 fc 10 4c 44  52 20 52 32 2c 74 6f 6b  |ds....LDR R2,tok|
000028c0  59 6d 0d 13 06 0f 43 4d  50 20 52 32 2c 23 31 32  |Ym....CMP R2,#12|
000028d0  38 0d 13 10 0e 42 47 54  20 62 6f 75 6e 64 73 0d  |8....BGT bounds.|
000028e0  13 1a 10 4c 44 52 20 52  32 2c 74 6f 6b 58 6d 0d  |...LDR R2,tokXm.|
000028f0  13 24 10 4c 44 52 20 52  33 2c 62 61 74 58 6d 0d  |.$.LDR R3,batXm.|
00002900  13 2e 11 41 44 44 20 52  34 2c 52 32 2c 23 33 36  |...ADD R4,R2,#36|
00002910  0d 13 38 12 41 44 44 20  52 35 2c 52 33 2c 23 31  |..8.ADD R5,R3,#1|
00002920  30 38 0d 13 42 1f 43 4d  50 20 52 32 2c 52 35 20  |08..B.CMP R2,R5 |
00002930  3b 54 6f 6b 6c 65 66 74  2d 62 61 74 72 69 67 68  |;Tokleft-batrigh|
00002940  74 0d 13 4c 0e 42 50 4c  20 62 6f 75 6e 64 73 0d  |t..L.BPL bounds.|
00002950  13 56 1f 43 4d 50 20 52  33 2c 52 34 20 3b 42 61  |.V.CMP R3,R4 ;Ba|
00002960  74 6c 65 66 74 2d 74 6f  6b 72 69 67 68 74 0d 13  |tleft-tokright..|
00002970  60 0e 42 50 4c 20 62 6f  75 6e 64 73 0d 13 6a 22  |`.BPL bounds..j"|
00002980  84 52 20 52 31 32 2c 52  31 32 2c 23 38 31 39 32  |.R R12,R12,#8192|
00002990  20 3b 53 65 74 20 69 63  6f 6e 66 6c 61 67 0d 13  | ;Set iconflag..|
000029a0  74 22 42 49 43 20 52 31  32 2c 52 31 32 2c 23 36  |t"BIC R12,R12,#6|
000029b0  34 20 3b 43 6c 65 61 72  20 74 6f 6b 66 6c 61 67  |4 ;Clear tokflag|
000029c0  0d 13 7e 16 2e 62 6f 75  6e 64 73 20 43 4d 50 20  |..~..bounds CMP |
000029d0  52 30 2c 23 33 32 0d 13  88 22 84 52 45 51 20 52  |R0,#32...".REQ R|
000029e0  31 32 2c 52 31 32 2c 23  31 20 3b 50 6f 73 2e 20  |12,R12,#1 ;Pos. |
000029f0  62 61 6c 6c 78 64 69 72  0d 13 92 0f 43 4d 50 20  |ballxdir....CMP |
00002a00  52 30 2c 23 38 34 38 0d  13 9c 23 42 49 43 45 51  |R0,#848...#BICEQ|
00002a10  20 52 31 32 2c 52 31 32  2c 23 31 20 3b 4e 65 67  | R12,R12,#1 ;Neg|
00002a20  2e 20 62 61 6c 6c 78 64  69 72 0d 13 a6 0d 43 4d  |. ballxdir....CM|
00002a30  50 20 52 31 2c 23 30 0d  13 b0 0d 42 4e 45 20 74  |P R1,#0....BNE t|
00002a40  65 73 74 79 0d 13 ba 20  84 52 20 52 31 32 2c 52  |esty... .R R12,R|
00002a50  31 32 2c 23 32 20 3b 50  6f 73 2e 20 62 61 6c 6c  |12,#2 ;Pos. ball|
00002a60  79 64 69 72 0d 13 c4 0d  53 57 49 20 32 35 36 2b  |ydir....SWI 256+|
00002a70  37 0d 13 ce 0e 4d 4f 56  20 52 34 2c 23 31 36 0d  |7....MOV R4,#16.|
00002a80  13 d8 12 53 54 52 42 20  52 34 2c 42 61 6c 6c 56  |...STRB R4,BallV|
00002a90  59 0d 13 e2 24 84 52 20  52 31 32 2c 52 31 32 2c  |Y...$.R R12,R12,|
00002aa0  23 31 33 31 30 37 32 20  3b 53 65 74 20 62 61 6c  |#131072 ;Set bal|
00002ab0  6c 66 6c 61 67 0d 13 ec  16 2e 74 65 73 74 79 20  |lflag.....testy |
00002ac0  43 4d 50 20 52 31 2c 23  39 37 36 0d 13 f6 23 42  |CMP R1,#976...#B|
00002ad0  49 43 45 51 20 52 31 32  2c 52 31 32 2c 23 32 20  |ICEQ R12,R12,#2 |
00002ae0  3b 4e 65 67 2e 20 62 61  6c 6c 79 64 69 72 0d 14  |;Neg. ballydir..|
00002af0  00 1e 2e 63 6f 6c 73 64  6f 6e 65 20 4c 44 4d 46  |...colsdone LDMF|
00002b00  44 20 52 31 33 21 2c 7b  52 31 35 7d 0d 14 0a 19  |D R13!,{R15}....|
00002b10  2e 74 6f 6b 63 61 6c 63  20 41 44 44 20 52 30 2c  |.tokcalc ADD R0,|
00002b20  52 30 2c 23 31 0d 14 14  0d 43 4d 50 20 52 30 2c  |R0,#1....CMP R0,|
00002b30  23 36 0d 14 1e 0c ec 51  20 52 30 2c 23 30 0d 14  |#6.....Q R0,#0..|
00002b40  28 10 53 55 42 20 52 32  2c 52 32 2c 23 38 0d 14  |(.SUB R2,R2,#8..|
00002b50  32 0e 43 4d 50 20 52 32  2c 23 31 36 0d 14 3c 24  |2.CMP R2,#16..<$|
00002b60  42 49 43 4c 54 20 52 31  32 2c 52 31 32 2c 23 36  |BICLT R12,R12,#6|
00002b70  34 20 3b 43 6c 65 61 72  20 74 6f 6b 66 6c 61 67  |4 ;Clear tokflag|
00002b80  0d 14 46 0f 4d 4f 56 20  52 31 35 2c 52 31 34 0d  |..F.MOV R15,R14.|
00002b90  14 50 1d 2e 67 65 74 62  61 63 6b 20 53 54 4d 46  |.P..getback STMF|
00002ba0  44 20 52 31 33 21 2c 7b  52 31 34 7d 0d 14 5a 12  |D R13!,{R14}..Z.|
00002bb0  4c 44 52 20 52 31 2c 5b  52 36 2c 23 30 5d 0d 14  |LDR R1,[R6,#0]..|
00002bc0  64 12 4c 44 52 20 52 32  2c 5b 52 36 2c 23 34 5d  |d.LDR R2,[R6,#4]|
00002bd0  0d 14 6e 0e 42 4c 20 63  6f 6e 76 65 72 74 0d 14  |..n.BL convert..|
00002be0  78 12 53 54 52 20 52 30  2c 62 61 6c 6c 61 62 73  |x.STR R0,ballabs|
00002bf0  0d 14 82 13 4c 44 52 20  52 31 2c 62 61 6c 6c 62  |....LDR R1,ballb|
00002c00  61 64 72 0d 14 8c 19 4d  4f 56 20 52 32 2c 23 32  |adr....MOV R2,#2|
00002c10  20 3b 42 61 6c 6c 20 77  69 64 74 68 0d 14 96 1a  | ;Ball width....|
00002c20  4d 4f 56 20 52 33 2c 23  34 20 3b 42 61 6c 6c 20  |MOV R3,#4 ;Ball |
00002c30  68 65 69 67 68 74 0d 14  a0 0b 42 4c 20 67 65 74  |height....BL get|
00002c40  62 0d 14 aa 12 4c 44 52  20 52 31 2c 5b 52 36 2c  |b....LDR R1,[R6,|
00002c50  23 38 5d 0d 14 b4 13 4c  44 52 20 52 32 2c 5b 52  |#8]....LDR R2,[R|
00002c60  36 2c 23 31 32 5d 0d 14  be 0e 42 4c 20 63 6f 6e  |6,#12]....BL con|
00002c70  76 65 72 74 0d 14 c8 11  53 54 52 20 52 30 2c 62  |vert....STR R0,b|
00002c80  61 74 61 62 73 0d 14 d2  12 4c 44 52 20 52 31 2c  |atabs....LDR R1,|
00002c90  62 61 74 62 61 64 72 0d  14 dc 19 4d 4f 56 20 52  |batbadr....MOV R|
00002ca0  32 2c 23 31 34 20 3b 42  61 74 20 77 69 64 74 68  |2,#14 ;Bat width|
00002cb0  0d 14 e6 19 4d 4f 56 20  52 33 2c 23 36 20 3b 42  |....MOV R3,#6 ;B|
00002cc0  61 74 20 68 65 69 67 68  74 0d 14 f0 0b 42 4c 20  |at height....BL |
00002cd0  67 65 74 62 0d 14 fa 13  4c 44 52 20 52 31 2c 5b  |getb....LDR R1,[|
00002ce0  52 36 2c 23 31 36 5d 0d  15 04 13 4c 44 52 20 52  |R6,#16]....LDR R|
00002cf0  32 2c 5b 52 36 2c 23 32  30 5d 0d 15 0e 0e 42 4c  |2,[R6,#20]....BL|
00002d00  20 63 6f 6e 76 65 72 74  0d 15 18 12 53 54 52 20  | convert....STR |
00002d10  52 30 2c 62 61 64 31 61  62 73 0d 15 22 13 4c 44  |R0,bad1abs..".LD|
00002d20  52 20 52 31 2c 62 61 64  31 62 61 64 72 0d 15 2c  |R R1,bad1badr..,|
00002d30  18 4d 4f 56 20 52 32 2c  23 37 20 3b 42 61 64 20  |.MOV R2,#7 ;Bad |
00002d40  77 69 64 74 68 0d 15 36  1a 4d 4f 56 20 52 33 2c  |width..6.MOV R3,|
00002d50  23 31 34 20 3b 42 61 64  20 68 65 69 67 68 74 0d  |#14 ;Bad height.|
00002d60  15 40 0b 42 4c 20 67 65  74 62 0d 15 4a 13 4c 44  |.@.BL getb..J.LD|
00002d70  52 20 52 31 2c 5b 52 36  2c 23 32 34 5d 0d 15 54  |R R1,[R6,#24]..T|
00002d80  13 4c 44 52 20 52 32 2c  5b 52 36 2c 23 32 38 5d  |.LDR R2,[R6,#28]|
00002d90  0d 15 5e 0e 42 4c 20 63  6f 6e 76 65 72 74 0d 15  |..^.BL convert..|
00002da0  68 12 53 54 52 20 52 30  2c 62 61 64 32 61 62 73  |h.STR R0,bad2abs|
00002db0  0d 15 72 13 4c 44 52 20  52 31 2c 62 61 64 32 62  |..r.LDR R1,bad2b|
00002dc0  61 64 72 0d 15 7c 18 4d  4f 56 20 52 32 2c 23 37  |adr..|.MOV R2,#7|
00002dd0  20 3b 42 61 64 20 77 69  64 74 68 0d 15 86 1a 4d  | ;Bad width....M|
00002de0  4f 56 20 52 33 2c 23 31  34 20 3b 42 61 64 20 68  |OV R3,#14 ;Bad h|
00002df0  65 69 67 68 74 0d 15 90  0b 42 4c 20 67 65 74 62  |eight....BL getb|
00002e00  0d 15 9a 18 54 53 54 20  52 31 32 2c 23 36 34 20  |....TST R12,#64 |
00002e10  3b 54 6f 6b 66 6c 61 67  0d 15 a4 10 42 45 51 20  |;Tokflag....BEQ |
00002e20  67 65 74 62 65 78 69 74  0d 15 ae 13 4c 44 52 20  |getbexit....LDR |
00002e30  52 31 2c 5b 52 36 2c 23  33 32 5d 0d 15 b8 13 4c  |R1,[R6,#32]....L|
00002e40  44 52 20 52 32 2c 5b 52  36 2c 23 33 36 5d 0d 15  |DR R2,[R6,#36]..|
00002e50  c2 0e 42 4c 20 63 6f 6e  76 65 72 74 0d 15 cc 11  |..BL convert....|
00002e60  53 54 52 20 52 30 2c 74  6f 6b 61 62 73 0d 15 d6  |STR R0,tokabs...|
00002e70  12 4c 44 52 20 52 31 2c  74 6f 6b 62 61 64 72 0d  |.LDR R1,tokbadr.|
00002e80  15 e0 18 4d 4f 56 20 52  32 2c 23 35 20 3b 54 6f  |...MOV R2,#5 ;To|
00002e90  6b 20 77 69 64 74 68 0d  15 ea 19 4d 4f 56 20 52  |k width....MOV R|
00002ea0  33 2c 23 39 20 3b 54 6f  6b 20 68 65 69 67 68 74  |3,#9 ;Tok height|
00002eb0  0d 15 f4 0b 42 4c 20 67  65 74 62 0d 15 fe 1e 2e  |....BL getb.....|
00002ec0  67 65 74 62 65 78 69 74  20 4c 44 4d 46 44 20 52  |getbexit LDMFD R|
00002ed0  31 33 21 2c 7b 52 31 35  7d 0d 16 08 1d 2e 72 65  |13!,{R15}.....re|
00002ee0  73 62 61 63 6b 20 53 54  4d 46 44 20 52 31 33 21  |sback STMFD R13!|
00002ef0  2c 7b 52 31 34 7d 0d 16  12 12 4c 44 52 20 52 30  |,{R14}....LDR R0|
00002f00  2c 62 61 6c 6c 61 62 73  0d 16 1c 13 4c 44 52 20  |,ballabs....LDR |
00002f10  52 31 2c 62 61 6c 6c 62  61 64 72 0d 16 26 19 4d  |R1,ballbadr..&.M|
00002f20  4f 56 20 52 32 2c 23 32  20 3b 42 61 6c 6c 20 77  |OV R2,#2 ;Ball w|
00002f30  69 64 74 68 0d 16 30 1a  4d 4f 56 20 52 33 2c 23  |idth..0.MOV R3,#|
00002f40  34 20 3b 42 61 6c 6c 20  68 65 69 67 68 74 0d 16  |4 ;Ball height..|
00002f50  3a 0b 42 4c 20 72 65 73  62 0d 16 44 11 4c 44 52  |:.BL resb..D.LDR|
00002f60  20 52 30 2c 62 61 74 61  62 73 0d 16 4e 12 4c 44  | R0,batabs..N.LD|
00002f70  52 20 52 31 2c 62 61 74  62 61 64 72 0d 16 58 19  |R R1,batbadr..X.|
00002f80  4d 4f 56 20 52 32 2c 23  31 34 20 3b 42 61 74 20  |MOV R2,#14 ;Bat |
00002f90  77 69 64 74 68 0d 16 62  19 4d 4f 56 20 52 33 2c  |width..b.MOV R3,|
00002fa0  23 36 20 3b 42 61 74 20  68 65 69 67 68 74 0d 16  |#6 ;Bat height..|
00002fb0  6c 0b 42 4c 20 72 65 73  62 0d 16 76 12 4c 44 52  |l.BL resb..v.LDR|
00002fc0  20 52 30 2c 62 61 64 31  61 62 73 0d 16 80 13 4c  | R0,bad1abs....L|
00002fd0  44 52 20 52 31 2c 62 61  64 31 62 61 64 72 0d 16  |DR R1,bad1badr..|
00002fe0  8a 18 4d 4f 56 20 52 32  2c 23 37 20 3b 42 61 64  |..MOV R2,#7 ;Bad|
00002ff0  20 77 69 64 74 68 0d 16  94 1a 4d 4f 56 20 52 33  | width....MOV R3|
00003000  2c 23 31 34 20 3b 42 61  64 20 68 65 69 67 68 74  |,#14 ;Bad height|
00003010  0d 16 9e 0b 42 4c 20 72  65 73 62 0d 16 a8 12 4c  |....BL resb....L|
00003020  44 52 20 52 30 2c 62 61  64 32 61 62 73 0d 16 b2  |DR R0,bad2abs...|
00003030  13 4c 44 52 20 52 31 2c  62 61 64 32 62 61 64 72  |.LDR R1,bad2badr|
00003040  0d 16 bc 18 4d 4f 56 20  52 32 2c 23 37 20 3b 42  |....MOV R2,#7 ;B|
00003050  61 64 20 77 69 64 74 68  0d 16 c6 1a 4d 4f 56 20  |ad width....MOV |
00003060  52 33 2c 23 31 34 20 3b  42 61 64 20 68 65 69 67  |R3,#14 ;Bad heig|
00003070  68 74 0d 16 d0 0b 42 4c  20 72 65 73 62 0d 16 da  |ht....BL resb...|
00003080  18 54 53 54 20 52 31 32  2c 23 36 34 20 3b 54 6f  |.TST R12,#64 ;To|
00003090  6b 66 6c 61 67 0d 16 e4  10 42 45 51 20 72 65 73  |kflag....BEQ res|
000030a0  62 65 78 69 74 0d 16 ee  11 4c 44 52 20 52 30 2c  |bexit....LDR R0,|
000030b0  74 6f 6b 61 62 73 0d 16  f8 12 4c 44 52 20 52 31  |tokabs....LDR R1|
000030c0  2c 74 6f 6b 62 61 64 72  0d 17 02 0d 4d 4f 56 20  |,tokbadr....MOV |
000030d0  52 32 2c 23 35 0d 17 0c  0d 4d 4f 56 20 52 33 2c  |R2,#5....MOV R3,|
000030e0  23 39 0d 17 16 0b 42 4c  20 72 65 73 62 0d 17 20  |#9....BL resb.. |
000030f0  1e 2e 72 65 73 62 65 78  69 74 20 4c 44 4d 46 44  |..resbexit LDMFD|
00003100  20 52 31 33 21 2c 7b 52  31 35 7d 0d 17 2a 1c 2e  | R13!,{R15}..*..|
00003110  63 6f 6e 76 65 72 74 20  4d 4f 56 20 52 30 2c 52  |convert MOV R0,R|
00003120  32 2c 4c 53 52 23 32 0d  17 34 12 52 53 42 20 52  |2,LSR#2..4.RSB R|
00003130  30 2c 52 30 2c 23 32 35  35 0d 17 3e 0f 4d 4f 56  |0,R0,#255..>.MOV|
00003140  20 52 33 2c 23 31 36 30  0d 17 48 10 4d 55 4c 20  | R3,#160..H.MUL |
00003150  52 34 2c 52 33 2c 52 30  0d 17 52 16 41 44 44 20  |R4,R3,R0..R.ADD |
00003160  52 30 2c 52 34 2c 52 31  2c 4c 53 52 23 33 0d 17  |R0,R4,R1,LSR#3..|
00003170  5c 10 4c 44 52 20 52 33  2c 6d 73 74 6f 70 0d 17  |\.LDR R3,mstop..|
00003180  66 10 41 44 44 20 52 30  2c 52 30 2c 52 33 0d 17  |f.ADD R0,R0,R3..|
00003190  70 0f 4d 4f 56 20 52 31  35 2c 52 31 34 0d 17 7a  |p.MOV R15,R14..z|
000031a0  13 2e 67 65 74 62 20 4d  4f 56 20 52 34 2c 23 30  |..getb MOV R4,#0|
000031b0  0d 17 84 1c 4d 4f 56 20  52 35 2c 23 30 20 3b 5a  |....MOV R5,#0 ;Z|
000031c0  65 72 6f 20 63 6f 75 6e  74 65 72 73 0d 17 8e 1d  |ero counters....|
000031d0  2e 67 65 74 62 6c 6f 6f  70 20 4c 44 52 42 20 52  |.getbloop LDRB R|
000031e0  37 2c 5b 52 30 2c 52 34  5d 0d 17 98 13 53 54 52  |7,[R0,R4]....STR|
000031f0  42 20 52 37 2c 5b 52 31  5d 2c 23 31 0d 17 a2 10  |B R7,[R1],#1....|
00003200  41 44 44 20 52 34 2c 52  34 2c 23 31 0d 17 ac 0d  |ADD R4,R4,#1....|
00003210  43 4d 50 20 52 32 2c 52  34 0d 17 b6 10 42 43 53  |CMP R2,R4....BCS|
00003220  20 67 65 74 62 6c 6f 6f  70 0d 17 c0 10 41 44 44  | getbloop....ADD|
00003230  20 52 35 2c 52 35 2c 23  31 0d 17 ca 0d 43 4d 50  | R5,R5,#1....CMP|
00003240  20 52 33 2c 52 35 0d 17  d4 14 53 55 42 4e 45 20  | R3,R5....SUBNE |
00003250  52 30 2c 52 30 2c 23 31  36 30 0d 17 de 0f 4d 4f  |R0,R0,#160....MO|
00003260  56 4e 45 20 52 34 2c 23  30 0d 17 e8 10 42 4e 45  |VNE R4,#0....BNE|
00003270  20 67 65 74 62 6c 6f 6f  70 0d 17 f2 0f 4d 4f 56  | getbloop....MOV|
00003280  20 52 31 35 2c 52 31 34  0d 17 fc 13 2e 72 65 73  | R15,R14.....res|
00003290  62 20 4d 4f 56 20 52 34  2c 23 30 0d 18 06 1c 4d  |b MOV R4,#0....M|
000032a0  4f 56 20 52 35 2c 23 30  20 3b 5a 65 72 6f 20 63  |OV R5,#0 ;Zero c|
000032b0  6f 75 6e 74 65 72 73 0d  18 10 1d 2e 72 65 73 62  |ounters.....resb|
000032c0  6c 6f 6f 70 20 4c 44 52  42 20 52 37 2c 5b 52 31  |loop LDRB R7,[R1|
000032d0  5d 2c 23 31 0d 18 1a 13  53 54 52 42 20 52 37 2c  |],#1....STRB R7,|
000032e0  5b 52 30 2c 52 34 5d 0d  18 24 10 41 44 44 20 52  |[R0,R4]..$.ADD R|
000032f0  34 2c 52 34 2c 23 31 0d  18 2e 0d 43 4d 50 20 52  |4,R4,#1....CMP R|
00003300  32 2c 52 34 0d 18 38 10  42 43 53 20 72 65 73 62  |2,R4..8.BCS resb|
00003310  6c 6f 6f 70 0d 18 42 10  41 44 44 20 52 35 2c 52  |loop..B.ADD R5,R|
00003320  35 2c 23 31 0d 18 4c 0d  43 4d 50 20 52 33 2c 52  |5,#1..L.CMP R3,R|
00003330  35 0d 18 56 14 53 55 42  4e 45 20 52 30 2c 52 30  |5..V.SUBNE R0,R0|
00003340  2c 23 31 36 30 0d 18 60  0f 4d 4f 56 4e 45 20 52  |,#160..`.MOVNE R|
00003350  34 2c 23 30 0d 18 6a 10  42 4e 45 20 72 65 73 62  |4,#0..j.BNE resb|
00003360  6c 6f 6f 70 0d 18 74 0f  4d 4f 56 20 52 31 35 2c  |loop..t.MOV R15,|
00003370  52 31 34 0d 18 7e 1e 2e  62 6c 6f 63 6b 73 75 62  |R14..~..blocksub|
00003380  20 53 54 4d 46 44 20 52  31 33 21 2c 7b 52 31 34  | STMFD R13!,{R14|
00003390  7d 0d 18 88 10 4c 44 52  42 20 52 38 2c 48 69 74  |}....LDRB R8,Hit|
000033a0  73 0d 18 92 20 42 49 43  20 52 31 32 2c 52 31 32  |s... BIC R12,R12|
000033b0  2c 23 34 20 3b 43 6c 65  61 72 20 62 6c 66 6c 61  |,#4 ;Clear blfla|
000033c0  67 0d 18 9c 11 4c 44 52  20 52 32 2c 62 6c 31 61  |g....LDR R2,bl1a|
000033d0  64 72 0d 18 a6 17 2e 74  72 79 62 6c 31 20 4c 44  |dr.....trybl1 LD|
000033e0  52 20 52 33 2c 62 6c 31  78 0d 18 b0 0d 43 4d 50  |R R3,bl1x....CMP|
000033f0  20 52 33 2c 23 30 0d 18  ba 0e 42 45 51 20 74 72  | R3,#0....BEQ tr|
00003400  79 62 6c 32 0d 18 c4 0f  4c 44 52 20 52 34 2c 62  |ybl2....LDR R4,b|
00003410  6c 31 79 0d 18 ce 11 42  4c 20 73 70 72 69 74 65  |l1y....BL sprite|
00003420  70 6c 6f 74 0d 18 d8 10  53 55 42 20 52 38 2c 52  |plot....SUB R8,R|
00003430  38 2c 23 31 0d 18 e2 17  2e 74 72 79 62 6c 32 20  |8,#1.....trybl2 |
00003440  4c 44 52 20 52 33 2c 62  6c 32 78 0d 18 ec 0d 43  |LDR R3,bl2x....C|
00003450  4d 50 20 52 33 2c 23 30  0d 18 f6 10 42 45 51 20  |MP R3,#0....BEQ |
00003460  6e 6f 62 6c 6f 63 6b 73  0d 19 00 0f 4c 44 52 20  |noblocks....LDR |
00003470  52 34 2c 62 6c 32 79 0d  19 0a 11 42 4c 20 73 70  |R4,bl2y....BL sp|
00003480  72 69 74 65 70 6c 6f 74  0d 19 14 10 53 55 42 20  |riteplot....SUB |
00003490  52 38 2c 52 38 2c 23 31  0d 19 1e 1a 2e 6e 6f 62  |R8,R8,#1.....nob|
000034a0  6c 6f 63 6b 73 20 53 54  52 42 20 52 38 2c 48 69  |locks STRB R8,Hi|
000034b0  74 73 0d 19 28 14 4c 44  4d 46 44 20 52 31 33 21  |ts..(.LDMFD R13!|
000034c0  2c 7b 52 31 35 7d 0d 19  32 20 2e 63 6f 6c 20 41  |,{R15}..2 .col A|
000034d0  44 44 20 52 34 2c 52 33  2c 52 37 20 3b 52 34 3d  |DD R4,R3,R7 ;R4=|
000034e0  6f 62 6a 74 6f 70 0d 19  3c 1d 41 44 44 20 52 35  |objtop..<.ADD R5|
000034f0  2c 52 31 2c 23 31 36 20  3b 52 35 3d 62 61 6c 6c  |,R1,#16 ;R5=ball|
00003500  74 6f 70 0d 19 46 1d 43  4d 50 20 52 31 2c 52 34  |top..F.CMP R1,R4|
00003510  20 3b 42 61 6c 6c 62 6f  74 2d 6f 62 6a 74 6f 70  | ;Ballbot-objtop|
00003520  0d 19 50 0d 42 50 4c 20  6e 6f 63 6f 6c 0d 19 5a  |..P.BPL nocol..Z|
00003530  1d 43 4d 50 20 52 33 2c  52 35 20 3b 4f 62 6a 62  |.CMP R3,R5 ;Objb|
00003540  6f 74 2d 62 61 6c 6c 74  6f 70 0d 19 64 0d 42 50  |ot-balltop..d.BP|
00003550  4c 20 6e 6f 63 6f 6c 0d  19 6e 1d 41 44 44 20 52  |L nocol..n.ADD R|
00003560  34 2c 52 32 2c 52 36 20  3b 52 34 3d 6f 62 6a 72  |4,R2,R6 ;R4=objr|
00003570  69 67 68 74 0d 19 78 1f  41 44 44 20 52 35 2c 52  |ight..x.ADD R5,R|
00003580  30 2c 23 31 36 20 3b 52  35 3d 62 61 6c 6c 72 69  |0,#16 ;R5=ballri|
00003590  67 68 74 0d 19 82 22 43  4d 50 20 52 30 2c 52 34  |ght..."CMP R0,R4|
000035a0  20 3b 42 61 6c 6c 20 6c  65 66 74 2d 6f 62 6a 20  | ;Ball left-obj |
000035b0  72 69 67 68 74 0d 19 8c  0d 42 50 4c 20 6e 6f 63  |right....BPL noc|
000035c0  6f 6c 0d 19 96 20 43 4d  50 20 52 32 2c 52 35 20  |ol... CMP R2,R5 |
000035d0  3b 4f 62 6a 6c 65 66 74  2d 62 61 6c 6c 72 69 67  |;Objleft-ballrig|
000035e0  68 74 0d 19 a0 0d 42 50  4c 20 6e 6f 63 6f 6c 0d  |ht....BPL nocol.|
000035f0  19 aa 1f 84 52 20 52 31  32 2c 52 31 32 2c 23 33  |....R R12,R12,#3|
00003600  32 20 3b 53 65 74 20 63  6f 6c 66 6c 61 67 0d 19  |2 ;Set colflag..|
00003610  b4 1f 2e 6e 6f 63 6f 6c  20 54 53 54 20 52 31 32  |...nocol TST R12|
00003620  2c 23 33 32 20 3b 43 6f  6c 66 6c 61 67 0d 19 be  |,#32 ;Colflag...|
00003630  22 42 49 43 20 52 31 32  2c 52 31 32 2c 23 33 32  |"BIC R12,R12,#32|
00003640  20 3b 43 6c 65 61 72 20  63 6f 6c 66 6c 61 67 0d  | ;Clear colflag.|
00003650  19 c8 0f 4d 4f 56 20 52  31 35 2c 52 31 34 0d 19  |...MOV R15,R14..|
00003660  d2 13 2e 62 6c 6f 63 20  43 4d 50 20 52 34 2c 23  |...bloc CMP R4,#|
00003670  30 0d 19 dc 0f 42 4d 49  20 72 65 74 62 6c 6f 63  |0....BMI retbloc|
00003680  0d 19 e6 0e 43 4d 50 20  52 34 2c 23 31 33 0d 19  |....CMP R4,#13..|
00003690  f0 0f 42 45 51 20 72 65  74 62 6c 6f 63 0d 19 fa  |..BEQ retbloc...|
000036a0  0e 43 4d 50 20 52 35 2c  23 31 37 0d 1a 04 0f 42  |.CMP R5,#17....B|
000036b0  47 54 20 72 65 74 62 6c  6f 63 0d 1a 0e 0d 43 4d  |GT retbloc....CM|
000036c0  50 20 52 35 2c 23 30 0d  1a 18 0f 42 4d 49 20 72  |P R5,#0....BMI r|
000036d0  65 74 62 6c 6f 63 0d 1a  22 14 4c 44 52 20 52 36  |etbloc..".LDR R6|
000036e0  2c 62 6c 6f 63 6b 73 61  64 72 0d 1a 2c 0e 4d 4f  |,blocksadr..,.MO|
000036f0  56 20 52 37 2c 23 31 33  0d 1a 36 13 4d 4c 41 20  |V R7,#13..6.MLA |
00003700  52 38 2c 52 37 2c 52 35  2c 52 36 0d 1a 40 13 4c  |R8,R7,R5,R6..@.L|
00003710  44 52 42 20 52 37 2c 5b  52 38 2c 52 34 5d 0d 1a  |DRB R7,[R8,R4]..|
00003720  4a 1e 4d 4f 56 20 52 36  2c 52 37 2c 4c 53 52 23  |J.MOV R6,R7,LSR#|
00003730  34 20 3b 52 36 3d 63 6f  6c 6f 75 72 0d 1a 54 1f  |4 ;R6=colour..T.|
00003740  80 53 20 52 37 2c 52 37  2c 23 31 35 20 3b 52 37  |.S R7,R7,#15 ;R7|
00003750  3d 62 6c 6f 63 6b 20 74  79 70 65 0d 1a 5e 0f 42  |=block type..^.B|
00003760  45 51 20 72 65 74 62 6c  6f 63 0d 1a 68 27 84 52  |EQ retbloc..h'.R|
00003770  20 52 31 32 2c 52 31 32  2c 23 31 36 30 20 3b 53  | R12,R12,#160 ;S|
00003780  65 74 20 63 6f 6c 66 6c  61 67 20 26 20 62 65 65  |et colflag & bee|
00003790  70 0d 1a 72 11 53 54 52  42 20 52 36 2c 50 69 74  |p..r.STRB R6,Pit|
000037a0  63 68 0d 1a 7c 0e 43 4d  50 20 52 37 2c 23 31 35  |ch..|.CMP R7,#15|
000037b0  0d 1a 86 0e 42 45 51 20  69 6e 64 65 73 74 0d 1a  |....BEQ indest..|
000037c0  90 11 53 55 42 53 20 52  37 2c 52 37 2c 23 31 0d  |..SUBS R7,R7,#1.|
000037d0  1a 9a 0e 42 4e 45 20 69  6e 64 65 73 74 0d 1a a4  |...BNE indest...|
000037e0  13 53 54 52 42 20 52 37  2c 5b 52 38 2c 52 34 5d  |.STRB R7,[R8,R4]|
000037f0  0d 1a ae 13 4d 4f 56 20  52 36 2c 52 34 2c 4c 53  |....MOV R6,R4,LS|
00003800  4c 23 36 0d 1a b8 13 4d  4f 56 20 52 37 2c 52 35  |L#6....MOV R7,R5|
00003810  2c 4c 53 4c 23 35 0d 1a  c2 11 41 44 44 20 52 36  |,LSL#5....ADD R6|
00003820  2c 52 36 2c 23 33 36 0d  1a cc 12 41 44 44 20 52  |,R6,#36....ADD R|
00003830  37 2c 52 37 2c 23 33 38  34 0d 1a d6 0f 54 53 54  |7,R7,#384....TST|
00003840  20 52 31 32 2c 23 36 34  0d 1a e0 0f 42 4e 45 20  | R12,#64....BNE |
00003850  68 61 76 65 74 6f 6b 0d  1a ea 1d 54 53 54 20 52  |havetok....TST R|
00003860  31 32 2c 23 33 32 37 36  38 20 3b 46 72 61 6d 65  |12,#32768 ;Frame|
00003870  66 6c 61 67 0d 1a f4 22  84 52 4e 45 20 52 31 32  |flag...".RNE R12|
00003880  2c 52 31 32 2c 23 36 34  20 3b 53 65 74 20 74 6f  |,R12,#64 ;Set to|
00003890  6b 20 66 6c 61 67 0d 1a  fe 12 53 54 52 4e 45 20  |k flag....STRNE |
000038a0  52 36 2c 74 6f 6b 58 6d  0d 1b 08 12 53 54 52 4e  |R6,tokXm....STRN|
000038b0  45 20 52 37 2c 74 6f 6b  59 6d 0d 1b 12 19 2e 68  |E R7,tokYm.....h|
000038c0  61 76 65 74 6f 6b 20 4c  44 52 20 52 38 2c 73 63  |avetok LDR R8,sc|
000038d0  6f 72 65 0d 1b 1c 11 41  44 44 20 52 38 2c 52 38  |ore....ADD R8,R8|
000038e0  2c 23 31 30 0d 1b 26 10  53 54 52 20 52 38 2c 73  |,#10..&.STR R8,s|
000038f0  63 6f 72 65 0d 1b 30 21  2e 72 65 74 62 6c 6f 63  |core..0!.retbloc|
00003900  20 54 53 54 20 52 31 32  2c 23 33 32 20 3b 43 6f  | TST R12,#32 ;Co|
00003910  6c 66 6c 61 67 0d 1b 3a  22 42 49 43 20 52 31 32  |lflag..:"BIC R12|
00003920  2c 52 31 32 2c 23 33 32  20 3b 43 6c 65 61 72 20  |,R12,#32 ;Clear |
00003930  63 6f 6c 66 6c 61 67 0d  1b 44 0f 4d 4f 56 20 52  |colflag..D.MOV R|
00003940  31 35 2c 52 31 34 0d 1b  4e 1e 2e 69 6e 64 65 73  |15,R14..N..indes|
00003950  74 20 41 44 44 20 52 36  2c 52 37 2c 52 36 2c 4c  |t ADD R6,R7,R6,L|
00003960  53 52 23 34 0d 1b 58 13  53 54 52 42 20 52 36 2c  |SR#4..X.STRB R6,|
00003970  5b 52 38 2c 52 34 5d 0d  1b 62 0d 4d 4f 56 20 52  |[R8,R4]..b.MOV R|
00003980  36 2c 23 30 0d 1b 6c 18  54 53 54 20 52 31 32 2c  |6,#0..l.TST R12,|
00003990  23 33 32 20 3b 43 6f 6c  66 6c 61 67 0d 1b 76 22  |#32 ;Colflag..v"|
000039a0  42 49 43 20 52 31 32 2c  52 31 32 2c 23 33 32 20  |BIC R12,R12,#32 |
000039b0  3b 43 6c 65 61 72 20 63  6f 6c 66 6c 61 67 0d 1b  |;Clear colflag..|
000039c0  80 0f 4d 4f 56 20 52 31  35 2c 52 31 34 0d 1b 8a  |..MOV R15,R14...|
000039d0  1e 2e 73 65 74 75 70 20  4c 44 52 42 20 52 30 2c  |..setup LDRB R0,|
000039e0  73 63 72 65 65 6e 6c 65  76 65 6c 0d 1b 94 10 41  |screenlevel....A|
000039f0  44 44 20 52 30 2c 52 30  2c 23 31 0d 1b 9e 16 41  |DD R0,R0,#1....A|
00003a00  44 52 20 52 31 2c 66 72  61 6d 65 73 74 72 69 6e  |DR R1,framestrin|
00003a10  67 0d 1b a8 0d 4d 4f 56  20 52 32 2c 23 34 0d 1b  |g....MOV R2,#4..|
00003a20  b2 0b 53 57 49 20 26 44  35 0d 1b bc 11 41 44 44  |..SWI &D5....ADD|
00003a30  20 52 32 2c 52 32 2c 23  32 36 0d 1b c6 12 53 54  | R2,R2,#26....ST|
00003a40  52 42 20 52 32 2c 66 6f  72 6d 2b 31 0d 1b d0 09  |RB R2,form+1....|
00003a50  53 57 49 20 31 0d 1b da  44 2e 66 6f 72 6d 20 45  |SWI 1...D.form E|
00003a60  51 55 42 20 33 31 3a 45  51 55 42 20 30 3a 45 51  |QUB 31:EQUB 0:EQ|
00003a70  55 42 20 31 36 3a 45 51  55 42 20 31 37 3a 45 51  |UB 16:EQUB 17:EQ|
00003a80  55 42 20 34 3a 45 51 55  42 20 39 3a 45 51 55 42  |UB 4:EQUB 9:EQUB|
00003a90  20 39 3a 45 51 55 42 20  39 0d 1b e4 17 2e 66 72  | 9:EQUB 9.....fr|
00003aa0  61 6d 65 73 74 72 69 6e  67 20 45 51 55 44 20 30  |amestring EQUD 0|
00003ab0  0d 1b ee 17 4c 44 52 42  20 52 30 2c 73 63 72 65  |....LDRB R0,scre|
00003ac0  65 6e 6c 65 76 65 6c 0d  1b f8 2e 53 57 49 20 32  |enlevel....SWI 2|
00003ad0  35 36 2b 33 30 3a 53 57  49 20 32 35 36 2b 31 30  |56+30:SWI 256+10|
00003ae0  3a 53 57 49 20 32 35 36  2b 31 30 3a 53 57 49 20  |:SWI 256+10:SWI |
00003af0  32 35 36 2b 39 0d 1c 02  1d 4d 4f 56 20 52 36 2c  |256+9....MOV R6,|
00003b00  23 30 20 3b 5a 65 72 6f  20 59 20 63 6f 75 6e 74  |#0 ;Zero Y count|
00003b10  65 72 0d 1c 0c 20 4d 4f  56 20 52 37 2c 23 30 20  |er... MOV R7,#0 |
00003b20  3b 5a 65 72 6f 20 68 69  74 73 20 63 6f 75 6e 74  |;Zero hits count|
00003b30  65 72 0d 1c 16 0f 4d 4f  56 20 52 31 2c 23 32 33  |er....MOV R1,#23|
00003b40  34 0d 1c 20 11 4c 44 52  20 52 32 2c 73 63 72 65  |4.. .LDR R2,scre|
00003b50  65 6e 0d 1c 2a 2e 4d 4c  41 20 52 33 2c 52 30 2c  |en..*.MLA R3,R0,|
00003b60  52 31 2c 52 32 20 3b 52  33 3d 70 6f 69 6e 74 65  |R1,R2 ;R3=pointe|
00003b70  72 20 74 6f 20 66 69 72  73 74 20 62 6c 6f 63 6b  |r to first block|
00003b80  0d 1c 34 14 4c 44 52 20  52 34 2c 62 6c 6f 63 6b  |..4.LDR R4,block|
00003b90  73 61 64 72 0d 1c 3e 12  41 44 44 20 52 34 2c 52  |sadr..>.ADD R4,R|
00003ba0  34 2c 23 32 32 31 0d 1c  48 15 2e 43 6c 6f 6f 70  |4,#221..H..Cloop|
00003bb0  31 20 4d 4f 56 20 52 35  2c 23 30 0d 1c 52 1b 2e  |1 MOV R5,#0..R..|
00003bc0  43 6c 6f 6f 70 32 20 4c  44 52 42 20 52 30 2c 5b  |Cloop2 LDRB R0,[|
00003bd0  52 33 5d 2c 23 31 0d 1c  5c 0d 43 4d 50 20 52 30  |R3],#1..\.CMP R0|
00003be0  2c 23 31 0d 1c 66 22 41  44 44 47 54 20 52 37 2c  |,#1..f"ADDGT R7,|
00003bf0  52 37 2c 23 31 20 3b 49  6e 63 72 65 6d 65 6e 74  |R7,#1 ;Increment|
00003c00  20 68 69 74 73 0d 1c 70  0e 53 57 49 20 32 35 36  | hits..p.SWI 256|
00003c10  2b 31 37 0d 1c 7a 09 53  57 49 20 30 0d 1c 84 1b  |+17..z.SWI 0....|
00003c20  53 57 49 20 32 35 36 2b  32 32 36 3a 53 57 49 20  |SWI 256+226:SWI |
00003c30  32 35 36 2b 32 32 37 0d  1c 8e 0d 4d 4f 56 20 52  |256+227....MOV R|
00003c40  31 2c 23 31 0d 1c 98 0d  43 4d 50 20 52 30 2c 23  |1,#1....CMP R0,#|
00003c50  32 0d 1c a2 0c ec 51 20  52 31 2c 23 34 0d 1c ac  |2.....Q R1,#4...|
00003c60  0d 43 4d 50 20 52 30 2c  23 31 0d 1c b6 0d ec 51  |.CMP R0,#1.....Q|
00003c70  20 52 31 2c 23 31 35 0d  1c c0 0d 43 4d 50 20 52  | R1,#15....CMP R|
00003c80  30 2c 23 30 0d 1c ca 0c  ec 51 20 52 31 2c 52 30  |0,#0.....Q R1,R0|
00003c90  0d 1c d4 16 41 44 44 20  52 31 2c 52 31 2c 52 30  |....ADD R1,R1,R0|
00003ca0  2c 4c 53 4c 23 34 0d 1c  de 13 53 54 52 42 20 52  |,LSL#4....STRB R|
00003cb0  31 2c 5b 52 34 5d 2c 23  31 0d 1c e8 10 41 44 44  |1,[R4],#1....ADD|
00003cc0  20 52 35 2c 52 35 2c 23  31 0d 1c f2 0e 43 4d 50  | R5,R5,#1....CMP|
00003cd0  20 52 35 2c 23 31 33 0d  1c fc 0e 42 4e 45 20 43  | R5,#13....BNE C|
00003ce0  6c 6f 6f 70 32 0d 1d 06  09 53 57 49 20 33 0d 1d  |loop2....SWI 3..|
00003cf0  10 0d 53 57 49 20 32 35  36 2b 39 0d 1d 1a 11 53  |..SWI 256+9....S|
00003d00  55 42 20 52 34 2c 52 34  2c 23 32 36 0d 1d 24 10  |UB R4,R4,#26..$.|
00003d10  41 44 44 20 52 36 2c 52  36 2c 23 31 0d 1d 2e 0e  |ADD R6,R6,#1....|
00003d20  43 4d 50 20 52 36 2c 23  31 38 0d 1d 38 0e 42 4e  |CMP R6,#18..8.BN|
00003d30  45 20 43 6c 6f 6f 70 31  0d 1d 42 0e 53 57 49 20  |E Cloop1..B.SWI |
00003d40  32 35 36 2b 31 37 0d 1d  4c 0e 4d 4f 56 20 52 30  |256+17..L.MOV R0|
00003d50  2c 23 31 35 0d 1d 56 09  53 57 49 20 30 0d 1d 60  |,#15..V.SWI 0..`|
00003d60  10 53 54 52 42 20 52 37  2c 48 69 74 73 0d 1d 6a  |.STRB R7,Hits..j|
00003d70  0f 42 20 69 63 6f 6e 72  65 73 65 74 0d 1d 74 27  |.B iconreset..t'|
00003d80  2e 6e 65 77 62 61 6c 6c  20 54 53 54 20 52 31 32  |.newball TST R12|
00003d90  2c 23 31 33 31 30 37 32  20 3b 42 61 6c 6c 20 66  |,#131072 ;Ball f|
00003da0  6c 61 67 0d 1d 7e 12 42  4c 4e 45 20 69 63 6f 6e  |lag..~.BLNE icon|
00003db0  72 65 73 65 74 0d 1d 88  1d 4d 4f 56 20 52 31 32  |reset....MOV R12|
00003dc0  2c 23 36 31 34 34 20 3b  5a 65 72 6f 20 66 6c 61  |,#6144 ;Zero fla|
00003dd0  67 73 0d 1d 92 16 84 52  20 52 31 32 2c 52 31 32  |gs.....R R12,R12|
00003de0  2c 23 32 36 32 31 34 34  0d 1d 9c 0e 4d 4f 56 20  |,#262144....MOV |
00003df0  52 30 2c 23 31 36 0d 1d  a6 12 53 54 52 42 20 52  |R0,#16....STRB R|
00003e00  30 2c 42 61 6c 6c 56 59  0d 1d b0 0e 42 4c 20 62  |0,BallVY....BL b|
00003e10  61 74 63 61 6c 63 0d 1d  ba 12 54 53 54 20 52 31  |atcalc....TST R1|
00003e20  32 2c 23 36 35 35 33 36  0d 1d c4 0c 42 45 51 20  |2,#65536....BEQ |
00003e30  77 61 69 74 0d 1d ce 28  42 49 43 20 52 31 32 2c  |wait...(BIC R12,|
00003e40  52 31 32 2c 23 36 35 35  33 36 20 3b 43 6c 65 61  |R12,#65536 ;Clea|
00003e50  72 20 62 75 74 74 6f 6e  66 6c 61 67 0d 1d d8 21  |r buttonflag...!|
00003e60  84 52 20 52 31 32 2c 52  31 32 2c 23 32 20 3b 50  |.R R12,R12,#2 ;P|
00003e70  6f 73 20 62 61 6c 6c 20  59 20 64 69 72 0d 1d e2  |os ball Y dir...|
00003e80  0d 4d 4f 56 20 52 30 2c  23 30 0d 1d e3 12 53 54  |.MOV R0,#0....ST|
00003e90  52 42 20 52 30 2c 42 61  6c 6c 56 58 0d 1e 1e 14  |RB R0,BallVX....|
00003ea0  53 54 52 42 20 52 30 2c  42 61 74 66 72 61 6d 65  |STRB R0,Batframe|
00003eb0  0d 1e 28 0a 42 20 6c 6f  6f 70 0d 1e 32 16 2e 77  |..(.B loop..2..w|
00003ec0  61 69 74 20 53 54 52 20  52 30 2c 62 61 74 58 6d  |ait STR R0,batXm|
00003ed0  0d 1e 3c 11 41 44 44 20  52 30 2c 52 30 2c 23 34  |..<.ADD R0,R0,#4|
00003ee0  30 0d 1e 46 11 53 54 52  20 52 30 2c 62 61 6c 6c  |0..F.STR R0,ball|
00003ef0  58 6d 0d 1e 50 0f 4d 4f  56 20 52 31 2c 23 31 32  |Xm..P.MOV R1,#12|
00003f00  38 0d 1e 5a 11 53 54 52  20 52 31 2c 62 61 6c 6c  |8..Z.STR R1,ball|
00003f10  59 6d 0d 1e 64 10 4c 44  52 20 52 36 2c 58 6d 61  |Ym..d.LDR R6,Xma|
00003f20  64 72 0d 1e 6e 0e 42 4c  20 67 65 74 62 61 63 6b  |dr..n.BL getback|
00003f30  0d 1e 78 10 42 4c 20 70  6f 73 69 74 69 6f 6e 73  |..x.BL positions|
00003f40  0d 1e 82 0e 4d 4f 56 20  52 30 2c 23 31 39 0d 1e  |....MOV R0,#19..|
00003f50  8c 09 53 57 49 20 36 0d  1e 96 0e 42 4c 20 72 65  |..SWI 6....BL re|
00003f60  73 62 61 63 6b 0d 1e a0  0d 42 20 6e 65 77 62 61  |sback....B newba|
00003f70  6c 6c 0d 1e aa 1b 2e 73  63 6f 72 65 63 61 6c 63  |ll.....scorecalc|
00003f80  20 4c 44 52 20 52 30 2c  73 63 6f 72 65 0d 1e b4  | LDR R0,score...|
00003f90  16 41 44 52 20 52 31 2c  73 63 6f 72 65 73 74 72  |.ADR R1,scorestr|
00003fa0  69 6e 67 0d 1e be 0d 4d  4f 56 20 52 32 2c 23 38  |ing....MOV R2,#8|
00003fb0  0d 1e c8 0b 53 57 49 20  26 44 38 0d 1e d2 11 41  |....SWI &D8....A|
00003fc0  44 44 20 52 32 2c 52 32  2c 23 32 36 0d 1e dc 14  |DD R2,R2,#26....|
00003fd0  53 54 52 42 20 52 32 2c  66 6f 72 6d 61 74 2b 31  |STRB R2,format+1|
00003fe0  0d 1e e6 09 53 57 49 20  31 0d 1e f0 46 2e 66 6f  |....SWI 1...F.fo|
00003ff0  72 6d 61 74 20 45 51 55  42 20 33 31 3a 45 51 55  |rmat EQUB 31:EQU|
00004000  42 20 30 3a 45 51 55 42  20 31 32 3a 45 51 55 42  |B 0:EQUB 12:EQUB|
00004010  20 31 37 3a 45 51 55 42  20 36 3a 45 51 55 42 20  | 17:EQUB 6:EQUB |
00004020  39 3a 45 51 55 42 20 39  3a 45 51 55 42 20 39 0d  |9:EQUB 9:EQUB 9.|
00004030  1e fa 1e 2e 73 63 6f 72  65 73 74 72 69 6e 67 20  |....scorestring |
00004040  45 51 55 44 20 30 3a 45  51 55 44 20 30 0d 1f 04  |EQUD 0:EQUD 0...|
00004050  0f 4d 4f 56 20 52 31 35  2c 52 31 34 0d 1f 0e 13  |.MOV R15,R14....|
00004060  2e 67 61 6d 65 6f 76 65  72 20 53 57 49 20 31 0d  |.gameover SWI 1.|
00004070  1f 18 7d 45 51 55 42 20  33 31 3a 45 51 55 42 20  |..}EQUB 31:EQUB |
00004080  39 3a 45 51 55 42 20 32  3a 45 51 55 42 20 37 31  |9:EQUB 2:EQUB 71|
00004090  3a 45 51 55 42 20 36 35  3a 45 51 55 42 20 37 37  |:EQUB 65:EQUB 77|
000040a0  3a 45 51 55 42 20 36 39  3a 45 51 55 42 20 33 32  |:EQUB 69:EQUB 32|
000040b0  3a 45 51 55 42 20 37 39  3a 45 51 55 42 20 38 36  |:EQUB 79:EQUB 86|
000040c0  3a 45 51 55 42 20 36 39  3a 45 51 55 42 20 38 32  |:EQUB 69:EQUB 82|
000040d0  3a 45 51 55 42 20 30 3a  45 51 55 42 20 30 3a 45  |:EQUB 0:EQUB 0:E|
000040e0  51 55 42 20 30 3a 45 51  55 42 20 30 0d 1f 22 0d  |QUB 0:EQUB 0..".|
000040f0  4d 4f 56 20 52 30 2c 23  35 0d 1f 2c 11 53 54 52  |MOV R0,#5..,.STR|
00004100  42 20 52 30 2c 42 61 6c  6c 73 0d 1f 36 16 2e 67  |B R0,Balls..6..g|
00004110  6f 6c 6f 6f 70 20 42 4c  20 62 61 74 63 61 6c 63  |oloop BL batcalc|
00004120  0d 1f 40 12 54 53 54 20  52 31 32 2c 23 36 35 35  |..@.TST R12,#655|
00004130  33 36 0d 1f 4a 0e 42 45  51 20 67 6f 6c 6f 6f 70  |36..J.BEQ goloop|
00004140  0d 1f 54 09 53 57 49 20  31 0d 1f 5e 61 45 51 55  |..T.SWI 1..^aEQU|
00004150  42 20 33 31 3a 45 51 55  42 20 33 30 3a 45 51 55  |B 31:EQUB 30:EQU|
00004160  42 20 31 32 3a 45 51 55  42 20 34 38 3a 45 51 55  |B 12:EQUB 48:EQU|
00004170  42 20 34 38 3a 45 51 55  42 20 34 38 3a 45 51 55  |B 48:EQUB 48:EQU|
*
000041a0  42 20 30 3a 45 51 55 42  20 30 0d 1f 68 0d 4d 4f  |B 0:EQUB 0..h.MO|
000041b0  56 20 52 30 2c 23 30 0d  1f 72 10 53 54 52 20 52  |V R0,#0..r.STR R|
000041c0  30 2c 73 63 6f 72 65 0d  1f 7c 17 53 54 52 42 20  |0,score..|.STRB |
000041d0  52 30 2c 73 63 72 65 65  6e 6c 65 76 65 6c 0d 1f  |R0,screenlevel..|
000041e0  86 12 4c 44 52 20 52 32  2c 62 61 6c 6c 61 64 72  |..LDR R2,balladr|
000041f0  0d 1f 90 0f 4d 4f 56 20  52 33 2c 23 39 36 38 0d  |....MOV R3,#968.|
00004200  1f 9a 0f 4d 4f 56 20 52  34 2c 23 37 32 30 0d 1f  |...MOV R4,#720..|
00004210  a4 11 42 4c 20 73 70 72  69 74 65 70 6c 6f 74 0d  |..BL spriteplot.|
00004220  1f ae 11 41 44 44 20 52  33 2c 52 33 2c 23 33 32  |...ADD R3,R3,#32|
00004230  0d 1f b8 11 42 4c 20 73  70 72 69 74 65 70 6c 6f  |....BL spriteplo|
00004240  74 0d 1f c2 11 41 44 44  20 52 33 2c 52 33 2c 23  |t....ADD R3,R3,#|
00004250  33 32 0d 1f cc 11 42 4c  20 73 70 72 69 74 65 70  |32....BL spritep|
00004260  6c 6f 74 0d 1f d6 11 41  44 44 20 52 33 2c 52 33  |lot....ADD R3,R3|
00004270  2c 23 33 32 0d 1f e0 11  42 4c 20 73 70 72 69 74  |,#32....BL sprit|
00004280  65 70 6c 6f 74 0d 1f ea  11 41 44 44 20 52 33 2c  |eplot....ADD R3,|
00004290  52 33 2c 23 33 32 0d 1f  f4 11 42 4c 20 73 70 72  |R3,#32....BL spr|
000042a0  69 74 65 70 6c 6f 74 0d  1f fe 0c 42 4c 20 73 65  |iteplot....BL se|
000042b0  74 75 70 0d 20 08 0d 42  20 6e 65 77 62 61 6c 6c  |tup. ..B newball|
000042c0  0d 20 12 25 2e 64 6f 65  78 31 20 54 53 54 20 52  |. .%.doex1 TST R|
000042d0  31 32 2c 23 33 32 37 36  38 20 3b 46 72 61 6d 65  |12,#32768 ;Frame|
000042e0  20 66 6c 61 67 0d 20 1c  10 42 45 51 20 62 61 64  | flag. ..BEQ bad|
000042f0  32 63 61 6c 63 0d 20 26  12 4c 44 52 42 20 52 30  |2calc. &.LDRB R0|
00004300  2c 45 78 31 6e 75 6d 0d  20 30 10 41 44 44 20 52  |,Ex1num. 0.ADD R|
00004310  30 2c 52 30 2c 23 31 0d  20 3a 0f 80 53 20 52 30  |0,R0,#1. :..S R0|
00004320  2c 52 30 2c 23 33 0d 20  44 12 53 54 52 42 20 52  |,R0,#3. D.STRB R|
00004330  30 2c 45 78 31 6e 75 6d  0d 20 4e 10 42 4e 45 20  |0,Ex1num. N.BNE |
00004340  62 61 64 32 63 61 6c 63  0d 20 58 21 42 49 43 20  |bad2calc. X!BIC |
00004350  52 31 32 2c 52 31 32 2c  23 38 20 3b 43 6c 65 61  |R12,R12,#8 ;Clea|
00004360  72 20 65 78 31 66 6c 61  67 0d 20 62 0f 4d 4f 56  |r ex1flag. b.MOV|
00004370  20 52 30 2c 23 31 32 38  0d 20 6c 11 53 54 52 20  | R0,#128. l.STR |
00004380  52 30 2c 62 61 64 31 58  6d 0d 20 76 0f 4d 4f 56  |R0,bad1Xm. v.MOV|
00004390  20 52 30 2c 23 37 30 34  0d 20 80 11 53 54 52 20  | R0,#704. ..STR |
000043a0  52 30 2c 62 61 64 31 59  6d 0d 20 8a 17 2e 65 78  |R0,bad1Ym. ...ex|
000043b0  31 65 78 69 74 20 42 20  62 61 64 32 63 61 6c 63  |1exit B bad2calc|
000043c0  0d 20 94 26 2e 64 6f 65  78 32 20 20 54 53 54 20  |. .&.doex2  TST |
000043d0  52 31 32 2c 23 33 32 37  36 38 20 3b 46 72 61 6d  |R12,#32768 ;Fram|
000043e0  65 20 66 6c 61 67 0d 20  9e 0f 42 45 51 20 6d 6f  |e flag. ..BEQ mo|
000043f0  76 65 74 6f 6b 0d 20 a8  12 4c 44 52 42 20 52 30  |vetok. ..LDRB R0|
00004400  2c 45 78 32 6e 75 6d 0d  20 b2 10 41 44 44 20 52  |,Ex2num. ..ADD R|
00004410  30 2c 52 30 2c 23 31 0d  20 bc 0f 80 53 20 52 30  |0,R0,#1. ...S R0|
00004420  2c 52 30 2c 23 33 0d 20  c6 12 53 54 52 42 20 52  |,R0,#3. ..STRB R|
00004430  30 2c 45 78 32 6e 75 6d  0d 20 d0 0f 42 4e 45 20  |0,Ex2num. ..BNE |
00004440  6d 6f 76 65 74 6f 6b 0d  20 da 22 42 49 43 20 52  |movetok. ."BIC R|
00004450  31 32 2c 52 31 32 2c 23  31 36 20 3b 43 6c 65 61  |12,R12,#16 ;Clea|
00004460  72 20 65 78 32 66 6c 61  67 0d 20 e4 0f 4d 4f 56  |r ex2flag. ..MOV|
00004470  20 52 30 2c 23 37 36 38  0d 20 ee 11 53 54 52 20  | R0,#768. ..STR |
00004480  52 30 2c 62 61 64 32 58  6d 0d 20 f8 0f 4d 4f 56  |R0,bad2Xm. ..MOV|
00004490  20 52 30 2c 23 37 35 32  0d 21 02 11 53 54 52 20  | R0,#752.!..STR |
000044a0  52 30 2c 62 61 64 32 59  6d 0d 21 0c 16 2e 65 78  |R0,bad2Ym.!...ex|
000044b0  32 65 78 69 74 20 42 20  6d 6f 76 65 74 6f 6b 0d  |2exit B movetok.|
000044c0  21 16 25 2e 64 6f 62 61  64 31 20 54 53 54 20 52  |!.%.dobad1 TST R|
000044d0  31 32 2c 23 33 32 37 36  38 20 3b 46 72 61 6d 65  |12,#32768 ;Frame|
000044e0  66 6c 61 67 0d 21 20 10  42 45 51 20 6d 6f 76 65  |flag.! .BEQ move|
000044f0  62 61 64 31 0d 21 2a 15  4c 44 52 42 20 52 30 2c  |bad1.!*.LDRB R0,|
00004500  42 61 64 31 66 72 61 6d  65 0d 21 34 10 41 44 44  |Bad1frame.!4.ADD|
00004510  20 52 30 2c 52 30 2c 23  31 0d 21 3e 0e 80 20 52  | R0,R0,#1.!>.. R|
00004520  30 2c 52 30 2c 23 33 0d  21 48 15 53 54 52 42 20  |0,R0,#3.!H.STRB |
00004530  52 30 2c 42 61 64 31 66  72 61 6d 65 0d 21 52 1b  |R0,Bad1frame.!R.|
00004540  2e 6d 6f 76 65 62 61 64  31 20 4c 44 52 20 52 31  |.movebad1 LDR R1|
00004550  2c 62 61 64 31 58 6d 0d  21 5c 11 4c 44 52 20 52  |,bad1Xm.!\.LDR R|
00004560  32 2c 62 61 64 31 59 6d  0d 21 66 12 4c 44 52 42  |2,bad1Ym.!f.LDRB|
00004570  20 52 33 2c 42 61 64 31  56 58 0d 21 70 12 4c 44  | R3,Bad1VX.!p.LD|
00004580  52 42 20 52 34 2c 42 61  64 31 56 59 0d 21 7a 1b  |RB R4,Bad1VY.!z.|
00004590  54 53 54 20 52 31 32 2c  23 35 31 32 20 3b 42 61  |TST R12,#512 ;Ba|
000045a0  64 31 20 78 64 69 72 0d  21 84 12 53 55 42 45 51  |d1 xdir.!..SUBEQ|
000045b0  20 52 31 2c 52 31 2c 52  33 0d 21 8e 12 41 44 44  | R1,R1,R3.!..ADD|
000045c0  4e 45 20 52 31 2c 52 31  2c 52 33 0d 21 98 1c 54  |NE R1,R1,R3.!..T|
000045d0  53 54 20 52 31 32 2c 23  31 30 32 34 20 3b 42 61  |ST R12,#1024 ;Ba|
000045e0  64 31 20 79 64 69 72 0d  21 a2 12 53 55 42 45 51  |d1 ydir.!..SUBEQ|
000045f0  20 52 32 2c 52 32 2c 52  34 0d 21 ac 12 41 44 44  | R2,R2,R4.!..ADD|
00004600  4e 45 20 52 32 2c 52 32  2c 52 34 0d 21 b6 11 53  |NE R2,R2,R4.!..S|
00004610  54 52 20 52 31 2c 62 61  64 31 58 6d 0d 21 c0 11  |TR R1,bad1Xm.!..|
00004620  53 54 52 20 52 32 2c 62  61 64 31 59 6d 0d 21 ca  |STR R2,bad1Ym.!.|
00004630  0f 43 4d 50 20 52 31 2c  23 38 30 30 0d 21 d4 24  |.CMP R1,#800.!.$|
00004640  42 49 43 45 51 20 52 31  32 2c 52 31 32 2c 23 35  |BICEQ R12,R12,#5|
00004650  31 32 20 3b 4e 65 67 20  62 61 64 31 78 64 69 72  |12 ;Neg bad1xdir|
00004660  0d 21 de 0e 43 4d 50 20  52 31 2c 23 33 32 0d 21  |.!..CMP R1,#32.!|
00004670  e8 23 84 52 45 51 20 52  31 32 2c 52 31 32 2c 23  |.#.REQ R12,R12,#|
00004680  35 31 32 20 3b 50 6f 73  20 62 61 64 31 78 64 69  |512 ;Pos bad1xdi|
00004690  72 0d 21 f2 0f 43 4d 50  20 52 32 2c 23 39 36 30  |r.!..CMP R2,#960|
000046a0  0d 21 fc 25 42 49 43 45  51 20 52 31 32 2c 52 31  |.!.%BICEQ R12,R1|
000046b0  32 2c 23 31 30 32 34 20  3b 4e 65 67 20 62 61 64  |2,#1024 ;Neg bad|
000046c0  31 79 64 69 72 0d 22 06  0f 43 4d 50 20 52 32 2c  |1ydir."..CMP R2,|
000046d0  23 31 36 30 0d 22 10 24  84 52 45 51 20 52 31 32  |#160.".$.REQ R12|
000046e0  2c 52 31 32 2c 23 31 30  32 34 20 3b 50 6f 73 20  |,R12,#1024 ;Pos |
000046f0  62 61 64 31 79 64 69 72  0d 22 1a 0e 42 20 62 61  |bad1ydir."..B ba|
00004700  64 32 63 61 6c 63 0d 22  24 25 2e 64 6f 62 61 64  |d2calc."$%.dobad|
00004710  32 20 54 53 54 20 52 31  32 2c 23 33 32 37 36 38  |2 TST R12,#32768|
00004720  20 3b 46 72 61 6d 65 66  6c 61 67 0d 22 2e 10 42  | ;Frameflag."..B|
00004730  45 51 20 6d 6f 76 65 62  61 64 32 0d 22 38 15 4c  |EQ movebad2."8.L|
00004740  44 52 42 20 52 30 2c 42  61 64 32 66 72 61 6d 65  |DRB R0,Bad2frame|
00004750  0d 22 42 10 41 44 44 20  52 30 2c 52 30 2c 23 31  |."B.ADD R0,R0,#1|
00004760  0d 22 4c 0e 80 20 52 30  2c 52 30 2c 23 33 0d 22  |."L.. R0,R0,#3."|
00004770  56 15 53 54 52 42 20 52  30 2c 42 61 64 32 66 72  |V.STRB R0,Bad2fr|
00004780  61 6d 65 0d 22 60 1b 2e  6d 6f 76 65 62 61 64 32  |ame."`..movebad2|
00004790  20 4c 44 52 20 52 31 2c  62 61 64 32 58 6d 0d 22  | LDR R1,bad2Xm."|
000047a0  6a 11 4c 44 52 20 52 32  2c 62 61 64 32 59 6d 0d  |j.LDR R2,bad2Ym.|
000047b0  22 74 12 4c 44 52 42 20  52 33 2c 42 61 64 32 56  |"t.LDRB R3,Bad2V|
000047c0  58 0d 22 7e 12 4c 44 52  42 20 52 34 2c 42 61 64  |X."~.LDRB R4,Bad|
000047d0  32 56 59 0d 22 88 1c 54  53 54 20 52 31 32 2c 23  |2VY."..TST R12,#|
000047e0  32 30 34 38 20 3b 42 61  64 32 20 78 64 69 72 0d  |2048 ;Bad2 xdir.|
000047f0  22 92 12 53 55 42 45 51  20 52 31 2c 52 31 2c 52  |"..SUBEQ R1,R1,R|
00004800  33 0d 22 9c 12 41 44 44  4e 45 20 52 31 2c 52 31  |3."..ADDNE R1,R1|
00004810  2c 52 33 0d 22 a6 1c 54  53 54 20 52 31 32 2c 23  |,R3."..TST R12,#|
00004820  34 30 39 36 20 3b 42 61  64 32 20 79 64 69 72 0d  |4096 ;Bad2 ydir.|
00004830  22 b0 12 53 55 42 45 51  20 52 32 2c 52 32 2c 52  |"..SUBEQ R2,R2,R|
00004840  34 0d 22 ba 12 41 44 44  4e 45 20 52 32 2c 52 32  |4."..ADDNE R2,R2|
00004850  2c 52 34 0d 22 c4 11 53  54 52 20 52 31 2c 62 61  |,R4."..STR R1,ba|
00004860  64 32 58 6d 0d 22 ce 11  53 54 52 20 52 32 2c 62  |d2Xm."..STR R2,b|
00004870  61 64 32 59 6d 0d 22 d8  0f 43 4d 50 20 52 31 2c  |ad2Ym."..CMP R1,|
00004880  23 38 30 30 0d 22 e2 25  42 49 43 45 51 20 52 31  |#800.".%BICEQ R1|
00004890  32 2c 52 31 32 2c 23 32  30 34 38 20 3b 4e 65 67  |2,R12,#2048 ;Neg|
000048a0  20 62 61 64 32 78 64 69  72 0d 22 ec 0e 43 4d 50  | bad2xdir."..CMP|
000048b0  20 52 31 2c 23 33 32 0d  22 f6 24 84 52 45 51 20  | R1,#32.".$.REQ |
000048c0  52 31 32 2c 52 31 32 2c  23 32 30 34 38 20 3b 50  |R12,R12,#2048 ;P|
000048d0  6f 73 20 62 61 64 32 78  64 69 72 0d 23 00 0f 43  |os bad2xdir.#..C|
000048e0  4d 50 20 52 32 2c 23 39  36 30 0d 23 0a 25 42 49  |MP R2,#960.#.%BI|
000048f0  43 45 51 20 52 31 32 2c  52 31 32 2c 23 34 30 39  |CEQ R12,R12,#409|
00004900  36 20 3b 4e 65 67 20 62  61 64 32 79 64 69 72 0d  |6 ;Neg bad2ydir.|
00004910  23 14 0f 43 4d 50 20 52  32 2c 23 31 36 30 0d 23  |#..CMP R2,#160.#|
00004920  1e 24 84 52 45 51 20 52  31 32 2c 52 31 32 2c 23  |.$.REQ R12,R12,#|
00004930  34 30 39 36 20 3b 50 6f  73 20 62 61 64 32 79 64  |4096 ;Pos bad2yd|
00004940  69 72 0d 23 28 0d 42 20  6d 6f 76 65 74 6f 6b 0d  |ir.#(.B movetok.|
00004950  23 32 1f 2e 69 63 6f 6e  72 65 73 65 74 20 53 54  |#2..iconreset ST|
00004960  4d 46 44 20 52 31 33 21  2c 7b 52 31 34 7d 0d 23  |MFD R13!,{R14}.#|
00004970  3c 15 4c 44 52 42 20 52  31 2c 49 63 6f 6e 66 72  |<.LDRB R1,Iconfr|
00004980  61 6d 65 0d 23 46 0f 43  4d 50 20 52 31 2c 23 32  |ame.#F.CMP R1,#2|
00004990  35 35 0d 23 50 15 42 45  51 20 69 63 6f 6e 72 65  |55.#P.BEQ iconre|
000049a0  73 65 74 65 78 69 74 0d  23 5a 11 4c 44 52 20 52  |setexit.#Z.LDR R|
000049b0  32 2c 69 31 6e 61 64 72  0d 23 64 16 41 44 44 20  |2,i1nadr.#d.ADD |
000049c0  52 32 2c 52 32 2c 52 31  2c 4c 53 4c 23 32 0d 23  |R2,R2,R1,LSL#2.#|
000049d0  6e 13 4c 44 52 20 52 35  2c 69 63 6f 6e 78 61 64  |n.LDR R5,iconxad|
000049e0  72 0d 23 78 18 4c 44 52  20 52 33 2c 5b 52 35 2c  |r.#x.LDR R3,[R5,|
000049f0  52 31 2c 4c 53 4c 23 32  5d 0d 23 82 13 4c 44 52  |R1,LSL#2].#..LDR|
00004a00  20 52 35 2c 69 63 6f 6e  79 61 64 72 0d 23 8c 18  | R5,iconyadr.#..|
00004a10  4c 44 52 20 52 34 2c 5b  52 35 2c 52 31 2c 4c 53  |LDR R4,[R5,R1,LS|
00004a20  4c 23 32 5d 0d 23 96 11  42 4c 20 73 70 72 69 74  |L#2].#..BL sprit|
00004a30  65 70 6c 6f 74 0d 23 a0  0f 4d 4f 56 20 52 30 2c  |eplot.#..MOV R0,|
00004a40  23 32 35 35 0d 23 aa 15  53 54 52 42 20 52 30 2c  |#255.#..STRB R0,|
00004a50  49 63 6f 6e 66 72 61 6d  65 0d 23 b4 23 2e 69 63  |Iconframe.#.#.ic|
00004a60  6f 6e 72 65 73 65 74 65  78 69 74 20 4c 44 4d 46  |onresetexit LDMF|
00004a70  44 20 52 31 33 21 2c 7b  52 31 35 7d 0d 23 be 1c  |D R13!,{R15}.#..|
00004a80  2e 62 65 65 70 20 53 57  49 20 26 34 32 20 3b 52  |.beep SWI &42 ;R|
00004a90  65 61 64 20 74 69 6d 65  0d 23 bf 0f 80 20 52 31  |ead time.#... R1|
00004aa0  2c 52 30 2c 23 36 30 0d  23 c8 0f 4d 4f 56 20 52  |,R0,#60.#..MOV R|
00004ab0  30 2c 23 32 31 33 0d 23  d2 09 53 57 49 20 36 0d  |0,#213.#..SWI 6.|
00004ac0  23 dc 0d 53 57 49 20 32  35 36 2b 37 0d 23 e6 1e  |#..SWI 256+7.#..|
00004ad0  42 49 43 20 52 31 32 2c  52 31 32 2c 23 31 32 38  |BIC R12,R12,#128|
00004ae0  20 3b 42 65 65 70 66 6c  61 67 0d 23 f0 0f 4d 4f  | ;Beepflag.#..MO|
00004af0  56 20 52 31 35 2c 52 31  34 0d 23 fa 05 5d 0d 24  |V R15,R14.#..].$|
00004b00  04 09 ed 70 61 73 73 0d  24 05 14 e8 22 53 6f 75  |...pass.$..."Sou|
00004b10  6e 64 20 59 2f 4e 20 22  2c 41 24 0d 24 06 23 e7  |nd Y/N ",A$.$.#.|
00004b20  20 41 24 3d 22 4e 22 20  84 20 41 24 3d 22 6e 22  | A$="N" . A$="n"|
00004b30  20 8c 20 20 2a 41 55 44  49 4f 20 4f 46 46 0d 24  | .  *AUDIO OFF.$|
00004b40  0e 0e fb 31 32 38 3a db  3a fb 31 33 0d 24 18 1a  |...128:.:.13.$..|
00004b50  e3 49 25 3d 30 b8 32 37  3a ef 32 32 34 3a ed 3a  |.I%=0.27:.224:.:|
00004b60  ef 32 32 38 3a f1 0d 24  22 29 e3 49 25 3d 30 b8  |.228:..$").I%=0.|
00004b70  32 37 3a ef 32 32 35 3a  f1 c4 32 36 2c bd 33 32  |27:.225:..26,.32|
00004b80  29 3b 3a ef 32 32 39 2c  32 32 38 3a f1 3a ed 0d  |);:.229,228:.:..|
00004b90  24 2c 24 e6 35 3a ec 39  30 30 2c 33 37 36 3a df  |$,$.5:.900,376:.|
00004ba0  39 30 30 2c 31 30 32 33  3a df 31 32 37 39 2c 31  |900,1023:.1279,1|
00004bb0  30 32 33 0d 24 36 2b e6  31 33 3a c8 93 39 30 34  |023.$6+.13:..904|
00004bc0  2c 33 37 34 2c 33 37 32  2c 36 34 33 3a c8 93 39  |,374,372,643:..9|
00004bd0  30 38 2c 33 37 38 2c 33  36 34 2c 36 33 35 0d 24  |08,378,364,635.$|
00004be0  40 24 e6 35 3a ec 39 31  32 2c 33 38 30 3a df 31  |@$.5:.912,380:.1|
00004bf0  32 36 38 2c 33 38 30 3a  df 31 32 36 38 2c 31 30  |268,380:.1268,10|
00004c00  30 37 0d 24 4a 17 fb 31  33 3a f1 8a 33 30 2c 31  |07.$J..13:..30,1|
00004c10  30 29 22 53 43 4f 52 45  22 0d 24 54 18 fb 36 3a  |0)"SCORE".$T..6:|
00004c20  f1 8a 33 30 2c 31 32 29  22 30 30 30 30 30 30 30  |..30,12)"0000000|
00004c30  22 0d 24 5e 17 fb 31 34  3a f1 8a 33 30 2c 31 34  |".$^..14:..30,14|
00004c40  29 22 46 52 41 4d 45 22  0d 24 68 14 fb 34 3a f1  |)"FRAME".$h..4:.|
00004c50  8a 33 30 2c 31 36 29 22  30 30 31 22 0d 24 72 10  |.30,16)"001".$r.|
00004c60  2a 53 43 48 4f 4f 53 45  20 42 41 4c 0d 24 7c 48  |*SCHOOSE BAL.$|H|
00004c70  f0 26 45 44 2c 39 36 38  2c 37 32 30 3a f0 26 45  |.&ED,968,720:.&E|
00004c80  44 2c 31 30 30 30 2c 37  32 30 3a f0 26 45 44 2c  |D,1000,720:.&ED,|
00004c90  31 30 33 32 2c 37 32 30  3a f0 26 45 44 2c 31 30  |1032,720:.&ED,10|
00004ca0  36 34 2c 37 32 30 3a f0  26 45 44 2c 31 30 39 36  |64,720:.&ED,1096|
00004cb0  2c 37 32 30 0d 24 86 10  2a 53 43 48 4f 4f 53 45  |,720.$..*SCHOOSE|
00004cc0  20 49 31 4e 0d 24 90 10  f0 26 45 44 2c 39 39 32  | I1N.$...&ED,992|
00004cd0  2c 32 37 32 0d 24 9a 10  2a 53 43 48 4f 4f 53 45  |,272.$..*SCHOOSE|
00004ce0  20 49 32 4e 0d 24 a4 11  f0 26 45 44 2c 31 30 35  | I2N.$...&ED,105|
00004cf0  36 2c 32 37 32 0d 24 ae  10 2a 53 43 48 4f 4f 53  |6,272.$..*SCHOOS|
00004d00  45 20 49 33 4e 0d 24 b8  11 f0 26 45 44 2c 31 31  |E I3N.$...&ED,11|
00004d10  32 30 2c 32 37 32 0d 24  c2 10 2a 53 43 48 4f 4f  |20,272.$..*SCHOO|
00004d20  53 45 20 49 34 4e 0d 24  cc 10 f0 26 45 44 2c 39  |SE I4N.$...&ED,9|
00004d30  39 32 2c 32 30 38 0d 24  d6 10 2a 53 43 48 4f 4f  |92,208.$..*SCHOO|
00004d40  53 45 20 49 35 4e 0d 24  e0 11 f0 26 45 44 2c 31  |SE I5N.$...&ED,1|
00004d50  30 35 36 2c 32 30 38 0d  24 ea 10 2a 53 43 48 4f  |056,208.$..*SCHO|
00004d60  4f 53 45 20 49 36 4e 0d  24 f4 11 f0 26 45 44 2c  |OSE I6N.$...&ED,|
00004d70  31 31 32 30 2c 32 30 38  0d 24 fe 10 2a 53 43 48  |1120,208.$..*SCH|
00004d80  4f 4f 53 45 20 49 37 4e  0d 25 08 10 f0 26 45 44  |OOSE I7N.%...&ED|
00004d90  2c 39 39 32 2c 31 34 34  0d 25 12 10 2a 53 43 48  |,992,144.%..*SCH|
00004da0  4f 4f 53 45 20 49 38 4e  0d 25 1c 11 f0 26 45 44  |OOSE I8N.%...&ED|
00004db0  2c 31 30 35 36 2c 31 34  34 0d 25 26 10 2a 53 43  |,1056,144.%&.*SC|
00004dc0  48 4f 4f 53 45 20 49 39  4e 0d 25 30 11 f0 26 45  |HOOSE I9N.%0..&E|
00004dd0  44 2c 31 31 32 30 2c 31  34 34 0d 25 3a 10 2a 53  |D,1120,144.%:.*S|
00004de0  43 48 4f 4f 53 45 20 49  4d 50 0d 25 44 10 f0 26  |CHOOSE IMP.%D..&|
00004df0  45 44 2c 39 32 38 2c 38  32 30 0d 25 4e 22 e6 36  |ED,928,820.%N".6|
00004e00  3a ec 39 37 36 2c 31 33  30 3a df 39 37 36 2c 33  |:.976,130:.976,3|
00004e10  34 34 3a df 31 31 39 32  2c 33 34 34 0d 25 58 2a  |44:.1192,344.%X*|
00004e20  e6 38 3a c8 93 39 38 30  2c 31 33 30 2c 32 31 32  |.8:..980,130,212|
00004e30  2c 32 31 32 3a c8 93 39  38 34 2c 31 33 34 2c 32  |,212:..984,134,2|
00004e40  30 34 2c 32 30 34 0d 25  62 23 e6 36 3a ec 39 38  |04,204.%b#.6:.98|
00004e50  38 2c 31 33 38 3a df 31  31 38 34 2c 31 33 38 3a  |8,138:.1184,138:|
00004e60  df 31 31 38 34 2c 33 33  34 0d 25 76 0b d6 20 73  |.1184,334.%v.. s|
00004e70  74 61 72 74 0d 25 80 05  e0 0d ff                 |tart.%.....|
00004e7b