*KEY1 MODE12

 *RMCLEAR
 ș"OS_UpdateMEMC",64,64
 �0
 �

 �sprites
 � �
) � SC$(10),NSC$(10),HSC$(10),NUM$(10)
( � HSC%(10),N$(20)
Z *LOAD scr2
�
 �disc

, �assemble

�$ �"LOAD ALIENCON "+�~aliensprite

�  � "LOAD TABLE "+�~alientab1
 	 Ƞ 1
* � *CHANNELVOICE 2 3
4 *CHANNELVOICE 1 3
> SC$="0000"
H SCR%=0
z � � �12:�finish:�
{ �9
| *PRINT !Palette2
} � 128+7:� 0
~ �
 � !score1=999:?lives=1
� �X%=0�1280 � 128
�+ ș "OS_SpriteOp",546,sp%,T%(17),X%,0,0
�- ș "OS_SpriteOp",546,sp%,T%(17),X%,900,0
 �
 �7:ȓ Ȑ 0,120,1280,780
 Y%=910
- ș "OS_SpriteOp",546,sp%,T%(33),320,Y%,8
$- ș "OS_SpriteOp",546,sp%,T%(34),472,Y%,8
.- ș "OS_SpriteOp",546,sp%,T%(34),592,Y%,8
8- ș "OS_SpriteOp",546,sp%,T%(35),716,Y%,8
B- ș "OS_SpriteOp",546,sp%,T%(36),820,Y%,8
L& �7,6);"ArmCode By Geoff Holland"
V/ �3,8);"Thanks To John 'The One' Nicholas"
`2 �2,10);"From The No 1 PD Libary 'Datastrem'"
j � COLOUR12
tx �1,13);"The Idea Of The Game Is To Grab As Many Gold Nuggets As Possible, Before Your   Energy Level Equals Zero."
~] �1,16);"There Will Be Various Objects In Your   Way Which You Can Jump Over And Shoot."
� � COLOUR14
� �16,20);"KEYS"
� �16,21);"----"
�( �7,23);"X Right. ' Jump. / Shoot."
� �5
�# �10,26);"Press X Key To Play"
� �0
� �:� �(-67)
� � code%
�
 *FX 21,0
� �7:ȓ Ȑ 0,120,1280,770
�) SCR%=�(SC$):SCR%=!score1:SC$=�(SCR%)
�, �(SC$)>=10 � �(SC$)<100 � SC$="00"+SC$
�- �(SC$)>=100 � �(SC$)<1000 � SC$="0"+SC$
�
 �high_sc
� �print_out
 � ?CZball=1
" � ?lives=3
t � ?bank=1
~ �:� �(-67)
� !score1=0
� � �tVO
' ��assemble
' � code% 50000
'$ �pass=0 � 2 � 2
'.
 P%=code%
'8 [OPT pass
't.start:STMFD R13!,{R14}
'~( LDRB R1,bank:MOV R1,#1:STRB R1,bank
'�- ;LDR R1,score1:;MOV R1,#0:;STR R1,score1
'� BL screenadd1
'� LDMFD R13!,{PC}
'� .TopScreen::STMFD R13!,{R14}
'�& MOV R5,#0:MOV R1,R10:ADD R1,R1,R5
'�  MOV R0,#393216:ADD R0,R0,#8
'� MOV R2,#96
'�
.toploop1
'�' LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}
'� ADD R1,R1,#160
'� SUBS R2,R2,#1:BNE toploop1
($ SUB R1,R1,#96*160:ADD R1,R1,#16
(
 LDR R0,offset1:MOV R2,#96
(
.toploop2
(6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
( SUBS R2,R2,#1:BNE toploop2
($ SUB R1,R1,#96*160:ADD R1,R1,#16
(# LDR R0,offset2:MOV R2,#96
((
.toploop3
(-6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(2 SUBS R2,R2,#1:BNE toploop3
(7$ SUB R1,R1,#96*160:ADD R1,R1,#16
(< LDR R0,offset3:MOV R2,#96
(A
.toploop4
(F6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(K SUBS R2,R2,#1:BNE toploop4
(P$ SUB R1,R1,#96*160:ADD R1,R1,#16
(U LDR R0,offset4:MOV R2,#96
(Z
.toploop5
(_6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(d SUBS R2,R2,#1:BNE toploop5
(i$ SUB R1,R1,#96*160:ADD R1,R1,#16
(n LDR R0,offset5:MOV R2,#96
(s
.toploop6
(x6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(} SUBS R2,R2,#1:BNE toploop6
(�$ SUB R1,R1,#96*160:ADD R1,R1,#16
(� LDR R0,offset6:MOV R2,#96
(�
.toploop7
(�6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(� SUBS R2,R2,#1:BNE toploop7
(�$ SUB R1,R1,#96*160:ADD R1,R1,#16
(� LDR R0,offset7:MOV R2,#96
(�
.toploop8
(�6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(� SUBS R2,R2,#1:BNE toploop8
(�$ SUB R1,R1,#96*160:ADD R1,R1,#16
(� LDR R0,offset8:MOV R2,#96
(�
.toploop9
(�6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(� SUBS R2,R2,#1:BNE toploop9
(�$ SUB R1,R1,#96*160:ADD R1,R1,#16
(� LDR R0,offset9:MOV R2,#96
(�
.toploop0
(�6 LDMIA R0!,{R4-R7}:STMIA R1,{R4-R7}:ADD R1,R1,#160
(� SUBS R2,R2,#1:BNE toploop0
(� SUB R1,R1,#96*160
6� LDMFD R13!,{PC}
6�.offset1 EQUD 394760+8
6�.offset2 EQUD 396304+8
6�.offset3 EQUD 397848+8
6�.offset4 EQUD 399392+8
6�.offset5 EQUD 400936+8
6�.offset6 EQUD 402480+8
6�.offset7 EQUD 404024+8
6�.offset8 EQUD 405568+8
6�.offset9 EQUD 407112+8
6�).SPR17 EQUD T%(17):.SPR18 EQUD T%(18)
6�.back EQUD 0
6�.border:STMFD R13!,{R14}
6�: MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea:LDR R2,SPR17
6�# MOV R6,#10:MOV R3,#0:MOV R4,#0
6� .backloop2:MOV R5,#0:SWI &2E
6� ADD R3,R3,#128
6�  SUBS R6,R6,#1:BNE backloop2
6� BL TopScreen
7�* MOV R0,#15:SWI 256+17:SWI "OS_WriteC"
7�% MOV R1,#14:MOV R2,#30:SWI 256+31
7�8 MOV R0,R1:SWI "OS_WriteC":MOV R0,R2:SWI "OS_WriteC"
7�# ADR R0,string1:SWI "OS_Write0"
7�% MOV R1,#30:MOV R2,#30:SWI 256+31
7�8 MOV R0,R1:SWI "OS_WriteC":MOV R0,R2:SWI "OS_WriteC"
7�# ADR R0,string2:SWI "OS_Write0"
7�$ MOV R1,#1:MOV R2,#30:SWI 256+31
7�8 MOV R0,R1:SWI "OS_WriteC":MOV R0,R2:SWI "OS_WriteC"
7�# ADR R0,string3:SWI "OS_Write0"
7�) MOV R0,#0:SWI 256+17:SWI "OS_WriteC"
8 LDMFD R13!,{PC}
8&.string1 EQUS "Score":EQUB 0:ALIGN
8'.string2 EQUS "Energy":EQUB 0:ALIGN
8"O.SPR33 EQUD T%(33):.SPR34 EQUD T%(34):.SPR35 EQUD T%(35):.SPR36 EQUD T%(36)
8,&.string3 EQUS "Lives":EQUB 0:ALIGN
86.backg:STMFD R13!,{R14}
8@9 MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea:LDR R2,SPR1
8J2 LDR R3,trees1:LDRB R4,treey:MOV R5,#0:SWI &2E
8T9 MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea:LDR R2,SPR2
8^2 LDR R3,trees2:LDRB R4,treey:MOV R5,#0:SWI &2E
8h9 MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea:LDR R2,SPR3
8r2 LDR R3,trees3:LDRB R4,treey:MOV R5,#0:SWI &2E
8t> LDR R2,SPR4:LDR R3,trees4:LDRB R4,treey:MOV R5,#0:SWI &2E
8v> LDR R2,SPR5:LDR R3,trees5:LDRB R4,treey:MOV R5,#0:SWI &2E
8w> LDR R2,SPR7:LDR R3,trees6:LDRB R4,treey:MOV R5,#0:SWI &2E
8x> LDR R2,SPR8:LDR R3,trees7:LDRB R4,treey:MOV R5,#0:SWI &2E
8| LDMFD R13!,{PC}
8�.backg1:STMFD R13!,{R14}
8�) LDRB R7,GoldSpr:CMP R7,#0:BNE backg2
8�: MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea:LDR R2,SPR10
8�0 LDR R3,gold:LDRB R4,goldy:MOV R5,#0:SWI &2E
8�C.backg2:LDR R2,SPR9:LDR R3,wall:LDRB R4,wally:MOV R5,#0:SWI &2E
8�  LDRB R8,Cball:LDRB R7,Wball
8�\ CMP R8,#1:BEQ Pball11:CMP R8,#2:BEQ Pball22:CMP R8,#3:BEQ Pball33:CMP R8,#4:BEQ Pball44
8�.Pball11
8�6 CMP R7,#5:LDRLT R2,SPR11:CMP R7,#4:LDRGT R2,SPR13
8�0 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
8� B BouneBall
8�.Pball22
8�6 CMP R7,#5:LDRLT R2,SPR27:CMP R7,#4:LDRGT R2,SPR28
90 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
9 B BouneBall
9.Pball33
9&6 CMP R7,#5:LDRLT R2,SPR29:CMP R7,#4:LDRGT R2,SPR30
900 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
9: B BouneBall
9D.Pball44
9N6 CMP R7,#5:LDRLT R2,SPR31:CMP R7,#4:LDRGT R2,SPR32
9X0 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
9b.BouneBall
9l! LDRB R7,Wball:LDRB R8,CZball
9vw CMP R8,#1:BEQ bounce11:CMP R8,#2:BEQ bounce22:CMP R8,#3:BEQ bounce33:CMP R8,#4:BEQ bounce44:CMP R8,#5:BEQ bounce55
9�?.bounce11:CMP R7,#5:LDRLT R2,SPR14:CMP R7,#4:LDRGT R2,SPR16
9� B SpriteZball
9�?.bounce22:CMP R7,#5:LDRLT R2,SPR19:CMP R7,#4:LDRGT R2,SPR20
9� B SpriteZball
9�?.bounce33:CMP R7,#5:LDRLT R2,SPR21:CMP R7,#4:LDRGT R2,SPR22
9� B SpriteZball
9�?.bounce44:CMP R7,#5:LDRLT R2,SPR23:CMP R7,#4:LDRGT R2,SPR24
9� B SpriteZball
9�?.bounce55:CMP R7,#5:LDRLT R2,SPR25:CMP R7,#4:LDRGT R2,SPR26
9�.SpriteZball
9�1 LDR R3,Zball:LDR R4,Zbally:MOV R5,#8:SWI &2E
9�> LDR R2,SPR15:LDR R3,Oball:LDR R4,Obally:MOV R5,#8:SWI &2E
9�9 LDR R2,SPR17:MOV R3,#128:MOV R4,#0:MOV R5,#0:SWI &2E
:* MOV R0,#15:SWI 256+17:SWI "OS_WriteC"
:$ MOV R1,#1:MOV R2,#30:SWI 256+31
:8 MOV R0,R1:SWI "OS_WriteC":MOV R0,R2:SWI "OS_WriteC"
: # ADR R0,string3:SWI "OS_Write0"
:*) MOV R0,#0:SWI 256+17:SWI "OS_WriteC"
:�D LDRB R9,Dtune:SUB R9,R9,#1:CMP R9,#0:�Q R9,#256:STREQB R9,Dtune
:� STRB R9,Dtune
:�& MOV R0,#1:MOV R1,#15:RSB R1,R1,#0
:�- MOV R2,R9:MOV R3,#25:SWI "Sound_Control"
:�* LDRB R9,end:CMP R9,#1:BEQ OutOfEnergy
; LDR R5,message1
;0 MOV R1,R10:ADD R1,R1,R5:BL Branch_alientab1
; MOV R2,#8
;$@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
;. LDR R5,message2
;8 MOV R1,R10:ADD R1,R1,R5
;B MOV R2,#9
;L@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
;V LDR R5,message3
;` MOV R1,R10:ADD R1,R1,R5
;j MOV R2,#10
;t@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
> B MessageEnd
>�.OutOfEnergy
>� LDR R5,message4
>�0 MOV R1,R10:ADD R1,R1,R5:BL Branch_alientab1
>� MOV R2,#11
>�@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
>� LDR R5,message5
>� MOV R1,R10:ADD R1,R1,R5
>� MOV R2,#12
>�@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
>� LDR R5,message6
>� MOV R1,R10:ADD R1,R1,R5
>� MOV R2,#13
>�@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
? LDR R5,message7
? MOV R1,R10:ADD R1,R1,R5
? MOV R2,#14
? @ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
Bh.MessageEnd
I� LDMFD R13!,{PC}
I�.SpArea EQUB sp%:ALIGN
I�G.SPR1 EQUD T%(1):.SPR2 EQUD T%(2):.SPR3 EQUD T%(3):.SPR9 EQUD T%(9)
I�.trees1 EQUD 1280:.trees2 EQUD 2560:.trees3 EQUD 0:.trees4 EQUD 5120:.trees5 EQUD 6400:.trees6 EQUD 8960:.trees7 EQUD 10240
I�O.wall EQUD 1280:.gold EQUD 2560:.wally EQUB 129:ALIGN:.goldy EQUB 129:ALIGN
I�5.SPR10 EQUD T%(10);******* GOLD *****************
I�/.treey EQUB 129:ALIGN:.GoldSpr EQUB 0:ALIGN
I�=.Wball EQUB 0:ALIGN:.ball EQUD 5120:.bally EQUB 129:ALIGN
I�<.SPR11 EQUD T%(11):.SPR12 EQUD T%(12):.SPR13 EQUD T%(13)
I�9.Wpath EQUB 0:ALIGN:.Zball EQUD 1600:.Zbally EQUD 129
I�<.SPR14 EQUD T%(14):.SPR15 EQUD T%(15):.SPR16 EQUD T%(16)
I�.Dtune EQUB 256:ALIGN
I�.message1 EQUD 12*1280+56
I�.message2 EQUD 12*1280+72
I�.message3 EQUD 12*1280+88
I�.message4 EQUD 12*1280+48
I�.message5 EQUD 12*1280+64
I�.message6 EQUD 12*1280+80
J.message7 EQUD 12*1280+96
J8.scroll:STMFD R13!,{R14}
JB- MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea
JL> LDR R2,SPR1:LDR R3,trees1:LDRB R4,treey:MOV R5,#0:SWI &2E
J`& LDR R2,SPR2:LDR R3,trees2:SWI &2E
Jt& LDR R2,SPR3:LDR R3,trees3:SWI &2E
Jv& LDR R2,SPR4:LDR R3,trees4:SWI &2E
Jx& LDR R2,SPR5:LDR R3,trees5:SWI &2E
Jy& LDR R2,SPR7:LDR R3,trees6:SWI &2E
Jz& LDR R2,SPR8:LDR R3,trees7:SWI &2E
J~' ;********** OBJECTS **************
J�2 LDR R2,SPR9:LDR R3,wall:LDRB R4,wally:SWI &2E
J� LDRB R7,GoldSpr:CMP R7,#0
J�; LDREQ R2,SPR10:LDREQ R3,gold:LDREQB R4,goldy:SWIEQ &2E
J�2 LDRB R7,Wball:ADD R7,R7,#1:CMP R7,#9:�Q R7,#1
J�& LDRB R6,move:CMP R6,#24:BEQ geoff
JΞ LDR R3,ball:SUB R3,R3,R6:CMN R3,#1280:LDRLTB R8,Cball:ADD R8,R8,#1:STRLTB R8,Cball:LDRLT R8,Oball:MOVLT R8,#2560:STRLT R8,Oball:MOVLT R3,#1280:BLT geoff1
J�
.geoff
J� LDR R3,ball:SUB R3,R3,R6:CMN R3,#1408:LDRLTB R8,Cball:ADD R8,R8,#1:STRLTB R8,Cball:LDRLT R8,Oball:MOVLT R8,#2560:STRLT R8,Oball:MOVLT R3,#1280
J�/.geoff1:LDRB R8,Cball:CMP R8,#4:MOVGT R8,#1
J�, STR R3,ball:STRB R7,Wball:STRB R8,Cball
K. CMP R8,#1:BEQ Pball1:CMP R8,#2:BEQ Pball2
K
. CMP R8,#3:BEQ Pball3:CMP R8,#4:BEQ Pball4
K.Pball1
K6 CMP R7,#5:LDRLT R2,SPR11:CMP R7,#4:LDRGT R2,SPR13
K(0 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
K2 B ObjectsEnd
K<.Pball2
KF6 CMP R7,#5:LDRLT R2,SPR27:CMP R7,#4:LDRGT R2,SPR28
KP0 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
KZ B ObjectsEnd
Kd.Pball3
Kn6 CMP R7,#5:LDRLT R2,SPR29:CMP R7,#4:LDRGT R2,SPR30
Kx0 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
K� B ObjectsEnd
K�.Pball4
K�6 CMP R7,#5:LDRLT R2,SPR31:CMP R7,#4:LDRGT R2,SPR32
K�0 LDR R3,ball:LDRB R4,bally:MOV R5,#8:SWI &2E
K�.ObjectsEnd
K�, LDRB R9,level:CMP R9,#0:BEQ EnergyCount
K� LDRB R6,move
K�+ LDR R3,Oball:SUB R3,R3,R6:STR R3,Oball
K�> LDR R2,SPR15:LDR R3,Oball:LDR R4,Obally:MOV R5,#8:SWI &2E
K�.EnergyCount
K�1 LDRB R7,Cenergy:SUB R7,R7,#1:STRB R7,Cenergy
K�? CMP R7,#0:LDREQB R8,energy:SUBEQ R8,R8,#1:STREQB R8,energy
K�1 LDREQB R7,Cenergy:�Q R7,#4:STREQB R7,Cenergy
LB LDRB R8,energy:CMP R8,#0:LDREQB R8,end:�Q R8,#1:STREQB R8,end
L3 LDREQB R8,lives:SUBEQ R8,R8,#1:STREQB R8,lives
L LDMFD R13!,{PC}
L"B.energy EQUB 99:ALIGN:.Cenergy EQUB 15:ALIGN:.end EQUB 0:ALIGN
L,.Cball EQUB 1:ALIGN
L6u.SPR27 EQUD T%(27):.SPR28 EQUD T%(28):.SPR29 EQUD T%(29):.SPR30 EQUD T%(30):.SPR31 EQUD T%(31):.SPR32 EQUD T%(32)
L@(.Oball EQUD 14*1280:.Obally EQUD 256
LJ.move EQUB 20:ALIGN
N .inkeys:STMFD R13!,{R14}
N*' LDRB R3,jump:CMP R3,#0:BGT inkeys1
N>< MOV R0,#129:MOV R1,#&B0:MOV R2,#255:SWI &06:CMP R2,#255
N?+ LDREQB R9,jump:�Q R9,#1:STREQB R9,jump
NB& �Q R0,#1:�Q R1,#10:RSBEQ R1,R1,#0
ND/ �Q R2,#256:�Q R3,#15:SWIEQ "Sound_Control"
NJ0.inkeys1:LDRB R3,jump:CMP R3,#1:BLEQ move_up
NL CMP R3,#2:BLEQ jump_down
Nf< MOV R0,#129:MOV R1,#&BD:MOV R2,#255:SWI &06:CMP R2,#255
Np ;BEQ move_right
N� LDMNEFD R13!,{PC}
N�;.move_right
N� LDR R3,trees1:SUB R3,R3,#8
N�, CMN R3,#1280:�Q R3,#10240:STR R3,trees1
O LDR R3,trees2:SUB R3,R3,#8
O, CMN R3,#1280:�Q R3,#10240:STR R3,trees2
O LDR R3,trees3:SUB R3,R3,#8
O+ CMN R3,#1280:�Q R3,#2560:STR R3,trees3
O  LDR R3,trees4:SUB R3,R3,#8
O!, CMN R3,#1280:�Q R3,#10240:STR R3,trees4
O" LDR R3,trees5:SUB R3,R3,#8
O#, CMN R3,#1280:�Q R3,#10240:STR R3,trees5
O$ LDR R3,trees6:SUB R3,R3,#8
O&, CMN R3,#1280:�Q R3,#10240:STR R3,trees6
O( LDR R3,trees7:SUB R3,R3,#8
O*, CMN R3,#1280:�Q R3,#10240:STR R3,trees7
O8 LDR R3,wall:SUB R3,R3,#12
O:, CMN R3,#1280:MOVLT R3,#1280:STR R3,wall
O< LDR R3,gold:SUB R3,R3,#12
O>\ CMN R3,#1280:MOVLT R3,#1280:LDRLTB R7,GoldSpr:MOVLT R7,#0:STRLTB R7,GoldSpr:STR R3,gold
OB LDRB R3,Wman:ADD R3,R3,#1
OG% CMP R3,#11:�Q R3,#1:STRB R3,Wman
OK LDMFD R13!,{PC}
OL.move_left:STMFD R13!,{R14}
O� LDMFD R13!,{PC}
O�.move_up:STMFD R13!,{R14}
O�* LDRB R3,jump:CMP R3,#2:BEQ move_upEnd
O�( LDRB R3,jump:MOV R3,#1:STRB R3,jump
O�( LDRB R3,step:MOV R3,#1:STRB R3,step
O�4 MOV R5,#24*1280:SUB R5,R5,#4000:SUB R5,R5,#1920
O�( LDR R3,man:SUB R3,R3,#320:CMP R3,R5
O�9 LDRLTB R4,jump:MOVLT R4,#2:STRLTB R4,jump:STR R3,man
P
B MOV R0,#129:MOV R1,#&BD:MOV R2,#255:SWI "OS_Byte":CMP R2,#255
P. LDRNEB R3,Wman:MOVNE R3,#3:STRNEB R3,Wman
P.move_upEnd:LDMFD R13!,{PC}
P.move_down:STMFD R13!,{R14}
Pw LDMFD R13!,{PC}
Px.jump_down:STMFD R13!,{R14}
P}# MOV R5,#24*1280:ADD R5,R5,#176
P�( LDR R3,man:ADD R3,R3,#320:CMP R3,R5
P�9 LDRGTB R4,jump:MOVGT R4,#0:STRGTB R4,jump:STR R3,man
P� LDMFD R13!,{PC}
u&.Wman EQUB 1:ALIGN
u'.jump EQUB 0:ALIGN
u(.step EQUB 255:ALIGN
u0 .screenadd1:STMFD R13!,{R14}
u2.screen1
u5% LDRB R1,bank:MOV R0,#112:SWI &06
u:' ADR R0,block1:ADR R1,block2:SWI 49
uD LDR R10,block2
uN* BL border:BL scroll:BL inkeys:BL Pman
uS ;BL DigetFour
uX MOV R0,#19:SWI &06
ub= LDRB R1,bank:MOV R0,#113:� R2,R1,#3:STRB R2,bank:SWI &06
ul' LDRB R1,bank:CMP R1,#1:BNE screen1
uv BL screenadd2
u� LDMFD R13!,{PC}
u�2.block1 EQUD 148:EQUD -1:EQUD 0:.block2 EQUD 0
u�.bank EQUB 1:ALIGN
u� :
y .screenadd2:STMFD R13!,{R14}
y.screen2
y"% LDRB R1,bank:MOV R0,#112:SWI &06
y,' ADR R0,block1:ADR R1,block2:SWI 49
y6 LDR R10,block2
y@  BL scroll:BL inkeys:BL Pman
yJ' BL tih_man:BL shoot:BL print_score
yT MOV R0,#19:SWI &06
y^= LDRB R1,bank:MOV R0,#113:� R2,R1,#3:STRB R2,bank:SWI &06
yh& LDRB R3,end:CMP R3,#0:BEQ screen2
ym0 MOV R0,#1:MOV R1,#1:SWI "Sound_AttachVoice"
yr BL screenadd3
y{ LDMFD R13!,{PC}
y� .screenadd3:STMFD R13!,{R14}
y�.screen3
y�% LDRB R1,bank:MOV R0,#112:SWI &06
y�' ADR R0,block1:ADR R1,block2:SWI 49
y� LDR R10,block2
z BL backg:BL Dman:BL backg1
z BL print_score
z& MOV R0,#19:SWI &06
z0= LDRB R1,bank:MOV R0,#113:� R2,R1,#3:STRB R2,bank:SWI &06
z:+ LDRB R3,GameOver:CMP R3,#0:BEQ screen3
zD0 MOV R0,#1:MOV R1,#3:SWI "Sound_AttachVoice"
zN, LDRB R4,Dtune:MOV R4,#256:STRB R4,Dtune
z�- LDRB R4,energy:MOV R4,#99:STRB R4,energy
z�0 LDRB R4,GameOver:MOV R4,#0:STRB R4,GameOver
z�& LDRB R4,end:MOV R4,#0:STRB R4,end
z�* LDRB R4,many:MOV R4,#129:STRB R4,many
z�H LDR R4,man:MOV R4,#24*1280:ADD R4,R4,#168:ADD R4,R4,#168:STR R4,man
z�, LDR R4,Zball:MOV R4,#8*200:STR R4,Zball
z�, LDR R4,Zbally:MOV R4,#129:STR R4,Zbally
z�) LDRB R4,Wpath:MOV R4,#0:STR R4,Wpath
z�) LDRB R4,Wball:MOV R4,#0:STR R4,Wball
z�+ LDR R4,ball:MOV R4,#16*320:STR R4,ball
z�) LDR R4,wall:MOV R4,#1280:STR R4,wall
z�) LDR R4,gold:MOV R4,#2560:STR R4,gold
z�. LDRB R4,GoldSpr:MOV R4,#0:STRB R4,GoldSpr
z�* LDRB R4,Cball:MOV R4,#1:STRB R4,Cball
z�( LDRB R4,jump:MOV R4,#0:STRB R4,jump
{, LDR R4,Cbullet:MOV R4,#0:STR R4,Cbullet
{, LDRB R4,bullet:MOV R4,#0:STRB R4,bullet
{. LDR R4,Oball:MOV R4,#14*1280:STR R4,Oball
{( LDRB R4,bank:MOV R4,#1:STRB R4,bank
{( LDRB R4,lives:CMP R4,#0:BNE screen2
|�$ ;******* � LIVES <> 0 � screen2
}.screen4
}
% LDRB R1,bank:MOV R0,#112:SWI &06
}' ADR R0,block1:ADR R1,block2:SWI 49
} LDR R10,block2
}(
 BL backg
}2 BL print_score:BL End
}< MOV R0,#19:SWI &06
}F= LDRB R1,bank:MOV R0,#113:� R2,R1,#3:STRB R2,bank:SWI &06
}PE LDRB R4,count:ADD R4,R4,#2:STRB R4,count:CMP R4,#256:BNE screen4
��* LDRB R4,lives:MOV R4,#3:STRB R4,lives
��, LDRB R4,CZball:MOV R4,#1:STRB R4,CZball
��* LDRB R4,level:MOV R4,#0:STRB R4,level
�) LDRB R4,move:MOV R4,#20:STRB R4,move
�* LDRB R4,stage:MOV R4,#0:STRB R4,stage
�* LDRB R4,count:MOV R4,#0:STRB R4,count
�� LDMFD R13!,{PC}
��.End:STMFD R13!,{R14}
�� LDR R5,over1
��0 MOV R1,R10:ADD R1,R1,R5:BL Branch_alientab1
�� MOV R2,#15
��@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�� LDR R5,over2
�� MOV R1,R10:ADD R1,R1,R5
�� MOV R2,#16
�@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
� LDR R5,over3
� MOV R1,R10:ADD R1,R1,R5
�& MOV R2,#17
�0@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�: LDR R5,over4
�D MOV R1,R10:ADD R1,R1,R5
�N MOV R2,#18
�X@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�b LDR R5,over5
�l MOV R1,R10:ADD R1,R1,R5
�v MOV R2,#19
��@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�� LDR R5,over6
�� MOV R1,R10:ADD R1,R1,R5
�� MOV R2,#20
��@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�� LDR R5,over7
�� MOV R1,R10:ADD R1,R1,R5
�� MOV R2,#21
��@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�� LDR R5,over8
�� MOV R1,R10:ADD R1,R1,R5
�� MOV R2,#22
��@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�� LDMFD R13!,{PC}
��.over1 EQUD 10*1280+16
��.over2 EQUD 10*1280+32
��.over3 EQUD 10*1280+48
��.over4 EQUD 10*1280+64
��.over5 EQUD 10*1280+80
��.over6 EQUD 10*1280+96
��.over7 EQUD 10*1280+112
��.over8 EQUD 10*1280+128
��.count EQUB 0:ALIGN
�RX.SPR4 EQUD T%(4):.SPR5 EQUD T%(5):.SPR6 EQUD T%(6):.SPR7 EQUD T%(7):.SPR8 EQUD T%(8)
�S+.level EQUB 0:ALIGN:.stage EQUB 0:ALIGN
�@.shoot:STMFD R13!,{R14}
�J& LDRB R3,bullet:CMP R3,#1:BEQ fire
�T< MOV R0,#129:MOV R1,#&97:MOV R2,#255:SWI &06:CMP R2,#255
�VC LDREQ R5,man:ADDEQ R5,R5,#1280:ADDEQ R5,R5,#4:STREQ R5,Xbullet
�X ;LDRB R3,jump:;CMP R3,#1
�Z( ;�Q R0,#1:;�Q R1,#4:;RSBEQ R1,R1,#0
�\1 ;�Q R2,#50:;�Q R3,#15:;SWIEQ "Sound_Control"
�^ BNE zeroids
�	.fire
�	, LDRB R3,bullet:MOV R3,#1:STRB R3,bullet
�
  LDR R5,Xbullet:ADD R5,R5,#4
�+ LDR R4,Cbullet:ADD R4,R4,#1:CMP R4,#32
�/ LDREQB R3,bullet:�Q R3,#0:STREQB R3,bullet
�- LDREQB R6,step:�Q R6,#255:STREQB R6,step
�
 �Q R4,#0
�J STR R4,Cbullet:STR R5,Xbullet:;LDRB R3,bullet:;CMP R3,#0:;BEQ zeroids
�+ LDRB R6,step:SUB R6,R6,#5:STRB R6,step
�X LDRB R3,jump:CMP R3,#1
�]+ MOVNE R0,#1:MOVNE R1,#4:RSBNE R1,R1,#0
�b0 MOVNE R2,R6:MOVNE R3,#1:SWI "Sound_Control"
�l.zeroids
��D LDRB R7,Wpath:ADD R7,R7,#1:CMP R7,#50:MOVGT R7,#1:STRB R7,Wpath
��. CMP R7,#26:LDRLT R4,Zbally:ADDLT R4,R4,#5
��< CMP R7,#25:LDRGT R4,Zbally:SUBGT R4,R4,#5:STR R4,Zbally
��.PZball:;*************
�� LDRB R8,CZball
�� LDR R3,Zball:SUB R3,R3,R8
��- CMN R3,#1280:MOVLT R3,#1280:STR R3,Zball
�r CMP R8,#1:BEQ bounce1:CMP R8,#2:BEQ bounce2:CMP R8,#3:BEQ bounce3:CMP R8,#4:BEQ bounce4:CMP R8,#5:BEQ bounce5
� CMP R8,#5:BEQ bounce5
�D.bounce1
�N LDRB R7,Wball
�X CMP R7,#5:LDRLT R2,SPR14
�b CMP R7,#4:LDRGT R2,SPR16
��
 B PRball
��.bounce2
�� LDRB R7,Wball
�� CMP R7,#5:LDRLT R2,SPR19
�� CMP R7,#4:LDRGT R2,SPR20
��
 B PRball
��.bounce3
�� LDRB R7,Wball
�� CMP R7,#5:LDRLT R2,SPR21
�� CMP R7,#4:LDRGT R2,SPR22
�
 B PRball
�.bounce4
� LDRB R7,Wball
�  CMP R7,#5:LDRLT R2,SPR23
�* CMP R7,#4:LDRGT R2,SPR24
�4
 B PRball
�>.bounce5
�H LDRB R7,Wball
�R CMP R7,#5:LDRLT R2,SPR25
�\ CMP R7,#4:LDRGT R2,SPR26
�d4.PRball:MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea
�n1 LDR R3,Zball:LDR R4,Zbally:MOV R5,#8:SWI &2E
��
.tihObjet
��* LDRB R5,bullet:CMP R5,#0:BEQ EndShoot
�� LDR R5,Xbullet
�� MOV R1,R10:ADD R1,R1,R5
�� ADD R1,R1,#6*160
�� LDRB R0,[R1]
� CMP R0,#119:BEQ hit
�	 ADD R1,R1,#4
� CMP R0,#119:BEQ hit
�+ LDMFD R13!,{PC}
��.hit
��* LDRB R7,Wpath:MOV R7,#0:STRB R7,Wpath
��+ LDR R7,Zball:MOV R7,#1408:STR R7,Zball
��, LDR R7,Zbally:MOV R7,#129:STR R7,Zbally
��< LDR R7,Cbullet:LDR R9,score1:ADD R9,R9,R7:STR R9,score1
��6 LDR R8,digit4:CMP R9,R8:MOVGT R9,#0:STR R9,score1
�� MOV R7,#0:STR R7,Cbullet
��, LDRB R7,bullet:MOV R7,#0:STRB R7,bullet
��  LDRB R7,CZball:ADD R7,R7,#1
�� CMP R7,#5:MOVGT R7,#1
�4 LDRGTB R8,level:ADDGT R8,R8,#1::STRGTB R8,level
�
- LDRB R9,stage:ADD R9,R9,#1:STRB R9,stage
�(G LDRB R8,level:CMP R8,#1:LDRGTB R6,move:MOVGT R6,#24:STRGTB R6,move
�2I LDRB R9,stage:CMP R9,#5:LDREQ R6,Oball:�Q R6,#14*1280:STREQ R6,Oball
�n STRB R7,CZball
�3.EndShoot:LDMFD R13!,{PC}
�4-.bullet EQUB 0:ALIGN:.CZball EQUB 1:ALIGN
�5).Xbullet EQUD 24*1280:.Cbullet EQUD 0
�6.WZball EQUB 0:ALIGN
�7).SPR19 EQUD T%(19):.SPR20 EQUD T%(20)
�8).SPR21 EQUD T%(21):.SPR22 EQUD T%(22)
�9).SPR23 EQUD T%(23):.SPR24 EQUD T%(24)
�:).SPR25 EQUD T%(25):.SPR26 EQUD T%(26)
�;.score1 EQUD 0
��.tih_man:STMFD R13!,{R14}
��& LDR R3,wall:CMP R3,#192:BGT test1
�� CMP R3,#20:BLT test1
�� MOV R5,#24*1280
��A LDR R4,man:CMP R4,R5:LDRGTB R8,end:MOVGT R8,#2:STRGTB R8,end
��3 LDRGTB R8,lives:SUBGT R8,R8,#1:STRGTB R8,lives
��
.test1
��& LDR R3,ball:CMP R3,#188:BGT test2
�� CMP R3,#80:BLT test2
�� MOV R5,#23*1280
��A LDR R4,man:CMP R4,R5:LDRGTB R8,end:MOVGT R8,#2:STRGTB R8,end
��3 LDRGTB R8,lives:SUBGT R8,R8,#1:STRGTB R8,lives
��
.test2
��' LDR R3,Zball:CMP R3,#188:BGT test3
�� CMP R3,#80:BLT test3
��& LDRB R8,end:MOV R8,#2:STRB R8,end
��- LDRB R8,lives:SUB R8,R8,#1:STRB R8,lives
��
.test3
��' LDR R3,Oball:CMP R3,#188:BGT test4
�� CMP R3,#120:BLT test4
��# MOV R5,#24*1280:ADD R5,R5,#336
��? LDR R4,man:CMP R4,R5:LDRNE R8,end:MOVNE R8,#2:STRNE R8,end
��1 LDRNE R8,lives:SUBNE R8,R8,#1:STRNE R8,lives
��
.test4
�g
.GoldTest
�h( LDR R3,gold:CMP R3,#176:BGT EndTest
�m CMP R3,#32:BLT EndTest
�o MOV R5,#24*1280
�r% LDR R4,man:CMP R4,R5:BLT EndTest
�w* LDRB R7,GoldSpr:CMP R7,#1:BEQ EndTest
�x MOV R7,#1:STRB R7,GoldSpr
�|. LDRB R7,Cenergy:MOV R7,#3:STRB R7,Cenergy
��< LDRB R8,energy:LDR R7,score1:ADD R7,R7,R8:STR R7,score1
��6 LDR R9,digit4:CMP R7,R9:MOVGT R7,#0:STR R7,score1
��- LDRB R8,energy:MOV R8,#99:STRB R8,energy
��.EndTest:LDMFD R13!,{PC}
�F.ColWall EQUB 0:ALIGN
�G.man EQUD 24*1280+336
�H.hat EQUD 24*1280+336+16
�P.Pman:STMFD R13!,{R14}
�U LDR R5,man
�ZB MOV R1,R10:ADD R1,R1,R5:ADR R12,aliensprite:ADR R11,alientab1
�d LDRB R8,Wman
�e* CMP R8,#1:�Q R2,#1:CMP R8,#2:�Q R2,#1
�f* CMP R8,#3:�Q R2,#2:CMP R8,#4:�Q R2,#2
�g* CMP R8,#5:�Q R2,#3:CMP R8,#6:�Q R2,#3
�h* CMP R8,#7:�Q R2,#4:CMP R8,#8:�Q R2,#4
�i+ CMP R8,#9:�Q R2,#5:CMP R8,#10:�Q R2,#5
�n@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien32
�s# ;************ HAT  ***********
�x+ LDR R5,man:SUB R5,R5,#640:ADD R5,R5,#4
ÂD MOV R1,R10:ADD R1,R1,R5:;ADR R12,aliensprite:;ADR R11,alientab1
Ì MOV R2,#6
à@ LDR R0,[R11,R2,LSL#2]:ADD R0,R0,R12:ADD R0,R0,#8:BL alien16
â% ;************ BULLET ***********
å LDRB R3,bullet:CMP R3,#1
ç LDREQ R5,Xbullet
ê �Q R1,R10:ADDEQ R1,R1,R5
ô
 �Q R2,#7
þH LDREQ R0,[R11,R2,LSL#2]:ADDEQ R0,R0,R12:ADDEQ R0,R0,#8:BLEQ alien16
� LDMFD R13!,{PC}
�.Dman:STMFD R13!,{R14}
�9 MOV R0,#512:ADD R0,R0,#34:LDRB R1,SpArea:LDR R2,SPR6
�"0 LDRB R3,manx:LDRB R4,many:MOV R5,#8:SWI &2E
�,J SUB R4,R4,#1:CMP R4,#1:LDREQB R7,GameOver:�Q R7,#1:STREQB R7,GameOver
�6 STRB R4,many
�C LDMFD R13!,{PC}
�..GameOver EQUB 0:ALIGN
�/-.manx EQUB 128:ALIGN:.many EQUB 129:ALIGN
�8!.print_score:STMFD R13!,{R14}
�B, ;MOV R0,#0:;SWI 256+17:;SWI "OS_WriteC"
�Z SWI 256+31
�d9 MOV R0,#7:SWI "OS_WriteC":MOV R0,#30:SWI "OS_WriteC"
�n LDRB R5,lives:MOV R0,R5
�x ADR R1,buffer:MOV R2,#8
Ȃ. SWI "OS_ConvertCardinal1":SWI "OS_Write0"
�6 SWI 256+31
�@: MOV R0,#20:SWI "OS_WriteC":MOV R0,#30:SWI "OS_WriteC"
�T ;SWI 256+9
�^ ADR R0,sc%:SWI "OS_Write0"
�h LDR R5,score1:MOV R0,R5
�r ADR R1,buffer
�| MOV R2,#8
Ɇ SWI "OS_ConvertCardinal2"
ɐ? CMP R5,#10:SWILT 256+127:SWILT "OS_Write0":BLT PrintEnergy
ɚN CMP R5,#100:SWILT 256+127:SWILT 256+127:SWILT "OS_Write0":BLT PrintEnergy
ɤ= MOV R9,#250:ADD R9,R9,#250:ADD R9,R9,#250:ADD R9,R9,#250
ɮZ CMP R5,R9:SWILT 256+127:SWILT 256+127:SWILT 256+127:SWILT "OS_Write0":BLT PrintEnergy
ɸD SWI 256+127:SWI 256+127:SWI 256+127:SWI 256+127:SWI "OS_Write0"
��.PrintEnergy
�v SWI 256+31
ʀ: MOV R0,#37:SWI "OS_WriteC":MOV R0,#30:SWI "OS_WriteC"
ʔ LDRB R5,energy:MOV R0,R5
ʞ ADR R1,buffer
ʨ MOV R2,#8
ʲ. SWI "OS_ConvertCardinal1":SWI "OS_Write0"
�� LDMFD R13!,{PC}
�� .sc% EQUS"0000":EQUB 0:ALIGN
��.buffer EQUD 64
��.digit3 EQUD 4*250
��.digit4 EQUD 7*1280+2*520-1
��.lives EQUB 3:ALIGN
ި$.alien16:STMFD R13!,{R0-R12,R14}
޲1 STR R13,R13store2:MOV R2,#16:STR R2,counter2
޼.alien16loop
��| LDMIA R0!,{R2-R5}:LDMIA R1,{R10-R11}:� R3,R3,R10:� R5,R5,R11:�R R2,R2,R3:�R R3,R4,R5:STMIA R1!,{R2-R3}:ADD R1,R1,#160-8
��B LDR R2,counter2:SUBS R2,R2,#1:STR R2,counter2:BNE alien16loop
�� LDR R13,R13store2
�� LDMFD R13!,{R0-R12,PC}
�,$.alien32:STMFD R13!,{R0-R12,R14}
�11 STR R13,R13store2:MOV R2,#32:STR R2,counter2
�6.alien32loop
�;) LDMIA R0!,{R2-R9}:LDMIA R1,{R10-R13}
�@4 � R3,R3,R10:� R5,R5,R11:� R7,R7,R12:� R9,R9,R13
�E4 �R R2,R2,R3:�R R3,R4,R5:�R R4,R6,R7:�R R5,R8,R9
�J( STMIA R1!,{R2-R5}:ADD R1,R1,#160-16
�OB LDR R2,counter2:SUBS R2,R2,#1:STR R2,counter2:BNE alien32loop
�T LDR R13,R13store2
�Y LDMFD R13!,{R0-R12,PC}
�^&.R13store2 EQUD 0:.counter2 EQUD 0
�&.Branch_alientab1:STMFD R13!,{R14}
�* ADR R12,aliensprite:ADR R11,alientab1
� LDMFD R13!,{PC}
�".alientab1:]:P%+=100:[OPT pass
�%.aliensprite:]:P%+=3750:[OPT pass
��]:�pass
�� �
�� ��high_sc
�	 � T%
� HSC%(5)=�(HSC$(5))
�! �(SC$)<=�(HSC$(5)) � � �x^c
� �input
�& HSC$(5)=SC$:NSC$(5)=B$
�0	 T%=4
�: �
�D  �(HSC$(T%+1))>�(HSC$(T%))�
�N Ȕ HSC$(T%+1),HSC$(T%)
�X Ȕ NSC$(T%+1),NSC$(T%)
�b �
�l	 T%=1
�v �
�
 T%-=1
�
 �T%=0
�
 � CLS
� �
� :
� ��input
��
 *FX 21,0
�� hsc2%=0:hsc1%=21
�� �I%=1�10:N$(I%)="":�:B$=""
��' �6,10);"Enter Up To 6 Characters"
��% �6,14);"Enter Your Name ......"
� �
�	 A$=�
� �(-90) �backsp:�Xtd
� �hsc2%>6 �backsp:�Xtd
� 0 hsc1%+=1:hsc2%+=1:N$(hsc2%)=A$:c$=N$(hsc2%)
�*
 hsc1%=21
�/7 I%=0:�:I%+=1:hsc1%+=1:�hsc1%,14);N$(I%):�I%=hsc2%
�4
 � �(-74)
�>) I%=0:�:I%+=1:B$=B$+N$(I%):� I%=hsc2%
�H �
�M :
�R
 ��backsp
�\ �hsc1%<22 � �
�f  N$(hsc2%)=".":hsc1%=21:I%=0
�p �
�z& I%+=1:hsc1%+=1:�hsc1%,14);N$(I%)
� �I%=hsc2%
� hsc2%-=1:hsc1%-=1:I%=0
� �
� ��rectangle
� �0
�� �7:ȓ Ȑ 0,180,1280,650
�� �
�� :
�� ��print_out
�� �rectangle
� � LOCAL I%,P%
�
 �12
�  �10,7);"High-Score  Table"
�  �10,8);"-----------------"
� �0
�
 P%=11
� �I%=1�5
�$/ �10,P%);NSC$(I%);�23,P%);HSC$(I%):P%=P%+2
�. �
�2 �5
�3" �9,26);"Press X Key To Play"
�8 �
�B :
�L
 ��one
�V0 NSC$(1)="------":HSC$(1)="----":NUM$(1)="1"
�`0 NSC$(2)="------":HSC$(2)="----":NUM$(2)="2"
�j0 NSC$(3)="------":HSC$(3)="----":NUM$(3)="3"
�t0 NSC$(4)="------":HSC$(4)="----":NUM$(4)="4"
�~0 NSC$(5)="------":HSC$(5)="----":NUM$(5)="5"
� �
� :
� ��save_disc
� � N%,I%
��	 N%=5
�� handle=�("HISCORE")
�� �#handle,N%
�� I%=0:�:I%+=1
��( �#handle,NUM$(I%),NSC$(I%),HSC$(I%)
� � I%>=5
� �#0
�
 �
� :
� ��disc
�( � N%,I%
�2	 N%=5
�< handle=�("HISCORE")
�F �#handle,N%
�P I%=0:�:I%+=1
�Z( �#handle,NUM$(I%),NSC$(I%),HSC$(I%)
�d � I%>=5
�n �#0
�x �
�`
 ��finish
�jW �"If There Is Anybody In The Dorset/South Coast Region Interested In Armcoding.":�
�tO �"Any Musicians Out There, Who Would Like There Masterpiece Included As A"
�~, �"Backacking Track For My Next Game.":�
�; �"Please Contact Me!!!! Geoff Holland (0258) 452507":�
�> �"                          Hope You Enjoyed The Game.":�
� �
� �save_disc
�� �
�H ��sprites
�R8 � sp% &30000:!sp%=&30000:sp%!4=0:sp%!8=16:sp%!12=16
�\$ ș "OS_SpriteOp",266,sp%,"Data"
�p
 �init
�z � PROCscreen1
� �
� ��init
�
 � T%(50)
�
 �I%=1�36
��6 ș "OS_SpriteOp",256+24,sp%,"ob"+�(I%) � ,,T%(I%)
�� �
�� �
� ��screen1
� �9
�. *PRINT !Palette1
�8 � 128+7:� 4
�B �
�L �
�0- ș "OS_SpriteOp",546,sp%,T%(4),250,500,0
�:- ș "OS_SpriteOp",546,sp%,T%(5),350,499,0
�D- ș "OS_SpriteOp",546,sp%,T%(6),450,500,0
�N- ș "OS_SpriteOp",546,sp%,T%(7),640,500,0
�X- ș "OS_SpriteOp",546,sp%,T%(8),750,500,0
�b- ș "OS_SpriteOp",546,sp%,T%(5),850,499,0
�l- ș "OS_SpriteOp",546,sp%,T%(9),950,500,0
�+ �6,30);"Please Wait For Data To Load"
� � REPEAT:UNTIL INKEY(-99)
� �
�

00000000  0d 00 0a 11 20 2a 4b 45  59 31 20 4d 4f 44 45 31  |.... *KEY1 MODE1|
00000010  32 0d 00 0c 0d 20 2a 52  4d 43 4c 45 41 52 0d 00  |2.... *RMCLEAR..|
00000020  0f 1c 20 c8 99 22 4f 53  5f 55 70 64 61 74 65 4d  |.. .."OS_UpdateM|
00000030  45 4d 43 22 2c 36 34 2c  36 34 0d 00 14 07 20 eb  |EMC",64,64.... .|
00000040  30 0d 00 15 06 20 87 0d  00 16 0d 20 f2 73 70 72  |0.... ..... .spr|
00000050  69 74 65 73 0d 00 19 08  20 d4 20 ee 0d 00 1e 29  |ites.... . ....)|
00000060  20 de 20 53 43 24 28 31  30 29 2c 4e 53 43 24 28  | . SC$(10),NSC$(|
00000070  31 30 29 2c 48 53 43 24  28 31 30 29 2c 4e 55 4d  |10),HSC$(10),NUM|
00000080  24 28 31 30 29 0d 00 28  16 20 de 20 48 53 43 25  |$(10)..(. . HSC%|
00000090  28 31 30 29 2c 4e 24 28  32 30 29 0d 00 5a 0f 20  |(10),N$(20)..Z. |
000000a0  2a 4c 4f 41 44 20 73 63  72 32 0d 00 c8 0a 20 f2  |*LOAD scr2.... .|
000000b0  64 69 73 63 0d 01 2c 0e  20 f2 61 73 73 65 6d 62  |disc..,. .assemb|
000000c0  6c 65 0d 01 90 24 20 ff  22 4c 4f 41 44 20 41 4c  |le...$ ."LOAD AL|
000000d0  49 45 4e 43 4f 4e 20 22  2b c3 7e 61 6c 69 65 6e  |IENCON "+.~alien|
000000e0  73 70 72 69 74 65 0d 01  9a 20 20 ff 20 22 4c 4f  |sprite...  . "LO|
000000f0  41 44 20 54 41 42 4c 45  20 22 2b c3 7e 61 6c 69  |AD TABLE "+.~ali|
00000100  65 6e 74 61 62 31 0d 03  20 09 20 c8 a0 20 31 0d  |entab1.. . .. 1.|
00000110  03 2a 18 20 f4 20 2a 43  48 41 4e 4e 45 4c 56 4f  |.*. . *CHANNELVO|
00000120  49 43 45 20 32 20 33 0d  03 34 16 20 2a 43 48 41  |ICE 2 3..4. *CHA|
00000130  4e 4e 45 4c 56 4f 49 43  45 20 31 20 33 0d 03 3e  |NNELVOICE 1 3..>|
00000140  0f 20 53 43 24 3d 22 30  30 30 30 22 0d 03 48 0b  |. SC$="0000"..H.|
00000150  20 53 43 52 25 3d 30 0d  03 7a 16 20 ee 20 85 20  | SCR%=0..z. . . |
00000160  eb 31 32 3a f2 66 69 6e  69 73 68 3a e0 0d 03 7b  |.12:.finish:...{|
00000170  07 20 eb 39 0d 03 7c 15  20 2a 50 52 49 4e 54 20  |. .9..|. *PRINT |
00000180  21 50 61 6c 65 74 74 65  32 0d 03 7d 10 20 fb 20  |!Palette2..}. . |
00000190  31 32 38 2b 37 3a fb 20  30 0d 03 7e 06 20 87 0d  |128+7:. 0..~. ..|
000001a0  03 7f 1b 20 f4 20 21 73  63 6f 72 65 31 3d 39 39  |... . !score1=99|
000001b0  39 3a 3f 6c 69 76 65 73  3d 31 0d 03 e8 15 20 e3  |9:?lives=1.... .|
000001c0  58 25 3d 30 b8 31 32 38  30 20 88 20 31 32 38 0d  |X%=0.1280 . 128.|
000001d0  03 f2 2b 20 c8 99 20 22  4f 53 5f 53 70 72 69 74  |..+ .. "OS_Sprit|
000001e0  65 4f 70 22 2c 35 34 36  2c 73 70 25 2c 54 25 28  |eOp",546,sp%,T%(|
000001f0  31 37 29 2c 58 25 2c 30  2c 30 0d 03 fc 2d 20 c8  |17),X%,0,0...- .|
00000200  99 20 22 4f 53 5f 53 70  72 69 74 65 4f 70 22 2c  |. "OS_SpriteOp",|
00000210  35 34 36 2c 73 70 25 2c  54 25 28 31 37 29 2c 58  |546,sp%,T%(17),X|
00000220  25 2c 39 30 30 2c 30 0d  04 06 06 20 ed 0d 04 10  |%,900,0.... ....|
00000230  1c 20 e6 37 3a c8 93 20  c8 90 20 30 2c 31 32 30  |. .7:.. .. 0,120|
00000240  2c 31 32 38 30 2c 37 38  30 0d 04 15 0b 20 59 25  |,1280,780.... Y%|
00000250  3d 39 31 30 0d 04 1a 2d  20 c8 99 20 22 4f 53 5f  |=910...- .. "OS_|
00000260  53 70 72 69 74 65 4f 70  22 2c 35 34 36 2c 73 70  |SpriteOp",546,sp|
00000270  25 2c 54 25 28 33 33 29  2c 33 32 30 2c 59 25 2c  |%,T%(33),320,Y%,|
00000280  38 0d 04 24 2d 20 c8 99  20 22 4f 53 5f 53 70 72  |8..$- .. "OS_Spr|
00000290  69 74 65 4f 70 22 2c 35  34 36 2c 73 70 25 2c 54  |iteOp",546,sp%,T|
000002a0  25 28 33 34 29 2c 34 37  32 2c 59 25 2c 38 0d 04  |%(34),472,Y%,8..|
000002b0  2e 2d 20 c8 99 20 22 4f  53 5f 53 70 72 69 74 65  |.- .. "OS_Sprite|
000002c0  4f 70 22 2c 35 34 36 2c  73 70 25 2c 54 25 28 33  |Op",546,sp%,T%(3|
000002d0  34 29 2c 35 39 32 2c 59  25 2c 38 0d 04 38 2d 20  |4),592,Y%,8..8- |
000002e0  c8 99 20 22 4f 53 5f 53  70 72 69 74 65 4f 70 22  |.. "OS_SpriteOp"|
000002f0  2c 35 34 36 2c 73 70 25  2c 54 25 28 33 35 29 2c  |,546,sp%,T%(35),|
00000300  37 31 36 2c 59 25 2c 38  0d 04 42 2d 20 c8 99 20  |716,Y%,8..B- .. |
00000310  22 4f 53 5f 53 70 72 69  74 65 4f 70 22 2c 35 34  |"OS_SpriteOp",54|
00000320  36 2c 73 70 25 2c 54 25  28 33 36 29 2c 38 32 30  |6,sp%,T%(36),820|
00000330  2c 59 25 2c 38 0d 04 4c  26 20 f1 8a 37 2c 36 29  |,Y%,8..L& ..7,6)|
00000340  3b 22 41 72 6d 43 6f 64  65 20 42 79 20 47 65 6f  |;"ArmCode By Geo|
00000350  66 66 20 48 6f 6c 6c 61  6e 64 22 0d 04 56 2f 20  |ff Holland"..V/ |
00000360  f1 8a 33 2c 38 29 3b 22  54 68 61 6e 6b 73 20 54  |..3,8);"Thanks T|
00000370  6f 20 4a 6f 68 6e 20 27  54 68 65 20 4f 6e 65 27  |o John 'The One'|
00000380  20 4e 69 63 68 6f 6c 61  73 22 0d 04 60 32 20 f1  | Nicholas"..`2 .|
00000390  8a 32 2c 31 30 29 3b 22  46 72 6f 6d 20 54 68 65  |.2,10);"From The|
000003a0  20 4e 6f 20 31 20 50 44  20 4c 69 62 61 72 79 20  | No 1 PD Libary |
000003b0  27 44 61 74 61 73 74 72  65 6d 27 22 0d 04 6a 0f  |'Datastrem'"..j.|
000003c0  20 f4 20 43 4f 4c 4f 55  52 31 32 0d 04 74 78 20  | . COLOUR12..tx |
000003d0  f1 8a 31 2c 31 33 29 3b  22 54 68 65 20 49 64 65  |..1,13);"The Ide|
000003e0  61 20 4f 66 20 54 68 65  20 47 61 6d 65 20 49 73  |a Of The Game Is|
000003f0  20 54 6f 20 47 72 61 62  20 41 73 20 4d 61 6e 79  | To Grab As Many|
00000400  20 47 6f 6c 64 20 4e 75  67 67 65 74 73 20 41 73  | Gold Nuggets As|
00000410  20 50 6f 73 73 69 62 6c  65 2c 20 42 65 66 6f 72  | Possible, Befor|
00000420  65 20 59 6f 75 72 20 20  20 45 6e 65 72 67 79 20  |e Your   Energy |
00000430  4c 65 76 65 6c 20 45 71  75 61 6c 73 20 5a 65 72  |Level Equals Zer|
00000440  6f 2e 22 0d 04 7e 5d 20  f1 8a 31 2c 31 36 29 3b  |o."..~] ..1,16);|
00000450  22 54 68 65 72 65 20 57  69 6c 6c 20 42 65 20 56  |"There Will Be V|
00000460  61 72 69 6f 75 73 20 4f  62 6a 65 63 74 73 20 49  |arious Objects I|
00000470  6e 20 59 6f 75 72 20 20  20 57 61 79 20 57 68 69  |n Your   Way Whi|
00000480  63 68 20 59 6f 75 20 43  61 6e 20 4a 75 6d 70 20  |ch You Can Jump |
00000490  4f 76 65 72 20 41 6e 64  20 53 68 6f 6f 74 2e 22  |Over And Shoot."|
000004a0  0d 04 83 0f 20 f4 20 43  4f 4c 4f 55 52 31 34 0d  |.... . COLOUR14.|
000004b0  04 88 14 20 f1 8a 31 36  2c 32 30 29 3b 22 4b 45  |... ..16,20);"KE|
000004c0  59 53 22 0d 04 8d 14 20  f1 8a 31 36 2c 32 31 29  |YS".... ..16,21)|
000004d0  3b 22 2d 2d 2d 2d 22 0d  04 92 28 20 f1 8a 37 2c  |;"----"...( ..7,|
000004e0  32 33 29 3b 22 58 20 52  69 67 68 74 2e 20 27 20  |23);"X Right. ' |
000004f0  4a 75 6d 70 2e 20 2f 20  53 68 6f 6f 74 2e 22 0d  |Jump. / Shoot.".|
00000500  04 9c 07 20 fb 35 0d 04  a6 23 20 f1 8a 31 30 2c  |... .5...# ..10,|
00000510  32 36 29 3b 22 50 72 65  73 73 20 58 20 4b 65 79  |26);"Press X Key|
00000520  20 54 6f 20 50 6c 61 79  22 0d 0b ae 07 20 fb 30  | To Play".... .0|
00000530  0d 0f 8c 0f 20 f5 3a fd  20 a6 28 2d 36 37 29 0d  |.... .:. .(-67).|
00000540  0f 96 0c 20 d6 20 63 6f  64 65 25 0d 0f 9f 0d 20  |... . code%.... |
00000550  2a 46 58 20 32 31 2c 30  0d 0f a0 1c 20 e6 37 3a  |*FX 21,0.... .7:|
00000560  c8 93 20 c8 90 20 30 2c  31 32 30 2c 31 32 38 30  |.. .. 0,120,1280|
00000570  2c 37 37 30 0d 0f aa 29  20 53 43 52 25 3d bb 28  |,770...) SCR%=.(|
00000580  53 43 24 29 3a 53 43 52  25 3d 21 73 63 6f 72 65  |SC$):SCR%=!score|
00000590  31 3a 53 43 24 3d c3 28  53 43 52 25 29 0d 0f b4  |1:SC$=.(SCR%)...|
000005a0  2c 20 e7 bb 28 53 43 24  29 3e 3d 31 30 20 80 20  |, ..(SC$)>=10 . |
000005b0  bb 28 53 43 24 29 3c 31  30 30 20 8c 20 53 43 24  |.(SC$)<100 . SC$|
000005c0  3d 22 30 30 22 2b 53 43  24 0d 0f be 2d 20 e7 bb  |="00"+SC$...- ..|
000005d0  28 53 43 24 29 3e 3d 31  30 30 20 80 20 bb 28 53  |(SC$)>=100 . .(S|
000005e0  43 24 29 3c 31 30 30 30  20 8c 20 53 43 24 3d 22  |C$)<1000 . SC$="|
000005f0  30 22 2b 53 43 24 0d 0f  c8 0d 20 f2 68 69 67 68  |0"+SC$.... .high|
00000600  5f 73 63 0d 0f d2 0f 20  f2 70 72 69 6e 74 5f 6f  |_sc.... .print_o|
00000610  75 74 0d 10 18 10 20 f4  20 3f 43 5a 62 61 6c 6c  |ut.... . ?CZball|
00000620  3d 31 0d 10 22 0f 20 f4  20 3f 6c 69 76 65 73 3d  |=1..". . ?lives=|
00000630  33 0d 13 74 0e 20 f4 20  3f 62 61 6e 6b 3d 31 0d  |3..t. . ?bank=1.|
00000640  13 7e 0f 20 f5 3a fd 20  a6 28 2d 36 37 29 0d 13  |.~. .:. .(-67)..|
00000650  85 0e 20 21 73 63 6f 72  65 31 3d 30 0d 13 87 0b  |.. !score1=0....|
00000660  20 e5 20 8d 74 56 4f 0d  27 10 0f 20 dd f2 61 73  | . .tVO.'.. ..as|
00000670  73 65 6d 62 6c 65 0d 27  1a 12 20 de 20 63 6f 64  |semble.'.. . cod|
00000680  65 25 20 35 30 30 30 30  0d 27 24 14 20 e3 70 61  |e% 50000.'$. .pa|
00000690  73 73 3d 30 20 b8 20 32  20 88 20 32 0d 27 2e 0d  |ss=0 . 2 . 2.'..|
000006a0  20 50 25 3d 63 6f 64 65  25 0d 27 38 0e 20 5b 4f  | P%=code%.'8. [O|
000006b0  50 54 20 70 61 73 73 0d  27 74 1b 2e 73 74 61 72  |PT pass.'t..star|
000006c0  74 3a 53 54 4d 46 44 20  52 31 33 21 2c 7b 52 31  |t:STMFD R13!,{R1|
000006d0  34 7d 0d 27 7e 28 20 4c  44 52 42 20 52 31 2c 62  |4}.'~( LDRB R1,b|
000006e0  61 6e 6b 3a 4d 4f 56 20  52 31 2c 23 31 3a 53 54  |ank:MOV R1,#1:ST|
000006f0  52 42 20 52 31 2c 62 61  6e 6b 0d 27 83 2d 20 3b  |RB R1,bank.'.- ;|
00000700  4c 44 52 20 52 31 2c 73  63 6f 72 65 31 3a 3b 4d  |LDR R1,score1:;M|
00000710  4f 56 20 52 31 2c 23 30  3a 3b 53 54 52 20 52 31  |OV R1,#0:;STR R1|
00000720  2c 73 63 6f 72 65 31 0d  27 88 12 20 42 4c 20 73  |,score1.'.. BL s|
00000730  63 72 65 65 6e 61 64 64  31 0d 27 92 14 20 4c 44  |creenadd1.'.. LD|
00000740  4d 46 44 20 52 31 33 21  2c 7b 50 43 7d 0d 27 9c  |MFD R13!,{PC}.'.|
00000750  20 2e 54 6f 70 53 63 72  65 65 6e 3a 3a 53 54 4d  | .TopScreen::STM|
00000760  46 44 20 52 31 33 21 2c  7b 52 31 34 7d 0d 27 a6  |FD R13!,{R14}.'.|
00000770  26 20 4d 4f 56 20 52 35  2c 23 30 3a 4d 4f 56 20  |& MOV R5,#0:MOV |
00000780  52 31 2c 52 31 30 3a 41  44 44 20 52 31 2c 52 31  |R1,R10:ADD R1,R1|
00000790  2c 52 35 0d 27 b5 20 20  4d 4f 56 20 52 30 2c 23  |,R5.'.  MOV R0,#|
000007a0  33 39 33 32 31 36 3a 41  44 44 20 52 30 2c 52 30  |393216:ADD R0,R0|
000007b0  2c 23 38 0d 27 ce 0f 20  4d 4f 56 20 52 32 2c 23  |,#8.'.. MOV R2,#|
000007c0  39 36 0d 27 d8 0d 2e 74  6f 70 6c 6f 6f 70 31 0d  |96.'...toploop1.|
000007d0  27 e2 27 20 4c 44 4d 49  41 20 52 30 21 2c 7b 52  |'.' LDMIA R0!,{R|
000007e0  34 2d 52 37 7d 3a 53 54  4d 49 41 20 52 31 2c 7b  |4-R7}:STMIA R1,{|
000007f0  52 34 2d 52 37 7d 0d 27  ec 13 20 41 44 44 20 52  |R4-R7}.'.. ADD R|
00000800  31 2c 52 31 2c 23 31 36  30 0d 27 f6 1f 20 53 55  |1,R1,#160.'.. SU|
00000810  42 53 20 52 32 2c 52 32  2c 23 31 3a 42 4e 45 20  |BS R2,R2,#1:BNE |
00000820  74 6f 70 6c 6f 6f 70 31  0d 28 00 24 20 53 55 42  |toploop1.(.$ SUB|
00000830  20 52 31 2c 52 31 2c 23  39 36 2a 31 36 30 3a 41  | R1,R1,#96*160:A|
00000840  44 44 20 52 31 2c 52 31  2c 23 31 36 0d 28 0a 1e  |DD R1,R1,#16.(..|
00000850  20 4c 44 52 20 52 30 2c  6f 66 66 73 65 74 31 3a  | LDR R0,offset1:|
00000860  4d 4f 56 20 52 32 2c 23  39 36 0d 28 0f 0d 2e 74  |MOV R2,#96.(...t|
00000870  6f 70 6c 6f 6f 70 32 0d  28 14 36 20 4c 44 4d 49  |oploop2.(.6 LDMI|
00000880  41 20 52 30 21 2c 7b 52  34 2d 52 37 7d 3a 53 54  |A R0!,{R4-R7}:ST|
00000890  4d 49 41 20 52 31 2c 7b  52 34 2d 52 37 7d 3a 41  |MIA R1,{R4-R7}:A|
000008a0  44 44 20 52 31 2c 52 31  2c 23 31 36 30 0d 28 19  |DD R1,R1,#160.(.|
000008b0  1f 20 53 55 42 53 20 52  32 2c 52 32 2c 23 31 3a  |. SUBS R2,R2,#1:|
000008c0  42 4e 45 20 74 6f 70 6c  6f 6f 70 32 0d 28 1e 24  |BNE toploop2.(.$|
000008d0  20 53 55 42 20 52 31 2c  52 31 2c 23 39 36 2a 31  | SUB R1,R1,#96*1|
000008e0  36 30 3a 41 44 44 20 52  31 2c 52 31 2c 23 31 36  |60:ADD R1,R1,#16|
000008f0  0d 28 23 1e 20 4c 44 52  20 52 30 2c 6f 66 66 73  |.(#. LDR R0,offs|
00000900  65 74 32 3a 4d 4f 56 20  52 32 2c 23 39 36 0d 28  |et2:MOV R2,#96.(|
00000910  28 0d 2e 74 6f 70 6c 6f  6f 70 33 0d 28 2d 36 20  |(..toploop3.(-6 |
00000920  4c 44 4d 49 41 20 52 30  21 2c 7b 52 34 2d 52 37  |LDMIA R0!,{R4-R7|
00000930  7d 3a 53 54 4d 49 41 20  52 31 2c 7b 52 34 2d 52  |}:STMIA R1,{R4-R|
00000940  37 7d 3a 41 44 44 20 52  31 2c 52 31 2c 23 31 36  |7}:ADD R1,R1,#16|
00000950  30 0d 28 32 1f 20 53 55  42 53 20 52 32 2c 52 32  |0.(2. SUBS R2,R2|
00000960  2c 23 31 3a 42 4e 45 20  74 6f 70 6c 6f 6f 70 33  |,#1:BNE toploop3|
00000970  0d 28 37 24 20 53 55 42  20 52 31 2c 52 31 2c 23  |.(7$ SUB R1,R1,#|
00000980  39 36 2a 31 36 30 3a 41  44 44 20 52 31 2c 52 31  |96*160:ADD R1,R1|
00000990  2c 23 31 36 0d 28 3c 1e  20 4c 44 52 20 52 30 2c  |,#16.(<. LDR R0,|
000009a0  6f 66 66 73 65 74 33 3a  4d 4f 56 20 52 32 2c 23  |offset3:MOV R2,#|
000009b0  39 36 0d 28 41 0d 2e 74  6f 70 6c 6f 6f 70 34 0d  |96.(A..toploop4.|
000009c0  28 46 36 20 4c 44 4d 49  41 20 52 30 21 2c 7b 52  |(F6 LDMIA R0!,{R|
000009d0  34 2d 52 37 7d 3a 53 54  4d 49 41 20 52 31 2c 7b  |4-R7}:STMIA R1,{|
000009e0  52 34 2d 52 37 7d 3a 41  44 44 20 52 31 2c 52 31  |R4-R7}:ADD R1,R1|
000009f0  2c 23 31 36 30 0d 28 4b  1f 20 53 55 42 53 20 52  |,#160.(K. SUBS R|
00000a00  32 2c 52 32 2c 23 31 3a  42 4e 45 20 74 6f 70 6c  |2,R2,#1:BNE topl|
00000a10  6f 6f 70 34 0d 28 50 24  20 53 55 42 20 52 31 2c  |oop4.(P$ SUB R1,|
00000a20  52 31 2c 23 39 36 2a 31  36 30 3a 41 44 44 20 52  |R1,#96*160:ADD R|
00000a30  31 2c 52 31 2c 23 31 36  0d 28 55 1e 20 4c 44 52  |1,R1,#16.(U. LDR|
00000a40  20 52 30 2c 6f 66 66 73  65 74 34 3a 4d 4f 56 20  | R0,offset4:MOV |
00000a50  52 32 2c 23 39 36 0d 28  5a 0d 2e 74 6f 70 6c 6f  |R2,#96.(Z..toplo|
00000a60  6f 70 35 0d 28 5f 36 20  4c 44 4d 49 41 20 52 30  |op5.(_6 LDMIA R0|
00000a70  21 2c 7b 52 34 2d 52 37  7d 3a 53 54 4d 49 41 20  |!,{R4-R7}:STMIA |
00000a80  52 31 2c 7b 52 34 2d 52  37 7d 3a 41 44 44 20 52  |R1,{R4-R7}:ADD R|
00000a90  31 2c 52 31 2c 23 31 36  30 0d 28 64 1f 20 53 55  |1,R1,#160.(d. SU|
00000aa0  42 53 20 52 32 2c 52 32  2c 23 31 3a 42 4e 45 20  |BS R2,R2,#1:BNE |
00000ab0  74 6f 70 6c 6f 6f 70 35  0d 28 69 24 20 53 55 42  |toploop5.(i$ SUB|
00000ac0  20 52 31 2c 52 31 2c 23  39 36 2a 31 36 30 3a 41  | R1,R1,#96*160:A|
00000ad0  44 44 20 52 31 2c 52 31  2c 23 31 36 0d 28 6e 1e  |DD R1,R1,#16.(n.|
00000ae0  20 4c 44 52 20 52 30 2c  6f 66 66 73 65 74 35 3a  | LDR R0,offset5:|
00000af0  4d 4f 56 20 52 32 2c 23  39 36 0d 28 73 0d 2e 74  |MOV R2,#96.(s..t|
00000b00  6f 70 6c 6f 6f 70 36 0d  28 78 36 20 4c 44 4d 49  |oploop6.(x6 LDMI|
00000b10  41 20 52 30 21 2c 7b 52  34 2d 52 37 7d 3a 53 54  |A R0!,{R4-R7}:ST|
00000b20  4d 49 41 20 52 31 2c 7b  52 34 2d 52 37 7d 3a 41  |MIA R1,{R4-R7}:A|
00000b30  44 44 20 52 31 2c 52 31  2c 23 31 36 30 0d 28 7d  |DD R1,R1,#160.(}|
00000b40  1f 20 53 55 42 53 20 52  32 2c 52 32 2c 23 31 3a  |. SUBS R2,R2,#1:|
00000b50  42 4e 45 20 74 6f 70 6c  6f 6f 70 36 0d 28 82 24  |BNE toploop6.(.$|
00000b60  20 53 55 42 20 52 31 2c  52 31 2c 23 39 36 2a 31  | SUB R1,R1,#96*1|
00000b70  36 30 3a 41 44 44 20 52  31 2c 52 31 2c 23 31 36  |60:ADD R1,R1,#16|
00000b80  0d 28 87 1e 20 4c 44 52  20 52 30 2c 6f 66 66 73  |.(.. LDR R0,offs|
00000b90  65 74 36 3a 4d 4f 56 20  52 32 2c 23 39 36 0d 28  |et6:MOV R2,#96.(|
00000ba0  8c 0d 2e 74 6f 70 6c 6f  6f 70 37 0d 28 91 36 20  |...toploop7.(.6 |
00000bb0  4c 44 4d 49 41 20 52 30  21 2c 7b 52 34 2d 52 37  |LDMIA R0!,{R4-R7|
00000bc0  7d 3a 53 54 4d 49 41 20  52 31 2c 7b 52 34 2d 52  |}:STMIA R1,{R4-R|
00000bd0  37 7d 3a 41 44 44 20 52  31 2c 52 31 2c 23 31 36  |7}:ADD R1,R1,#16|
00000be0  30 0d 28 96 1f 20 53 55  42 53 20 52 32 2c 52 32  |0.(.. SUBS R2,R2|
00000bf0  2c 23 31 3a 42 4e 45 20  74 6f 70 6c 6f 6f 70 37  |,#1:BNE toploop7|
00000c00  0d 28 9b 24 20 53 55 42  20 52 31 2c 52 31 2c 23  |.(.$ SUB R1,R1,#|
00000c10  39 36 2a 31 36 30 3a 41  44 44 20 52 31 2c 52 31  |96*160:ADD R1,R1|
00000c20  2c 23 31 36 0d 28 a0 1e  20 4c 44 52 20 52 30 2c  |,#16.(.. LDR R0,|
00000c30  6f 66 66 73 65 74 37 3a  4d 4f 56 20 52 32 2c 23  |offset7:MOV R2,#|
00000c40  39 36 0d 28 a5 0d 2e 74  6f 70 6c 6f 6f 70 38 0d  |96.(...toploop8.|
00000c50  28 aa 36 20 4c 44 4d 49  41 20 52 30 21 2c 7b 52  |(.6 LDMIA R0!,{R|
00000c60  34 2d 52 37 7d 3a 53 54  4d 49 41 20 52 31 2c 7b  |4-R7}:STMIA R1,{|
00000c70  52 34 2d 52 37 7d 3a 41  44 44 20 52 31 2c 52 31  |R4-R7}:ADD R1,R1|
00000c80  2c 23 31 36 30 0d 28 af  1f 20 53 55 42 53 20 52  |,#160.(.. SUBS R|
00000c90  32 2c 52 32 2c 23 31 3a  42 4e 45 20 74 6f 70 6c  |2,R2,#1:BNE topl|
00000ca0  6f 6f 70 38 0d 28 b4 24  20 53 55 42 20 52 31 2c  |oop8.(.$ SUB R1,|
00000cb0  52 31 2c 23 39 36 2a 31  36 30 3a 41 44 44 20 52  |R1,#96*160:ADD R|
00000cc0  31 2c 52 31 2c 23 31 36  0d 28 b9 1e 20 4c 44 52  |1,R1,#16.(.. LDR|
00000cd0  20 52 30 2c 6f 66 66 73  65 74 38 3a 4d 4f 56 20  | R0,offset8:MOV |
00000ce0  52 32 2c 23 39 36 0d 28  be 0d 2e 74 6f 70 6c 6f  |R2,#96.(...toplo|
00000cf0  6f 70 39 0d 28 c3 36 20  4c 44 4d 49 41 20 52 30  |op9.(.6 LDMIA R0|
00000d00  21 2c 7b 52 34 2d 52 37  7d 3a 53 54 4d 49 41 20  |!,{R4-R7}:STMIA |
00000d10  52 31 2c 7b 52 34 2d 52  37 7d 3a 41 44 44 20 52  |R1,{R4-R7}:ADD R|
00000d20  31 2c 52 31 2c 23 31 36  30 0d 28 c8 1f 20 53 55  |1,R1,#160.(.. SU|
00000d30  42 53 20 52 32 2c 52 32  2c 23 31 3a 42 4e 45 20  |BS R2,R2,#1:BNE |
00000d40  74 6f 70 6c 6f 6f 70 39  0d 28 cd 24 20 53 55 42  |toploop9.(.$ SUB|
00000d50  20 52 31 2c 52 31 2c 23  39 36 2a 31 36 30 3a 41  | R1,R1,#96*160:A|
00000d60  44 44 20 52 31 2c 52 31  2c 23 31 36 0d 28 d2 1e  |DD R1,R1,#16.(..|
00000d70  20 4c 44 52 20 52 30 2c  6f 66 66 73 65 74 39 3a  | LDR R0,offset9:|
00000d80  4d 4f 56 20 52 32 2c 23  39 36 0d 28 d7 0d 2e 74  |MOV R2,#96.(...t|
00000d90  6f 70 6c 6f 6f 70 30 0d  28 dc 36 20 4c 44 4d 49  |oploop0.(.6 LDMI|
00000da0  41 20 52 30 21 2c 7b 52  34 2d 52 37 7d 3a 53 54  |A R0!,{R4-R7}:ST|
00000db0  4d 49 41 20 52 31 2c 7b  52 34 2d 52 37 7d 3a 41  |MIA R1,{R4-R7}:A|
00000dc0  44 44 20 52 31 2c 52 31  2c 23 31 36 30 0d 28 e1  |DD R1,R1,#160.(.|
00000dd0  1f 20 53 55 42 53 20 52  32 2c 52 32 2c 23 31 3a  |. SUBS R2,R2,#1:|
00000de0  42 4e 45 20 74 6f 70 6c  6f 6f 70 30 0d 28 e6 16  |BNE toploop0.(..|
00000df0  20 53 55 42 20 52 31 2c  52 31 2c 23 39 36 2a 31  | SUB R1,R1,#96*1|
00000e00  36 30 0d 36 a5 14 20 4c  44 4d 46 44 20 52 31 33  |60.6.. LDMFD R13|
00000e10  21 2c 7b 50 43 7d 0d 36  a6 1a 2e 6f 66 66 73 65  |!,{PC}.6...offse|
00000e20  74 31 20 45 51 55 44 20  33 39 34 37 36 30 2b 38  |t1 EQUD 394760+8|
00000e30  0d 36 a7 1a 2e 6f 66 66  73 65 74 32 20 45 51 55  |.6...offset2 EQU|
00000e40  44 20 33 39 36 33 30 34  2b 38 0d 36 a8 1a 2e 6f  |D 396304+8.6...o|
00000e50  66 66 73 65 74 33 20 45  51 55 44 20 33 39 37 38  |ffset3 EQUD 3978|
00000e60  34 38 2b 38 0d 36 a9 1a  2e 6f 66 66 73 65 74 34  |48+8.6...offset4|
00000e70  20 45 51 55 44 20 33 39  39 33 39 32 2b 38 0d 36  | EQUD 399392+8.6|
00000e80  aa 1a 2e 6f 66 66 73 65  74 35 20 45 51 55 44 20  |...offset5 EQUD |
00000e90  34 30 30 39 33 36 2b 38  0d 36 ab 1a 2e 6f 66 66  |400936+8.6...off|
00000ea0  73 65 74 36 20 45 51 55  44 20 34 30 32 34 38 30  |set6 EQUD 402480|
00000eb0  2b 38 0d 36 ac 1a 2e 6f  66 66 73 65 74 37 20 45  |+8.6...offset7 E|
00000ec0  51 55 44 20 34 30 34 30  32 34 2b 38 0d 36 ad 1a  |QUD 404024+8.6..|
00000ed0  2e 6f 66 66 73 65 74 38  20 45 51 55 44 20 34 30  |.offset8 EQUD 40|
00000ee0  35 35 36 38 2b 38 0d 36  ae 1a 2e 6f 66 66 73 65  |5568+8.6...offse|
00000ef0  74 39 20 45 51 55 44 20  34 30 37 31 31 32 2b 38  |t9 EQUD 407112+8|
00000f00  0d 36 b0 29 2e 53 50 52  31 37 20 45 51 55 44 20  |.6.).SPR17 EQUD |
00000f10  54 25 28 31 37 29 3a 2e  53 50 52 31 38 20 45 51  |T%(17):.SPR18 EQ|
00000f20  55 44 20 54 25 28 31 38  29 0d 36 ba 10 2e 62 61  |UD T%(18).6...ba|
00000f30  63 6b 20 45 51 55 44 20  30 0d 36 c4 1c 2e 62 6f  |ck EQUD 0.6...bo|
00000f40  72 64 65 72 3a 53 54 4d  46 44 20 52 31 33 21 2c  |rder:STMFD R13!,|
00000f50  7b 52 31 34 7d 0d 36 ce  3a 20 4d 4f 56 20 52 30  |{R14}.6.: MOV R0|
00000f60  2c 23 35 31 32 3a 41 44  44 20 52 30 2c 52 30 2c  |,#512:ADD R0,R0,|
00000f70  23 33 34 3a 4c 44 52 42  20 52 31 2c 53 70 41 72  |#34:LDRB R1,SpAr|
00000f80  65 61 3a 4c 44 52 20 52  32 2c 53 50 52 31 37 0d  |ea:LDR R2,SPR17.|
00000f90  36 cf 23 20 4d 4f 56 20  52 36 2c 23 31 30 3a 4d  |6.# MOV R6,#10:M|
00000fa0  4f 56 20 52 33 2c 23 30  3a 4d 4f 56 20 52 34 2c  |OV R3,#0:MOV R4,|
00000fb0  23 30 0d 36 d0 20 2e 62  61 63 6b 6c 6f 6f 70 32  |#0.6. .backloop2|
00000fc0  3a 4d 4f 56 20 52 35 2c  23 30 3a 53 57 49 20 26  |:MOV R5,#0:SWI &|
00000fd0  32 45 0d 36 d1 13 20 41  44 44 20 52 33 2c 52 33  |2E.6.. ADD R3,R3|
00000fe0  2c 23 31 32 38 0d 36 d2  20 20 53 55 42 53 20 52  |,#128.6.  SUBS R|
00000ff0  36 2c 52 36 2c 23 31 3a  42 4e 45 20 62 61 63 6b  |6,R6,#1:BNE back|
00001000  6c 6f 6f 70 32 0d 36 d8  11 20 42 4c 20 54 6f 70  |loop2.6.. BL Top|
00001010  53 63 72 65 65 6e 0d 37  e6 2a 20 4d 4f 56 20 52  |Screen.7.* MOV R|
00001020  30 2c 23 31 35 3a 53 57  49 20 32 35 36 2b 31 37  |0,#15:SWI 256+17|
00001030  3a 53 57 49 20 22 4f 53  5f 57 72 69 74 65 43 22  |:SWI "OS_WriteC"|
00001040  0d 37 e7 25 20 4d 4f 56  20 52 31 2c 23 31 34 3a  |.7.% MOV R1,#14:|
00001050  4d 4f 56 20 52 32 2c 23  33 30 3a 53 57 49 20 32  |MOV R2,#30:SWI 2|
00001060  35 36 2b 33 31 0d 37 e8  38 20 4d 4f 56 20 52 30  |56+31.7.8 MOV R0|
00001070  2c 52 31 3a 53 57 49 20  22 4f 53 5f 57 72 69 74  |,R1:SWI "OS_Writ|
00001080  65 43 22 3a 4d 4f 56 20  52 30 2c 52 32 3a 53 57  |eC":MOV R0,R2:SW|
00001090  49 20 22 4f 53 5f 57 72  69 74 65 43 22 0d 37 e9  |I "OS_WriteC".7.|
000010a0  23 20 41 44 52 20 52 30  2c 73 74 72 69 6e 67 31  |# ADR R0,string1|
000010b0  3a 53 57 49 20 22 4f 53  5f 57 72 69 74 65 30 22  |:SWI "OS_Write0"|
000010c0  0d 37 ea 25 20 4d 4f 56  20 52 31 2c 23 33 30 3a  |.7.% MOV R1,#30:|
000010d0  4d 4f 56 20 52 32 2c 23  33 30 3a 53 57 49 20 32  |MOV R2,#30:SWI 2|
000010e0  35 36 2b 33 31 0d 37 eb  38 20 4d 4f 56 20 52 30  |56+31.7.8 MOV R0|
000010f0  2c 52 31 3a 53 57 49 20  22 4f 53 5f 57 72 69 74  |,R1:SWI "OS_Writ|
00001100  65 43 22 3a 4d 4f 56 20  52 30 2c 52 32 3a 53 57  |eC":MOV R0,R2:SW|
00001110  49 20 22 4f 53 5f 57 72  69 74 65 43 22 0d 37 ec  |I "OS_WriteC".7.|
00001120  23 20 41 44 52 20 52 30  2c 73 74 72 69 6e 67 32  |# ADR R0,string2|
00001130  3a 53 57 49 20 22 4f 53  5f 57 72 69 74 65 30 22  |:SWI "OS_Write0"|
00001140  0d 37 ed 24 20 4d 4f 56  20 52 31 2c 23 31 3a 4d  |.7.$ MOV R1,#1:M|
00001150  4f 56 20 52 32 2c 23 33  30 3a 53 57 49 20 32 35  |OV R2,#30:SWI 25|
00001160  36 2b 33 31 0d 37 ee 38  20 4d 4f 56 20 52 30 2c  |6+31.7.8 MOV R0,|
00001170  52 31 3a 53 57 49 20 22  4f 53 5f 57 72 69 74 65  |R1:SWI "OS_Write|
00001180  43 22 3a 4d 4f 56 20 52  30 2c 52 32 3a 53 57 49  |C":MOV R0,R2:SWI|
00001190  20 22 4f 53 5f 57 72 69  74 65 43 22 0d 37 ef 23  | "OS_WriteC".7.#|
000011a0  20 41 44 52 20 52 30 2c  73 74 72 69 6e 67 33 3a  | ADR R0,string3:|
000011b0  53 57 49 20 22 4f 53 5f  57 72 69 74 65 30 22 0d  |SWI "OS_Write0".|
000011c0  37 f0 29 20 4d 4f 56 20  52 30 2c 23 30 3a 53 57  |7.) MOV R0,#0:SW|
000011d0  49 20 32 35 36 2b 31 37  3a 53 57 49 20 22 4f 53  |I 256+17:SWI "OS|
000011e0  5f 57 72 69 74 65 43 22  0d 38 04 14 20 4c 44 4d  |_WriteC".8.. LDM|
000011f0  46 44 20 52 31 33 21 2c  7b 50 43 7d 0d 38 0e 26  |FD R13!,{PC}.8.&|
00001200  2e 73 74 72 69 6e 67 31  20 45 51 55 53 20 22 53  |.string1 EQUS "S|
00001210  63 6f 72 65 22 3a 45 51  55 42 20 30 3a 41 4c 49  |core":EQUB 0:ALI|
00001220  47 4e 0d 38 18 27 2e 73  74 72 69 6e 67 32 20 45  |GN.8.'.string2 E|
00001230  51 55 53 20 22 45 6e 65  72 67 79 22 3a 45 51 55  |QUS "Energy":EQU|
00001240  42 20 30 3a 41 4c 49 47  4e 0d 38 22 4f 2e 53 50  |B 0:ALIGN.8"O.SP|
00001250  52 33 33 20 45 51 55 44  20 54 25 28 33 33 29 3a  |R33 EQUD T%(33):|
00001260  2e 53 50 52 33 34 20 45  51 55 44 20 54 25 28 33  |.SPR34 EQUD T%(3|
00001270  34 29 3a 2e 53 50 52 33  35 20 45 51 55 44 20 54  |4):.SPR35 EQUD T|
00001280  25 28 33 35 29 3a 2e 53  50 52 33 36 20 45 51 55  |%(35):.SPR36 EQU|
00001290  44 20 54 25 28 33 36 29  0d 38 2c 26 2e 73 74 72  |D T%(36).8,&.str|
000012a0  69 6e 67 33 20 45 51 55  53 20 22 4c 69 76 65 73  |ing3 EQUS "Lives|
000012b0  22 3a 45 51 55 42 20 30  3a 41 4c 49 47 4e 0d 38  |":EQUB 0:ALIGN.8|
000012c0  36 1b 2e 62 61 63 6b 67  3a 53 54 4d 46 44 20 52  |6..backg:STMFD R|
000012d0  31 33 21 2c 7b 52 31 34  7d 0d 38 40 39 20 4d 4f  |13!,{R14}.8@9 MO|
000012e0  56 20 52 30 2c 23 35 31  32 3a 41 44 44 20 52 30  |V R0,#512:ADD R0|
000012f0  2c 52 30 2c 23 33 34 3a  4c 44 52 42 20 52 31 2c  |,R0,#34:LDRB R1,|
00001300  53 70 41 72 65 61 3a 4c  44 52 20 52 32 2c 53 50  |SpArea:LDR R2,SP|
00001310  52 31 0d 38 4a 32 20 4c  44 52 20 52 33 2c 74 72  |R1.8J2 LDR R3,tr|
00001320  65 65 73 31 3a 4c 44 52  42 20 52 34 2c 74 72 65  |ees1:LDRB R4,tre|
00001330  65 79 3a 4d 4f 56 20 52  35 2c 23 30 3a 53 57 49  |ey:MOV R5,#0:SWI|
00001340  20 26 32 45 0d 38 54 39  20 4d 4f 56 20 52 30 2c  | &2E.8T9 MOV R0,|
00001350  23 35 31 32 3a 41 44 44  20 52 30 2c 52 30 2c 23  |#512:ADD R0,R0,#|
00001360  33 34 3a 4c 44 52 42 20  52 31 2c 53 70 41 72 65  |34:LDRB R1,SpAre|
00001370  61 3a 4c 44 52 20 52 32  2c 53 50 52 32 0d 38 5e  |a:LDR R2,SPR2.8^|
00001380  32 20 4c 44 52 20 52 33  2c 74 72 65 65 73 32 3a  |2 LDR R3,trees2:|
00001390  4c 44 52 42 20 52 34 2c  74 72 65 65 79 3a 4d 4f  |LDRB R4,treey:MO|
000013a0  56 20 52 35 2c 23 30 3a  53 57 49 20 26 32 45 0d  |V R5,#0:SWI &2E.|
000013b0  38 68 39 20 4d 4f 56 20  52 30 2c 23 35 31 32 3a  |8h9 MOV R0,#512:|
000013c0  41 44 44 20 52 30 2c 52  30 2c 23 33 34 3a 4c 44  |ADD R0,R0,#34:LD|
000013d0  52 42 20 52 31 2c 53 70  41 72 65 61 3a 4c 44 52  |RB R1,SpArea:LDR|
000013e0  20 52 32 2c 53 50 52 33  0d 38 72 32 20 4c 44 52  | R2,SPR3.8r2 LDR|
000013f0  20 52 33 2c 74 72 65 65  73 33 3a 4c 44 52 42 20  | R3,trees3:LDRB |
00001400  52 34 2c 74 72 65 65 79  3a 4d 4f 56 20 52 35 2c  |R4,treey:MOV R5,|
00001410  23 30 3a 53 57 49 20 26  32 45 0d 38 74 3e 20 4c  |#0:SWI &2E.8t> L|
00001420  44 52 20 52 32 2c 53 50  52 34 3a 4c 44 52 20 52  |DR R2,SPR4:LDR R|
00001430  33 2c 74 72 65 65 73 34  3a 4c 44 52 42 20 52 34  |3,trees4:LDRB R4|
00001440  2c 74 72 65 65 79 3a 4d  4f 56 20 52 35 2c 23 30  |,treey:MOV R5,#0|
00001450  3a 53 57 49 20 26 32 45  0d 38 76 3e 20 4c 44 52  |:SWI &2E.8v> LDR|
00001460  20 52 32 2c 53 50 52 35  3a 4c 44 52 20 52 33 2c  | R2,SPR5:LDR R3,|
00001470  74 72 65 65 73 35 3a 4c  44 52 42 20 52 34 2c 74  |trees5:LDRB R4,t|
00001480  72 65 65 79 3a 4d 4f 56  20 52 35 2c 23 30 3a 53  |reey:MOV R5,#0:S|
00001490  57 49 20 26 32 45 0d 38  77 3e 20 4c 44 52 20 52  |WI &2E.8w> LDR R|
000014a0  32 2c 53 50 52 37 3a 4c  44 52 20 52 33 2c 74 72  |2,SPR7:LDR R3,tr|
000014b0  65 65 73 36 3a 4c 44 52  42 20 52 34 2c 74 72 65  |ees6:LDRB R4,tre|
000014c0  65 79 3a 4d 4f 56 20 52  35 2c 23 30 3a 53 57 49  |ey:MOV R5,#0:SWI|
000014d0  20 26 32 45 0d 38 78 3e  20 4c 44 52 20 52 32 2c  | &2E.8x> LDR R2,|
000014e0  53 50 52 38 3a 4c 44 52  20 52 33 2c 74 72 65 65  |SPR8:LDR R3,tree|
000014f0  73 37 3a 4c 44 52 42 20  52 34 2c 74 72 65 65 79  |s7:LDRB R4,treey|
00001500  3a 4d 4f 56 20 52 35 2c  23 30 3a 53 57 49 20 26  |:MOV R5,#0:SWI &|
00001510  32 45 0d 38 7c 14 20 4c  44 4d 46 44 20 52 31 33  |2E.8|. LDMFD R13|
00001520  21 2c 7b 50 43 7d 0d 38  86 1c 2e 62 61 63 6b 67  |!,{PC}.8...backg|
00001530  31 3a 53 54 4d 46 44 20  52 31 33 21 2c 7b 52 31  |1:STMFD R13!,{R1|
00001540  34 7d 0d 38 90 29 20 4c  44 52 42 20 52 37 2c 47  |4}.8.) LDRB R7,G|
00001550  6f 6c 64 53 70 72 3a 43  4d 50 20 52 37 2c 23 30  |oldSpr:CMP R7,#0|
00001560  3a 42 4e 45 20 62 61 63  6b 67 32 0d 38 9a 3a 20  |:BNE backg2.8.: |
00001570  4d 4f 56 20 52 30 2c 23  35 31 32 3a 41 44 44 20  |MOV R0,#512:ADD |
00001580  52 30 2c 52 30 2c 23 33  34 3a 4c 44 52 42 20 52  |R0,R0,#34:LDRB R|
00001590  31 2c 53 70 41 72 65 61  3a 4c 44 52 20 52 32 2c  |1,SpArea:LDR R2,|
000015a0  53 50 52 31 30 0d 38 a4  30 20 4c 44 52 20 52 33  |SPR10.8.0 LDR R3|
000015b0  2c 67 6f 6c 64 3a 4c 44  52 42 20 52 34 2c 67 6f  |,gold:LDRB R4,go|
000015c0  6c 64 79 3a 4d 4f 56 20  52 35 2c 23 30 3a 53 57  |ldy:MOV R5,#0:SW|
000015d0  49 20 26 32 45 0d 38 ae  43 2e 62 61 63 6b 67 32  |I &2E.8.C.backg2|
000015e0  3a 4c 44 52 20 52 32 2c  53 50 52 39 3a 4c 44 52  |:LDR R2,SPR9:LDR|
000015f0  20 52 33 2c 77 61 6c 6c  3a 4c 44 52 42 20 52 34  | R3,wall:LDRB R4|
00001600  2c 77 61 6c 6c 79 3a 4d  4f 56 20 52 35 2c 23 30  |,wally:MOV R5,#0|
00001610  3a 53 57 49 20 26 32 45  0d 38 b8 20 20 4c 44 52  |:SWI &2E.8.  LDR|
00001620  42 20 52 38 2c 43 62 61  6c 6c 3a 4c 44 52 42 20  |B R8,Cball:LDRB |
00001630  52 37 2c 57 62 61 6c 6c  0d 38 c2 5c 20 43 4d 50  |R7,Wball.8.\ CMP|
00001640  20 52 38 2c 23 31 3a 42  45 51 20 50 62 61 6c 6c  | R8,#1:BEQ Pball|
00001650  31 31 3a 43 4d 50 20 52  38 2c 23 32 3a 42 45 51  |11:CMP R8,#2:BEQ|
00001660  20 50 62 61 6c 6c 32 32  3a 43 4d 50 20 52 38 2c  | Pball22:CMP R8,|
00001670  23 33 3a 42 45 51 20 50  62 61 6c 6c 33 33 3a 43  |#3:BEQ Pball33:C|
00001680  4d 50 20 52 38 2c 23 34  3a 42 45 51 20 50 62 61  |MP R8,#4:BEQ Pba|
00001690  6c 6c 34 34 0d 38 cc 0c  2e 50 62 61 6c 6c 31 31  |ll44.8...Pball11|
000016a0  0d 38 d6 36 20 43 4d 50  20 52 37 2c 23 35 3a 4c  |.8.6 CMP R7,#5:L|
000016b0  44 52 4c 54 20 52 32 2c  53 50 52 31 31 3a 43 4d  |DRLT R2,SPR11:CM|
000016c0  50 20 52 37 2c 23 34 3a  4c 44 52 47 54 20 52 32  |P R7,#4:LDRGT R2|
000016d0  2c 53 50 52 31 33 0d 38  e0 30 20 4c 44 52 20 52  |,SPR13.8.0 LDR R|
000016e0  33 2c 62 61 6c 6c 3a 4c  44 52 42 20 52 34 2c 62  |3,ball:LDRB R4,b|
000016f0  61 6c 6c 79 3a 4d 4f 56  20 52 35 2c 23 38 3a 53  |ally:MOV R5,#8:S|
00001700  57 49 20 26 32 45 0d 38  ea 10 20 42 20 42 6f 75  |WI &2E.8.. B Bou|
00001710  6e 65 42 61 6c 6c 0d 38  f4 0c 2e 50 62 61 6c 6c  |neBall.8...Pball|
00001720  32 32 0d 38 fe 36 20 43  4d 50 20 52 37 2c 23 35  |22.8.6 CMP R7,#5|
00001730  3a 4c 44 52 4c 54 20 52  32 2c 53 50 52 32 37 3a  |:LDRLT R2,SPR27:|
00001740  43 4d 50 20 52 37 2c 23  34 3a 4c 44 52 47 54 20  |CMP R7,#4:LDRGT |
00001750  52 32 2c 53 50 52 32 38  0d 39 08 30 20 4c 44 52  |R2,SPR28.9.0 LDR|
00001760  20 52 33 2c 62 61 6c 6c  3a 4c 44 52 42 20 52 34  | R3,ball:LDRB R4|
00001770  2c 62 61 6c 6c 79 3a 4d  4f 56 20 52 35 2c 23 38  |,bally:MOV R5,#8|
00001780  3a 53 57 49 20 26 32 45  0d 39 12 10 20 42 20 42  |:SWI &2E.9.. B B|
00001790  6f 75 6e 65 42 61 6c 6c  0d 39 1c 0c 2e 50 62 61  |ouneBall.9...Pba|
000017a0  6c 6c 33 33 0d 39 26 36  20 43 4d 50 20 52 37 2c  |ll33.9&6 CMP R7,|
000017b0  23 35 3a 4c 44 52 4c 54  20 52 32 2c 53 50 52 32  |#5:LDRLT R2,SPR2|
000017c0  39 3a 43 4d 50 20 52 37  2c 23 34 3a 4c 44 52 47  |9:CMP R7,#4:LDRG|
000017d0  54 20 52 32 2c 53 50 52  33 30 0d 39 30 30 20 4c  |T R2,SPR30.900 L|
000017e0  44 52 20 52 33 2c 62 61  6c 6c 3a 4c 44 52 42 20  |DR R3,ball:LDRB |
000017f0  52 34 2c 62 61 6c 6c 79  3a 4d 4f 56 20 52 35 2c  |R4,bally:MOV R5,|
00001800  23 38 3a 53 57 49 20 26  32 45 0d 39 3a 10 20 42  |#8:SWI &2E.9:. B|
00001810  20 42 6f 75 6e 65 42 61  6c 6c 0d 39 44 0c 2e 50  | BouneBall.9D..P|
00001820  62 61 6c 6c 34 34 0d 39  4e 36 20 43 4d 50 20 52  |ball44.9N6 CMP R|
00001830  37 2c 23 35 3a 4c 44 52  4c 54 20 52 32 2c 53 50  |7,#5:LDRLT R2,SP|
00001840  52 33 31 3a 43 4d 50 20  52 37 2c 23 34 3a 4c 44  |R31:CMP R7,#4:LD|
00001850  52 47 54 20 52 32 2c 53  50 52 33 32 0d 39 58 30  |RGT R2,SPR32.9X0|
00001860  20 4c 44 52 20 52 33 2c  62 61 6c 6c 3a 4c 44 52  | LDR R3,ball:LDR|
00001870  42 20 52 34 2c 62 61 6c  6c 79 3a 4d 4f 56 20 52  |B R4,bally:MOV R|
00001880  35 2c 23 38 3a 53 57 49  20 26 32 45 0d 39 62 0e  |5,#8:SWI &2E.9b.|
00001890  2e 42 6f 75 6e 65 42 61  6c 6c 0d 39 6c 21 20 4c  |.BouneBall.9l! L|
000018a0  44 52 42 20 52 37 2c 57  62 61 6c 6c 3a 4c 44 52  |DRB R7,Wball:LDR|
000018b0  42 20 52 38 2c 43 5a 62  61 6c 6c 0d 39 76 77 20  |B R8,CZball.9vw |
000018c0  43 4d 50 20 52 38 2c 23  31 3a 42 45 51 20 62 6f  |CMP R8,#1:BEQ bo|
000018d0  75 6e 63 65 31 31 3a 43  4d 50 20 52 38 2c 23 32  |unce11:CMP R8,#2|
000018e0  3a 42 45 51 20 62 6f 75  6e 63 65 32 32 3a 43 4d  |:BEQ bounce22:CM|
000018f0  50 20 52 38 2c 23 33 3a  42 45 51 20 62 6f 75 6e  |P R8,#3:BEQ boun|
00001900  63 65 33 33 3a 43 4d 50  20 52 38 2c 23 34 3a 42  |ce33:CMP R8,#4:B|
00001910  45 51 20 62 6f 75 6e 63  65 34 34 3a 43 4d 50 20  |EQ bounce44:CMP |
00001920  52 38 2c 23 35 3a 42 45  51 20 62 6f 75 6e 63 65  |R8,#5:BEQ bounce|
00001930  35 35 0d 39 80 3f 2e 62  6f 75 6e 63 65 31 31 3a  |55.9.?.bounce11:|
00001940  43 4d 50 20 52 37 2c 23  35 3a 4c 44 52 4c 54 20  |CMP R7,#5:LDRLT |
00001950  52 32 2c 53 50 52 31 34  3a 43 4d 50 20 52 37 2c  |R2,SPR14:CMP R7,|
00001960  23 34 3a 4c 44 52 47 54  20 52 32 2c 53 50 52 31  |#4:LDRGT R2,SPR1|
00001970  36 0d 39 8a 12 20 42 20  53 70 72 69 74 65 5a 62  |6.9.. B SpriteZb|
00001980  61 6c 6c 0d 39 94 3f 2e  62 6f 75 6e 63 65 32 32  |all.9.?.bounce22|
00001990  3a 43 4d 50 20 52 37 2c  23 35 3a 4c 44 52 4c 54  |:CMP R7,#5:LDRLT|
000019a0  20 52 32 2c 53 50 52 31  39 3a 43 4d 50 20 52 37  | R2,SPR19:CMP R7|
000019b0  2c 23 34 3a 4c 44 52 47  54 20 52 32 2c 53 50 52  |,#4:LDRGT R2,SPR|
000019c0  32 30 0d 39 9e 12 20 42  20 53 70 72 69 74 65 5a  |20.9.. B SpriteZ|
000019d0  62 61 6c 6c 0d 39 a8 3f  2e 62 6f 75 6e 63 65 33  |ball.9.?.bounce3|
000019e0  33 3a 43 4d 50 20 52 37  2c 23 35 3a 4c 44 52 4c  |3:CMP R7,#5:LDRL|
000019f0  54 20 52 32 2c 53 50 52  32 31 3a 43 4d 50 20 52  |T R2,SPR21:CMP R|
00001a00  37 2c 23 34 3a 4c 44 52  47 54 20 52 32 2c 53 50  |7,#4:LDRGT R2,SP|
00001a10  52 32 32 0d 39 b2 12 20  42 20 53 70 72 69 74 65  |R22.9.. B Sprite|
00001a20  5a 62 61 6c 6c 0d 39 bc  3f 2e 62 6f 75 6e 63 65  |Zball.9.?.bounce|
00001a30  34 34 3a 43 4d 50 20 52  37 2c 23 35 3a 4c 44 52  |44:CMP R7,#5:LDR|
00001a40  4c 54 20 52 32 2c 53 50  52 32 33 3a 43 4d 50 20  |LT R2,SPR23:CMP |
00001a50  52 37 2c 23 34 3a 4c 44  52 47 54 20 52 32 2c 53  |R7,#4:LDRGT R2,S|
00001a60  50 52 32 34 0d 39 c6 12  20 42 20 53 70 72 69 74  |PR24.9.. B Sprit|
00001a70  65 5a 62 61 6c 6c 0d 39  d0 3f 2e 62 6f 75 6e 63  |eZball.9.?.bounc|
00001a80  65 35 35 3a 43 4d 50 20  52 37 2c 23 35 3a 4c 44  |e55:CMP R7,#5:LD|
00001a90  52 4c 54 20 52 32 2c 53  50 52 32 35 3a 43 4d 50  |RLT R2,SPR25:CMP|
00001aa0  20 52 37 2c 23 34 3a 4c  44 52 47 54 20 52 32 2c  | R7,#4:LDRGT R2,|
00001ab0  53 50 52 32 36 0d 39 da  10 2e 53 70 72 69 74 65  |SPR26.9...Sprite|
00001ac0  5a 62 61 6c 6c 0d 39 e4  31 20 4c 44 52 20 52 33  |Zball.9.1 LDR R3|
00001ad0  2c 5a 62 61 6c 6c 3a 4c  44 52 20 52 34 2c 5a 62  |,Zball:LDR R4,Zb|
00001ae0  61 6c 6c 79 3a 4d 4f 56  20 52 35 2c 23 38 3a 53  |ally:MOV R5,#8:S|
00001af0  57 49 20 26 32 45 0d 39  ee 3e 20 4c 44 52 20 52  |WI &2E.9.> LDR R|
00001b00  32 2c 53 50 52 31 35 3a  4c 44 52 20 52 33 2c 4f  |2,SPR15:LDR R3,O|
00001b10  62 61 6c 6c 3a 4c 44 52  20 52 34 2c 4f 62 61 6c  |ball:LDR R4,Obal|
00001b20  6c 79 3a 4d 4f 56 20 52  35 2c 23 38 3a 53 57 49  |ly:MOV R5,#8:SWI|
00001b30  20 26 32 45 0d 39 f8 39  20 4c 44 52 20 52 32 2c  | &2E.9.9 LDR R2,|
00001b40  53 50 52 31 37 3a 4d 4f  56 20 52 33 2c 23 31 32  |SPR17:MOV R3,#12|
00001b50  38 3a 4d 4f 56 20 52 34  2c 23 30 3a 4d 4f 56 20  |8:MOV R4,#0:MOV |
00001b60  52 35 2c 23 30 3a 53 57  49 20 26 32 45 0d 3a 02  |R5,#0:SWI &2E.:.|
00001b70  2a 20 4d 4f 56 20 52 30  2c 23 31 35 3a 53 57 49  |* MOV R0,#15:SWI|
00001b80  20 32 35 36 2b 31 37 3a  53 57 49 20 22 4f 53 5f  | 256+17:SWI "OS_|
00001b90  57 72 69 74 65 43 22 0d  3a 0c 24 20 4d 4f 56 20  |WriteC".:.$ MOV |
00001ba0  52 31 2c 23 31 3a 4d 4f  56 20 52 32 2c 23 33 30  |R1,#1:MOV R2,#30|
00001bb0  3a 53 57 49 20 32 35 36  2b 33 31 0d 3a 16 38 20  |:SWI 256+31.:.8 |
00001bc0  4d 4f 56 20 52 30 2c 52  31 3a 53 57 49 20 22 4f  |MOV R0,R1:SWI "O|
00001bd0  53 5f 57 72 69 74 65 43  22 3a 4d 4f 56 20 52 30  |S_WriteC":MOV R0|
00001be0  2c 52 32 3a 53 57 49 20  22 4f 53 5f 57 72 69 74  |,R2:SWI "OS_Writ|
00001bf0  65 43 22 0d 3a 20 23 20  41 44 52 20 52 30 2c 73  |eC".: # ADR R0,s|
00001c00  74 72 69 6e 67 33 3a 53  57 49 20 22 4f 53 5f 57  |tring3:SWI "OS_W|
00001c10  72 69 74 65 30 22 0d 3a  2a 29 20 4d 4f 56 20 52  |rite0".:*) MOV R|
00001c20  30 2c 23 30 3a 53 57 49  20 32 35 36 2b 31 37 3a  |0,#0:SWI 256+17:|
00001c30  53 57 49 20 22 4f 53 5f  57 72 69 74 65 43 22 0d  |SWI "OS_WriteC".|
00001c40  3a 98 44 20 4c 44 52 42  20 52 39 2c 44 74 75 6e  |:.D LDRB R9,Dtun|
00001c50  65 3a 53 55 42 20 52 39  2c 52 39 2c 23 31 3a 43  |e:SUB R9,R9,#1:C|
00001c60  4d 50 20 52 39 2c 23 30  3a ec 51 20 52 39 2c 23  |MP R9,#0:.Q R9,#|
00001c70  32 35 36 3a 53 54 52 45  51 42 20 52 39 2c 44 74  |256:STREQB R9,Dt|
00001c80  75 6e 65 0d 3a a2 12 20  53 54 52 42 20 52 39 2c  |une.:.. STRB R9,|
00001c90  44 74 75 6e 65 0d 3a ac  26 20 4d 4f 56 20 52 30  |Dtune.:.& MOV R0|
00001ca0  2c 23 31 3a 4d 4f 56 20  52 31 2c 23 31 35 3a 52  |,#1:MOV R1,#15:R|
00001cb0  53 42 20 52 31 2c 52 31  2c 23 30 0d 3a b6 2d 20  |SB R1,R1,#0.:.- |
00001cc0  4d 4f 56 20 52 32 2c 52  39 3a 4d 4f 56 20 52 33  |MOV R2,R9:MOV R3|
00001cd0  2c 23 32 35 3a 53 57 49  20 22 53 6f 75 6e 64 5f  |,#25:SWI "Sound_|
00001ce0  43 6f 6e 74 72 6f 6c 22  0d 3a fc 2a 20 4c 44 52  |Control".:.* LDR|
00001cf0  42 20 52 39 2c 65 6e 64  3a 43 4d 50 20 52 39 2c  |B R9,end:CMP R9,|
00001d00  23 31 3a 42 45 51 20 4f  75 74 4f 66 45 6e 65 72  |#1:BEQ OutOfEner|
00001d10  67 79 0d 3b 06 14 20 4c  44 52 20 52 35 2c 6d 65  |gy.;.. LDR R5,me|
00001d20  73 73 61 67 65 31 0d 3b  10 30 20 4d 4f 56 20 52  |ssage1.;.0 MOV R|
00001d30  31 2c 52 31 30 3a 41 44  44 20 52 31 2c 52 31 2c  |1,R10:ADD R1,R1,|
00001d40  52 35 3a 42 4c 20 42 72  61 6e 63 68 5f 61 6c 69  |R5:BL Branch_ali|
00001d50  65 6e 74 61 62 31 0d 3b  1a 0e 20 4d 4f 56 20 52  |entab1.;.. MOV R|
00001d60  32 2c 23 38 0d 3b 24 40  20 4c 44 52 20 52 30 2c  |2,#8.;$@ LDR R0,|
00001d70  5b 52 31 31 2c 52 32 2c  4c 53 4c 23 32 5d 3a 41  |[R11,R2,LSL#2]:A|
00001d80  44 44 20 52 30 2c 52 30  2c 52 31 32 3a 41 44 44  |DD R0,R0,R12:ADD|
00001d90  20 52 30 2c 52 30 2c 23  38 3a 42 4c 20 61 6c 69  | R0,R0,#8:BL ali|
00001da0  65 6e 33 32 0d 3b 2e 14  20 4c 44 52 20 52 35 2c  |en32.;.. LDR R5,|
00001db0  6d 65 73 73 61 67 65 32  0d 3b 38 1c 20 4d 4f 56  |message2.;8. MOV|
00001dc0  20 52 31 2c 52 31 30 3a  41 44 44 20 52 31 2c 52  | R1,R10:ADD R1,R|
00001dd0  31 2c 52 35 0d 3b 42 0e  20 4d 4f 56 20 52 32 2c  |1,R5.;B. MOV R2,|
00001de0  23 39 0d 3b 4c 40 20 4c  44 52 20 52 30 2c 5b 52  |#9.;L@ LDR R0,[R|
00001df0  31 31 2c 52 32 2c 4c 53  4c 23 32 5d 3a 41 44 44  |11,R2,LSL#2]:ADD|
00001e00  20 52 30 2c 52 30 2c 52  31 32 3a 41 44 44 20 52  | R0,R0,R12:ADD R|
00001e10  30 2c 52 30 2c 23 38 3a  42 4c 20 61 6c 69 65 6e  |0,R0,#8:BL alien|
00001e20  33 32 0d 3b 56 14 20 4c  44 52 20 52 35 2c 6d 65  |32.;V. LDR R5,me|
00001e30  73 73 61 67 65 33 0d 3b  60 1c 20 4d 4f 56 20 52  |ssage3.;`. MOV R|
00001e40  31 2c 52 31 30 3a 41 44  44 20 52 31 2c 52 31 2c  |1,R10:ADD R1,R1,|
00001e50  52 35 0d 3b 6a 0f 20 4d  4f 56 20 52 32 2c 23 31  |R5.;j. MOV R2,#1|
00001e60  30 0d 3b 74 40 20 4c 44  52 20 52 30 2c 5b 52 31  |0.;t@ LDR R0,[R1|
00001e70  31 2c 52 32 2c 4c 53 4c  23 32 5d 3a 41 44 44 20  |1,R2,LSL#2]:ADD |
00001e80  52 30 2c 52 30 2c 52 31  32 3a 41 44 44 20 52 30  |R0,R0,R12:ADD R0|
00001e90  2c 52 30 2c 23 38 3a 42  4c 20 61 6c 69 65 6e 33  |,R0,#8:BL alien3|
00001ea0  32 0d 3e 7f 11 20 42 20  4d 65 73 73 61 67 65 45  |2.>.. B MessageE|
00001eb0  6e 64 0d 3e 80 10 2e 4f  75 74 4f 66 45 6e 65 72  |nd.>...OutOfEner|
00001ec0  67 79 0d 3e 8a 14 20 4c  44 52 20 52 35 2c 6d 65  |gy.>.. LDR R5,me|
00001ed0  73 73 61 67 65 34 0d 3e  94 30 20 4d 4f 56 20 52  |ssage4.>.0 MOV R|
00001ee0  31 2c 52 31 30 3a 41 44  44 20 52 31 2c 52 31 2c  |1,R10:ADD R1,R1,|
00001ef0  52 35 3a 42 4c 20 42 72  61 6e 63 68 5f 61 6c 69  |R5:BL Branch_ali|
00001f00  65 6e 74 61 62 31 0d 3e  9e 0f 20 4d 4f 56 20 52  |entab1.>.. MOV R|
00001f10  32 2c 23 31 31 0d 3e a8  40 20 4c 44 52 20 52 30  |2,#11.>.@ LDR R0|
00001f20  2c 5b 52 31 31 2c 52 32  2c 4c 53 4c 23 32 5d 3a  |,[R11,R2,LSL#2]:|
00001f30  41 44 44 20 52 30 2c 52  30 2c 52 31 32 3a 41 44  |ADD R0,R0,R12:AD|
00001f40  44 20 52 30 2c 52 30 2c  23 38 3a 42 4c 20 61 6c  |D R0,R0,#8:BL al|
00001f50  69 65 6e 33 32 0d 3e b2  14 20 4c 44 52 20 52 35  |ien32.>.. LDR R5|
00001f60  2c 6d 65 73 73 61 67 65  35 0d 3e bc 1c 20 4d 4f  |,message5.>.. MO|
00001f70  56 20 52 31 2c 52 31 30  3a 41 44 44 20 52 31 2c  |V R1,R10:ADD R1,|
00001f80  52 31 2c 52 35 0d 3e c6  0f 20 4d 4f 56 20 52 32  |R1,R5.>.. MOV R2|
00001f90  2c 23 31 32 0d 3e d0 40  20 4c 44 52 20 52 30 2c  |,#12.>.@ LDR R0,|
00001fa0  5b 52 31 31 2c 52 32 2c  4c 53 4c 23 32 5d 3a 41  |[R11,R2,LSL#2]:A|
00001fb0  44 44 20 52 30 2c 52 30  2c 52 31 32 3a 41 44 44  |DD R0,R0,R12:ADD|
00001fc0  20 52 30 2c 52 30 2c 23  38 3a 42 4c 20 61 6c 69  | R0,R0,#8:BL ali|
00001fd0  65 6e 33 32 0d 3e da 14  20 4c 44 52 20 52 35 2c  |en32.>.. LDR R5,|
00001fe0  6d 65 73 73 61 67 65 36  0d 3e e4 1c 20 4d 4f 56  |message6.>.. MOV|
00001ff0  20 52 31 2c 52 31 30 3a  41 44 44 20 52 31 2c 52  | R1,R10:ADD R1,R|
00002000  31 2c 52 35 0d 3e ee 0f  20 4d 4f 56 20 52 32 2c  |1,R5.>.. MOV R2,|
00002010  23 31 33 0d 3e f8 40 20  4c 44 52 20 52 30 2c 5b  |#13.>.@ LDR R0,[|
00002020  52 31 31 2c 52 32 2c 4c  53 4c 23 32 5d 3a 41 44  |R11,R2,LSL#2]:AD|
00002030  44 20 52 30 2c 52 30 2c  52 31 32 3a 41 44 44 20  |D R0,R0,R12:ADD |
00002040  52 30 2c 52 30 2c 23 38  3a 42 4c 20 61 6c 69 65  |R0,R0,#8:BL alie|
00002050  6e 33 32 0d 3f 02 14 20  4c 44 52 20 52 35 2c 6d  |n32.?.. LDR R5,m|
00002060  65 73 73 61 67 65 37 0d  3f 0c 1c 20 4d 4f 56 20  |essage7.?.. MOV |
00002070  52 31 2c 52 31 30 3a 41  44 44 20 52 31 2c 52 31  |R1,R10:ADD R1,R1|
00002080  2c 52 35 0d 3f 16 0f 20  4d 4f 56 20 52 32 2c 23  |,R5.?.. MOV R2,#|
00002090  31 34 0d 3f 20 40 20 4c  44 52 20 52 30 2c 5b 52  |14.? @ LDR R0,[R|
000020a0  31 31 2c 52 32 2c 4c 53  4c 23 32 5d 3a 41 44 44  |11,R2,LSL#2]:ADD|
000020b0  20 52 30 2c 52 30 2c 52  31 32 3a 41 44 44 20 52  | R0,R0,R12:ADD R|
000020c0  30 2c 52 30 2c 23 38 3a  42 4c 20 61 6c 69 65 6e  |0,R0,#8:BL alien|
000020d0  33 32 0d 42 68 0f 2e 4d  65 73 73 61 67 65 45 6e  |32.Bh..MessageEn|
000020e0  64 0d 49 d3 14 20 4c 44  4d 46 44 20 52 31 33 21  |d.I.. LDMFD R13!|
000020f0  2c 7b 50 43 7d 0d 49 d4  1a 2e 53 70 41 72 65 61  |,{PC}.I...SpArea|
00002100  20 45 51 55 42 20 73 70  25 3a 41 4c 49 47 4e 0d  | EQUB sp%:ALIGN.|
00002110  49 d5 47 2e 53 50 52 31  20 45 51 55 44 20 54 25  |I.G.SPR1 EQUD T%|
00002120  28 31 29 3a 2e 53 50 52  32 20 45 51 55 44 20 54  |(1):.SPR2 EQUD T|
00002130  25 28 32 29 3a 2e 53 50  52 33 20 45 51 55 44 20  |%(2):.SPR3 EQUD |
00002140  54 25 28 33 29 3a 2e 53  50 52 39 20 45 51 55 44  |T%(3):.SPR9 EQUD|
00002150  20 54 25 28 39 29 0d 49  d6 7f 2e 74 72 65 65 73  | T%(9).I...trees|
00002160  31 20 45 51 55 44 20 31  32 38 30 3a 2e 74 72 65  |1 EQUD 1280:.tre|
00002170  65 73 32 20 45 51 55 44  20 32 35 36 30 3a 2e 74  |es2 EQUD 2560:.t|
00002180  72 65 65 73 33 20 45 51  55 44 20 30 3a 2e 74 72  |rees3 EQUD 0:.tr|
00002190  65 65 73 34 20 45 51 55  44 20 35 31 32 30 3a 2e  |ees4 EQUD 5120:.|
000021a0  74 72 65 65 73 35 20 45  51 55 44 20 36 34 30 30  |trees5 EQUD 6400|
000021b0  3a 2e 74 72 65 65 73 36  20 45 51 55 44 20 38 39  |:.trees6 EQUD 89|
000021c0  36 30 3a 2e 74 72 65 65  73 37 20 45 51 55 44 20  |60:.trees7 EQUD |
000021d0  31 30 32 34 30 0d 49 d7  4f 2e 77 61 6c 6c 20 45  |10240.I.O.wall E|
000021e0  51 55 44 20 31 32 38 30  3a 2e 67 6f 6c 64 20 45  |QUD 1280:.gold E|
000021f0  51 55 44 20 32 35 36 30  3a 2e 77 61 6c 6c 79 20  |QUD 2560:.wally |
00002200  45 51 55 42 20 31 32 39  3a 41 4c 49 47 4e 3a 2e  |EQUB 129:ALIGN:.|
00002210  67 6f 6c 64 79 20 45 51  55 42 20 31 32 39 3a 41  |goldy EQUB 129:A|
00002220  4c 49 47 4e 0d 49 d8 35  2e 53 50 52 31 30 20 45  |LIGN.I.5.SPR10 E|
00002230  51 55 44 20 54 25 28 31  30 29 3b 2a 2a 2a 2a 2a  |QUD T%(10);*****|
00002240  2a 2a 20 47 4f 4c 44 20  2a 2a 2a 2a 2a 2a 2a 2a  |** GOLD ********|
00002250  2a 2a 2a 2a 2a 2a 2a 2a  2a 0d 49 d9 2f 2e 74 72  |*********.I./.tr|
00002260  65 65 79 20 45 51 55 42  20 31 32 39 3a 41 4c 49  |eey EQUB 129:ALI|
00002270  47 4e 3a 2e 47 6f 6c 64  53 70 72 20 45 51 55 42  |GN:.GoldSpr EQUB|
00002280  20 30 3a 41 4c 49 47 4e  0d 49 da 3d 2e 57 62 61  | 0:ALIGN.I.=.Wba|
00002290  6c 6c 20 45 51 55 42 20  30 3a 41 4c 49 47 4e 3a  |ll EQUB 0:ALIGN:|
000022a0  2e 62 61 6c 6c 20 45 51  55 44 20 35 31 32 30 3a  |.ball EQUD 5120:|
000022b0  2e 62 61 6c 6c 79 20 45  51 55 42 20 31 32 39 3a  |.bally EQUB 129:|
000022c0  41 4c 49 47 4e 0d 49 db  3c 2e 53 50 52 31 31 20  |ALIGN.I.<.SPR11 |
000022d0  45 51 55 44 20 54 25 28  31 31 29 3a 2e 53 50 52  |EQUD T%(11):.SPR|
000022e0  31 32 20 45 51 55 44 20  54 25 28 31 32 29 3a 2e  |12 EQUD T%(12):.|
000022f0  53 50 52 31 33 20 45 51  55 44 20 54 25 28 31 33  |SPR13 EQUD T%(13|
00002300  29 0d 49 dc 39 2e 57 70  61 74 68 20 45 51 55 42  |).I.9.Wpath EQUB|
00002310  20 30 3a 41 4c 49 47 4e  3a 2e 5a 62 61 6c 6c 20  | 0:ALIGN:.Zball |
00002320  45 51 55 44 20 31 36 30  30 3a 2e 5a 62 61 6c 6c  |EQUD 1600:.Zball|
00002330  79 20 45 51 55 44 20 31  32 39 0d 49 dd 3c 2e 53  |y EQUD 129.I.<.S|
00002340  50 52 31 34 20 45 51 55  44 20 54 25 28 31 34 29  |PR14 EQUD T%(14)|
00002350  3a 2e 53 50 52 31 35 20  45 51 55 44 20 54 25 28  |:.SPR15 EQUD T%(|
00002360  31 35 29 3a 2e 53 50 52  31 36 20 45 51 55 44 20  |15):.SPR16 EQUD |
00002370  54 25 28 31 36 29 0d 49  de 19 2e 44 74 75 6e 65  |T%(16).I...Dtune|
00002380  20 45 51 55 42 20 32 35  36 3a 41 4c 49 47 4e 0d  | EQUB 256:ALIGN.|
00002390  49 df 1d 2e 6d 65 73 73  61 67 65 31 20 45 51 55  |I...message1 EQU|
000023a0  44 20 31 32 2a 31 32 38  30 2b 35 36 0d 49 e0 1d  |D 12*1280+56.I..|
000023b0  2e 6d 65 73 73 61 67 65  32 20 45 51 55 44 20 31  |.message2 EQUD 1|
000023c0  32 2a 31 32 38 30 2b 37  32 0d 49 e1 1d 2e 6d 65  |2*1280+72.I...me|
000023d0  73 73 61 67 65 33 20 45  51 55 44 20 31 32 2a 31  |ssage3 EQUD 12*1|
000023e0  32 38 30 2b 38 38 0d 49  e2 1d 2e 6d 65 73 73 61  |280+88.I...messa|
000023f0  67 65 34 20 45 51 55 44  20 31 32 2a 31 32 38 30  |ge4 EQUD 12*1280|
00002400  2b 34 38 0d 49 ec 1d 2e  6d 65 73 73 61 67 65 35  |+48.I...message5|
00002410  20 45 51 55 44 20 31 32  2a 31 32 38 30 2b 36 34  | EQUD 12*1280+64|
00002420  0d 49 f6 1d 2e 6d 65 73  73 61 67 65 36 20 45 51  |.I...message6 EQ|
00002430  55 44 20 31 32 2a 31 32  38 30 2b 38 30 0d 4a 00  |UD 12*1280+80.J.|
00002440  1d 2e 6d 65 73 73 61 67  65 37 20 45 51 55 44 20  |..message7 EQUD |
00002450  31 32 2a 31 32 38 30 2b  39 36 0d 4a 38 1c 2e 73  |12*1280+96.J8..s|
00002460  63 72 6f 6c 6c 3a 53 54  4d 46 44 20 52 31 33 21  |croll:STMFD R13!|
00002470  2c 7b 52 31 34 7d 0d 4a  42 2d 20 4d 4f 56 20 52  |,{R14}.JB- MOV R|
00002480  30 2c 23 35 31 32 3a 41  44 44 20 52 30 2c 52 30  |0,#512:ADD R0,R0|
00002490  2c 23 33 34 3a 4c 44 52  42 20 52 31 2c 53 70 41  |,#34:LDRB R1,SpA|
000024a0  72 65 61 0d 4a 4c 3e 20  4c 44 52 20 52 32 2c 53  |rea.JL> LDR R2,S|
000024b0  50 52 31 3a 4c 44 52 20  52 33 2c 74 72 65 65 73  |PR1:LDR R3,trees|
000024c0  31 3a 4c 44 52 42 20 52  34 2c 74 72 65 65 79 3a  |1:LDRB R4,treey:|
000024d0  4d 4f 56 20 52 35 2c 23  30 3a 53 57 49 20 26 32  |MOV R5,#0:SWI &2|
000024e0  45 0d 4a 60 26 20 4c 44  52 20 52 32 2c 53 50 52  |E.J`& LDR R2,SPR|
000024f0  32 3a 4c 44 52 20 52 33  2c 74 72 65 65 73 32 3a  |2:LDR R3,trees2:|
00002500  53 57 49 20 26 32 45 0d  4a 74 26 20 4c 44 52 20  |SWI &2E.Jt& LDR |
00002510  52 32 2c 53 50 52 33 3a  4c 44 52 20 52 33 2c 74  |R2,SPR3:LDR R3,t|
00002520  72 65 65 73 33 3a 53 57  49 20 26 32 45 0d 4a 76  |rees3:SWI &2E.Jv|
00002530  26 20 4c 44 52 20 52 32  2c 53 50 52 34 3a 4c 44  |& LDR R2,SPR4:LD|
00002540  52 20 52 33 2c 74 72 65  65 73 34 3a 53 57 49 20  |R R3,trees4:SWI |
00002550  26 32 45 0d 4a 78 26 20  4c 44 52 20 52 32 2c 53  |&2E.Jx& LDR R2,S|
00002560  50 52 35 3a 4c 44 52 20  52 33 2c 74 72 65 65 73  |PR5:LDR R3,trees|
00002570  35 3a 53 57 49 20 26 32  45 0d 4a 79 26 20 4c 44  |5:SWI &2E.Jy& LD|
00002580  52 20 52 32 2c 53 50 52  37 3a 4c 44 52 20 52 33  |R R2,SPR7:LDR R3|
00002590  2c 74 72 65 65 73 36 3a  53 57 49 20 26 32 45 0d  |,trees6:SWI &2E.|
000025a0  4a 7a 26 20 4c 44 52 20  52 32 2c 53 50 52 38 3a  |Jz& LDR R2,SPR8:|
000025b0  4c 44 52 20 52 33 2c 74  72 65 65 73 37 3a 53 57  |LDR R3,trees7:SW|
000025c0  49 20 26 32 45 0d 4a 7e  27 20 3b 2a 2a 2a 2a 2a  |I &2E.J~' ;*****|
000025d0  2a 2a 2a 2a 2a 20 4f 42  4a 45 43 54 53 20 2a 2a  |***** OBJECTS **|
000025e0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 0d 4a 92 32  |************.J.2|
000025f0  20 4c 44 52 20 52 32 2c  53 50 52 39 3a 4c 44 52  | LDR R2,SPR9:LDR|
00002600  20 52 33 2c 77 61 6c 6c  3a 4c 44 52 42 20 52 34  | R3,wall:LDRB R4|
00002610  2c 77 61 6c 6c 79 3a 53  57 49 20 26 32 45 0d 4a  |,wally:SWI &2E.J|
00002620  9c 1e 20 4c 44 52 42 20  52 37 2c 47 6f 6c 64 53  |.. LDRB R7,GoldS|
00002630  70 72 3a 43 4d 50 20 52  37 2c 23 30 0d 4a b0 3b  |pr:CMP R7,#0.J.;|
00002640  20 4c 44 52 45 51 20 52  32 2c 53 50 52 31 30 3a  | LDREQ R2,SPR10:|
00002650  4c 44 52 45 51 20 52 33  2c 67 6f 6c 64 3a 4c 44  |LDREQ R3,gold:LD|
00002660  52 45 51 42 20 52 34 2c  67 6f 6c 64 79 3a 53 57  |REQB R4,goldy:SW|
00002670  49 45 51 20 26 32 45 0d  4a ba 32 20 4c 44 52 42  |IEQ &2E.J.2 LDRB|
00002680  20 52 37 2c 57 62 61 6c  6c 3a 41 44 44 20 52 37  | R7,Wball:ADD R7|
00002690  2c 52 37 2c 23 31 3a 43  4d 50 20 52 37 2c 23 39  |,R7,#1:CMP R7,#9|
000026a0  3a ec 51 20 52 37 2c 23  31 0d 4a c4 26 20 4c 44  |:.Q R7,#1.J.& LD|
000026b0  52 42 20 52 36 2c 6d 6f  76 65 3a 43 4d 50 20 52  |RB R6,move:CMP R|
000026c0  36 2c 23 32 34 3a 42 45  51 20 67 65 6f 66 66 0d  |6,#24:BEQ geoff.|
000026d0  4a ce 9e 20 4c 44 52 20  52 33 2c 62 61 6c 6c 3a  |J.. LDR R3,ball:|
000026e0  53 55 42 20 52 33 2c 52  33 2c 52 36 3a 43 4d 4e  |SUB R3,R3,R6:CMN|
000026f0  20 52 33 2c 23 31 32 38  30 3a 4c 44 52 4c 54 42  | R3,#1280:LDRLTB|
00002700  20 52 38 2c 43 62 61 6c  6c 3a 41 44 44 20 52 38  | R8,Cball:ADD R8|
00002710  2c 52 38 2c 23 31 3a 53  54 52 4c 54 42 20 52 38  |,R8,#1:STRLTB R8|
00002720  2c 43 62 61 6c 6c 3a 4c  44 52 4c 54 20 52 38 2c  |,Cball:LDRLT R8,|
00002730  4f 62 61 6c 6c 3a 4d 4f  56 4c 54 20 52 38 2c 23  |Oball:MOVLT R8,#|
00002740  32 35 36 30 3a 53 54 52  4c 54 20 52 38 2c 4f 62  |2560:STRLT R8,Ob|
00002750  61 6c 6c 3a 4d 4f 56 4c  54 20 52 33 2c 23 31 32  |all:MOVLT R3,#12|
00002760  38 30 3a 42 4c 54 20 67  65 6f 66 66 31 0d 4a d8  |80:BLT geoff1.J.|
00002770  0a 2e 67 65 6f 66 66 0d  4a e2 93 20 4c 44 52 20  |..geoff.J.. LDR |
00002780  52 33 2c 62 61 6c 6c 3a  53 55 42 20 52 33 2c 52  |R3,ball:SUB R3,R|
00002790  33 2c 52 36 3a 43 4d 4e  20 52 33 2c 23 31 34 30  |3,R6:CMN R3,#140|
000027a0  38 3a 4c 44 52 4c 54 42  20 52 38 2c 43 62 61 6c  |8:LDRLTB R8,Cbal|
000027b0  6c 3a 41 44 44 20 52 38  2c 52 38 2c 23 31 3a 53  |l:ADD R8,R8,#1:S|
000027c0  54 52 4c 54 42 20 52 38  2c 43 62 61 6c 6c 3a 4c  |TRLTB R8,Cball:L|
000027d0  44 52 4c 54 20 52 38 2c  4f 62 61 6c 6c 3a 4d 4f  |DRLT R8,Oball:MO|
000027e0  56 4c 54 20 52 38 2c 23  32 35 36 30 3a 53 54 52  |VLT R8,#2560:STR|
000027f0  4c 54 20 52 38 2c 4f 62  61 6c 6c 3a 4d 4f 56 4c  |LT R8,Oball:MOVL|
00002800  54 20 52 33 2c 23 31 32  38 30 0d 4a ec 2f 2e 67  |T R3,#1280.J./.g|
00002810  65 6f 66 66 31 3a 4c 44  52 42 20 52 38 2c 43 62  |eoff1:LDRB R8,Cb|
00002820  61 6c 6c 3a 43 4d 50 20  52 38 2c 23 34 3a 4d 4f  |all:CMP R8,#4:MO|
00002830  56 47 54 20 52 38 2c 23  31 0d 4a f6 2c 20 53 54  |VGT R8,#1.J., ST|
00002840  52 20 52 33 2c 62 61 6c  6c 3a 53 54 52 42 20 52  |R R3,ball:STRB R|
00002850  37 2c 57 62 61 6c 6c 3a  53 54 52 42 20 52 38 2c  |7,Wball:STRB R8,|
00002860  43 62 61 6c 6c 0d 4b 00  2e 20 43 4d 50 20 52 38  |Cball.K.. CMP R8|
00002870  2c 23 31 3a 42 45 51 20  50 62 61 6c 6c 31 3a 43  |,#1:BEQ Pball1:C|
00002880  4d 50 20 52 38 2c 23 32  3a 42 45 51 20 50 62 61  |MP R8,#2:BEQ Pba|
00002890  6c 6c 32 0d 4b 0a 2e 20  43 4d 50 20 52 38 2c 23  |ll2.K.. CMP R8,#|
000028a0  33 3a 42 45 51 20 50 62  61 6c 6c 33 3a 43 4d 50  |3:BEQ Pball3:CMP|
000028b0  20 52 38 2c 23 34 3a 42  45 51 20 50 62 61 6c 6c  | R8,#4:BEQ Pball|
000028c0  34 0d 4b 14 0b 2e 50 62  61 6c 6c 31 0d 4b 1e 36  |4.K...Pball1.K.6|
000028d0  20 43 4d 50 20 52 37 2c  23 35 3a 4c 44 52 4c 54  | CMP R7,#5:LDRLT|
000028e0  20 52 32 2c 53 50 52 31  31 3a 43 4d 50 20 52 37  | R2,SPR11:CMP R7|
000028f0  2c 23 34 3a 4c 44 52 47  54 20 52 32 2c 53 50 52  |,#4:LDRGT R2,SPR|
00002900  31 33 0d 4b 28 30 20 4c  44 52 20 52 33 2c 62 61  |13.K(0 LDR R3,ba|
00002910  6c 6c 3a 4c 44 52 42 20  52 34 2c 62 61 6c 6c 79  |ll:LDRB R4,bally|
00002920  3a 4d 4f 56 20 52 35 2c  23 38 3a 53 57 49 20 26  |:MOV R5,#8:SWI &|
00002930  32 45 0d 4b 32 11 20 42  20 4f 62 6a 65 63 74 73  |2E.K2. B Objects|
00002940  45 6e 64 0d 4b 3c 0b 2e  50 62 61 6c 6c 32 0d 4b  |End.K<..Pball2.K|
00002950  46 36 20 43 4d 50 20 52  37 2c 23 35 3a 4c 44 52  |F6 CMP R7,#5:LDR|
00002960  4c 54 20 52 32 2c 53 50  52 32 37 3a 43 4d 50 20  |LT R2,SPR27:CMP |
00002970  52 37 2c 23 34 3a 4c 44  52 47 54 20 52 32 2c 53  |R7,#4:LDRGT R2,S|
00002980  50 52 32 38 0d 4b 50 30  20 4c 44 52 20 52 33 2c  |PR28.KP0 LDR R3,|
00002990  62 61 6c 6c 3a 4c 44 52  42 20 52 34 2c 62 61 6c  |ball:LDRB R4,bal|
000029a0  6c 79 3a 4d 4f 56 20 52  35 2c 23 38 3a 53 57 49  |ly:MOV R5,#8:SWI|
000029b0  20 26 32 45 0d 4b 5a 11  20 42 20 4f 62 6a 65 63  | &2E.KZ. B Objec|
000029c0  74 73 45 6e 64 0d 4b 64  0b 2e 50 62 61 6c 6c 33  |tsEnd.Kd..Pball3|
000029d0  0d 4b 6e 36 20 43 4d 50  20 52 37 2c 23 35 3a 4c  |.Kn6 CMP R7,#5:L|
000029e0  44 52 4c 54 20 52 32 2c  53 50 52 32 39 3a 43 4d  |DRLT R2,SPR29:CM|
000029f0  50 20 52 37 2c 23 34 3a  4c 44 52 47 54 20 52 32  |P R7,#4:LDRGT R2|
00002a00  2c 53 50 52 33 30 0d 4b  78 30 20 4c 44 52 20 52  |,SPR30.Kx0 LDR R|
00002a10  33 2c 62 61 6c 6c 3a 4c  44 52 42 20 52 34 2c 62  |3,ball:LDRB R4,b|
00002a20  61 6c 6c 79 3a 4d 4f 56  20 52 35 2c 23 38 3a 53  |ally:MOV R5,#8:S|
00002a30  57 49 20 26 32 45 0d 4b  82 11 20 42 20 4f 62 6a  |WI &2E.K.. B Obj|
00002a40  65 63 74 73 45 6e 64 0d  4b 8c 0b 2e 50 62 61 6c  |ectsEnd.K...Pbal|
00002a50  6c 34 0d 4b 96 36 20 43  4d 50 20 52 37 2c 23 35  |l4.K.6 CMP R7,#5|
00002a60  3a 4c 44 52 4c 54 20 52  32 2c 53 50 52 33 31 3a  |:LDRLT R2,SPR31:|
00002a70  43 4d 50 20 52 37 2c 23  34 3a 4c 44 52 47 54 20  |CMP R7,#4:LDRGT |
00002a80  52 32 2c 53 50 52 33 32  0d 4b a0 30 20 4c 44 52  |R2,SPR32.K.0 LDR|
00002a90  20 52 33 2c 62 61 6c 6c  3a 4c 44 52 42 20 52 34  | R3,ball:LDRB R4|
00002aa0  2c 62 61 6c 6c 79 3a 4d  4f 56 20 52 35 2c 23 38  |,bally:MOV R5,#8|
00002ab0  3a 53 57 49 20 26 32 45  0d 4b aa 0f 2e 4f 62 6a  |:SWI &2E.K...Obj|
00002ac0  65 63 74 73 45 6e 64 0d  4b b4 2c 20 4c 44 52 42  |ectsEnd.K., LDRB|
00002ad0  20 52 39 2c 6c 65 76 65  6c 3a 43 4d 50 20 52 39  | R9,level:CMP R9|
00002ae0  2c 23 30 3a 42 45 51 20  45 6e 65 72 67 79 43 6f  |,#0:BEQ EnergyCo|
00002af0  75 6e 74 0d 4b be 11 20  4c 44 52 42 20 52 36 2c  |unt.K.. LDRB R6,|
00002b00  6d 6f 76 65 0d 4b c8 2b  20 4c 44 52 20 52 33 2c  |move.K.+ LDR R3,|
00002b10  4f 62 61 6c 6c 3a 53 55  42 20 52 33 2c 52 33 2c  |Oball:SUB R3,R3,|
00002b20  52 36 3a 53 54 52 20 52  33 2c 4f 62 61 6c 6c 0d  |R6:STR R3,Oball.|
00002b30  4b d2 3e 20 4c 44 52 20  52 32 2c 53 50 52 31 35  |K.> LDR R2,SPR15|
00002b40  3a 4c 44 52 20 52 33 2c  4f 62 61 6c 6c 3a 4c 44  |:LDR R3,Oball:LD|
00002b50  52 20 52 34 2c 4f 62 61  6c 6c 79 3a 4d 4f 56 20  |R R4,Obally:MOV |
00002b60  52 35 2c 23 38 3a 53 57  49 20 26 32 45 0d 4b dc  |R5,#8:SWI &2E.K.|
00002b70  10 2e 45 6e 65 72 67 79  43 6f 75 6e 74 0d 4b e6  |..EnergyCount.K.|
00002b80  31 20 4c 44 52 42 20 52  37 2c 43 65 6e 65 72 67  |1 LDRB R7,Cenerg|
00002b90  79 3a 53 55 42 20 52 37  2c 52 37 2c 23 31 3a 53  |y:SUB R7,R7,#1:S|
00002ba0  54 52 42 20 52 37 2c 43  65 6e 65 72 67 79 0d 4b  |TRB R7,Cenergy.K|
00002bb0  f0 3f 20 43 4d 50 20 52  37 2c 23 30 3a 4c 44 52  |.? CMP R7,#0:LDR|
00002bc0  45 51 42 20 52 38 2c 65  6e 65 72 67 79 3a 53 55  |EQB R8,energy:SU|
00002bd0  42 45 51 20 52 38 2c 52  38 2c 23 31 3a 53 54 52  |BEQ R8,R8,#1:STR|
00002be0  45 51 42 20 52 38 2c 65  6e 65 72 67 79 0d 4b fa  |EQB R8,energy.K.|
00002bf0  31 20 4c 44 52 45 51 42  20 52 37 2c 43 65 6e 65  |1 LDREQB R7,Cene|
00002c00  72 67 79 3a ec 51 20 52  37 2c 23 34 3a 53 54 52  |rgy:.Q R7,#4:STR|
00002c10  45 51 42 20 52 37 2c 43  65 6e 65 72 67 79 0d 4c  |EQB R7,Cenergy.L|
00002c20  04 42 20 4c 44 52 42 20  52 38 2c 65 6e 65 72 67  |.B LDRB R8,energ|
00002c30  79 3a 43 4d 50 20 52 38  2c 23 30 3a 4c 44 52 45  |y:CMP R8,#0:LDRE|
00002c40  51 42 20 52 38 2c 65 6e  64 3a ec 51 20 52 38 2c  |QB R8,end:.Q R8,|
00002c50  23 31 3a 53 54 52 45 51  42 20 52 38 2c 65 6e 64  |#1:STREQB R8,end|
00002c60  0d 4c 0e 33 20 4c 44 52  45 51 42 20 52 38 2c 6c  |.L.3 LDREQB R8,l|
00002c70  69 76 65 73 3a 53 55 42  45 51 20 52 38 2c 52 38  |ives:SUBEQ R8,R8|
00002c80  2c 23 31 3a 53 54 52 45  51 42 20 52 38 2c 6c 69  |,#1:STREQB R8,li|
00002c90  76 65 73 0d 4c 18 14 20  4c 44 4d 46 44 20 52 31  |ves.L.. LDMFD R1|
00002ca0  33 21 2c 7b 50 43 7d 0d  4c 22 42 2e 65 6e 65 72  |3!,{PC}.L"B.ener|
00002cb0  67 79 20 45 51 55 42 20  39 39 3a 41 4c 49 47 4e  |gy EQUB 99:ALIGN|
00002cc0  3a 2e 43 65 6e 65 72 67  79 20 45 51 55 42 20 31  |:.Cenergy EQUB 1|
00002cd0  35 3a 41 4c 49 47 4e 3a  2e 65 6e 64 20 45 51 55  |5:ALIGN:.end EQU|
00002ce0  42 20 30 3a 41 4c 49 47  4e 0d 4c 2c 17 2e 43 62  |B 0:ALIGN.L,..Cb|
00002cf0  61 6c 6c 20 45 51 55 42  20 31 3a 41 4c 49 47 4e  |all EQUB 1:ALIGN|
00002d00  0d 4c 36 75 2e 53 50 52  32 37 20 45 51 55 44 20  |.L6u.SPR27 EQUD |
00002d10  54 25 28 32 37 29 3a 2e  53 50 52 32 38 20 45 51  |T%(27):.SPR28 EQ|
00002d20  55 44 20 54 25 28 32 38  29 3a 2e 53 50 52 32 39  |UD T%(28):.SPR29|
00002d30  20 45 51 55 44 20 54 25  28 32 39 29 3a 2e 53 50  | EQUD T%(29):.SP|
00002d40  52 33 30 20 45 51 55 44  20 54 25 28 33 30 29 3a  |R30 EQUD T%(30):|
00002d50  2e 53 50 52 33 31 20 45  51 55 44 20 54 25 28 33  |.SPR31 EQUD T%(3|
00002d60  31 29 3a 2e 53 50 52 33  32 20 45 51 55 44 20 54  |1):.SPR32 EQUD T|
00002d70  25 28 33 32 29 0d 4c 40  28 2e 4f 62 61 6c 6c 20  |%(32).L@(.Oball |
00002d80  45 51 55 44 20 31 34 2a  31 32 38 30 3a 2e 4f 62  |EQUD 14*1280:.Ob|
00002d90  61 6c 6c 79 20 45 51 55  44 20 32 35 36 0d 4c 4a  |ally EQUD 256.LJ|
00002da0  17 2e 6d 6f 76 65 20 45  51 55 42 20 32 30 3a 41  |..move EQUB 20:A|
00002db0  4c 49 47 4e 0d 4e 20 1c  2e 69 6e 6b 65 79 73 3a  |LIGN.N ..inkeys:|
00002dc0  53 54 4d 46 44 20 52 31  33 21 2c 7b 52 31 34 7d  |STMFD R13!,{R14}|
00002dd0  0d 4e 2a 27 20 4c 44 52  42 20 52 33 2c 6a 75 6d  |.N*' LDRB R3,jum|
00002de0  70 3a 43 4d 50 20 52 33  2c 23 30 3a 42 47 54 20  |p:CMP R3,#0:BGT |
00002df0  69 6e 6b 65 79 73 31 0d  4e 3e 3c 20 4d 4f 56 20  |inkeys1.N>< MOV |
00002e00  52 30 2c 23 31 32 39 3a  4d 4f 56 20 52 31 2c 23  |R0,#129:MOV R1,#|
00002e10  26 42 30 3a 4d 4f 56 20  52 32 2c 23 32 35 35 3a  |&B0:MOV R2,#255:|
00002e20  53 57 49 20 26 30 36 3a  43 4d 50 20 52 32 2c 23  |SWI &06:CMP R2,#|
00002e30  32 35 35 0d 4e 3f 2b 20  4c 44 52 45 51 42 20 52  |255.N?+ LDREQB R|
00002e40  39 2c 6a 75 6d 70 3a ec  51 20 52 39 2c 23 31 3a  |9,jump:.Q R9,#1:|
00002e50  53 54 52 45 51 42 20 52  39 2c 6a 75 6d 70 0d 4e  |STREQB R9,jump.N|
00002e60  42 26 20 ec 51 20 52 30  2c 23 31 3a ec 51 20 52  |B& .Q R0,#1:.Q R|
00002e70  31 2c 23 31 30 3a 52 53  42 45 51 20 52 31 2c 52  |1,#10:RSBEQ R1,R|
00002e80  31 2c 23 30 0d 4e 44 2f  20 ec 51 20 52 32 2c 23  |1,#0.ND/ .Q R2,#|
00002e90  32 35 36 3a ec 51 20 52  33 2c 23 31 35 3a 53 57  |256:.Q R3,#15:SW|
00002ea0  49 45 51 20 22 53 6f 75  6e 64 5f 43 6f 6e 74 72  |IEQ "Sound_Contr|
00002eb0  6f 6c 22 0d 4e 4a 30 2e  69 6e 6b 65 79 73 31 3a  |ol".NJ0.inkeys1:|
00002ec0  4c 44 52 42 20 52 33 2c  6a 75 6d 70 3a 43 4d 50  |LDRB R3,jump:CMP|
00002ed0  20 52 33 2c 23 31 3a 42  4c 45 51 20 6d 6f 76 65  | R3,#1:BLEQ move|
00002ee0  5f 75 70 0d 4e 4c 1d 20  43 4d 50 20 52 33 2c 23  |_up.NL. CMP R3,#|
00002ef0  32 3a 42 4c 45 51 20 6a  75 6d 70 5f 64 6f 77 6e  |2:BLEQ jump_down|
00002f00  0d 4e 66 3c 20 4d 4f 56  20 52 30 2c 23 31 32 39  |.Nf< MOV R0,#129|
00002f10  3a 4d 4f 56 20 52 31 2c  23 26 42 44 3a 4d 4f 56  |:MOV R1,#&BD:MOV|
00002f20  20 52 32 2c 23 32 35 35  3a 53 57 49 20 26 30 36  | R2,#255:SWI &06|
00002f30  3a 43 4d 50 20 52 32 2c  23 32 35 35 0d 4e 70 14  |:CMP R2,#255.Np.|
00002f40  20 3b 42 45 51 20 6d 6f  76 65 5f 72 69 67 68 74  | ;BEQ move_right|
00002f50  0d 4e 83 16 20 4c 44 4d  4e 45 46 44 20 52 31 33  |.N.. LDMNEFD R13|
00002f60  21 2c 7b 50 43 7d 0d 4e  e8 10 3b 2e 6d 6f 76 65  |!,{PC}.N..;.move|
00002f70  5f 72 69 67 68 74 0d 4e  f2 1f 20 4c 44 52 20 52  |_right.N.. LDR R|
00002f80  33 2c 74 72 65 65 73 31  3a 53 55 42 20 52 33 2c  |3,trees1:SUB R3,|
00002f90  52 33 2c 23 38 0d 4e fc  2c 20 43 4d 4e 20 52 33  |R3,#8.N., CMN R3|
00002fa0  2c 23 31 32 38 30 3a ec  51 20 52 33 2c 23 31 30  |,#1280:.Q R3,#10|
00002fb0  32 34 30 3a 53 54 52 20  52 33 2c 74 72 65 65 73  |240:STR R3,trees|
00002fc0  31 0d 4f 06 1f 20 4c 44  52 20 52 33 2c 74 72 65  |1.O.. LDR R3,tre|
00002fd0  65 73 32 3a 53 55 42 20  52 33 2c 52 33 2c 23 38  |es2:SUB R3,R3,#8|
00002fe0  0d 4f 10 2c 20 43 4d 4e  20 52 33 2c 23 31 32 38  |.O., CMN R3,#128|
00002ff0  30 3a ec 51 20 52 33 2c  23 31 30 32 34 30 3a 53  |0:.Q R3,#10240:S|
00003000  54 52 20 52 33 2c 74 72  65 65 73 32 0d 4f 1a 1f  |TR R3,trees2.O..|
00003010  20 4c 44 52 20 52 33 2c  74 72 65 65 73 33 3a 53  | LDR R3,trees3:S|
00003020  55 42 20 52 33 2c 52 33  2c 23 38 0d 4f 1f 2b 20  |UB R3,R3,#8.O.+ |
00003030  43 4d 4e 20 52 33 2c 23  31 32 38 30 3a ec 51 20  |CMN R3,#1280:.Q |
00003040  52 33 2c 23 32 35 36 30  3a 53 54 52 20 52 33 2c  |R3,#2560:STR R3,|
00003050  74 72 65 65 73 33 0d 4f  20 1f 20 4c 44 52 20 52  |trees3.O . LDR R|
00003060  33 2c 74 72 65 65 73 34  3a 53 55 42 20 52 33 2c  |3,trees4:SUB R3,|
00003070  52 33 2c 23 38 0d 4f 21  2c 20 43 4d 4e 20 52 33  |R3,#8.O!, CMN R3|
00003080  2c 23 31 32 38 30 3a ec  51 20 52 33 2c 23 31 30  |,#1280:.Q R3,#10|
00003090  32 34 30 3a 53 54 52 20  52 33 2c 74 72 65 65 73  |240:STR R3,trees|
000030a0  34 0d 4f 22 1f 20 4c 44  52 20 52 33 2c 74 72 65  |4.O". LDR R3,tre|
000030b0  65 73 35 3a 53 55 42 20  52 33 2c 52 33 2c 23 38  |es5:SUB R3,R3,#8|
000030c0  0d 4f 23 2c 20 43 4d 4e  20 52 33 2c 23 31 32 38  |.O#, CMN R3,#128|
000030d0  30 3a ec 51 20 52 33 2c  23 31 30 32 34 30 3a 53  |0:.Q R3,#10240:S|
000030e0  54 52 20 52 33 2c 74 72  65 65 73 35 0d 4f 24 1f  |TR R3,trees5.O$.|
000030f0  20 4c 44 52 20 52 33 2c  74 72 65 65 73 36 3a 53  | LDR R3,trees6:S|
00003100  55 42 20 52 33 2c 52 33  2c 23 38 0d 4f 26 2c 20  |UB R3,R3,#8.O&, |
00003110  43 4d 4e 20 52 33 2c 23  31 32 38 30 3a ec 51 20  |CMN R3,#1280:.Q |
00003120  52 33 2c 23 31 30 32 34  30 3a 53 54 52 20 52 33  |R3,#10240:STR R3|
00003130  2c 74 72 65 65 73 36 0d  4f 28 1f 20 4c 44 52 20  |,trees6.O(. LDR |
00003140  52 33 2c 74 72 65 65 73  37 3a 53 55 42 20 52 33  |R3,trees7:SUB R3|
00003150  2c 52 33 2c 23 38 0d 4f  2a 2c 20 43 4d 4e 20 52  |,R3,#8.O*, CMN R|
00003160  33 2c 23 31 32 38 30 3a  ec 51 20 52 33 2c 23 31  |3,#1280:.Q R3,#1|
00003170  30 32 34 30 3a 53 54 52  20 52 33 2c 74 72 65 65  |0240:STR R3,tree|
00003180  73 37 0d 4f 38 1e 20 4c  44 52 20 52 33 2c 77 61  |s7.O8. LDR R3,wa|
00003190  6c 6c 3a 53 55 42 20 52  33 2c 52 33 2c 23 31 32  |ll:SUB R3,R3,#12|
000031a0  0d 4f 3a 2c 20 43 4d 4e  20 52 33 2c 23 31 32 38  |.O:, CMN R3,#128|
000031b0  30 3a 4d 4f 56 4c 54 20  52 33 2c 23 31 32 38 30  |0:MOVLT R3,#1280|
000031c0  3a 53 54 52 20 52 33 2c  77 61 6c 6c 0d 4f 3c 1e  |:STR R3,wall.O<.|
000031d0  20 4c 44 52 20 52 33 2c  67 6f 6c 64 3a 53 55 42  | LDR R3,gold:SUB|
000031e0  20 52 33 2c 52 33 2c 23  31 32 0d 4f 3e 5c 20 43  | R3,R3,#12.O>\ C|
000031f0  4d 4e 20 52 33 2c 23 31  32 38 30 3a 4d 4f 56 4c  |MN R3,#1280:MOVL|
00003200  54 20 52 33 2c 23 31 32  38 30 3a 4c 44 52 4c 54  |T R3,#1280:LDRLT|
00003210  42 20 52 37 2c 47 6f 6c  64 53 70 72 3a 4d 4f 56  |B R7,GoldSpr:MOV|
00003220  4c 54 20 52 37 2c 23 30  3a 53 54 52 4c 54 42 20  |LT R7,#0:STRLTB |
00003230  52 37 2c 47 6f 6c 64 53  70 72 3a 53 54 52 20 52  |R7,GoldSpr:STR R|
00003240  33 2c 67 6f 6c 64 0d 4f  42 1e 20 4c 44 52 42 20  |3,gold.OB. LDRB |
00003250  52 33 2c 57 6d 61 6e 3a  41 44 44 20 52 33 2c 52  |R3,Wman:ADD R3,R|
00003260  33 2c 23 31 0d 4f 47 25  20 43 4d 50 20 52 33 2c  |3,#1.OG% CMP R3,|
00003270  23 31 31 3a ec 51 20 52  33 2c 23 31 3a 53 54 52  |#11:.Q R3,#1:STR|
00003280  42 20 52 33 2c 57 6d 61  6e 0d 4f 4b 14 20 4c 44  |B R3,Wman.OK. LD|
00003290  4d 46 44 20 52 31 33 21  2c 7b 50 43 7d 0d 4f 4c  |MFD R13!,{PC}.OL|
000032a0  1f 2e 6d 6f 76 65 5f 6c  65 66 74 3a 53 54 4d 46  |..move_left:STMF|
000032b0  44 20 52 31 33 21 2c 7b  52 31 34 7d 0d 4f af 14  |D R13!,{R14}.O..|
000032c0  20 4c 44 4d 46 44 20 52  31 33 21 2c 7b 50 43 7d  | LDMFD R13!,{PC}|
000032d0  0d 4f b0 1d 2e 6d 6f 76  65 5f 75 70 3a 53 54 4d  |.O...move_up:STM|
000032e0  46 44 20 52 31 33 21 2c  7b 52 31 34 7d 0d 4f b5  |FD R13!,{R14}.O.|
000032f0  2a 20 4c 44 52 42 20 52  33 2c 6a 75 6d 70 3a 43  |* LDRB R3,jump:C|
00003300  4d 50 20 52 33 2c 23 32  3a 42 45 51 20 6d 6f 76  |MP R3,#2:BEQ mov|
00003310  65 5f 75 70 45 6e 64 0d  4f ba 28 20 4c 44 52 42  |e_upEnd.O.( LDRB|
00003320  20 52 33 2c 6a 75 6d 70  3a 4d 4f 56 20 52 33 2c  | R3,jump:MOV R3,|
00003330  23 31 3a 53 54 52 42 20  52 33 2c 6a 75 6d 70 0d  |#1:STRB R3,jump.|
00003340  4f bc 28 20 4c 44 52 42  20 52 33 2c 73 74 65 70  |O.( LDRB R3,step|
00003350  3a 4d 4f 56 20 52 33 2c  23 31 3a 53 54 52 42 20  |:MOV R3,#1:STRB |
00003360  52 33 2c 73 74 65 70 0d  4f be 34 20 4d 4f 56 20  |R3,step.O.4 MOV |
00003370  52 35 2c 23 32 34 2a 31  32 38 30 3a 53 55 42 20  |R5,#24*1280:SUB |
00003380  52 35 2c 52 35 2c 23 34  30 30 30 3a 53 55 42 20  |R5,R5,#4000:SUB |
00003390  52 35 2c 52 35 2c 23 31  39 32 30 0d 4f bf 28 20  |R5,R5,#1920.O.( |
000033a0  4c 44 52 20 52 33 2c 6d  61 6e 3a 53 55 42 20 52  |LDR R3,man:SUB R|
000033b0  33 2c 52 33 2c 23 33 32  30 3a 43 4d 50 20 52 33  |3,R3,#320:CMP R3|
000033c0  2c 52 35 0d 4f c4 39 20  4c 44 52 4c 54 42 20 52  |,R5.O.9 LDRLTB R|
000033d0  34 2c 6a 75 6d 70 3a 4d  4f 56 4c 54 20 52 34 2c  |4,jump:MOVLT R4,|
000033e0  23 32 3a 53 54 52 4c 54  42 20 52 34 2c 6a 75 6d  |#2:STRLTB R4,jum|
000033f0  70 3a 53 54 52 20 52 33  2c 6d 61 6e 0d 50 0a 42  |p:STR R3,man.P.B|
00003400  20 4d 4f 56 20 52 30 2c  23 31 32 39 3a 4d 4f 56  | MOV R0,#129:MOV|
00003410  20 52 31 2c 23 26 42 44  3a 4d 4f 56 20 52 32 2c  | R1,#&BD:MOV R2,|
00003420  23 32 35 35 3a 53 57 49  20 22 4f 53 5f 42 79 74  |#255:SWI "OS_Byt|
00003430  65 22 3a 43 4d 50 20 52  32 2c 23 32 35 35 0d 50  |e":CMP R2,#255.P|
00003440  0f 2e 20 4c 44 52 4e 45  42 20 52 33 2c 57 6d 61  |.. LDRNEB R3,Wma|
00003450  6e 3a 4d 4f 56 4e 45 20  52 33 2c 23 33 3a 53 54  |n:MOVNE R3,#3:ST|
00003460  52 4e 45 42 20 52 33 2c  57 6d 61 6e 0d 50 13 1f  |RNEB R3,Wman.P..|
00003470  2e 6d 6f 76 65 5f 75 70  45 6e 64 3a 4c 44 4d 46  |.move_upEnd:LDMF|
00003480  44 20 52 31 33 21 2c 7b  50 43 7d 0d 50 14 1f 2e  |D R13!,{PC}.P...|
00003490  6d 6f 76 65 5f 64 6f 77  6e 3a 53 54 4d 46 44 20  |move_down:STMFD |
000034a0  52 31 33 21 2c 7b 52 31  34 7d 0d 50 77 14 20 4c  |R13!,{R14}.Pw. L|
000034b0  44 4d 46 44 20 52 31 33  21 2c 7b 50 43 7d 0d 50  |DMFD R13!,{PC}.P|
000034c0  78 1f 2e 6a 75 6d 70 5f  64 6f 77 6e 3a 53 54 4d  |x..jump_down:STM|
000034d0  46 44 20 52 31 33 21 2c  7b 52 31 34 7d 0d 50 7d  |FD R13!,{R14}.P}|
000034e0  23 20 4d 4f 56 20 52 35  2c 23 32 34 2a 31 32 38  |# MOV R5,#24*128|
000034f0  30 3a 41 44 44 20 52 35  2c 52 35 2c 23 31 37 36  |0:ADD R5,R5,#176|
00003500  0d 50 82 28 20 4c 44 52  20 52 33 2c 6d 61 6e 3a  |.P.( LDR R3,man:|
00003510  41 44 44 20 52 33 2c 52  33 2c 23 33 32 30 3a 43  |ADD R3,R3,#320:C|
00003520  4d 50 20 52 33 2c 52 35  0d 50 8c 39 20 4c 44 52  |MP R3,R5.P.9 LDR|
00003530  47 54 42 20 52 34 2c 6a  75 6d 70 3a 4d 4f 56 47  |GTB R4,jump:MOVG|
00003540  54 20 52 34 2c 23 30 3a  53 54 52 47 54 42 20 52  |T R4,#0:STRGTB R|
00003550  34 2c 6a 75 6d 70 3a 53  54 52 20 52 33 2c 6d 61  |4,jump:STR R3,ma|
00003560  6e 0d 50 db 14 20 4c 44  4d 46 44 20 52 31 33 21  |n.P.. LDMFD R13!|
00003570  2c 7b 50 43 7d 0d 75 26  16 2e 57 6d 61 6e 20 45  |,{PC}.u&..Wman E|
00003580  51 55 42 20 31 3a 41 4c  49 47 4e 0d 75 27 16 2e  |QUB 1:ALIGN.u'..|
00003590  6a 75 6d 70 20 45 51 55  42 20 30 3a 41 4c 49 47  |jump EQUB 0:ALIG|
000035a0  4e 0d 75 28 18 2e 73 74  65 70 20 45 51 55 42 20  |N.u(..step EQUB |
000035b0  32 35 35 3a 41 4c 49 47  4e 0d 75 30 20 2e 73 63  |255:ALIGN.u0 .sc|
000035c0  72 65 65 6e 61 64 64 31  3a 53 54 4d 46 44 20 52  |reenadd1:STMFD R|
000035d0  31 33 21 2c 7b 52 31 34  7d 0d 75 32 0c 2e 73 63  |13!,{R14}.u2..sc|
000035e0  72 65 65 6e 31 0d 75 35  25 20 4c 44 52 42 20 52  |reen1.u5% LDRB R|
000035f0  31 2c 62 61 6e 6b 3a 4d  4f 56 20 52 30 2c 23 31  |1,bank:MOV R0,#1|
00003600  31 32 3a 53 57 49 20 26  30 36 0d 75 3a 27 20 41  |12:SWI &06.u:' A|
00003610  44 52 20 52 30 2c 62 6c  6f 63 6b 31 3a 41 44 52  |DR R0,block1:ADR|
00003620  20 52 31 2c 62 6c 6f 63  6b 32 3a 53 57 49 20 34  | R1,block2:SWI 4|
00003630  39 0d 75 44 13 20 4c 44  52 20 52 31 30 2c 62 6c  |9.uD. LDR R10,bl|
00003640  6f 63 6b 32 0d 75 4e 2a  20 42 4c 20 62 6f 72 64  |ock2.uN* BL bord|
00003650  65 72 3a 42 4c 20 73 63  72 6f 6c 6c 3a 42 4c 20  |er:BL scroll:BL |
00003660  69 6e 6b 65 79 73 3a 42  4c 20 50 6d 61 6e 0d 75  |inkeys:BL Pman.u|
00003670  53 12 20 3b 42 4c 20 44  69 67 65 74 46 6f 75 72  |S. ;BL DigetFour|
00003680  0d 75 58 17 20 4d 4f 56  20 52 30 2c 23 31 39 3a  |.uX. MOV R0,#19:|
00003690  53 57 49 20 26 30 36 0d  75 62 3d 20 4c 44 52 42  |SWI &06.ub= LDRB|
000036a0  20 52 31 2c 62 61 6e 6b  3a 4d 4f 56 20 52 30 2c  | R1,bank:MOV R0,|
000036b0  23 31 31 33 3a 82 20 52  32 2c 52 31 2c 23 33 3a  |#113:. R2,R1,#3:|
000036c0  53 54 52 42 20 52 32 2c  62 61 6e 6b 3a 53 57 49  |STRB R2,bank:SWI|
000036d0  20 26 30 36 0d 75 6c 27  20 4c 44 52 42 20 52 31  | &06.ul' LDRB R1|
000036e0  2c 62 61 6e 6b 3a 43 4d  50 20 52 31 2c 23 31 3a  |,bank:CMP R1,#1:|
000036f0  42 4e 45 20 73 63 72 65  65 6e 31 0d 75 76 12 20  |BNE screen1.uv. |
00003700  42 4c 20 73 63 72 65 65  6e 61 64 64 32 0d 75 8a  |BL screenadd2.u.|
00003710  14 20 4c 44 4d 46 44 20  52 31 33 21 2c 7b 50 43  |. LDMFD R13!,{PC|
00003720  7d 0d 75 90 32 2e 62 6c  6f 63 6b 31 20 45 51 55  |}.u.2.block1 EQU|
00003730  44 20 31 34 38 3a 45 51  55 44 20 2d 31 3a 45 51  |D 148:EQUD -1:EQ|
00003740  55 44 20 30 3a 2e 62 6c  6f 63 6b 32 20 45 51 55  |UD 0:.block2 EQU|
00003750  44 20 30 0d 75 91 16 2e  62 61 6e 6b 20 45 51 55  |D 0.u...bank EQU|
00003760  42 20 31 3a 41 4c 49 47  4e 0d 75 93 06 20 3a 0d  |B 1:ALIGN.u.. :.|
00003770  79 18 20 2e 73 63 72 65  65 6e 61 64 64 32 3a 53  |y. .screenadd2:S|
00003780  54 4d 46 44 20 52 31 33  21 2c 7b 52 31 34 7d 0d  |TMFD R13!,{R14}.|
00003790  79 1d 0c 2e 73 63 72 65  65 6e 32 0d 79 22 25 20  |y...screen2.y"% |
000037a0  4c 44 52 42 20 52 31 2c  62 61 6e 6b 3a 4d 4f 56  |LDRB R1,bank:MOV|
000037b0  20 52 30 2c 23 31 31 32  3a 53 57 49 20 26 30 36  | R0,#112:SWI &06|
000037c0  0d 79 2c 27 20 41 44 52  20 52 30 2c 62 6c 6f 63  |.y,' ADR R0,bloc|
000037d0  6b 31 3a 41 44 52 20 52  31 2c 62 6c 6f 63 6b 32  |k1:ADR R1,block2|
000037e0  3a 53 57 49 20 34 39 0d  79 36 13 20 4c 44 52 20  |:SWI 49.y6. LDR |
000037f0  52 31 30 2c 62 6c 6f 63  6b 32 0d 79 40 20 20 42  |R10,block2.y@  B|
00003800  4c 20 73 63 72 6f 6c 6c  3a 42 4c 20 69 6e 6b 65  |L scroll:BL inke|
00003810  79 73 3a 42 4c 20 50 6d  61 6e 0d 79 4a 27 20 42  |ys:BL Pman.yJ' B|
00003820  4c 20 74 69 68 5f 6d 61  6e 3a 42 4c 20 73 68 6f  |L tih_man:BL sho|
00003830  6f 74 3a 42 4c 20 70 72  69 6e 74 5f 73 63 6f 72  |ot:BL print_scor|
00003840  65 0d 79 54 17 20 4d 4f  56 20 52 30 2c 23 31 39  |e.yT. MOV R0,#19|
00003850  3a 53 57 49 20 26 30 36  0d 79 5e 3d 20 4c 44 52  |:SWI &06.y^= LDR|
00003860  42 20 52 31 2c 62 61 6e  6b 3a 4d 4f 56 20 52 30  |B R1,bank:MOV R0|
00003870  2c 23 31 31 33 3a 82 20  52 32 2c 52 31 2c 23 33  |,#113:. R2,R1,#3|
00003880  3a 53 54 52 42 20 52 32  2c 62 61 6e 6b 3a 53 57  |:STRB R2,bank:SW|
00003890  49 20 26 30 36 0d 79 68  26 20 4c 44 52 42 20 52  |I &06.yh& LDRB R|
000038a0  33 2c 65 6e 64 3a 43 4d  50 20 52 33 2c 23 30 3a  |3,end:CMP R3,#0:|
000038b0  42 45 51 20 73 63 72 65  65 6e 32 0d 79 6d 30 20  |BEQ screen2.ym0 |
000038c0  4d 4f 56 20 52 30 2c 23  31 3a 4d 4f 56 20 52 31  |MOV R0,#1:MOV R1|
000038d0  2c 23 31 3a 53 57 49 20  22 53 6f 75 6e 64 5f 41  |,#1:SWI "Sound_A|
000038e0  74 74 61 63 68 56 6f 69  63 65 22 0d 79 72 12 20  |ttachVoice".yr. |
000038f0  42 4c 20 73 63 72 65 65  6e 61 64 64 33 0d 79 7b  |BL screenadd3.y{|
00003900  14 20 4c 44 4d 46 44 20  52 31 33 21 2c 7b 50 43  |. LDMFD R13!,{PC|
00003910  7d 0d 79 e0 20 2e 73 63  72 65 65 6e 61 64 64 33  |}.y. .screenadd3|
00003920  3a 53 54 4d 46 44 20 52  31 33 21 2c 7b 52 31 34  |:STMFD R13!,{R14|
00003930  7d 0d 79 e5 0c 2e 73 63  72 65 65 6e 33 0d 79 ea  |}.y...screen3.y.|
00003940  25 20 4c 44 52 42 20 52  31 2c 62 61 6e 6b 3a 4d  |% LDRB R1,bank:M|
00003950  4f 56 20 52 30 2c 23 31  31 32 3a 53 57 49 20 26  |OV R0,#112:SWI &|
00003960  30 36 0d 79 f4 27 20 41  44 52 20 52 30 2c 62 6c  |06.y.' ADR R0,bl|
00003970  6f 63 6b 31 3a 41 44 52  20 52 31 2c 62 6c 6f 63  |ock1:ADR R1,bloc|
00003980  6b 32 3a 53 57 49 20 34  39 0d 79 fe 13 20 4c 44  |k2:SWI 49.y.. LD|
00003990  52 20 52 31 30 2c 62 6c  6f 63 6b 32 0d 7a 08 1f  |R R10,block2.z..|
000039a0  20 42 4c 20 62 61 63 6b  67 3a 42 4c 20 44 6d 61  | BL backg:BL Dma|
000039b0  6e 3a 42 4c 20 62 61 63  6b 67 31 0d 7a 12 13 20  |n:BL backg1.z.. |
000039c0  42 4c 20 70 72 69 6e 74  5f 73 63 6f 72 65 0d 7a  |BL print_score.z|
000039d0  26 17 20 4d 4f 56 20 52  30 2c 23 31 39 3a 53 57  |&. MOV R0,#19:SW|
000039e0  49 20 26 30 36 0d 7a 30  3d 20 4c 44 52 42 20 52  |I &06.z0= LDRB R|
000039f0  31 2c 62 61 6e 6b 3a 4d  4f 56 20 52 30 2c 23 31  |1,bank:MOV R0,#1|
00003a00  31 33 3a 82 20 52 32 2c  52 31 2c 23 33 3a 53 54  |13:. R2,R1,#3:ST|
00003a10  52 42 20 52 32 2c 62 61  6e 6b 3a 53 57 49 20 26  |RB R2,bank:SWI &|
00003a20  30 36 0d 7a 3a 2b 20 4c  44 52 42 20 52 33 2c 47  |06.z:+ LDRB R3,G|
00003a30  61 6d 65 4f 76 65 72 3a  43 4d 50 20 52 33 2c 23  |ameOver:CMP R3,#|
00003a40  30 3a 42 45 51 20 73 63  72 65 65 6e 33 0d 7a 44  |0:BEQ screen3.zD|
00003a50  30 20 4d 4f 56 20 52 30  2c 23 31 3a 4d 4f 56 20  |0 MOV R0,#1:MOV |
00003a60  52 31 2c 23 33 3a 53 57  49 20 22 53 6f 75 6e 64  |R1,#3:SWI "Sound|
00003a70  5f 41 74 74 61 63 68 56  6f 69 63 65 22 0d 7a 4e  |_AttachVoice".zN|
00003a80  2c 20 4c 44 52 42 20 52  34 2c 44 74 75 6e 65 3a  |, LDRB R4,Dtune:|
00003a90  4d 4f 56 20 52 34 2c 23  32 35 36 3a 53 54 52 42  |MOV R4,#256:STRB|
00003aa0  20 52 34 2c 44 74 75 6e  65 0d 7a a8 2d 20 4c 44  | R4,Dtune.z.- LD|
00003ab0  52 42 20 52 34 2c 65 6e  65 72 67 79 3a 4d 4f 56  |RB R4,energy:MOV|
00003ac0  20 52 34 2c 23 39 39 3a  53 54 52 42 20 52 34 2c  | R4,#99:STRB R4,|
00003ad0  65 6e 65 72 67 79 0d 7a  b2 30 20 4c 44 52 42 20  |energy.z.0 LDRB |
00003ae0  52 34 2c 47 61 6d 65 4f  76 65 72 3a 4d 4f 56 20  |R4,GameOver:MOV |
00003af0  52 34 2c 23 30 3a 53 54  52 42 20 52 34 2c 47 61  |R4,#0:STRB R4,Ga|
00003b00  6d 65 4f 76 65 72 0d 7a  b7 26 20 4c 44 52 42 20  |meOver.z.& LDRB |
00003b10  52 34 2c 65 6e 64 3a 4d  4f 56 20 52 34 2c 23 30  |R4,end:MOV R4,#0|
00003b20  3a 53 54 52 42 20 52 34  2c 65 6e 64 0d 7a bc 2a  |:STRB R4,end.z.*|
00003b30  20 4c 44 52 42 20 52 34  2c 6d 61 6e 79 3a 4d 4f  | LDRB R4,many:MO|
00003b40  56 20 52 34 2c 23 31 32  39 3a 53 54 52 42 20 52  |V R4,#129:STRB R|
00003b50  34 2c 6d 61 6e 79 0d 7a  c6 48 20 4c 44 52 20 52  |4,many.z.H LDR R|
00003b60  34 2c 6d 61 6e 3a 4d 4f  56 20 52 34 2c 23 32 34  |4,man:MOV R4,#24|
00003b70  2a 31 32 38 30 3a 41 44  44 20 52 34 2c 52 34 2c  |*1280:ADD R4,R4,|
00003b80  23 31 36 38 3a 41 44 44  20 52 34 2c 52 34 2c 23  |#168:ADD R4,R4,#|
00003b90  31 36 38 3a 53 54 52 20  52 34 2c 6d 61 6e 0d 7a  |168:STR R4,man.z|
00003ba0  d0 2c 20 4c 44 52 20 52  34 2c 5a 62 61 6c 6c 3a  |., LDR R4,Zball:|
00003bb0  4d 4f 56 20 52 34 2c 23  38 2a 32 30 30 3a 53 54  |MOV R4,#8*200:ST|
00003bc0  52 20 52 34 2c 5a 62 61  6c 6c 0d 7a d5 2c 20 4c  |R R4,Zball.z., L|
00003bd0  44 52 20 52 34 2c 5a 62  61 6c 6c 79 3a 4d 4f 56  |DR R4,Zbally:MOV|
00003be0  20 52 34 2c 23 31 32 39  3a 53 54 52 20 52 34 2c  | R4,#129:STR R4,|
00003bf0  5a 62 61 6c 6c 79 0d 7a  da 29 20 4c 44 52 42 20  |Zbally.z.) LDRB |
00003c00  52 34 2c 57 70 61 74 68  3a 4d 4f 56 20 52 34 2c  |R4,Wpath:MOV R4,|
00003c10  23 30 3a 53 54 52 20 52  34 2c 57 70 61 74 68 0d  |#0:STR R4,Wpath.|
00003c20  7a df 29 20 4c 44 52 42  20 52 34 2c 57 62 61 6c  |z.) LDRB R4,Wbal|
00003c30  6c 3a 4d 4f 56 20 52 34  2c 23 30 3a 53 54 52 20  |l:MOV R4,#0:STR |
00003c40  52 34 2c 57 62 61 6c 6c  0d 7a e4 2b 20 4c 44 52  |R4,Wball.z.+ LDR|
00003c50  20 52 34 2c 62 61 6c 6c  3a 4d 4f 56 20 52 34 2c  | R4,ball:MOV R4,|
00003c60  23 31 36 2a 33 32 30 3a  53 54 52 20 52 34 2c 62  |#16*320:STR R4,b|
00003c70  61 6c 6c 0d 7a e9 29 20  4c 44 52 20 52 34 2c 77  |all.z.) LDR R4,w|
00003c80  61 6c 6c 3a 4d 4f 56 20  52 34 2c 23 31 32 38 30  |all:MOV R4,#1280|
00003c90  3a 53 54 52 20 52 34 2c  77 61 6c 6c 0d 7a ee 29  |:STR R4,wall.z.)|
00003ca0  20 4c 44 52 20 52 34 2c  67 6f 6c 64 3a 4d 4f 56  | LDR R4,gold:MOV|
00003cb0  20 52 34 2c 23 32 35 36  30 3a 53 54 52 20 52 34  | R4,#2560:STR R4|
00003cc0  2c 67 6f 6c 64 0d 7a f3  2e 20 4c 44 52 42 20 52  |,gold.z.. LDRB R|
00003cd0  34 2c 47 6f 6c 64 53 70  72 3a 4d 4f 56 20 52 34  |4,GoldSpr:MOV R4|
00003ce0  2c 23 30 3a 53 54 52 42  20 52 34 2c 47 6f 6c 64  |,#0:STRB R4,Gold|
00003cf0  53 70 72 0d 7a f8 2a 20  4c 44 52 42 20 52 34 2c  |Spr.z.* LDRB R4,|
00003d00  43 62 61 6c 6c 3a 4d 4f  56 20 52 34 2c 23 31 3a  |Cball:MOV R4,#1:|
00003d10  53 54 52 42 20 52 34 2c  43 62 61 6c 6c 0d 7a fd  |STRB R4,Cball.z.|
00003d20  28 20 4c 44 52 42 20 52  34 2c 6a 75 6d 70 3a 4d  |( LDRB R4,jump:M|
00003d30  4f 56 20 52 34 2c 23 30  3a 53 54 52 42 20 52 34  |OV R4,#0:STRB R4|
00003d40  2c 6a 75 6d 70 0d 7b 02  2c 20 4c 44 52 20 52 34  |,jump.{., LDR R4|
00003d50  2c 43 62 75 6c 6c 65 74  3a 4d 4f 56 20 52 34 2c  |,Cbullet:MOV R4,|
00003d60  23 30 3a 53 54 52 20 52  34 2c 43 62 75 6c 6c 65  |#0:STR R4,Cbulle|
00003d70  74 0d 7b 07 2c 20 4c 44  52 42 20 52 34 2c 62 75  |t.{., LDRB R4,bu|
00003d80  6c 6c 65 74 3a 4d 4f 56  20 52 34 2c 23 30 3a 53  |llet:MOV R4,#0:S|
00003d90  54 52 42 20 52 34 2c 62  75 6c 6c 65 74 0d 7b 0c  |TRB R4,bullet.{.|
00003da0  2e 20 4c 44 52 20 52 34  2c 4f 62 61 6c 6c 3a 4d  |. LDR R4,Oball:M|
00003db0  4f 56 20 52 34 2c 23 31  34 2a 31 32 38 30 3a 53  |OV R4,#14*1280:S|
00003dc0  54 52 20 52 34 2c 4f 62  61 6c 6c 0d 7b 11 28 20  |TR R4,Oball.{.( |
00003dd0  4c 44 52 42 20 52 34 2c  62 61 6e 6b 3a 4d 4f 56  |LDRB R4,bank:MOV|
00003de0  20 52 34 2c 23 31 3a 53  54 52 42 20 52 34 2c 62  | R4,#1:STRB R4,b|
00003df0  61 6e 6b 0d 7b 16 28 20  4c 44 52 42 20 52 34 2c  |ank.{.( LDRB R4,|
00003e00  6c 69 76 65 73 3a 43 4d  50 20 52 34 2c 23 30 3a  |lives:CMP R4,#0:|
00003e10  42 4e 45 20 73 63 72 65  65 6e 32 0d 7c ff 24 20  |BNE screen2.|.$ |
00003e20  3b 2a 2a 2a 2a 2a 2a 2a  20 e7 20 4c 49 56 45 53  |;******* . LIVES|
00003e30  20 3c 3e 20 30 20 8c 20  73 63 72 65 65 6e 32 0d  | <> 0 . screen2.|
00003e40  7d 00 0c 2e 73 63 72 65  65 6e 34 0d 7d 0a 25 20  |}...screen4.}.% |
00003e50  4c 44 52 42 20 52 31 2c  62 61 6e 6b 3a 4d 4f 56  |LDRB R1,bank:MOV|
00003e60  20 52 30 2c 23 31 31 32  3a 53 57 49 20 26 30 36  | R0,#112:SWI &06|
00003e70  0d 7d 14 27 20 41 44 52  20 52 30 2c 62 6c 6f 63  |.}.' ADR R0,bloc|
00003e80  6b 31 3a 41 44 52 20 52  31 2c 62 6c 6f 63 6b 32  |k1:ADR R1,block2|
00003e90  3a 53 57 49 20 34 39 0d  7d 1e 13 20 4c 44 52 20  |:SWI 49.}.. LDR |
00003ea0  52 31 30 2c 62 6c 6f 63  6b 32 0d 7d 28 0d 20 42  |R10,block2.}(. B|
00003eb0  4c 20 62 61 63 6b 67 0d  7d 32 1a 20 42 4c 20 70  |L backg.}2. BL p|
00003ec0  72 69 6e 74 5f 73 63 6f  72 65 3a 42 4c 20 45 6e  |rint_score:BL En|
00003ed0  64 0d 7d 3c 17 20 4d 4f  56 20 52 30 2c 23 31 39  |d.}<. MOV R0,#19|
00003ee0  3a 53 57 49 20 26 30 36  0d 7d 46 3d 20 4c 44 52  |:SWI &06.}F= LDR|
00003ef0  42 20 52 31 2c 62 61 6e  6b 3a 4d 4f 56 20 52 30  |B R1,bank:MOV R0|
00003f00  2c 23 31 31 33 3a 82 20  52 32 2c 52 31 2c 23 33  |,#113:. R2,R1,#3|
00003f10  3a 53 54 52 42 20 52 32  2c 62 61 6e 6b 3a 53 57  |:STRB R2,bank:SW|
00003f20  49 20 26 30 36 0d 7d 50  45 20 4c 44 52 42 20 52  |I &06.}PE LDRB R|
00003f30  34 2c 63 6f 75 6e 74 3a  41 44 44 20 52 34 2c 52  |4,count:ADD R4,R|
00003f40  34 2c 23 32 3a 53 54 52  42 20 52 34 2c 63 6f 75  |4,#2:STRB R4,cou|
00003f50  6e 74 3a 43 4d 50 20 52  34 2c 23 32 35 36 3a 42  |nt:CMP R4,#256:B|
00003f60  4e 45 20 73 63 72 65 65  6e 34 0d 80 e8 2a 20 4c  |NE screen4...* L|
00003f70  44 52 42 20 52 34 2c 6c  69 76 65 73 3a 4d 4f 56  |DRB R4,lives:MOV|
00003f80  20 52 34 2c 23 33 3a 53  54 52 42 20 52 34 2c 6c  | R4,#3:STRB R4,l|
00003f90  69 76 65 73 0d 80 f2 2c  20 4c 44 52 42 20 52 34  |ives..., LDRB R4|
00003fa0  2c 43 5a 62 61 6c 6c 3a  4d 4f 56 20 52 34 2c 23  |,CZball:MOV R4,#|
00003fb0  31 3a 53 54 52 42 20 52  34 2c 43 5a 62 61 6c 6c  |1:STRB R4,CZball|
00003fc0  0d 80 fc 2a 20 4c 44 52  42 20 52 34 2c 6c 65 76  |...* LDRB R4,lev|
00003fd0  65 6c 3a 4d 4f 56 20 52  34 2c 23 30 3a 53 54 52  |el:MOV R4,#0:STR|
00003fe0  42 20 52 34 2c 6c 65 76  65 6c 0d 81 06 29 20 4c  |B R4,level...) L|
00003ff0  44 52 42 20 52 34 2c 6d  6f 76 65 3a 4d 4f 56 20  |DRB R4,move:MOV |
00004000  52 34 2c 23 32 30 3a 53  54 52 42 20 52 34 2c 6d  |R4,#20:STRB R4,m|
00004010  6f 76 65 0d 81 10 2a 20  4c 44 52 42 20 52 34 2c  |ove...* LDRB R4,|
00004020  73 74 61 67 65 3a 4d 4f  56 20 52 34 2c 23 30 3a  |stage:MOV R4,#0:|
00004030  53 54 52 42 20 52 34 2c  73 74 61 67 65 0d 81 1a  |STRB R4,stage...|
00004040  2a 20 4c 44 52 42 20 52  34 2c 63 6f 75 6e 74 3a  |* LDRB R4,count:|
00004050  4d 4f 56 20 52 34 2c 23  30 3a 53 54 52 42 20 52  |MOV R4,#0:STRB R|
00004060  34 2c 63 6f 75 6e 74 0d  84 cf 14 20 4c 44 4d 46  |4,count.... LDMF|
00004070  44 20 52 31 33 21 2c 7b  50 43 7d 0d 88 b8 19 2e  |D R13!,{PC}.....|
00004080  45 6e 64 3a 53 54 4d 46  44 20 52 31 33 21 2c 7b  |End:STMFD R13!,{|
00004090  52 31 34 7d 0d 88 c2 11  20 4c 44 52 20 52 35 2c  |R14}.... LDR R5,|
000040a0  6f 76 65 72 31 0d 88 cc  30 20 4d 4f 56 20 52 31  |over1...0 MOV R1|
000040b0  2c 52 31 30 3a 41 44 44  20 52 31 2c 52 31 2c 52  |,R10:ADD R1,R1,R|
000040c0  35 3a 42 4c 20 42 72 61  6e 63 68 5f 61 6c 69 65  |5:BL Branch_alie|
000040d0  6e 74 61 62 31 0d 88 d6  0f 20 4d 4f 56 20 52 32  |ntab1.... MOV R2|
000040e0  2c 23 31 35 0d 88 e0 40  20 4c 44 52 20 52 30 2c  |,#15...@ LDR R0,|
000040f0  5b 52 31 31 2c 52 32 2c  4c 53 4c 23 32 5d 3a 41  |[R11,R2,LSL#2]:A|
00004100  44 44 20 52 30 2c 52 30  2c 52 31 32 3a 41 44 44  |DD R0,R0,R12:ADD|
00004110  20 52 30 2c 52 30 2c 23  38 3a 42 4c 20 61 6c 69  | R0,R0,#8:BL ali|
00004120  65 6e 33 32 0d 88 ea 11  20 4c 44 52 20 52 35 2c  |en32.... LDR R5,|
00004130  6f 76 65 72 32 0d 88 f4  1c 20 4d 4f 56 20 52 31  |over2.... MOV R1|
00004140  2c 52 31 30 3a 41 44 44  20 52 31 2c 52 31 2c 52  |,R10:ADD R1,R1,R|
00004150  35 0d 88 fe 0f 20 4d 4f  56 20 52 32 2c 23 31 36  |5.... MOV R2,#16|
00004160  0d 89 08 40 20 4c 44 52  20 52 30 2c 5b 52 31 31  |...@ LDR R0,[R11|
00004170  2c 52 32 2c 4c 53 4c 23  32 5d 3a 41 44 44 20 52  |,R2,LSL#2]:ADD R|
00004180  30 2c 52 30 2c 52 31 32  3a 41 44 44 20 52 30 2c  |0,R0,R12:ADD R0,|
00004190  52 30 2c 23 38 3a 42 4c  20 61 6c 69 65 6e 33 32  |R0,#8:BL alien32|
000041a0  0d 89 12 11 20 4c 44 52  20 52 35 2c 6f 76 65 72  |.... LDR R5,over|
000041b0  33 0d 89 1c 1c 20 4d 4f  56 20 52 31 2c 52 31 30  |3.... MOV R1,R10|
000041c0  3a 41 44 44 20 52 31 2c  52 31 2c 52 35 0d 89 26  |:ADD R1,R1,R5..&|
000041d0  0f 20 4d 4f 56 20 52 32  2c 23 31 37 0d 89 30 40  |. MOV R2,#17..0@|
000041e0  20 4c 44 52 20 52 30 2c  5b 52 31 31 2c 52 32 2c  | LDR R0,[R11,R2,|
000041f0  4c 53 4c 23 32 5d 3a 41  44 44 20 52 30 2c 52 30  |LSL#2]:ADD R0,R0|
00004200  2c 52 31 32 3a 41 44 44  20 52 30 2c 52 30 2c 23  |,R12:ADD R0,R0,#|
00004210  38 3a 42 4c 20 61 6c 69  65 6e 33 32 0d 89 3a 11  |8:BL alien32..:.|
00004220  20 4c 44 52 20 52 35 2c  6f 76 65 72 34 0d 89 44  | LDR R5,over4..D|
00004230  1c 20 4d 4f 56 20 52 31  2c 52 31 30 3a 41 44 44  |. MOV R1,R10:ADD|
00004240  20 52 31 2c 52 31 2c 52  35 0d 89 4e 0f 20 4d 4f  | R1,R1,R5..N. MO|
00004250  56 20 52 32 2c 23 31 38  0d 89 58 40 20 4c 44 52  |V R2,#18..X@ LDR|
00004260  20 52 30 2c 5b 52 31 31  2c 52 32 2c 4c 53 4c 23  | R0,[R11,R2,LSL#|
00004270  32 5d 3a 41 44 44 20 52  30 2c 52 30 2c 52 31 32  |2]:ADD R0,R0,R12|
00004280  3a 41 44 44 20 52 30 2c  52 30 2c 23 38 3a 42 4c  |:ADD R0,R0,#8:BL|
00004290  20 61 6c 69 65 6e 33 32  0d 89 62 11 20 4c 44 52  | alien32..b. LDR|
000042a0  20 52 35 2c 6f 76 65 72  35 0d 89 6c 1c 20 4d 4f  | R5,over5..l. MO|
000042b0  56 20 52 31 2c 52 31 30  3a 41 44 44 20 52 31 2c  |V R1,R10:ADD R1,|
000042c0  52 31 2c 52 35 0d 89 76  0f 20 4d 4f 56 20 52 32  |R1,R5..v. MOV R2|
000042d0  2c 23 31 39 0d 89 80 40  20 4c 44 52 20 52 30 2c  |,#19...@ LDR R0,|
000042e0  5b 52 31 31 2c 52 32 2c  4c 53 4c 23 32 5d 3a 41  |[R11,R2,LSL#2]:A|
000042f0  44 44 20 52 30 2c 52 30  2c 52 31 32 3a 41 44 44  |DD R0,R0,R12:ADD|
00004300  20 52 30 2c 52 30 2c 23  38 3a 42 4c 20 61 6c 69  | R0,R0,#8:BL ali|
00004310  65 6e 33 32 0d 89 8a 11  20 4c 44 52 20 52 35 2c  |en32.... LDR R5,|
00004320  6f 76 65 72 36 0d 89 94  1c 20 4d 4f 56 20 52 31  |over6.... MOV R1|
00004330  2c 52 31 30 3a 41 44 44  20 52 31 2c 52 31 2c 52  |,R10:ADD R1,R1,R|
00004340  35 0d 89 9e 0f 20 4d 4f  56 20 52 32 2c 23 32 30  |5.... MOV R2,#20|
00004350  0d 89 a8 40 20 4c 44 52  20 52 30 2c 5b 52 31 31  |...@ LDR R0,[R11|
00004360  2c 52 32 2c 4c 53 4c 23  32 5d 3a 41 44 44 20 52  |,R2,LSL#2]:ADD R|
00004370  30 2c 52 30 2c 52 31 32  3a 41 44 44 20 52 30 2c  |0,R0,R12:ADD R0,|
00004380  52 30 2c 23 38 3a 42 4c  20 61 6c 69 65 6e 33 32  |R0,#8:BL alien32|
00004390  0d 89 b2 11 20 4c 44 52  20 52 35 2c 6f 76 65 72  |.... LDR R5,over|
000043a0  37 0d 89 bc 1c 20 4d 4f  56 20 52 31 2c 52 31 30  |7.... MOV R1,R10|
000043b0  3a 41 44 44 20 52 31 2c  52 31 2c 52 35 0d 89 c6  |:ADD R1,R1,R5...|
000043c0  0f 20 4d 4f 56 20 52 32  2c 23 32 31 0d 89 d0 40  |. MOV R2,#21...@|
000043d0  20 4c 44 52 20 52 30 2c  5b 52 31 31 2c 52 32 2c  | LDR R0,[R11,R2,|
000043e0  4c 53 4c 23 32 5d 3a 41  44 44 20 52 30 2c 52 30  |LSL#2]:ADD R0,R0|
000043f0  2c 52 31 32 3a 41 44 44  20 52 30 2c 52 30 2c 23  |,R12:ADD R0,R0,#|
00004400  38 3a 42 4c 20 61 6c 69  65 6e 33 32 0d 89 da 11  |8:BL alien32....|
00004410  20 4c 44 52 20 52 35 2c  6f 76 65 72 38 0d 89 e4  | LDR R5,over8...|
00004420  1c 20 4d 4f 56 20 52 31  2c 52 31 30 3a 41 44 44  |. MOV R1,R10:ADD|
00004430  20 52 31 2c 52 31 2c 52  35 0d 89 ee 0f 20 4d 4f  | R1,R1,R5.... MO|
00004440  56 20 52 32 2c 23 32 32  0d 89 f8 40 20 4c 44 52  |V R2,#22...@ LDR|
00004450  20 52 30 2c 5b 52 31 31  2c 52 32 2c 4c 53 4c 23  | R0,[R11,R2,LSL#|
00004460  32 5d 3a 41 44 44 20 52  30 2c 52 30 2c 52 31 32  |2]:ADD R0,R0,R12|
00004470  3a 41 44 44 20 52 30 2c  52 30 2c 23 38 3a 42 4c  |:ADD R0,R0,#8:BL|
00004480  20 61 6c 69 65 6e 33 32  0d 8c 9f 14 20 4c 44 4d  | alien32.... LDM|
00004490  46 44 20 52 31 33 21 2c  7b 50 43 7d 0d 8c a0 1a  |FD R13!,{PC}....|
000044a0  2e 6f 76 65 72 31 20 45  51 55 44 20 31 30 2a 31  |.over1 EQUD 10*1|
000044b0  32 38 30 2b 31 36 0d 8c  a1 1a 2e 6f 76 65 72 32  |280+16.....over2|
000044c0  20 45 51 55 44 20 31 30  2a 31 32 38 30 2b 33 32  | EQUD 10*1280+32|
000044d0  0d 8c a2 1a 2e 6f 76 65  72 33 20 45 51 55 44 20  |.....over3 EQUD |
000044e0  31 30 2a 31 32 38 30 2b  34 38 0d 8c a3 1a 2e 6f  |10*1280+48.....o|
000044f0  76 65 72 34 20 45 51 55  44 20 31 30 2a 31 32 38  |ver4 EQUD 10*128|
00004500  30 2b 36 34 0d 8c a5 1a  2e 6f 76 65 72 35 20 45  |0+64.....over5 E|
00004510  51 55 44 20 31 30 2a 31  32 38 30 2b 38 30 0d 8c  |QUD 10*1280+80..|
00004520  a6 1a 2e 6f 76 65 72 36  20 45 51 55 44 20 31 30  |...over6 EQUD 10|
00004530  2a 31 32 38 30 2b 39 36  0d 8c a7 1b 2e 6f 76 65  |*1280+96.....ove|
00004540  72 37 20 45 51 55 44 20  31 30 2a 31 32 38 30 2b  |r7 EQUD 10*1280+|
00004550  31 31 32 0d 8c a8 1b 2e  6f 76 65 72 38 20 45 51  |112.....over8 EQ|
00004560  55 44 20 31 30 2a 31 32  38 30 2b 31 32 38 0d 8c  |UD 10*1280+128..|
00004570  aa 17 2e 63 6f 75 6e 74  20 45 51 55 42 20 30 3a  |...count EQUB 0:|
00004580  41 4c 49 47 4e 0d 99 52  58 2e 53 50 52 34 20 45  |ALIGN..RX.SPR4 E|
00004590  51 55 44 20 54 25 28 34  29 3a 2e 53 50 52 35 20  |QUD T%(4):.SPR5 |
000045a0  45 51 55 44 20 54 25 28  35 29 3a 2e 53 50 52 36  |EQUD T%(5):.SPR6|
000045b0  20 45 51 55 44 20 54 25  28 36 29 3a 2e 53 50 52  | EQUD T%(6):.SPR|
000045c0  37 20 45 51 55 44 20 54  25 28 37 29 3a 2e 53 50  |7 EQUD T%(7):.SP|
000045d0  52 38 20 45 51 55 44 20  54 25 28 38 29 0d 99 53  |R8 EQUD T%(8)..S|
000045e0  2b 2e 6c 65 76 65 6c 20  45 51 55 42 20 30 3a 41  |+.level EQUB 0:A|
000045f0  4c 49 47 4e 3a 2e 73 74  61 67 65 20 45 51 55 42  |LIGN:.stage EQUB|
00004600  20 30 3a 41 4c 49 47 4e  0d 9c 40 1b 2e 73 68 6f  | 0:ALIGN..@..sho|
00004610  6f 74 3a 53 54 4d 46 44  20 52 31 33 21 2c 7b 52  |ot:STMFD R13!,{R|
00004620  31 34 7d 0d 9c 4a 26 20  4c 44 52 42 20 52 33 2c  |14}..J& LDRB R3,|
00004630  62 75 6c 6c 65 74 3a 43  4d 50 20 52 33 2c 23 31  |bullet:CMP R3,#1|
00004640  3a 42 45 51 20 66 69 72  65 0d 9c 54 3c 20 4d 4f  |:BEQ fire..T< MO|
00004650  56 20 52 30 2c 23 31 32  39 3a 4d 4f 56 20 52 31  |V R0,#129:MOV R1|
00004660  2c 23 26 39 37 3a 4d 4f  56 20 52 32 2c 23 32 35  |,#&97:MOV R2,#25|
00004670  35 3a 53 57 49 20 26 30  36 3a 43 4d 50 20 52 32  |5:SWI &06:CMP R2|
00004680  2c 23 32 35 35 0d 9c 56  43 20 4c 44 52 45 51 20  |,#255..VC LDREQ |
00004690  52 35 2c 6d 61 6e 3a 41  44 44 45 51 20 52 35 2c  |R5,man:ADDEQ R5,|
000046a0  52 35 2c 23 31 32 38 30  3a 41 44 44 45 51 20 52  |R5,#1280:ADDEQ R|
000046b0  35 2c 52 35 2c 23 34 3a  53 54 52 45 51 20 52 35  |5,R5,#4:STREQ R5|
000046c0  2c 58 62 75 6c 6c 65 74  0d 9c 58 1d 20 3b 4c 44  |,Xbullet..X. ;LD|
000046d0  52 42 20 52 33 2c 6a 75  6d 70 3a 3b 43 4d 50 20  |RB R3,jump:;CMP |
000046e0  52 33 2c 23 31 0d 9c 5a  28 20 3b ec 51 20 52 30  |R3,#1..Z( ;.Q R0|
000046f0  2c 23 31 3a 3b ec 51 20  52 31 2c 23 34 3a 3b 52  |,#1:;.Q R1,#4:;R|
00004700  53 42 45 51 20 52 31 2c  52 31 2c 23 30 0d 9c 5c  |SBEQ R1,R1,#0..\|
00004710  31 20 3b ec 51 20 52 32  2c 23 35 30 3a 3b ec 51  |1 ;.Q R2,#50:;.Q|
00004720  20 52 33 2c 23 31 35 3a  3b 53 57 49 45 51 20 22  | R3,#15:;SWIEQ "|
00004730  53 6f 75 6e 64 5f 43 6f  6e 74 72 6f 6c 22 0d 9c  |Sound_Control"..|
00004740  5e 10 20 42 4e 45 20 7a  65 72 6f 69 64 73 0d 9d  |^. BNE zeroids..|
00004750  08 09 2e 66 69 72 65 0d  9d 09 2c 20 4c 44 52 42  |...fire..., LDRB|
00004760  20 52 33 2c 62 75 6c 6c  65 74 3a 4d 4f 56 20 52  | R3,bullet:MOV R|
00004770  33 2c 23 31 3a 53 54 52  42 20 52 33 2c 62 75 6c  |3,#1:STRB R3,bul|
00004780  6c 65 74 0d 9d 0d 20 20  4c 44 52 20 52 35 2c 58  |let...  LDR R5,X|
00004790  62 75 6c 6c 65 74 3a 41  44 44 20 52 35 2c 52 35  |bullet:ADD R5,R5|
000047a0  2c 23 34 0d 9d 12 2b 20  4c 44 52 20 52 34 2c 43  |,#4...+ LDR R4,C|
000047b0  62 75 6c 6c 65 74 3a 41  44 44 20 52 34 2c 52 34  |bullet:ADD R4,R4|
000047c0  2c 23 31 3a 43 4d 50 20  52 34 2c 23 33 32 0d 9d  |,#1:CMP R4,#32..|
000047d0  13 2f 20 4c 44 52 45 51  42 20 52 33 2c 62 75 6c  |./ LDREQB R3,bul|
000047e0  6c 65 74 3a ec 51 20 52  33 2c 23 30 3a 53 54 52  |let:.Q R3,#0:STR|
000047f0  45 51 42 20 52 33 2c 62  75 6c 6c 65 74 0d 9d 14  |EQB R3,bullet...|
00004800  2d 20 4c 44 52 45 51 42  20 52 36 2c 73 74 65 70  |- LDREQB R6,step|
00004810  3a ec 51 20 52 36 2c 23  32 35 35 3a 53 54 52 45  |:.Q R6,#255:STRE|
00004820  51 42 20 52 36 2c 73 74  65 70 0d 9d 15 0d 20 ec  |QB R6,step.... .|
00004830  51 20 52 34 2c 23 30 0d  9d 16 4a 20 53 54 52 20  |Q R4,#0...J STR |
00004840  52 34 2c 43 62 75 6c 6c  65 74 3a 53 54 52 20 52  |R4,Cbullet:STR R|
00004850  35 2c 58 62 75 6c 6c 65  74 3a 3b 4c 44 52 42 20  |5,Xbullet:;LDRB |
00004860  52 33 2c 62 75 6c 6c 65  74 3a 3b 43 4d 50 20 52  |R3,bullet:;CMP R|
00004870  33 2c 23 30 3a 3b 42 45  51 20 7a 65 72 6f 69 64  |3,#0:;BEQ zeroid|
00004880  73 0d 9d 1c 2b 20 4c 44  52 42 20 52 36 2c 73 74  |s...+ LDRB R6,st|
00004890  65 70 3a 53 55 42 20 52  36 2c 52 36 2c 23 35 3a  |ep:SUB R6,R6,#5:|
000048a0  53 54 52 42 20 52 36 2c  73 74 65 70 0d 9d 58 1b  |STRB R6,step..X.|
000048b0  20 4c 44 52 42 20 52 33  2c 6a 75 6d 70 3a 43 4d  | LDRB R3,jump:CM|
000048c0  50 20 52 33 2c 23 31 0d  9d 5d 2b 20 4d 4f 56 4e  |P R3,#1..]+ MOVN|
000048d0  45 20 52 30 2c 23 31 3a  4d 4f 56 4e 45 20 52 31  |E R0,#1:MOVNE R1|
000048e0  2c 23 34 3a 52 53 42 4e  45 20 52 31 2c 52 31 2c  |,#4:RSBNE R1,R1,|
000048f0  23 30 0d 9d 62 30 20 4d  4f 56 4e 45 20 52 32 2c  |#0..b0 MOVNE R2,|
00004900  52 36 3a 4d 4f 56 4e 45  20 52 33 2c 23 31 3a 53  |R6:MOVNE R3,#1:S|
00004910  57 49 20 22 53 6f 75 6e  64 5f 43 6f 6e 74 72 6f  |WI "Sound_Contro|
00004920  6c 22 0d 9d 6c 0c 2e 7a  65 72 6f 69 64 73 0d 9d  |l"..l..zeroids..|
00004930  da 44 20 4c 44 52 42 20  52 37 2c 57 70 61 74 68  |.D LDRB R7,Wpath|
00004940  3a 41 44 44 20 52 37 2c  52 37 2c 23 31 3a 43 4d  |:ADD R7,R7,#1:CM|
00004950  50 20 52 37 2c 23 35 30  3a 4d 4f 56 47 54 20 52  |P R7,#50:MOVGT R|
00004960  37 2c 23 31 3a 53 54 52  42 20 52 37 2c 57 70 61  |7,#1:STRB R7,Wpa|
00004970  74 68 0d 9d e4 2e 20 43  4d 50 20 52 37 2c 23 32  |th.... CMP R7,#2|
00004980  36 3a 4c 44 52 4c 54 20  52 34 2c 5a 62 61 6c 6c  |6:LDRLT R4,Zball|
00004990  79 3a 41 44 44 4c 54 20  52 34 2c 52 34 2c 23 35  |y:ADDLT R4,R4,#5|
000049a0  0d 9d ee 3c 20 43 4d 50  20 52 37 2c 23 32 35 3a  |...< CMP R7,#25:|
000049b0  4c 44 52 47 54 20 52 34  2c 5a 62 61 6c 6c 79 3a  |LDRGT R4,Zbally:|
000049c0  53 55 42 47 54 20 52 34  2c 52 34 2c 23 35 3a 53  |SUBGT R4,R4,#5:S|
000049d0  54 52 20 52 34 2c 5a 62  61 6c 6c 79 0d ab e0 1a  |TR R4,Zbally....|
000049e0  2e 50 5a 62 61 6c 6c 3a  3b 2a 2a 2a 2a 2a 2a 2a  |.PZball:;*******|
000049f0  2a 2a 2a 2a 2a 2a 0d ab  e5 13 20 4c 44 52 42 20  |******.... LDRB |
00004a00  52 38 2c 43 5a 62 61 6c  6c 0d ab ea 1e 20 4c 44  |R8,CZball.... LD|
00004a10  52 20 52 33 2c 5a 62 61  6c 6c 3a 53 55 42 20 52  |R R3,Zball:SUB R|
00004a20  33 2c 52 33 2c 52 38 0d  ab f4 2d 20 43 4d 4e 20  |3,R3,R8...- CMN |
00004a30  52 33 2c 23 31 32 38 30  3a 4d 4f 56 4c 54 20 52  |R3,#1280:MOVLT R|
00004a40  33 2c 23 31 32 38 30 3a  53 54 52 20 52 33 2c 5a  |3,#1280:STR R3,Z|
00004a50  62 61 6c 6c 0d ac 08 72  20 43 4d 50 20 52 38 2c  |ball...r CMP R8,|
00004a60  23 31 3a 42 45 51 20 62  6f 75 6e 63 65 31 3a 43  |#1:BEQ bounce1:C|
00004a70  4d 50 20 52 38 2c 23 32  3a 42 45 51 20 62 6f 75  |MP R8,#2:BEQ bou|
00004a80  6e 63 65 32 3a 43 4d 50  20 52 38 2c 23 33 3a 42  |nce2:CMP R8,#3:B|
00004a90  45 51 20 62 6f 75 6e 63  65 33 3a 43 4d 50 20 52  |EQ bounce3:CMP R|
00004aa0  38 2c 23 34 3a 42 45 51  20 62 6f 75 6e 63 65 34  |8,#4:BEQ bounce4|
00004ab0  3a 43 4d 50 20 52 38 2c  23 35 3a 42 45 51 20 62  |:CMP R8,#5:BEQ b|
00004ac0  6f 75 6e 63 65 35 0d ac  0c 1a 20 43 4d 50 20 52  |ounce5.... CMP R|
00004ad0  38 2c 23 35 3a 42 45 51  20 62 6f 75 6e 63 65 35  |8,#5:BEQ bounce5|
00004ae0  0d ac 44 0c 2e 62 6f 75  6e 63 65 31 0d ac 4e 12  |..D..bounce1..N.|
00004af0  20 4c 44 52 42 20 52 37  2c 57 62 61 6c 6c 0d ac  | LDRB R7,Wball..|
00004b00  58 1d 20 43 4d 50 20 52  37 2c 23 35 3a 4c 44 52  |X. CMP R7,#5:LDR|
00004b10  4c 54 20 52 32 2c 53 50  52 31 34 0d ac 62 1d 20  |LT R2,SPR14..b. |
00004b20  43 4d 50 20 52 37 2c 23  34 3a 4c 44 52 47 54 20  |CMP R7,#4:LDRGT |
00004b30  52 32 2c 53 50 52 31 36  0d ac 9e 0d 20 42 20 50  |R2,SPR16.... B P|
00004b40  52 62 61 6c 6c 0d ac a8  0c 2e 62 6f 75 6e 63 65  |Rball.....bounce|
00004b50  32 0d ac b2 12 20 4c 44  52 42 20 52 37 2c 57 62  |2.... LDRB R7,Wb|
00004b60  61 6c 6c 0d ac bc 1d 20  43 4d 50 20 52 37 2c 23  |all.... CMP R7,#|
00004b70  35 3a 4c 44 52 4c 54 20  52 32 2c 53 50 52 31 39  |5:LDRLT R2,SPR19|
00004b80  0d ac c6 1d 20 43 4d 50  20 52 37 2c 23 34 3a 4c  |.... CMP R7,#4:L|
00004b90  44 52 47 54 20 52 32 2c  53 50 52 32 30 0d ac d0  |DRGT R2,SPR20...|
00004ba0  0d 20 42 20 50 52 62 61  6c 6c 0d ac da 0c 2e 62  |. B PRball.....b|
00004bb0  6f 75 6e 63 65 33 0d ac  e4 12 20 4c 44 52 42 20  |ounce3.... LDRB |
00004bc0  52 37 2c 57 62 61 6c 6c  0d ac ee 1d 20 43 4d 50  |R7,Wball.... CMP|
00004bd0  20 52 37 2c 23 35 3a 4c  44 52 4c 54 20 52 32 2c  | R7,#5:LDRLT R2,|
00004be0  53 50 52 32 31 0d ac f8  1d 20 43 4d 50 20 52 37  |SPR21.... CMP R7|
00004bf0  2c 23 34 3a 4c 44 52 47  54 20 52 32 2c 53 50 52  |,#4:LDRGT R2,SPR|
00004c00  32 32 0d ad 02 0d 20 42  20 50 52 62 61 6c 6c 0d  |22.... B PRball.|
00004c10  ad 0c 0c 2e 62 6f 75 6e  63 65 34 0d ad 16 12 20  |....bounce4.... |
00004c20  4c 44 52 42 20 52 37 2c  57 62 61 6c 6c 0d ad 20  |LDRB R7,Wball.. |
00004c30  1d 20 43 4d 50 20 52 37  2c 23 35 3a 4c 44 52 4c  |. CMP R7,#5:LDRL|
00004c40  54 20 52 32 2c 53 50 52  32 33 0d ad 2a 1d 20 43  |T R2,SPR23..*. C|
00004c50  4d 50 20 52 37 2c 23 34  3a 4c 44 52 47 54 20 52  |MP R7,#4:LDRGT R|
00004c60  32 2c 53 50 52 32 34 0d  ad 34 0d 20 42 20 50 52  |2,SPR24..4. B PR|
00004c70  62 61 6c 6c 0d ad 3e 0c  2e 62 6f 75 6e 63 65 35  |ball..>..bounce5|
00004c80  0d ad 48 12 20 4c 44 52  42 20 52 37 2c 57 62 61  |..H. LDRB R7,Wba|
00004c90  6c 6c 0d ad 52 1d 20 43  4d 50 20 52 37 2c 23 35  |ll..R. CMP R7,#5|
00004ca0  3a 4c 44 52 4c 54 20 52  32 2c 53 50 52 32 35 0d  |:LDRLT R2,SPR25.|
00004cb0  ad 5c 1d 20 43 4d 50 20  52 37 2c 23 34 3a 4c 44  |.\. CMP R7,#4:LD|
00004cc0  52 47 54 20 52 32 2c 53  50 52 32 36 0d af 64 34  |RGT R2,SPR26..d4|
00004cd0  2e 50 52 62 61 6c 6c 3a  4d 4f 56 20 52 30 2c 23  |.PRball:MOV R0,#|
00004ce0  35 31 32 3a 41 44 44 20  52 30 2c 52 30 2c 23 33  |512:ADD R0,R0,#3|
00004cf0  34 3a 4c 44 52 42 20 52  31 2c 53 70 41 72 65 61  |4:LDRB R1,SpArea|
00004d00  0d af 6e 31 20 4c 44 52  20 52 33 2c 5a 62 61 6c  |..n1 LDR R3,Zbal|
00004d10  6c 3a 4c 44 52 20 52 34  2c 5a 62 61 6c 6c 79 3a  |l:LDR R4,Zbally:|
00004d20  4d 4f 56 20 52 35 2c 23  38 3a 53 57 49 20 26 32  |MOV R5,#8:SWI &2|
00004d30  45 0d af c8 0d 2e 74 69  68 4f 62 6a 65 74 0d af  |E.....tihObjet..|
00004d40  d2 2a 20 4c 44 52 42 20  52 35 2c 62 75 6c 6c 65  |.* LDRB R5,bulle|
00004d50  74 3a 43 4d 50 20 52 35  2c 23 30 3a 42 45 51 20  |t:CMP R5,#0:BEQ |
00004d60  45 6e 64 53 68 6f 6f 74  0d af dc 13 20 4c 44 52  |EndShoot.... LDR|
00004d70  20 52 35 2c 58 62 75 6c  6c 65 74 0d af e6 1c 20  | R5,Xbullet.... |
00004d80  4d 4f 56 20 52 31 2c 52  31 30 3a 41 44 44 20 52  |MOV R1,R10:ADD R|
00004d90  31 2c 52 31 2c 52 35 0d  af f0 15 20 41 44 44 20  |1,R1,R5.... ADD |
00004da0  52 31 2c 52 31 2c 23 36  2a 31 36 30 0d af fa 11  |R1,R1,#6*160....|
00004db0  20 4c 44 52 42 20 52 30  2c 5b 52 31 5d 0d b0 04  | LDRB R0,[R1]...|
00004dc0  18 20 43 4d 50 20 52 30  2c 23 31 31 39 3a 42 45  |. CMP R0,#119:BE|
00004dd0  51 20 68 69 74 0d b0 09  11 20 41 44 44 20 52 31  |Q hit.... ADD R1|
00004de0  2c 52 31 2c 23 34 0d b0  13 18 20 43 4d 50 20 52  |,R1,#4.... CMP R|
00004df0  30 2c 23 31 31 39 3a 42  45 51 20 68 69 74 0d b0  |0,#119:BEQ hit..|
00004e00  2b 14 20 4c 44 4d 46 44  20 52 31 33 21 2c 7b 50  |+. LDMFD R13!,{P|
00004e10  43 7d 0d b3 b0 08 2e 68  69 74 0d b3 ba 2a 20 4c  |C}.....hit...* L|
00004e20  44 52 42 20 52 37 2c 57  70 61 74 68 3a 4d 4f 56  |DRB R7,Wpath:MOV|
00004e30  20 52 37 2c 23 30 3a 53  54 52 42 20 52 37 2c 57  | R7,#0:STRB R7,W|
00004e40  70 61 74 68 0d b3 c4 2b  20 4c 44 52 20 52 37 2c  |path...+ LDR R7,|
00004e50  5a 62 61 6c 6c 3a 4d 4f  56 20 52 37 2c 23 31 34  |Zball:MOV R7,#14|
00004e60  30 38 3a 53 54 52 20 52  37 2c 5a 62 61 6c 6c 0d  |08:STR R7,Zball.|
00004e70  b3 ce 2c 20 4c 44 52 20  52 37 2c 5a 62 61 6c 6c  |.., LDR R7,Zball|
00004e80  79 3a 4d 4f 56 20 52 37  2c 23 31 32 39 3a 53 54  |y:MOV R7,#129:ST|
00004e90  52 20 52 37 2c 5a 62 61  6c 6c 79 0d b3 d8 3c 20  |R R7,Zbally...< |
00004ea0  4c 44 52 20 52 37 2c 43  62 75 6c 6c 65 74 3a 4c  |LDR R7,Cbullet:L|
00004eb0  44 52 20 52 39 2c 73 63  6f 72 65 31 3a 41 44 44  |DR R9,score1:ADD|
00004ec0  20 52 39 2c 52 39 2c 52  37 3a 53 54 52 20 52 39  | R9,R9,R7:STR R9|
00004ed0  2c 73 63 6f 72 65 31 0d  b3 da 36 20 4c 44 52 20  |,score1...6 LDR |
00004ee0  52 38 2c 64 69 67 69 74  34 3a 43 4d 50 20 52 39  |R8,digit4:CMP R9|
00004ef0  2c 52 38 3a 4d 4f 56 47  54 20 52 39 2c 23 30 3a  |,R8:MOVGT R9,#0:|
00004f00  53 54 52 20 52 39 2c 73  63 6f 72 65 31 0d b3 dd  |STR R9,score1...|
00004f10  1d 20 4d 4f 56 20 52 37  2c 23 30 3a 53 54 52 20  |. MOV R7,#0:STR |
00004f20  52 37 2c 43 62 75 6c 6c  65 74 0d b3 e2 2c 20 4c  |R7,Cbullet..., L|
00004f30  44 52 42 20 52 37 2c 62  75 6c 6c 65 74 3a 4d 4f  |DRB R7,bullet:MO|
00004f40  56 20 52 37 2c 23 30 3a  53 54 52 42 20 52 37 2c  |V R7,#0:STRB R7,|
00004f50  62 75 6c 6c 65 74 0d b3  ec 20 20 4c 44 52 42 20  |bullet...  LDRB |
00004f60  52 37 2c 43 5a 62 61 6c  6c 3a 41 44 44 20 52 37  |R7,CZball:ADD R7|
00004f70  2c 52 37 2c 23 31 0d b3  f6 1a 20 43 4d 50 20 52  |,R7,#1.... CMP R|
00004f80  37 2c 23 35 3a 4d 4f 56  47 54 20 52 37 2c 23 31  |7,#5:MOVGT R7,#1|
00004f90  0d b4 00 34 20 4c 44 52  47 54 42 20 52 38 2c 6c  |...4 LDRGTB R8,l|
00004fa0  65 76 65 6c 3a 41 44 44  47 54 20 52 38 2c 52 38  |evel:ADDGT R8,R8|
00004fb0  2c 23 31 3a 3a 53 54 52  47 54 42 20 52 38 2c 6c  |,#1::STRGTB R8,l|
00004fc0  65 76 65 6c 0d b4 0a 2d  20 4c 44 52 42 20 52 39  |evel...- LDRB R9|
00004fd0  2c 73 74 61 67 65 3a 41  44 44 20 52 39 2c 52 39  |,stage:ADD R9,R9|
00004fe0  2c 23 31 3a 53 54 52 42  20 52 39 2c 73 74 61 67  |,#1:STRB R9,stag|
00004ff0  65 0d b4 28 47 20 4c 44  52 42 20 52 38 2c 6c 65  |e..(G LDRB R8,le|
00005000  76 65 6c 3a 43 4d 50 20  52 38 2c 23 31 3a 4c 44  |vel:CMP R8,#1:LD|
00005010  52 47 54 42 20 52 36 2c  6d 6f 76 65 3a 4d 4f 56  |RGTB R6,move:MOV|
00005020  47 54 20 52 36 2c 23 32  34 3a 53 54 52 47 54 42  |GT R6,#24:STRGTB|
00005030  20 52 36 2c 6d 6f 76 65  0d b4 32 49 20 4c 44 52  | R6,move..2I LDR|
00005040  42 20 52 39 2c 73 74 61  67 65 3a 43 4d 50 20 52  |B R9,stage:CMP R|
00005050  39 2c 23 35 3a 4c 44 52  45 51 20 52 36 2c 4f 62  |9,#5:LDREQ R6,Ob|
00005060  61 6c 6c 3a ec 51 20 52  36 2c 23 31 34 2a 31 32  |all:.Q R6,#14*12|
00005070  38 30 3a 53 54 52 45 51  20 52 36 2c 4f 62 61 6c  |80:STREQ R6,Obal|
00005080  6c 0d b4 6e 13 20 53 54  52 42 20 52 37 2c 43 5a  |l..n. STRB R7,CZ|
00005090  62 61 6c 6c 0d b7 33 1d  2e 45 6e 64 53 68 6f 6f  |ball..3..EndShoo|
000050a0  74 3a 4c 44 4d 46 44 20  52 31 33 21 2c 7b 50 43  |t:LDMFD R13!,{PC|
000050b0  7d 0d b7 34 2d 2e 62 75  6c 6c 65 74 20 45 51 55  |}..4-.bullet EQU|
000050c0  42 20 30 3a 41 4c 49 47  4e 3a 2e 43 5a 62 61 6c  |B 0:ALIGN:.CZbal|
000050d0  6c 20 45 51 55 42 20 31  3a 41 4c 49 47 4e 0d b7  |l EQUB 1:ALIGN..|
000050e0  35 29 2e 58 62 75 6c 6c  65 74 20 45 51 55 44 20  |5).Xbullet EQUD |
000050f0  32 34 2a 31 32 38 30 3a  2e 43 62 75 6c 6c 65 74  |24*1280:.Cbullet|
00005100  20 45 51 55 44 20 30 0d  b7 36 18 2e 57 5a 62 61  | EQUD 0..6..WZba|
00005110  6c 6c 20 45 51 55 42 20  30 3a 41 4c 49 47 4e 0d  |ll EQUB 0:ALIGN.|
00005120  b7 37 29 2e 53 50 52 31  39 20 45 51 55 44 20 54  |.7).SPR19 EQUD T|
00005130  25 28 31 39 29 3a 2e 53  50 52 32 30 20 45 51 55  |%(19):.SPR20 EQU|
00005140  44 20 54 25 28 32 30 29  0d b7 38 29 2e 53 50 52  |D T%(20)..8).SPR|
00005150  32 31 20 45 51 55 44 20  54 25 28 32 31 29 3a 2e  |21 EQUD T%(21):.|
00005160  53 50 52 32 32 20 45 51  55 44 20 54 25 28 32 32  |SPR22 EQUD T%(22|
00005170  29 0d b7 39 29 2e 53 50  52 32 33 20 45 51 55 44  |)..9).SPR23 EQUD|
00005180  20 54 25 28 32 33 29 3a  2e 53 50 52 32 34 20 45  | T%(23):.SPR24 E|
00005190  51 55 44 20 54 25 28 32  34 29 0d b7 3a 29 2e 53  |QUD T%(24)..:).S|
000051a0  50 52 32 35 20 45 51 55  44 20 54 25 28 32 35 29  |PR25 EQUD T%(25)|
000051b0  3a 2e 53 50 52 32 36 20  45 51 55 44 20 54 25 28  |:.SPR26 EQUD T%(|
000051c0  32 36 29 0d b7 3b 12 2e  73 63 6f 72 65 31 20 45  |26)..;..score1 E|
000051d0  51 55 44 20 30 0d bb 80  1d 2e 74 69 68 5f 6d 61  |QUD 0.....tih_ma|
000051e0  6e 3a 53 54 4d 46 44 20  52 31 33 21 2c 7b 52 31  |n:STMFD R13!,{R1|
000051f0  34 7d 0d bb 85 26 20 4c  44 52 20 52 33 2c 77 61  |4}...& LDR R3,wa|
00005200  6c 6c 3a 43 4d 50 20 52  33 2c 23 31 39 32 3a 42  |ll:CMP R3,#192:B|
00005210  47 54 20 74 65 73 74 31  0d bb 8a 19 20 43 4d 50  |GT test1.... CMP|
00005220  20 52 33 2c 23 32 30 3a  42 4c 54 20 74 65 73 74  | R3,#20:BLT test|
00005230  31 0d bb 8e 14 20 4d 4f  56 20 52 35 2c 23 32 34  |1.... MOV R5,#24|
00005240  2a 31 32 38 30 0d bb 8f  41 20 4c 44 52 20 52 34  |*1280...A LDR R4|
00005250  2c 6d 61 6e 3a 43 4d 50  20 52 34 2c 52 35 3a 4c  |,man:CMP R4,R5:L|
00005260  44 52 47 54 42 20 52 38  2c 65 6e 64 3a 4d 4f 56  |DRGTB R8,end:MOV|
00005270  47 54 20 52 38 2c 23 32  3a 53 54 52 47 54 42 20  |GT R8,#2:STRGTB |
00005280  52 38 2c 65 6e 64 0d bb  90 33 20 4c 44 52 47 54  |R8,end...3 LDRGT|
00005290  42 20 52 38 2c 6c 69 76  65 73 3a 53 55 42 47 54  |B R8,lives:SUBGT|
000052a0  20 52 38 2c 52 38 2c 23  31 3a 53 54 52 47 54 42  | R8,R8,#1:STRGTB|
000052b0  20 52 38 2c 6c 69 76 65  73 0d bb 94 0a 2e 74 65  | R8,lives.....te|
000052c0  73 74 31 0d bb 99 26 20  4c 44 52 20 52 33 2c 62  |st1...& LDR R3,b|
000052d0  61 6c 6c 3a 43 4d 50 20  52 33 2c 23 31 38 38 3a  |all:CMP R3,#188:|
000052e0  42 47 54 20 74 65 73 74  32 0d bb 9e 19 20 43 4d  |BGT test2.... CM|
000052f0  50 20 52 33 2c 23 38 30  3a 42 4c 54 20 74 65 73  |P R3,#80:BLT tes|
00005300  74 32 0d bb a0 14 20 4d  4f 56 20 52 35 2c 23 32  |t2.... MOV R5,#2|
00005310  33 2a 31 32 38 30 0d bb  a3 41 20 4c 44 52 20 52  |3*1280...A LDR R|
00005320  34 2c 6d 61 6e 3a 43 4d  50 20 52 34 2c 52 35 3a  |4,man:CMP R4,R5:|
00005330  4c 44 52 47 54 42 20 52  38 2c 65 6e 64 3a 4d 4f  |LDRGTB R8,end:MO|
00005340  56 47 54 20 52 38 2c 23  32 3a 53 54 52 47 54 42  |VGT R8,#2:STRGTB|
00005350  20 52 38 2c 65 6e 64 0d  bb a4 33 20 4c 44 52 47  | R8,end...3 LDRG|
00005360  54 42 20 52 38 2c 6c 69  76 65 73 3a 53 55 42 47  |TB R8,lives:SUBG|
00005370  54 20 52 38 2c 52 38 2c  23 31 3a 53 54 52 47 54  |T R8,R8,#1:STRGT|
00005380  42 20 52 38 2c 6c 69 76  65 73 0d bb a8 0a 2e 74  |B R8,lives.....t|
00005390  65 73 74 32 0d bb ad 27  20 4c 44 52 20 52 33 2c  |est2...' LDR R3,|
000053a0  5a 62 61 6c 6c 3a 43 4d  50 20 52 33 2c 23 31 38  |Zball:CMP R3,#18|
000053b0  38 3a 42 47 54 20 74 65  73 74 33 0d bb b2 19 20  |8:BGT test3.... |
000053c0  43 4d 50 20 52 33 2c 23  38 30 3a 42 4c 54 20 74  |CMP R3,#80:BLT t|
000053d0  65 73 74 33 0d bb b7 26  20 4c 44 52 42 20 52 38  |est3...& LDRB R8|
000053e0  2c 65 6e 64 3a 4d 4f 56  20 52 38 2c 23 32 3a 53  |,end:MOV R8,#2:S|
000053f0  54 52 42 20 52 38 2c 65  6e 64 0d bb bc 2d 20 4c  |TRB R8,end...- L|
00005400  44 52 42 20 52 38 2c 6c  69 76 65 73 3a 53 55 42  |DRB R8,lives:SUB|
00005410  20 52 38 2c 52 38 2c 23  31 3a 53 54 52 42 20 52  | R8,R8,#1:STRB R|
00005420  38 2c 6c 69 76 65 73 0d  bb c1 0a 2e 74 65 73 74  |8,lives.....test|
00005430  33 0d bb c6 27 20 4c 44  52 20 52 33 2c 4f 62 61  |3...' LDR R3,Oba|
00005440  6c 6c 3a 43 4d 50 20 52  33 2c 23 31 38 38 3a 42  |ll:CMP R3,#188:B|
00005450  47 54 20 74 65 73 74 34  0d bb d0 1a 20 43 4d 50  |GT test4.... CMP|
00005460  20 52 33 2c 23 31 32 30  3a 42 4c 54 20 74 65 73  | R3,#120:BLT tes|
00005470  74 34 0d bb da 23 20 4d  4f 56 20 52 35 2c 23 32  |t4...# MOV R5,#2|
00005480  34 2a 31 32 38 30 3a 41  44 44 20 52 35 2c 52 35  |4*1280:ADD R5,R5|
00005490  2c 23 33 33 36 0d bb e4  3f 20 4c 44 52 20 52 34  |,#336...? LDR R4|
000054a0  2c 6d 61 6e 3a 43 4d 50  20 52 34 2c 52 35 3a 4c  |,man:CMP R4,R5:L|
000054b0  44 52 4e 45 20 52 38 2c  65 6e 64 3a 4d 4f 56 4e  |DRNE R8,end:MOVN|
000054c0  45 20 52 38 2c 23 32 3a  53 54 52 4e 45 20 52 38  |E R8,#2:STRNE R8|
000054d0  2c 65 6e 64 0d bb ee 31  20 4c 44 52 4e 45 20 52  |,end...1 LDRNE R|
000054e0  38 2c 6c 69 76 65 73 3a  53 55 42 4e 45 20 52 38  |8,lives:SUBNE R8|
000054f0  2c 52 38 2c 23 31 3a 53  54 52 4e 45 20 52 38 2c  |,R8,#1:STRNE R8,|
00005500  6c 69 76 65 73 0d bb f8  0a 2e 74 65 73 74 34 0d  |lives.....test4.|
00005510  bf 67 0d 2e 47 6f 6c 64  54 65 73 74 0d bf 68 28  |.g..GoldTest..h(|
00005520  20 4c 44 52 20 52 33 2c  67 6f 6c 64 3a 43 4d 50  | LDR R3,gold:CMP|
00005530  20 52 33 2c 23 31 37 36  3a 42 47 54 20 45 6e 64  | R3,#176:BGT End|
00005540  54 65 73 74 0d bf 6d 1b  20 43 4d 50 20 52 33 2c  |Test..m. CMP R3,|
00005550  23 33 32 3a 42 4c 54 20  45 6e 64 54 65 73 74 0d  |#32:BLT EndTest.|
00005560  bf 6f 14 20 4d 4f 56 20  52 35 2c 23 32 34 2a 31  |.o. MOV R5,#24*1|
00005570  32 38 30 0d bf 72 25 20  4c 44 52 20 52 34 2c 6d  |280..r% LDR R4,m|
00005580  61 6e 3a 43 4d 50 20 52  34 2c 52 35 3a 42 4c 54  |an:CMP R4,R5:BLT|
00005590  20 45 6e 64 54 65 73 74  0d bf 77 2a 20 4c 44 52  | EndTest..w* LDR|
000055a0  42 20 52 37 2c 47 6f 6c  64 53 70 72 3a 43 4d 50  |B R7,GoldSpr:CMP|
000055b0  20 52 37 2c 23 31 3a 42  45 51 20 45 6e 64 54 65  | R7,#1:BEQ EndTe|
000055c0  73 74 0d bf 78 1e 20 4d  4f 56 20 52 37 2c 23 31  |st..x. MOV R7,#1|
000055d0  3a 53 54 52 42 20 52 37  2c 47 6f 6c 64 53 70 72  |:STRB R7,GoldSpr|
000055e0  0d bf 7c 2e 20 4c 44 52  42 20 52 37 2c 43 65 6e  |..|. LDRB R7,Cen|
000055f0  65 72 67 79 3a 4d 4f 56  20 52 37 2c 23 33 3a 53  |ergy:MOV R7,#3:S|
00005600  54 52 42 20 52 37 2c 43  65 6e 65 72 67 79 0d bf  |TRB R7,Cenergy..|
00005610  81 3c 20 4c 44 52 42 20  52 38 2c 65 6e 65 72 67  |.< LDRB R8,energ|
00005620  79 3a 4c 44 52 20 52 37  2c 73 63 6f 72 65 31 3a  |y:LDR R7,score1:|
00005630  41 44 44 20 52 37 2c 52  37 2c 52 38 3a 53 54 52  |ADD R7,R7,R8:STR|
00005640  20 52 37 2c 73 63 6f 72  65 31 0d bf 86 36 20 4c  | R7,score1...6 L|
00005650  44 52 20 52 39 2c 64 69  67 69 74 34 3a 43 4d 50  |DR R9,digit4:CMP|
00005660  20 52 37 2c 52 39 3a 4d  4f 56 47 54 20 52 37 2c  | R7,R9:MOVGT R7,|
00005670  23 30 3a 53 54 52 20 52  37 2c 73 63 6f 72 65 31  |#0:STR R7,score1|
00005680  0d bf c7 2d 20 4c 44 52  42 20 52 38 2c 65 6e 65  |...- LDRB R8,ene|
00005690  72 67 79 3a 4d 4f 56 20  52 38 2c 23 39 39 3a 53  |rgy:MOV R8,#99:S|
000056a0  54 52 42 20 52 38 2c 65  6e 65 72 67 79 0d c2 eb  |TRB R8,energy...|
000056b0  1c 2e 45 6e 64 54 65 73  74 3a 4c 44 4d 46 44 20  |..EndTest:LDMFD |
000056c0  52 31 33 21 2c 7b 50 43  7d 0d c3 46 19 2e 43 6f  |R13!,{PC}..F..Co|
000056d0  6c 57 61 6c 6c 20 45 51  55 42 20 30 3a 41 4c 49  |lWall EQUB 0:ALI|
000056e0  47 4e 0d c3 47 19 2e 6d  61 6e 20 45 51 55 44 20  |GN..G..man EQUD |
000056f0  32 34 2a 31 32 38 30 2b  33 33 36 0d c3 48 1c 2e  |24*1280+336..H..|
00005700  68 61 74 20 45 51 55 44  20 32 34 2a 31 32 38 30  |hat EQUD 24*1280|
00005710  2b 33 33 36 2b 31 36 0d  c3 50 1a 2e 50 6d 61 6e  |+336+16..P..Pman|
00005720  3a 53 54 4d 46 44 20 52  31 33 21 2c 7b 52 31 34  |:STMFD R13!,{R14|
00005730  7d 0d c3 55 0f 20 4c 44  52 20 52 35 2c 6d 61 6e  |}..U. LDR R5,man|
00005740  0d c3 5a 42 20 4d 4f 56  20 52 31 2c 52 31 30 3a  |..ZB MOV R1,R10:|
00005750  41 44 44 20 52 31 2c 52  31 2c 52 35 3a 41 44 52  |ADD R1,R1,R5:ADR|
00005760  20 52 31 32 2c 61 6c 69  65 6e 73 70 72 69 74 65  | R12,aliensprite|
00005770  3a 41 44 52 20 52 31 31  2c 61 6c 69 65 6e 74 61  |:ADR R11,alienta|
00005780  62 31 0d c3 64 11 20 4c  44 52 42 20 52 38 2c 57  |b1..d. LDRB R8,W|
00005790  6d 61 6e 0d c3 65 2a 20  43 4d 50 20 52 38 2c 23  |man..e* CMP R8,#|
000057a0  31 3a ec 51 20 52 32 2c  23 31 3a 43 4d 50 20 52  |1:.Q R2,#1:CMP R|
000057b0  38 2c 23 32 3a ec 51 20  52 32 2c 23 31 0d c3 66  |8,#2:.Q R2,#1..f|
000057c0  2a 20 43 4d 50 20 52 38  2c 23 33 3a ec 51 20 52  |* CMP R8,#3:.Q R|
000057d0  32 2c 23 32 3a 43 4d 50  20 52 38 2c 23 34 3a ec  |2,#2:CMP R8,#4:.|
000057e0  51 20 52 32 2c 23 32 0d  c3 67 2a 20 43 4d 50 20  |Q R2,#2..g* CMP |
000057f0  52 38 2c 23 35 3a ec 51  20 52 32 2c 23 33 3a 43  |R8,#5:.Q R2,#3:C|
00005800  4d 50 20 52 38 2c 23 36  3a ec 51 20 52 32 2c 23  |MP R8,#6:.Q R2,#|
00005810  33 0d c3 68 2a 20 43 4d  50 20 52 38 2c 23 37 3a  |3..h* CMP R8,#7:|
00005820  ec 51 20 52 32 2c 23 34  3a 43 4d 50 20 52 38 2c  |.Q R2,#4:CMP R8,|
00005830  23 38 3a ec 51 20 52 32  2c 23 34 0d c3 69 2b 20  |#8:.Q R2,#4..i+ |
00005840  43 4d 50 20 52 38 2c 23  39 3a ec 51 20 52 32 2c  |CMP R8,#9:.Q R2,|
00005850  23 35 3a 43 4d 50 20 52  38 2c 23 31 30 3a ec 51  |#5:CMP R8,#10:.Q|
00005860  20 52 32 2c 23 35 0d c3  6e 40 20 4c 44 52 20 52  | R2,#5..n@ LDR R|
00005870  30 2c 5b 52 31 31 2c 52  32 2c 4c 53 4c 23 32 5d  |0,[R11,R2,LSL#2]|
00005880  3a 41 44 44 20 52 30 2c  52 30 2c 52 31 32 3a 41  |:ADD R0,R0,R12:A|
00005890  44 44 20 52 30 2c 52 30  2c 23 38 3a 42 4c 20 61  |DD R0,R0,#8:BL a|
000058a0  6c 69 65 6e 33 32 0d c3  73 23 20 3b 2a 2a 2a 2a  |lien32..s# ;****|
000058b0  2a 2a 2a 2a 2a 2a 2a 2a  20 48 41 54 20 20 2a 2a  |******** HAT  **|
000058c0  2a 2a 2a 2a 2a 2a 2a 2a  2a 0d c3 78 2b 20 4c 44  |*********..x+ LD|
000058d0  52 20 52 35 2c 6d 61 6e  3a 53 55 42 20 52 35 2c  |R R5,man:SUB R5,|
000058e0  52 35 2c 23 36 34 30 3a  41 44 44 20 52 35 2c 52  |R5,#640:ADD R5,R|
000058f0  35 2c 23 34 0d c3 82 44  20 4d 4f 56 20 52 31 2c  |5,#4...D MOV R1,|
00005900  52 31 30 3a 41 44 44 20  52 31 2c 52 31 2c 52 35  |R10:ADD R1,R1,R5|
00005910  3a 3b 41 44 52 20 52 31  32 2c 61 6c 69 65 6e 73  |:;ADR R12,aliens|
00005920  70 72 69 74 65 3a 3b 41  44 52 20 52 31 31 2c 61  |prite:;ADR R11,a|
00005930  6c 69 65 6e 74 61 62 31  0d c3 8c 0e 20 4d 4f 56  |lientab1.... MOV|
00005940  20 52 32 2c 23 36 0d c3  a0 40 20 4c 44 52 20 52  | R2,#6...@ LDR R|
00005950  30 2c 5b 52 31 31 2c 52  32 2c 4c 53 4c 23 32 5d  |0,[R11,R2,LSL#2]|
00005960  3a 41 44 44 20 52 30 2c  52 30 2c 52 31 32 3a 41  |:ADD R0,R0,R12:A|
00005970  44 44 20 52 30 2c 52 30  2c 23 38 3a 42 4c 20 61  |DD R0,R0,#8:BL a|
00005980  6c 69 65 6e 31 36 0d c3  a2 25 20 3b 2a 2a 2a 2a  |lien16...% ;****|
00005990  2a 2a 2a 2a 2a 2a 2a 2a  20 42 55 4c 4c 45 54 20  |******** BULLET |
000059a0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 0d c3 a5 1d 20  |***********.... |
000059b0  4c 44 52 42 20 52 33 2c  62 75 6c 6c 65 74 3a 43  |LDRB R3,bullet:C|
000059c0  4d 50 20 52 33 2c 23 31  0d c3 a7 15 20 4c 44 52  |MP R3,#1.... LDR|
000059d0  45 51 20 52 35 2c 58 62  75 6c 6c 65 74 0d c3 aa  |EQ R5,Xbullet...|
000059e0  1d 20 ec 51 20 52 31 2c  52 31 30 3a 41 44 44 45  |. .Q R1,R10:ADDE|
000059f0  51 20 52 31 2c 52 31 2c  52 35 0d c3 b4 0d 20 ec  |Q R1,R1,R5.... .|
00005a00  51 20 52 32 2c 23 37 0d  c3 be 48 20 4c 44 52 45  |Q R2,#7...H LDRE|
00005a10  51 20 52 30 2c 5b 52 31  31 2c 52 32 2c 4c 53 4c  |Q R0,[R11,R2,LSL|
00005a20  23 32 5d 3a 41 44 44 45  51 20 52 30 2c 52 30 2c  |#2]:ADDEQ R0,R0,|
00005a30  52 31 32 3a 41 44 44 45  51 20 52 30 2c 52 30 2c  |R12:ADDEQ R0,R0,|
00005a40  23 38 3a 42 4c 45 51 20  61 6c 69 65 6e 31 36 0d  |#8:BLEQ alien16.|
00005a50  c4 13 14 20 4c 44 4d 46  44 20 52 31 33 21 2c 7b  |... LDMFD R13!,{|
00005a60  50 43 7d 0d c4 17 1a 2e  44 6d 61 6e 3a 53 54 4d  |PC}.....Dman:STM|
00005a70  46 44 20 52 31 33 21 2c  7b 52 31 34 7d 0d c4 18  |FD R13!,{R14}...|
00005a80  39 20 4d 4f 56 20 52 30  2c 23 35 31 32 3a 41 44  |9 MOV R0,#512:AD|
00005a90  44 20 52 30 2c 52 30 2c  23 33 34 3a 4c 44 52 42  |D R0,R0,#34:LDRB|
00005aa0  20 52 31 2c 53 70 41 72  65 61 3a 4c 44 52 20 52  | R1,SpArea:LDR R|
00005ab0  32 2c 53 50 52 36 0d c4  22 30 20 4c 44 52 42 20  |2,SPR6.."0 LDRB |
00005ac0  52 33 2c 6d 61 6e 78 3a  4c 44 52 42 20 52 34 2c  |R3,manx:LDRB R4,|
00005ad0  6d 61 6e 79 3a 4d 4f 56  20 52 35 2c 23 38 3a 53  |many:MOV R5,#8:S|
00005ae0  57 49 20 26 32 45 0d c4  2c 4a 20 53 55 42 20 52  |WI &2E..,J SUB R|
00005af0  34 2c 52 34 2c 23 31 3a  43 4d 50 20 52 34 2c 23  |4,R4,#1:CMP R4,#|
00005b00  31 3a 4c 44 52 45 51 42  20 52 37 2c 47 61 6d 65  |1:LDREQB R7,Game|
00005b10  4f 76 65 72 3a ec 51 20  52 37 2c 23 31 3a 53 54  |Over:.Q R7,#1:ST|
00005b20  52 45 51 42 20 52 37 2c  47 61 6d 65 4f 76 65 72  |REQB R7,GameOver|
00005b30  0d c4 36 11 20 53 54 52  42 20 52 34 2c 6d 61 6e  |..6. STRB R4,man|
00005b40  79 0d c5 43 14 20 4c 44  4d 46 44 20 52 31 33 21  |y..C. LDMFD R13!|
00005b50  2c 7b 50 43 7d 0d c7 2e  1a 2e 47 61 6d 65 4f 76  |,{PC}.....GameOv|
00005b60  65 72 20 45 51 55 42 20  30 3a 41 4c 49 47 4e 0d  |er EQUB 0:ALIGN.|
00005b70  c7 2f 2d 2e 6d 61 6e 78  20 45 51 55 42 20 31 32  |./-.manx EQUB 12|
00005b80  38 3a 41 4c 49 47 4e 3a  2e 6d 61 6e 79 20 45 51  |8:ALIGN:.many EQ|
00005b90  55 42 20 31 32 39 3a 41  4c 49 47 4e 0d c7 38 21  |UB 129:ALIGN..8!|
00005ba0  2e 70 72 69 6e 74 5f 73  63 6f 72 65 3a 53 54 4d  |.print_score:STM|
00005bb0  46 44 20 52 31 33 21 2c  7b 52 31 34 7d 0d c7 42  |FD R13!,{R14}..B|
00005bc0  2c 20 3b 4d 4f 56 20 52  30 2c 23 30 3a 3b 53 57  |, ;MOV R0,#0:;SW|
00005bd0  49 20 32 35 36 2b 31 37  3a 3b 53 57 49 20 22 4f  |I 256+17:;SWI "O|
00005be0  53 5f 57 72 69 74 65 43  22 0d c8 5a 0f 20 53 57  |S_WriteC"..Z. SW|
00005bf0  49 20 32 35 36 2b 33 31  0d c8 64 39 20 4d 4f 56  |I 256+31..d9 MOV|
00005c00  20 52 30 2c 23 37 3a 53  57 49 20 22 4f 53 5f 57  | R0,#7:SWI "OS_W|
00005c10  72 69 74 65 43 22 3a 4d  4f 56 20 52 30 2c 23 33  |riteC":MOV R0,#3|
00005c20  30 3a 53 57 49 20 22 4f  53 5f 57 72 69 74 65 43  |0:SWI "OS_WriteC|
00005c30  22 0d c8 6e 1c 20 4c 44  52 42 20 52 35 2c 6c 69  |"..n. LDRB R5,li|
00005c40  76 65 73 3a 4d 4f 56 20  52 30 2c 52 35 0d c8 78  |ves:MOV R0,R5..x|
00005c50  1c 20 41 44 52 20 52 31  2c 62 75 66 66 65 72 3a  |. ADR R1,buffer:|
00005c60  4d 4f 56 20 52 32 2c 23  38 0d c8 82 2e 20 53 57  |MOV R2,#8.... SW|
00005c70  49 20 22 4f 53 5f 43 6f  6e 76 65 72 74 43 61 72  |I "OS_ConvertCar|
00005c80  64 69 6e 61 6c 31 22 3a  53 57 49 20 22 4f 53 5f  |dinal1":SWI "OS_|
00005c90  57 72 69 74 65 30 22 0d  c9 36 0f 20 53 57 49 20  |Write0"..6. SWI |
00005ca0  32 35 36 2b 33 31 0d c9  40 3a 20 4d 4f 56 20 52  |256+31..@: MOV R|
00005cb0  30 2c 23 32 30 3a 53 57  49 20 22 4f 53 5f 57 72  |0,#20:SWI "OS_Wr|
00005cc0  69 74 65 43 22 3a 4d 4f  56 20 52 30 2c 23 33 30  |iteC":MOV R0,#30|
00005cd0  3a 53 57 49 20 22 4f 53  5f 57 72 69 74 65 43 22  |:SWI "OS_WriteC"|
00005ce0  0d c9 54 0f 20 3b 53 57  49 20 32 35 36 2b 39 0d  |..T. ;SWI 256+9.|
00005cf0  c9 5e 1f 20 41 44 52 20  52 30 2c 73 63 25 3a 53  |.^. ADR R0,sc%:S|
00005d00  57 49 20 22 4f 53 5f 57  72 69 74 65 30 22 0d c9  |WI "OS_Write0"..|
00005d10  68 1c 20 4c 44 52 20 52  35 2c 73 63 6f 72 65 31  |h. LDR R5,score1|
00005d20  3a 4d 4f 56 20 52 30 2c  52 35 0d c9 72 12 20 41  |:MOV R0,R5..r. A|
00005d30  44 52 20 52 31 2c 62 75  66 66 65 72 0d c9 7c 0e  |DR R1,buffer..|.|
00005d40  20 4d 4f 56 20 52 32 2c  23 38 0d c9 86 1e 20 53  | MOV R2,#8.... S|
00005d50  57 49 20 22 4f 53 5f 43  6f 6e 76 65 72 74 43 61  |WI "OS_ConvertCa|
00005d60  72 64 69 6e 61 6c 32 22  0d c9 90 3f 20 43 4d 50  |rdinal2"...? CMP|
00005d70  20 52 35 2c 23 31 30 3a  53 57 49 4c 54 20 32 35  | R5,#10:SWILT 25|
00005d80  36 2b 31 32 37 3a 53 57  49 4c 54 20 22 4f 53 5f  |6+127:SWILT "OS_|
00005d90  57 72 69 74 65 30 22 3a  42 4c 54 20 50 72 69 6e  |Write0":BLT Prin|
00005da0  74 45 6e 65 72 67 79 0d  c9 9a 4e 20 43 4d 50 20  |tEnergy...N CMP |
00005db0  52 35 2c 23 31 30 30 3a  53 57 49 4c 54 20 32 35  |R5,#100:SWILT 25|
00005dc0  36 2b 31 32 37 3a 53 57  49 4c 54 20 32 35 36 2b  |6+127:SWILT 256+|
00005dd0  31 32 37 3a 53 57 49 4c  54 20 22 4f 53 5f 57 72  |127:SWILT "OS_Wr|
00005de0  69 74 65 30 22 3a 42 4c  54 20 50 72 69 6e 74 45  |ite0":BLT PrintE|
00005df0  6e 65 72 67 79 0d c9 a4  3d 20 4d 4f 56 20 52 39  |nergy...= MOV R9|
00005e00  2c 23 32 35 30 3a 41 44  44 20 52 39 2c 52 39 2c  |,#250:ADD R9,R9,|
00005e10  23 32 35 30 3a 41 44 44  20 52 39 2c 52 39 2c 23  |#250:ADD R9,R9,#|
00005e20  32 35 30 3a 41 44 44 20  52 39 2c 52 39 2c 23 32  |250:ADD R9,R9,#2|
00005e30  35 30 0d c9 ae 5a 20 43  4d 50 20 52 35 2c 52 39  |50...Z CMP R5,R9|
00005e40  3a 53 57 49 4c 54 20 32  35 36 2b 31 32 37 3a 53  |:SWILT 256+127:S|
00005e50  57 49 4c 54 20 32 35 36  2b 31 32 37 3a 53 57 49  |WILT 256+127:SWI|
00005e60  4c 54 20 32 35 36 2b 31  32 37 3a 53 57 49 4c 54  |LT 256+127:SWILT|
00005e70  20 22 4f 53 5f 57 72 69  74 65 30 22 3a 42 4c 54  | "OS_Write0":BLT|
00005e80  20 50 72 69 6e 74 45 6e  65 72 67 79 0d c9 b8 44  | PrintEnergy...D|
00005e90  20 53 57 49 20 32 35 36  2b 31 32 37 3a 53 57 49  | SWI 256+127:SWI|
00005ea0  20 32 35 36 2b 31 32 37  3a 53 57 49 20 32 35 36  | 256+127:SWI 256|
00005eb0  2b 31 32 37 3a 53 57 49  20 32 35 36 2b 31 32 37  |+127:SWI 256+127|
00005ec0  3a 53 57 49 20 22 4f 53  5f 57 72 69 74 65 30 22  |:SWI "OS_Write0"|
00005ed0  0d c9 ea 10 2e 50 72 69  6e 74 45 6e 65 72 67 79  |.....PrintEnergy|
00005ee0  0d ca 76 0f 20 53 57 49  20 32 35 36 2b 33 31 0d  |..v. SWI 256+31.|
00005ef0  ca 80 3a 20 4d 4f 56 20  52 30 2c 23 33 37 3a 53  |..: MOV R0,#37:S|
00005f00  57 49 20 22 4f 53 5f 57  72 69 74 65 43 22 3a 4d  |WI "OS_WriteC":M|
00005f10  4f 56 20 52 30 2c 23 33  30 3a 53 57 49 20 22 4f  |OV R0,#30:SWI "O|
00005f20  53 5f 57 72 69 74 65 43  22 0d ca 94 1d 20 4c 44  |S_WriteC".... LD|
00005f30  52 42 20 52 35 2c 65 6e  65 72 67 79 3a 4d 4f 56  |RB R5,energy:MOV|
00005f40  20 52 30 2c 52 35 0d ca  9e 12 20 41 44 52 20 52  | R0,R5.... ADR R|
00005f50  31 2c 62 75 66 66 65 72  0d ca a8 0e 20 4d 4f 56  |1,buffer.... MOV|
00005f60  20 52 32 2c 23 38 0d ca  b2 2e 20 53 57 49 20 22  | R2,#8.... SWI "|
00005f70  4f 53 5f 43 6f 6e 76 65  72 74 43 61 72 64 69 6e  |OS_ConvertCardin|
00005f80  61 6c 31 22 3a 53 57 49  20 22 4f 53 5f 57 72 69  |al1":SWI "OS_Wri|
00005f90  74 65 30 22 0d ca c6 14  20 4c 44 4d 46 44 20 52  |te0".... LDMFD R|
00005fa0  31 33 21 2c 7b 50 43 7d  0d ca d0 20 2e 73 63 25  |13!,{PC}... .sc%|
00005fb0  20 45 51 55 53 22 30 30  30 30 22 3a 45 51 55 42  | EQUS"0000":EQUB|
00005fc0  20 30 3a 41 4c 49 47 4e  0d ca da 13 2e 62 75 66  | 0:ALIGN.....buf|
00005fd0  66 65 72 20 45 51 55 44  20 36 34 0d ca e3 16 2e  |fer EQUD 64.....|
00005fe0  64 69 67 69 74 33 20 45  51 55 44 20 34 2a 32 35  |digit3 EQUD 4*25|
00005ff0  30 0d ca e4 1f 2e 64 69  67 69 74 34 20 45 51 55  |0.....digit4 EQU|
00006000  44 20 37 2a 31 32 38 30  2b 32 2a 35 32 30 2d 31  |D 7*1280+2*520-1|
00006010  0d ca f3 17 2e 6c 69 76  65 73 20 45 51 55 42 20  |.....lives EQUB |
00006020  33 3a 41 4c 49 47 4e 0d  de a8 24 2e 61 6c 69 65  |3:ALIGN...$.alie|
00006030  6e 31 36 3a 53 54 4d 46  44 20 52 31 33 21 2c 7b  |n16:STMFD R13!,{|
00006040  52 30 2d 52 31 32 2c 52  31 34 7d 0d de b2 31 20  |R0-R12,R14}...1 |
00006050  53 54 52 20 52 31 33 2c  52 31 33 73 74 6f 72 65  |STR R13,R13store|
00006060  32 3a 4d 4f 56 20 52 32  2c 23 31 36 3a 53 54 52  |2:MOV R2,#16:STR|
00006070  20 52 32 2c 63 6f 75 6e  74 65 72 32 0d de bc 10  | R2,counter2....|
00006080  2e 61 6c 69 65 6e 31 36  6c 6f 6f 70 0d de c6 7c  |.alien16loop...||
00006090  20 4c 44 4d 49 41 20 52  30 21 2c 7b 52 32 2d 52  | LDMIA R0!,{R2-R|
000060a0  35 7d 3a 4c 44 4d 49 41  20 52 31 2c 7b 52 31 30  |5}:LDMIA R1,{R10|
000060b0  2d 52 31 31 7d 3a 80 20  52 33 2c 52 33 2c 52 31  |-R11}:. R3,R3,R1|
000060c0  30 3a 80 20 52 35 2c 52  35 2c 52 31 31 3a 84 52  |0:. R5,R5,R11:.R|
000060d0  20 52 32 2c 52 32 2c 52  33 3a 84 52 20 52 33 2c  | R2,R2,R3:.R R3,|
000060e0  52 34 2c 52 35 3a 53 54  4d 49 41 20 52 31 21 2c  |R4,R5:STMIA R1!,|
000060f0  7b 52 32 2d 52 33 7d 3a  41 44 44 20 52 31 2c 52  |{R2-R3}:ADD R1,R|
00006100  31 2c 23 31 36 30 2d 38  0d de d0 42 20 4c 44 52  |1,#160-8...B LDR|
00006110  20 52 32 2c 63 6f 75 6e  74 65 72 32 3a 53 55 42  | R2,counter2:SUB|
00006120  53 20 52 32 2c 52 32 2c  23 31 3a 53 54 52 20 52  |S R2,R2,#1:STR R|
00006130  32 2c 63 6f 75 6e 74 65  72 32 3a 42 4e 45 20 61  |2,counter2:BNE a|
00006140  6c 69 65 6e 31 36 6c 6f  6f 70 0d de da 16 20 4c  |lien16loop.... L|
00006150  44 52 20 52 31 33 2c 52  31 33 73 74 6f 72 65 32  |DR R13,R13store2|
00006160  0d de e4 1b 20 4c 44 4d  46 44 20 52 31 33 21 2c  |.... LDMFD R13!,|
00006170  7b 52 30 2d 52 31 32 2c  50 43 7d 0d e2 2c 24 2e  |{R0-R12,PC}..,$.|
00006180  61 6c 69 65 6e 33 32 3a  53 54 4d 46 44 20 52 31  |alien32:STMFD R1|
00006190  33 21 2c 7b 52 30 2d 52  31 32 2c 52 31 34 7d 0d  |3!,{R0-R12,R14}.|
000061a0  e2 31 31 20 53 54 52 20  52 31 33 2c 52 31 33 73  |.11 STR R13,R13s|
000061b0  74 6f 72 65 32 3a 4d 4f  56 20 52 32 2c 23 33 32  |tore2:MOV R2,#32|
000061c0  3a 53 54 52 20 52 32 2c  63 6f 75 6e 74 65 72 32  |:STR R2,counter2|
000061d0  0d e2 36 10 2e 61 6c 69  65 6e 33 32 6c 6f 6f 70  |..6..alien32loop|
000061e0  0d e2 3b 29 20 4c 44 4d  49 41 20 52 30 21 2c 7b  |..;) LDMIA R0!,{|
000061f0  52 32 2d 52 39 7d 3a 4c  44 4d 49 41 20 52 31 2c  |R2-R9}:LDMIA R1,|
00006200  7b 52 31 30 2d 52 31 33  7d 0d e2 40 34 20 80 20  |{R10-R13}..@4 . |
00006210  52 33 2c 52 33 2c 52 31  30 3a 80 20 52 35 2c 52  |R3,R3,R10:. R5,R|
00006220  35 2c 52 31 31 3a 80 20  52 37 2c 52 37 2c 52 31  |5,R11:. R7,R7,R1|
00006230  32 3a 80 20 52 39 2c 52  39 2c 52 31 33 0d e2 45  |2:. R9,R9,R13..E|
00006240  34 20 84 52 20 52 32 2c  52 32 2c 52 33 3a 84 52  |4 .R R2,R2,R3:.R|
00006250  20 52 33 2c 52 34 2c 52  35 3a 84 52 20 52 34 2c  | R3,R4,R5:.R R4,|
00006260  52 36 2c 52 37 3a 84 52  20 52 35 2c 52 38 2c 52  |R6,R7:.R R5,R8,R|
00006270  39 0d e2 4a 28 20 53 54  4d 49 41 20 52 31 21 2c  |9..J( STMIA R1!,|
00006280  7b 52 32 2d 52 35 7d 3a  41 44 44 20 52 31 2c 52  |{R2-R5}:ADD R1,R|
00006290  31 2c 23 31 36 30 2d 31  36 0d e2 4f 42 20 4c 44  |1,#160-16..OB LD|
000062a0  52 20 52 32 2c 63 6f 75  6e 74 65 72 32 3a 53 55  |R R2,counter2:SU|
000062b0  42 53 20 52 32 2c 52 32  2c 23 31 3a 53 54 52 20  |BS R2,R2,#1:STR |
000062c0  52 32 2c 63 6f 75 6e 74  65 72 32 3a 42 4e 45 20  |R2,counter2:BNE |
000062d0  61 6c 69 65 6e 33 32 6c  6f 6f 70 0d e2 54 16 20  |alien32loop..T. |
000062e0  4c 44 52 20 52 31 33 2c  52 31 33 73 74 6f 72 65  |LDR R13,R13store|
000062f0  32 0d e2 59 1b 20 4c 44  4d 46 44 20 52 31 33 21  |2..Y. LDMFD R13!|
00006300  2c 7b 52 30 2d 52 31 32  2c 50 43 7d 0d e2 5e 26  |,{R0-R12,PC}..^&|
00006310  2e 52 31 33 73 74 6f 72  65 32 20 45 51 55 44 20  |.R13store2 EQUD |
00006320  30 3a 2e 63 6f 75 6e 74  65 72 32 20 45 51 55 44  |0:.counter2 EQUD|
00006330  20 30 0d e2 90 26 2e 42  72 61 6e 63 68 5f 61 6c  | 0...&.Branch_al|
00006340  69 65 6e 74 61 62 31 3a  53 54 4d 46 44 20 52 31  |ientab1:STMFD R1|
00006350  33 21 2c 7b 52 31 34 7d  0d e2 9a 2a 20 41 44 52  |3!,{R14}...* ADR|
00006360  20 52 31 32 2c 61 6c 69  65 6e 73 70 72 69 74 65  | R12,aliensprite|
00006370  3a 41 44 52 20 52 31 31  2c 61 6c 69 65 6e 74 61  |:ADR R11,alienta|
00006380  62 31 0d e2 a4 14 20 4c  44 4d 46 44 20 52 31 33  |b1.... LDMFD R13|
00006390  21 2c 7b 50 43 7d 0d e2  ae 22 2e 61 6c 69 65 6e  |!,{PC}...".alien|
000063a0  74 61 62 31 3a 5d 3a 50  25 2b 3d 31 30 30 3a 5b  |tab1:]:P%+=100:[|
000063b0  4f 50 54 20 70 61 73 73  0d e2 b8 25 2e 61 6c 69  |OPT pass...%.ali|
000063c0  65 6e 73 70 72 69 74 65  3a 5d 3a 50 25 2b 3d 33  |ensprite:]:P%+=3|
000063d0  37 35 30 3a 5b 4f 50 54  20 70 61 73 73 0d e2 c2  |750:[OPT pass...|
000063e0  0b 5d 3a ed 70 61 73 73  0d e2 cc 06 20 e1 0d e2  |.]:.pass.... ...|
000063f0  f4 0e 20 dd f2 68 69 67  68 5f 73 63 0d e2 fe 09  |.. ..high_sc....|
00006400  20 ea 20 54 25 0d e3 08  17 20 48 53 43 25 28 35  | . T%.... HSC%(5|
00006410  29 3d bb 28 48 53 43 24  28 35 29 29 0d e3 12 21  |)=.(HSC$(5))...!|
00006420  20 e7 bb 28 53 43 24 29  3c 3d bb 28 48 53 43 24  | ..(SC$)<=.(HSC$|
00006430  28 35 29 29 20 8c 20 e5  20 8d 78 5e 63 0d e3 1c  |(5)) . . .x^c...|
00006440  0b 20 f2 69 6e 70 75 74  0d e3 26 1b 20 48 53 43  |. .input..&. HSC|
00006450  24 28 35 29 3d 53 43 24  3a 4e 53 43 24 28 35 29  |$(5)=SC$:NSC$(5)|
00006460  3d 42 24 0d e3 30 09 20  54 25 3d 34 0d e3 3a 06  |=B$..0. T%=4..:.|
00006470  20 f5 0d e3 44 20 20 e7  bb 28 48 53 43 24 28 54  | ...D  ..(HSC$(T|
00006480  25 2b 31 29 29 3e bb 28  48 53 43 24 28 54 25 29  |%+1))>.(HSC$(T%)|
00006490  29 8c 0d e3 4e 1b 20 c8  94 20 48 53 43 24 28 54  |)...N. .. HSC$(T|
000064a0  25 2b 31 29 2c 48 53 43  24 28 54 25 29 0d e3 58  |%+1),HSC$(T%)..X|
000064b0  1b 20 c8 94 20 4e 53 43  24 28 54 25 2b 31 29 2c  |. .. NSC$(T%+1),|
000064c0  4e 53 43 24 28 54 25 29  0d e3 62 06 20 cc 0d e3  |NSC$(T%)..b. ...|
000064d0  6c 09 20 54 25 3d 31 0d  e3 76 06 20 cd 0d e3 80  |l. T%=1..v. ....|
000064e0  0a 20 54 25 2d 3d 31 0d  e3 8a 0a 20 fd 54 25 3d  |. T%-=1.... .T%=|
000064f0  30 0d e3 94 0a 20 f4 20  43 4c 53 0d e3 9e 06 20  |0.... . CLS.... |
00006500  e1 0d e3 a8 06 20 3a 0d  e3 bc 0c 20 dd f2 69 6e  |..... :.... ..in|
00006510  70 75 74 0d e3 c6 0d 20  2a 46 58 20 32 31 2c 30  |put.... *FX 21,0|
00006520  0d e3 d0 15 20 68 73 63  32 25 3d 30 3a 68 73 63  |.... hsc2%=0:hsc|
00006530  31 25 3d 32 31 0d e3 da  1f 20 e3 49 25 3d 31 b8  |1%=21.... .I%=1.|
00006540  31 30 3a 4e 24 28 49 25  29 3d 22 22 3a ed 3a 42  |10:N$(I%)="":.:B|
00006550  24 3d 22 22 0d e3 e4 27  20 f1 8a 36 2c 31 30 29  |$=""...' ..6,10)|
00006560  3b 22 45 6e 74 65 72 20  55 70 20 54 6f 20 36 20  |;"Enter Up To 6 |
00006570  43 68 61 72 61 63 74 65  72 73 22 0d e3 ee 25 20  |Characters"...% |
00006580  f1 8a 36 2c 31 34 29 3b  22 45 6e 74 65 72 20 59  |..6,14);"Enter Y|
00006590  6f 75 72 20 4e 61 6d 65  20 2e 2e 2e 2e 2e 2e 22  |our Name ......"|
000065a0  0d e3 f8 06 20 f5 0d e4  02 09 20 41 24 3d be 0d  |.... ..... A$=..|
000065b0  e4 0c 1a 20 e7 a6 28 2d  39 30 29 20 f2 62 61 63  |... ..(-90) .bac|
000065c0  6b 73 70 3a e5 8d 58 74  64 0d e4 16 1b 20 e7 68  |ksp:..Xtd.... .h|
000065d0  73 63 32 25 3e 36 20 f2  62 61 63 6b 73 70 3a e5  |sc2%>6 .backsp:.|
000065e0  8d 58 74 64 0d e4 20 30  20 68 73 63 31 25 2b 3d  |.Xtd.. 0 hsc1%+=|
000065f0  31 3a 68 73 63 32 25 2b  3d 31 3a 4e 24 28 68 73  |1:hsc2%+=1:N$(hs|
00006600  63 32 25 29 3d 41 24 3a  63 24 3d 4e 24 28 68 73  |c2%)=A$:c$=N$(hs|
00006610  63 32 25 29 0d e4 2a 0d  20 68 73 63 31 25 3d 32  |c2%)..*. hsc1%=2|
00006620  31 0d e4 2f 37 20 49 25  3d 30 3a f5 3a 49 25 2b  |1../7 I%=0:.:I%+|
00006630  3d 31 3a 68 73 63 31 25  2b 3d 31 3a f1 8a 68 73  |=1:hsc1%+=1:..hs|
00006640  63 31 25 2c 31 34 29 3b  4e 24 28 49 25 29 3a fd  |c1%,14);N$(I%):.|
00006650  49 25 3d 68 73 63 32 25  0d e4 34 0d 20 fd 20 a6  |I%=hsc2%..4. . .|
00006660  28 2d 37 34 29 0d e4 3e  29 20 49 25 3d 30 3a f5  |(-74)..>) I%=0:.|
00006670  3a 49 25 2b 3d 31 3a 42  24 3d 42 24 2b 4e 24 28  |:I%+=1:B$=B$+N$(|
00006680  49 25 29 3a fd 20 49 25  3d 68 73 63 32 25 0d e4  |I%):. I%=hsc2%..|
00006690  48 06 20 e1 0d e4 4d 06  20 3a 0d e4 52 0d 20 dd  |H. ...M. :..R. .|
000066a0  f2 62 61 63 6b 73 70 0d  e4 5c 12 20 e7 68 73 63  |.backsp..\. .hsc|
000066b0  31 25 3c 32 32 20 8c 20  e1 0d e4 66 20 20 4e 24  |1%<22 . ...f  N$|
000066c0  28 68 73 63 32 25 29 3d  22 2e 22 3a 68 73 63 31  |(hsc2%)=".":hsc1|
000066d0  25 3d 32 31 3a 49 25 3d  30 0d e4 70 06 20 f5 0d  |%=21:I%=0..p. ..|
000066e0  e4 7a 26 20 49 25 2b 3d  31 3a 68 73 63 31 25 2b  |.z& I%+=1:hsc1%+|
000066f0  3d 31 3a f1 8a 68 73 63  31 25 2c 31 34 29 3b 4e  |=1:..hsc1%,14);N|
00006700  24 28 49 25 29 0d e4 84  0e 20 fd 49 25 3d 68 73  |$(I%).... .I%=hs|
00006710  63 32 25 0d e4 8e 1b 20  68 73 63 32 25 2d 3d 31  |c2%.... hsc2%-=1|
00006720  3a 68 73 63 31 25 2d 3d  31 3a 49 25 3d 30 0d e4  |:hsc1%-=1:I%=0..|
00006730  98 06 20 e1 0d e4 b6 10  20 dd f2 72 65 63 74 61  |.. ..... ..recta|
00006740  6e 67 6c 65 0d e4 c0 07  20 e6 30 0d e4 ca 1c 20  |ngle.... .0.... |
00006750  e6 37 3a c8 93 20 c8 90  20 30 2c 31 38 30 2c 31  |.7:.. .. 0,180,1|
00006760  32 38 30 2c 36 35 30 0d  e4 d4 06 20 e1 0d e4 de  |280,650.... ....|
00006770  06 20 3a 0d e4 e8 10 20  dd f2 70 72 69 6e 74 5f  |. :.... ..print_|
00006780  6f 75 74 0d e4 f2 0f 20  f2 72 65 63 74 61 6e 67  |out.... .rectang|
00006790  6c 65 0d e4 fc 12 20 f4  20 4c 4f 43 41 4c 20 49  |le.... . LOCAL I|
000067a0  25 2c 50 25 0d e5 01 08  20 fb 31 32 0d e5 06 20  |%,P%.... .12... |
000067b0  20 f1 8a 31 30 2c 37 29  3b 22 48 69 67 68 2d 53  | ..10,7);"High-S|
000067c0  63 6f 72 65 20 20 54 61  62 6c 65 22 0d e5 07 20  |core  Table"... |
000067d0  20 f1 8a 31 30 2c 38 29  3b 22 2d 2d 2d 2d 2d 2d  | ..10,8);"------|
000067e0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 22 0d e5 0b 07  |-----------"....|
000067f0  20 fb 30 0d e5 10 0a 20  50 25 3d 31 31 0d e5 1a  | .0.... P%=11...|
00006800  0c 20 e3 49 25 3d 31 b8  35 0d e5 24 2f 20 f1 8a  |. .I%=1.5..$/ ..|
00006810  31 30 2c 50 25 29 3b 4e  53 43 24 28 49 25 29 3b  |10,P%);NSC$(I%);|
00006820  8a 32 33 2c 50 25 29 3b  48 53 43 24 28 49 25 29  |.23,P%);HSC$(I%)|
00006830  3a 50 25 3d 50 25 2b 32  0d e5 2e 06 20 ed 0d e5  |:P%=P%+2.... ...|
00006840  32 07 20 fb 35 0d e5 33  22 20 f1 8a 39 2c 32 36  |2. .5..3" ..9,26|
00006850  29 3b 22 50 72 65 73 73  20 58 20 4b 65 79 20 54  |);"Press X Key T|
00006860  6f 20 50 6c 61 79 22 0d  e5 38 06 20 e1 0d e5 42  |o Play"..8. ...B|
00006870  06 20 3a 0d e5 4c 0a 20  dd f2 6f 6e 65 0d e5 56  |. :..L. ..one..V|
00006880  30 20 4e 53 43 24 28 31  29 3d 22 2d 2d 2d 2d 2d  |0 NSC$(1)="-----|
00006890  2d 22 3a 48 53 43 24 28  31 29 3d 22 2d 2d 2d 2d  |-":HSC$(1)="----|
000068a0  22 3a 4e 55 4d 24 28 31  29 3d 22 31 22 0d e5 60  |":NUM$(1)="1"..`|
000068b0  30 20 4e 53 43 24 28 32  29 3d 22 2d 2d 2d 2d 2d  |0 NSC$(2)="-----|
000068c0  2d 22 3a 48 53 43 24 28  32 29 3d 22 2d 2d 2d 2d  |-":HSC$(2)="----|
000068d0  22 3a 4e 55 4d 24 28 32  29 3d 22 32 22 0d e5 6a  |":NUM$(2)="2"..j|
000068e0  30 20 4e 53 43 24 28 33  29 3d 22 2d 2d 2d 2d 2d  |0 NSC$(3)="-----|
000068f0  2d 22 3a 48 53 43 24 28  33 29 3d 22 2d 2d 2d 2d  |-":HSC$(3)="----|
00006900  22 3a 4e 55 4d 24 28 33  29 3d 22 33 22 0d e5 74  |":NUM$(3)="3"..t|
00006910  30 20 4e 53 43 24 28 34  29 3d 22 2d 2d 2d 2d 2d  |0 NSC$(4)="-----|
00006920  2d 22 3a 48 53 43 24 28  34 29 3d 22 2d 2d 2d 2d  |-":HSC$(4)="----|
00006930  22 3a 4e 55 4d 24 28 34  29 3d 22 34 22 0d e5 7e  |":NUM$(4)="4"..~|
00006940  30 20 4e 53 43 24 28 35  29 3d 22 2d 2d 2d 2d 2d  |0 NSC$(5)="-----|
00006950  2d 22 3a 48 53 43 24 28  35 29 3d 22 2d 2d 2d 2d  |-":HSC$(5)="----|
00006960  22 3a 4e 55 4d 24 28 35  29 3d 22 35 22 0d e5 88  |":NUM$(5)="5"...|
00006970  06 20 e1 0d e5 92 06 20  3a 0d e5 b0 10 20 dd f2  |. ..... :.... ..|
00006980  73 61 76 65 5f 64 69 73  63 0d e5 ba 0c 20 ea 20  |save_disc.... . |
00006990  4e 25 2c 49 25 0d e5 c4  09 20 4e 25 3d 35 0d e5  |N%,I%.... N%=5..|
000069a0  ce 18 20 68 61 6e 64 6c  65 3d ad 28 22 48 49 53  |.. handle=.("HIS|
000069b0  43 4f 52 45 22 29 0d e5  d8 10 20 f1 23 68 61 6e  |CORE").... .#han|
000069c0  64 6c 65 2c 4e 25 0d e5  e2 11 20 49 25 3d 30 3a  |dle,N%.... I%=0:|
000069d0  f5 3a 49 25 2b 3d 31 0d  e5 ec 28 20 f1 23 68 61  |.:I%+=1...( .#ha|
000069e0  6e 64 6c 65 2c 4e 55 4d  24 28 49 25 29 2c 4e 53  |ndle,NUM$(I%),NS|
000069f0  43 24 28 49 25 29 2c 48  53 43 24 28 49 25 29 0d  |C$(I%),HSC$(I%).|
00006a00  e5 f6 0c 20 fd 20 49 25  3e 3d 35 0d e6 00 08 20  |... . I%>=5.... |
00006a10  d9 23 30 0d e6 0a 06 20  e1 0d e6 14 06 20 3a 0d  |.#0.... ..... :.|
00006a20  e6 1e 0b 20 dd f2 64 69  73 63 0d e6 28 0c 20 ea  |... ..disc..(. .|
00006a30  20 4e 25 2c 49 25 0d e6  32 09 20 4e 25 3d 35 0d  | N%,I%..2. N%=5.|
00006a40  e6 3c 18 20 68 61 6e 64  6c 65 3d ad 28 22 48 49  |.<. handle=.("HI|
00006a50  53 43 4f 52 45 22 29 0d  e6 46 10 20 e8 23 68 61  |SCORE")..F. .#ha|
00006a60  6e 64 6c 65 2c 4e 25 0d  e6 50 11 20 49 25 3d 30  |ndle,N%..P. I%=0|
00006a70  3a f5 3a 49 25 2b 3d 31  0d e6 5a 28 20 e8 23 68  |:.:I%+=1..Z( .#h|
00006a80  61 6e 64 6c 65 2c 4e 55  4d 24 28 49 25 29 2c 4e  |andle,NUM$(I%),N|
00006a90  53 43 24 28 49 25 29 2c  48 53 43 24 28 49 25 29  |SC$(I%),HSC$(I%)|
00006aa0  0d e6 64 0c 20 fd 20 49  25 3e 3d 35 0d e6 6e 08  |..d. . I%>=5..n.|
00006ab0  20 d9 23 30 0d e6 78 06  20 e1 0d ea 60 0d 20 dd  | .#0..x. ...`. .|
00006ac0  f2 66 69 6e 69 73 68 0d  ea 6a 57 20 f1 22 49 66  |.finish..jW ."If|
00006ad0  20 54 68 65 72 65 20 49  73 20 41 6e 79 62 6f 64  | There Is Anybod|
00006ae0  79 20 49 6e 20 54 68 65  20 44 6f 72 73 65 74 2f  |y In The Dorset/|
00006af0  53 6f 75 74 68 20 43 6f  61 73 74 20 52 65 67 69  |South Coast Regi|
00006b00  6f 6e 20 49 6e 74 65 72  65 73 74 65 64 20 49 6e  |on Interested In|
00006b10  20 41 72 6d 63 6f 64 69  6e 67 2e 22 3a f1 0d ea  | Armcoding.":...|
00006b20  74 4f 20 f1 22 41 6e 79  20 4d 75 73 69 63 69 61  |tO ."Any Musicia|
00006b30  6e 73 20 4f 75 74 20 54  68 65 72 65 2c 20 57 68  |ns Out There, Wh|
00006b40  6f 20 57 6f 75 6c 64 20  4c 69 6b 65 20 54 68 65  |o Would Like The|
00006b50  72 65 20 4d 61 73 74 65  72 70 69 65 63 65 20 49  |re Masterpiece I|
00006b60  6e 63 6c 75 64 65 64 20  41 73 20 41 22 0d ea 7e  |ncluded As A"..~|
00006b70  2c 20 f1 22 42 61 63 6b  61 63 6b 69 6e 67 20 54  |, ."Backacking T|
00006b80  72 61 63 6b 20 46 6f 72  20 4d 79 20 4e 65 78 74  |rack For My Next|
00006b90  20 47 61 6d 65 2e 22 3a  f1 0d ea 88 3b 20 f1 22  | Game.":....; ."|
00006ba0  50 6c 65 61 73 65 20 43  6f 6e 74 61 63 74 20 4d  |Please Contact M|
00006bb0  65 21 21 21 21 20 47 65  6f 66 66 20 48 6f 6c 6c  |e!!!! Geoff Holl|
00006bc0  61 6e 64 20 28 30 32 35  38 29 20 34 35 32 35 30  |and (0258) 45250|
00006bd0  37 22 3a f1 0d ea 92 3e  20 f1 22 20 20 20 20 20  |7":....> ."     |
00006be0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00006bf0  20 20 20 20 20 48 6f 70  65 20 59 6f 75 20 45 6e  |     Hope You En|
00006c00  6a 6f 79 65 64 20 54 68  65 20 47 61 6d 65 2e 22  |joyed The Game."|
00006c10  3a f1 0d ea 9c 06 20 f6  0d ea bf 0f 20 f2 73 61  |:..... ..... .sa|
00006c20  76 65 5f 64 69 73 63 0d  ea c3 06 20 e1 0d ee 48  |ve_disc.... ...H|
00006c30  0e 20 dd f2 73 70 72 69  74 65 73 0d ee 52 38 20  |. ..sprites..R8 |
00006c40  de 20 73 70 25 20 26 33  30 30 30 30 3a 21 73 70  |. sp% &30000:!sp|
00006c50  25 3d 26 33 30 30 30 30  3a 73 70 25 21 34 3d 30  |%=&30000:sp%!4=0|
00006c60  3a 73 70 25 21 38 3d 31  36 3a 73 70 25 21 31 32  |:sp%!8=16:sp%!12|
00006c70  3d 31 36 0d ee 5c 24 20  c8 99 20 22 4f 53 5f 53  |=16..\$ .. "OS_S|
00006c80  70 72 69 74 65 4f 70 22  2c 32 36 36 2c 73 70 25  |priteOp",266,sp%|
00006c90  2c 22 44 61 74 61 22 0d  ee 70 0a 20 f2 69 6e 69  |,"Data"..p. .ini|
00006ca0  74 0d ee 7a 12 20 f4 20  50 52 4f 43 73 63 72 65  |t..z. . PROCscre|
00006cb0  65 6e 31 0d ee ab 06 20  e1 0d ee ac 0b 20 dd f2  |en1.... ..... ..|
00006cc0  69 6e 69 74 0d ee b6 0d  20 de 20 54 25 28 35 30  |init.... . T%(50|
00006cd0  29 0d ee c0 0d 20 e3 49  25 3d 31 b8 33 36 0d ee  |).... .I%=1.36..|
00006ce0  ca 36 20 c8 99 20 22 4f  53 5f 53 70 72 69 74 65  |.6 .. "OS_Sprite|
00006cf0  4f 70 22 2c 32 35 36 2b  32 34 2c 73 70 25 2c 22  |Op",256+24,sp%,"|
00006d00  6f 62 22 2b c3 28 49 25  29 20 b8 20 2c 2c 54 25  |ob"+.(I%) . ,,T%|
00006d10  28 49 25 29 0d ee d4 06  20 ed 0d ee de 06 20 e1  |(I%).... ..... .|
00006d20  0d ef 10 0e 20 dd f2 73  63 72 65 65 6e 31 0d ef  |.... ..screen1..|
00006d30  1a 07 20 eb 39 0d ef 2e  15 20 2a 50 52 49 4e 54  |.. .9.... *PRINT|
00006d40  20 21 50 61 6c 65 74 74  65 31 0d ef 38 10 20 fb  | !Palette1..8. .|
00006d50  20 31 32 38 2b 37 3a fb  20 34 0d ef 42 06 20 87  | 128+7:. 4..B. .|
00006d60  0d ef 4c 06 20 db 0d f2  30 2d 20 c8 99 20 22 4f  |..L. ...0- .. "O|
00006d70  53 5f 53 70 72 69 74 65  4f 70 22 2c 35 34 36 2c  |S_SpriteOp",546,|
00006d80  73 70 25 2c 54 25 28 34  29 2c 32 35 30 2c 35 30  |sp%,T%(4),250,50|
00006d90  30 2c 30 0d f2 3a 2d 20  c8 99 20 22 4f 53 5f 53  |0,0..:- .. "OS_S|
00006da0  70 72 69 74 65 4f 70 22  2c 35 34 36 2c 73 70 25  |priteOp",546,sp%|
00006db0  2c 54 25 28 35 29 2c 33  35 30 2c 34 39 39 2c 30  |,T%(5),350,499,0|
00006dc0  0d f2 44 2d 20 c8 99 20  22 4f 53 5f 53 70 72 69  |..D- .. "OS_Spri|
00006dd0  74 65 4f 70 22 2c 35 34  36 2c 73 70 25 2c 54 25  |teOp",546,sp%,T%|
00006de0  28 36 29 2c 34 35 30 2c  35 30 30 2c 30 0d f2 4e  |(6),450,500,0..N|
00006df0  2d 20 c8 99 20 22 4f 53  5f 53 70 72 69 74 65 4f  |- .. "OS_SpriteO|
00006e00  70 22 2c 35 34 36 2c 73  70 25 2c 54 25 28 37 29  |p",546,sp%,T%(7)|
00006e10  2c 36 34 30 2c 35 30 30  2c 30 0d f2 58 2d 20 c8  |,640,500,0..X- .|
00006e20  99 20 22 4f 53 5f 53 70  72 69 74 65 4f 70 22 2c  |. "OS_SpriteOp",|
00006e30  35 34 36 2c 73 70 25 2c  54 25 28 38 29 2c 37 35  |546,sp%,T%(8),75|
00006e40  30 2c 35 30 30 2c 30 0d  f2 62 2d 20 c8 99 20 22  |0,500,0..b- .. "|
00006e50  4f 53 5f 53 70 72 69 74  65 4f 70 22 2c 35 34 36  |OS_SpriteOp",546|
00006e60  2c 73 70 25 2c 54 25 28  35 29 2c 38 35 30 2c 34  |,sp%,T%(5),850,4|
00006e70  39 39 2c 30 0d f2 6c 2d  20 c8 99 20 22 4f 53 5f  |99,0..l- .. "OS_|
00006e80  53 70 72 69 74 65 4f 70  22 2c 35 34 36 2c 73 70  |SpriteOp",546,sp|
00006e90  25 2c 54 25 28 39 29 2c  39 35 30 2c 35 30 30 2c  |%,T%(9),950,500,|
00006ea0  30 0d f2 8a 2b 20 f1 8a  36 2c 33 30 29 3b 22 50  |0...+ ..6,30);"P|
00006eb0  6c 65 61 73 65 20 57 61  69 74 20 46 6f 72 20 44  |lease Wait For D|
00006ec0  61 74 61 20 54 6f 20 4c  6f 61 64 22 0d f6 13 1e  |ata To Load"....|
00006ed0  20 f4 20 52 45 50 45 41  54 3a 55 4e 54 49 4c 20  | . REPEAT:UNTIL |
00006ee0  49 4e 4b 45 59 28 2d 39  39 29 0d f6 17 06 20 e1  |INKEY(-99).... .|
00006ef0  0d ff                                             |..|
00006ef2