2571 lines
54 KiB
ArmAsm
2571 lines
54 KiB
ArmAsm
|
|
*---------------------------------------------------------*
|
|
* Disassembled with The Flaming Bird Disassembler *
|
|
* (c) Phoenix corp. 1992,93 - All rights reserved *
|
|
*---------------------------------------------------------*
|
|
|
|
REL
|
|
|
|
L0D0000 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00F4
|
|
TCS
|
|
LDAL L0371B8
|
|
BEQ L0D001D
|
|
LDA #$0000
|
|
STAL L0371B8
|
|
LDA #$0001
|
|
BRA L0D0020
|
|
L0D001D LDA #$0000
|
|
L0D0020 TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D002A ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00E8
|
|
TCS
|
|
STZ $F2
|
|
STZ $F4
|
|
BRL L0D0186
|
|
L0D003C LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
BNE L0D0066
|
|
BRL L0D0184
|
|
L0D0066 LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0008
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0006
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$000C
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$000A
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
LDAL L031DE8
|
|
TAX
|
|
LDAL L031DE6
|
|
STX $F0
|
|
STA $EE
|
|
LDY #$000C
|
|
LDA [$EE],Y
|
|
PHA
|
|
LDY #$000A
|
|
LDA [$EE],Y
|
|
PHA
|
|
PEA $0000
|
|
PEA $0000
|
|
LDX $F0
|
|
LDA $EE
|
|
CLC
|
|
ADC #$000E
|
|
PHA
|
|
TXA
|
|
ADC #$0000
|
|
TAX
|
|
PLA
|
|
PHX
|
|
PHA
|
|
JSL L013C06
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
STX $EC
|
|
STA $EA
|
|
LDA $F2
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0371C6
|
|
LDX #^L0371C6
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
PHA
|
|
LDA $F2
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0371BE
|
|
LDX #^L0371BE
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
PHA
|
|
PEI $EC
|
|
PEI $EA
|
|
PEI $F0
|
|
PEI $EE
|
|
JSL L0132E0
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PHX
|
|
PHA
|
|
PEI $EC
|
|
PEI $EA
|
|
_FindHandle
|
|
BCS L0D016E
|
|
LDA #$0000
|
|
L0D016E STAL L020002
|
|
_DisposeHandle
|
|
BCS L0D017E
|
|
LDA #$0000
|
|
L0D017E STAL L020002
|
|
INC $F2
|
|
L0D0184 INC $F4
|
|
L0D0186 LDA $F4
|
|
CMP #$0004
|
|
BCS L0D0190
|
|
BRL L0D003C
|
|
L0D0190 TSC
|
|
CLC
|
|
ADC #$0012
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0D0198 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00EA
|
|
TCS
|
|
STZ L0200E0
|
|
STZ L0200E2
|
|
STZ L0200DA
|
|
STZ $F4
|
|
BRL L0D033F
|
|
L0D01B1 LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
BNE L0D01DB
|
|
BRL L0D033D
|
|
L0D01DB LDX L0200E2
|
|
LDA L0200E0
|
|
STX $F6
|
|
ORA $F6
|
|
BNE L0D021B
|
|
LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0010
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$000E
|
|
LDA [$F6],Y
|
|
STX L0200E2
|
|
STA L0200E0
|
|
L0D021B LDA L0200DA
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0371C6
|
|
LDX #^L0371C6
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
STA $EC
|
|
LDA L0200DA
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0371BE
|
|
LDX #^L0371BE
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
SEC
|
|
SBC #$000C
|
|
STA $EE
|
|
LDA #$0000
|
|
STA $F2
|
|
STA $F0
|
|
PHX
|
|
PHA
|
|
LDAL L031DDC
|
|
TAX
|
|
LDAL L031DDA
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00EC
|
|
PHA
|
|
PEA ^L0371D6
|
|
PEA L0371D6
|
|
PEA $0001
|
|
LDA L0200DA
|
|
CMP #$0000
|
|
BNE L0D028C
|
|
LDA #$0001
|
|
BRA L0D028F
|
|
L0D028C LDA #$0000
|
|
L0D028F PHA
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0400
|
|
PEA $0000
|
|
LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0004
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
PEA ^L0371CE
|
|
PEA L0371CE
|
|
_NewControl
|
|
BCS L0D02DE
|
|
LDA #$0000
|
|
L0D02DE STAL L020002
|
|
LDA $F4
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0376A2
|
|
LDX #^L0376A2
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
PLA
|
|
PLX
|
|
LDY #$0002
|
|
PHA
|
|
TXA
|
|
STA [$F6],Y
|
|
PLA
|
|
STA [$F6]
|
|
LDA $F4
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0376A2
|
|
LDX #^L0376A2
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
PHX
|
|
PHA
|
|
_DrawOneCtl
|
|
BCS L0D0336
|
|
LDA #$0000
|
|
L0D0336 STAL L020002
|
|
INC L0200DA
|
|
L0D033D INC $F4
|
|
L0D033F LDA $F4
|
|
CMP #$0004
|
|
BCS L0D0349
|
|
BRL L0D01B1
|
|
L0D0349 TSC
|
|
CLC
|
|
ADC #$0010
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0D0351 PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$00EE
|
|
TCS
|
|
STZ $F0
|
|
BRL L0D03BE
|
|
L0D0361 LDX $FF
|
|
LDA $FD
|
|
PHX
|
|
PHA
|
|
LDA $F0
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
JSL L013333
|
|
BNE L0D03BC
|
|
LDA $F0
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
BRA L0D03CB
|
|
L0D03BC INC $F0
|
|
L0D03BE LDA $F0
|
|
CMP #$0004
|
|
BCC L0D0361
|
|
LDX #$0000
|
|
LDA #$0000
|
|
L0D03CB TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0008
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D03D5 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F5
|
|
TCD
|
|
ADC #$00E8
|
|
TCS
|
|
STZ $EE
|
|
BRL L0D048E
|
|
L0D03E5 LDA $EE
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0376A2
|
|
LDX #^L0376A2
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0002
|
|
LDA [$F0],Y
|
|
TAX
|
|
LDA [$F0]
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0002
|
|
LDA [$F0],Y
|
|
TAX
|
|
LDA [$F0]
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0012
|
|
LDA [$F0],Y
|
|
CMP #$0001
|
|
BNE L0D048C
|
|
LDA $EE
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0376A2
|
|
LDX #^L0376A2
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0002
|
|
LDA [$F0],Y
|
|
TAX
|
|
LDA [$F0]
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0002
|
|
LDA [$F0],Y
|
|
TAX
|
|
LDA [$F0]
|
|
STA $F0
|
|
STX $F2
|
|
LDA #$0000
|
|
LDY #$0012
|
|
STA [$F0],Y
|
|
LDA $EE
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0376A2
|
|
LDX #^L0376A2
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0002
|
|
LDA [$F0],Y
|
|
TAX
|
|
LDA [$F0]
|
|
PHX
|
|
PHA
|
|
_DrawOneCtl
|
|
BCS L0D0488
|
|
LDA #$0000
|
|
L0D0488 STAL L020002
|
|
L0D048C INC $EE
|
|
L0D048E LDA $EE
|
|
CMP L0200DA
|
|
BCS L0D0498
|
|
BRL L0D03E5
|
|
L0D0498 LDY #$0002
|
|
LDA [$FB],Y
|
|
TAX
|
|
LDA [$FB]
|
|
STA $F0
|
|
STX $F2
|
|
LDA #$0001
|
|
LDY #$0012
|
|
STA [$F0],Y
|
|
PEI $FD
|
|
PEI $FB
|
|
_DrawOneCtl
|
|
BCS L0D04BC
|
|
LDA #$0000
|
|
L0D04BC STAL L020002
|
|
LDY #$0002
|
|
LDA [$FB],Y
|
|
TAX
|
|
LDA [$FB]
|
|
STA $F0
|
|
STX $F2
|
|
LDY #$0022
|
|
LDA [$F0],Y
|
|
TAX
|
|
LDY #$0020
|
|
LDA [$F0],Y
|
|
PHX
|
|
PHA
|
|
JSL L0D0351
|
|
PLY
|
|
PLY
|
|
STX $EC
|
|
STA $EA
|
|
LDX $EC
|
|
LDA $EA
|
|
STX $F0
|
|
ORA $F0
|
|
BNE L0D04FB
|
|
PEA ^L0371D7
|
|
PEA L0371D7
|
|
JSL L050256
|
|
PLY
|
|
PLY
|
|
BRA L0D050C
|
|
L0D04FB LDY #$0010
|
|
LDA [$EA],Y
|
|
TAX
|
|
LDY #$000E
|
|
LDA [$EA],Y
|
|
STX L0200E2
|
|
STA L0200E0
|
|
L0D050C TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
PLD
|
|
LDA $02,S
|
|
STA $08,S
|
|
LDA $01,S
|
|
STA $07,S
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
RTL
|
|
|
|
L0D0522 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00F0
|
|
TCS
|
|
LDAL L036F18
|
|
CMP #$0003
|
|
BNE L0D055A
|
|
LDAL L036F34
|
|
CMP #$0003
|
|
BNE L0D055A
|
|
LDAL L036FA4
|
|
CMP #$0003
|
|
BNE L0D055A
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
STA $F6
|
|
STX $F8
|
|
LDA #$0001
|
|
STA [$F6]
|
|
L0D055A LDAL L036F18
|
|
CMP #$0003
|
|
BNE L0D058A
|
|
LDAL L036F6C
|
|
CMP #$0003
|
|
BNE L0D058A
|
|
LDAL L036F50
|
|
CMP #$0003
|
|
BNE L0D058A
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
STA $F6
|
|
STX $F8
|
|
LDA #$0001
|
|
LDY #$0012
|
|
STA [$F6],Y
|
|
L0D058A LDAL L036F50
|
|
CMP #$0003
|
|
BNE L0D05BA
|
|
LDAL L036FA4
|
|
CMP #$0003
|
|
BNE L0D05BA
|
|
LDAL L036F88
|
|
CMP #$0003
|
|
BNE L0D05BA
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
STA $F6
|
|
STX $F8
|
|
LDA #$0001
|
|
LDY #$0024
|
|
STA [$F6],Y
|
|
L0D05BA LDAL L036F34
|
|
CMP #$0003
|
|
BNE L0D05EA
|
|
LDAL L036FC0
|
|
CMP #$0003
|
|
BNE L0D05EA
|
|
LDAL L036F88
|
|
CMP #$0003
|
|
BNE L0D05EA
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
STA $F6
|
|
STX $F8
|
|
LDA #$0001
|
|
LDY #$0036
|
|
STA [$F6],Y
|
|
L0D05EA LDA #$0000
|
|
STA $F4
|
|
LDA #$0000
|
|
STA $F2
|
|
BRA L0D0624
|
|
L0D05F6 LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
CMP #$0001
|
|
BNE L0D0622
|
|
INC $F2
|
|
L0D0622 INC $F4
|
|
L0D0624 LDA $F4
|
|
CMP #$0004
|
|
BCC L0D05F6
|
|
LDA $F2
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000A
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D0637 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00F2
|
|
TCS
|
|
STZ $F4
|
|
BRL L0D06A3
|
|
L0D0647 LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
CMP #$0001
|
|
BNE L0D06A1
|
|
LDA $F4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0012
|
|
CLC
|
|
JSL L013048
|
|
LDAL L0371BC
|
|
TAX
|
|
LDAL L0371BA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0010
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$000E
|
|
LDA [$F6],Y
|
|
BRA L0D06B0
|
|
L0D06A1 INC $F4
|
|
L0D06A3 LDA $F4
|
|
CMP #$0004
|
|
BCC L0D0647
|
|
LDX #$0000
|
|
LDA #$0000
|
|
L0D06B0 TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0008
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D06BA PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$FFB2
|
|
TCS
|
|
LDA #$0007
|
|
STA $C6
|
|
LDA #L0370E9
|
|
LDX #^L0370E9
|
|
STA $F2
|
|
STX $F4
|
|
LDA #$0080
|
|
SEP #$20
|
|
LDY #$0004
|
|
STA [$F2],Y
|
|
REP #$20
|
|
LDA #$0001
|
|
STA $F0
|
|
PEI $F0
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$0022
|
|
PHA
|
|
JSL L013F1E
|
|
PLY
|
|
PLY
|
|
PLY
|
|
LDA #L03720F
|
|
LDX #^L03720F
|
|
STX $5E
|
|
STA $5C
|
|
LDA #L037229
|
|
LDX #^L037229
|
|
STX $4E
|
|
STA $4C
|
|
LDA #L03722D
|
|
LDX #^L03722D
|
|
STX $52
|
|
STA $50
|
|
LDA #L037233
|
|
LDX #^L037233
|
|
STX $56
|
|
STA $54
|
|
LDA #L0370E9
|
|
LDX #^L0370E9
|
|
STX $DC
|
|
STA $DA
|
|
LDA #L0370E9
|
|
LDX #^L0370E9
|
|
STX $26
|
|
STA $24
|
|
LDAL L031DDC
|
|
TAX
|
|
LDAL L031DDA
|
|
STX $A8
|
|
STA $A6
|
|
L0D0740 LDA #$0001
|
|
BNE L0D0748
|
|
BRL L0D0973
|
|
L0D0748 PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00EE
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$0022
|
|
PHA
|
|
JSL L01493B
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
STA $F0
|
|
LDA $EE
|
|
CMP #$0002
|
|
BNE L0D07BB
|
|
LDA $F0
|
|
BEQ L0D07AE
|
|
LDA $F0
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0009
|
|
CLC
|
|
JSL L013048
|
|
LDA #L0370E9
|
|
LDX #^L0370E9
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
SEC
|
|
SBC #$0009
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
AND #$00FF
|
|
EOR #$0080
|
|
SEP #$20
|
|
LDY #$0004
|
|
STA [$F2],Y
|
|
REP #$20
|
|
L0D07AE JSL L014C78
|
|
LDA #$FFFF
|
|
BRL L0D0973
|
|
BRL L0D094B
|
|
L0D07BB LDA $F0
|
|
STA $CC
|
|
LDA $F0
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0009
|
|
CLC
|
|
JSL L013048
|
|
LDA #L0370E9
|
|
LDX #^L0370E9
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
SEC
|
|
SBC #$0009
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0007
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$0005
|
|
LDA [$F2],Y
|
|
TXY
|
|
LDX #$FFBC
|
|
STY $02,X
|
|
STA $00,X
|
|
TYX
|
|
LDA $EE
|
|
CMP #$0000
|
|
BEQ L0D0808
|
|
BRL L0D08F0
|
|
L0D0808 LDX #$FFBE
|
|
LDA $00,X
|
|
TAX
|
|
PHX
|
|
LDX #$FFBC
|
|
LDA $00,X
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
LDX #$FFB4
|
|
STA $00,X
|
|
JSL L014C78
|
|
L0D0827 LDX #$FFBE
|
|
LDA $00,X
|
|
TAX
|
|
PHX
|
|
LDX #$FFBC
|
|
LDA $00,X
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
LDX #$FFB4
|
|
CMP $00,X
|
|
BEQ L0D0847
|
|
BRL L0D08EE
|
|
L0D0847 LDAL L031DDC
|
|
TAX
|
|
LDAL L031DDA
|
|
PHX
|
|
PHA
|
|
_KillControls
|
|
BCS L0D085E
|
|
LDA #$0000
|
|
L0D085E STAL L020002
|
|
LDX #$FFBE
|
|
LDA $00,X
|
|
TAX
|
|
PHX
|
|
LDX #$FFBC
|
|
LDA $00,X
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDA [$F2]
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
LDAL L031DDC
|
|
TAX
|
|
LDAL L031DDA
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFB6
|
|
PHA
|
|
JSL L080498
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
LDX #$FFBE
|
|
LDA $00,X
|
|
TAX
|
|
PHX
|
|
LDX #$FFBC
|
|
LDA $00,X
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0008
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$0006
|
|
LDA [$F2],Y
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFB6
|
|
PHA
|
|
LDX #$FFBE
|
|
LDA $00,X
|
|
TAX
|
|
PHX
|
|
LDX #$FFBC
|
|
LDA $00,X
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
PHA
|
|
JSL L0A0F31
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
LDX #$FFB4
|
|
STA $00,X
|
|
BRL L0D0827
|
|
L0D08EE BRA L0D094B
|
|
L0D08F0 LDA $F0
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $0009
|
|
CLC
|
|
JSL L013048
|
|
LDA #L0370E9
|
|
LDX #^L0370E9
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
SEC
|
|
SBC #$0009
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
AND #$00FF
|
|
EOR #$0080
|
|
SEP #$20
|
|
LDY #$0004
|
|
STA [$F2],Y
|
|
REP #$20
|
|
JSL L014C78
|
|
LDX #$FFBE
|
|
LDA $00,X
|
|
TAX
|
|
PHX
|
|
LDX #$FFBC
|
|
LDA $00,X
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$000A
|
|
LDA [$F2],Y
|
|
BRA L0D0973
|
|
L0D094B LDAL L031DDC
|
|
TAX
|
|
LDAL L031DDA
|
|
PHX
|
|
PHA
|
|
_KillControls
|
|
BCS L0D0962
|
|
LDA #$0000
|
|
L0D0962 STAL L020002
|
|
PEI $FF
|
|
PEI $FD
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D0740
|
|
L0D0973 TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0144
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D097D ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F3
|
|
TCD
|
|
ADC #$00DE
|
|
TCS
|
|
PEA $0000
|
|
JSL L01335E
|
|
PLY
|
|
PEA $000F
|
|
_SetForeColor
|
|
BCS L0D099F
|
|
LDA #$0000
|
|
L0D099F STAL L020002
|
|
PEA $0001
|
|
_SetBackColor
|
|
BCS L0D09B2
|
|
LDA #$0000
|
|
L0D09B2 STAL L020002
|
|
PEA $0044
|
|
PEA $0018
|
|
_MoveTo
|
|
BCS L0D09C8
|
|
LDA #$0000
|
|
L0D09C8 STAL L020002
|
|
LDY #$0006
|
|
LDA [$F9],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F9],Y
|
|
PHX
|
|
PHA
|
|
_DrawCString
|
|
BCS L0D09E5
|
|
LDA #$0000
|
|
L0D09E5 STAL L020002
|
|
STZ $EC
|
|
BRL L0D0AE4
|
|
L0D09EE LDA $EC
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $000C
|
|
CLC
|
|
JSL L013048
|
|
LDY #$000E
|
|
LDA [$F9],Y
|
|
TAX
|
|
LDY #$000C
|
|
LDA [$F9],Y
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STX $EA
|
|
STA $E8
|
|
LDY #$0002
|
|
LDA [$E8],Y
|
|
CMP #$0001
|
|
BEQ L0D0A20
|
|
BRL L0D0AE2
|
|
L0D0A20 LDA #$0001
|
|
STAL L031DD8
|
|
LDA [$E8]
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L03700F
|
|
LDX #^L03700F
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $EE
|
|
STX $F0
|
|
LDY #$0002
|
|
LDA [$EE],Y
|
|
TAX
|
|
LDA [$EE]
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
LDAL L031DE8
|
|
TAX
|
|
LDAL L031DE6
|
|
STX $E6
|
|
STA $E4
|
|
LDY #$000C
|
|
LDA [$E4],Y
|
|
PHA
|
|
LDY #$000A
|
|
LDA [$E4],Y
|
|
PHA
|
|
PEA $0000
|
|
PEA $0000
|
|
LDX $E6
|
|
LDA $E4
|
|
CLC
|
|
ADC #$000E
|
|
PHA
|
|
TXA
|
|
ADC #$0000
|
|
TAX
|
|
PLA
|
|
PHX
|
|
PHA
|
|
JSL L013C06
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
STX $E2
|
|
STA $E0
|
|
LDA $EC
|
|
PHA
|
|
LDA #$0014
|
|
CLC
|
|
JSL L013003
|
|
LDA #$0028
|
|
PLX
|
|
STX $F2
|
|
CLC
|
|
ADC $F2
|
|
PHA
|
|
PEA $0030
|
|
PEI $E2
|
|
PEI $E0
|
|
PEI $E6
|
|
PEI $E4
|
|
JSL L012AB8
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PHX
|
|
PHA
|
|
PEI $E2
|
|
PEI $E0
|
|
_FindHandle
|
|
BCS L0D0ACE
|
|
LDA #$0000
|
|
L0D0ACE STAL L020002
|
|
_DisposeHandle
|
|
BCS L0D0ADE
|
|
LDA #$0000
|
|
L0D0ADE STAL L020002
|
|
L0D0AE2 INC $EC
|
|
L0D0AE4 LDY #$0002
|
|
LDA [$F9],Y
|
|
CMP $EC
|
|
BEQ L0D0AF2
|
|
BCC L0D0AF2
|
|
BRL L0D09EE
|
|
L0D0AF2 TSC
|
|
CLC
|
|
ADC #$0014
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0D0AFA PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$00EA
|
|
TCS
|
|
PHA
|
|
PEA $FFFF
|
|
PEA $0000
|
|
_FlushEvents
|
|
BCS L0D0B18
|
|
LDA #$0000
|
|
L0D0B18 STAL L020002
|
|
PLA
|
|
PHX
|
|
PHA
|
|
PEA ^L037332
|
|
PEA L037332
|
|
_GetNewModalDialog
|
|
BCS L0D0B31
|
|
LDA #$0000
|
|
L0D0B31 STAL L020002
|
|
PLA
|
|
PLX
|
|
STX $F0
|
|
STA $EE
|
|
LDY #$0006
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$FD],Y
|
|
PHX
|
|
PHA
|
|
JSL L0140CE
|
|
PLY
|
|
PLY
|
|
TAY
|
|
BEQ L0D0B5E
|
|
LDY #$0006
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$FD],Y
|
|
BRA L0D0B64
|
|
L0D0B5E LDA #L037368
|
|
LDX #^L037368
|
|
L0D0B64 PHX
|
|
PHA
|
|
PEA ^L0376B2
|
|
PEA L0376B2
|
|
JSL L014524
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PEA ^L0376B2
|
|
PEA L0376B2
|
|
JSL L013A1F
|
|
PLY
|
|
PLY
|
|
PEI $F0
|
|
PEI $EE
|
|
PEA $0003
|
|
PEA ^L0376B2
|
|
PEA L0376B2
|
|
_SetIText
|
|
BCS L0D0B99
|
|
LDA #$0000
|
|
L0D0B99 STAL L020002
|
|
PEA ^L03736A
|
|
PEA L03736A
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
JSL L014524
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
JSL L013A1F
|
|
PLY
|
|
PLY
|
|
PEI $F0
|
|
PEI $EE
|
|
PEA $0005
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
_SetIText
|
|
BCS L0D0BD6
|
|
LDA #$0000
|
|
L0D0BD6 STAL L020002
|
|
L0D0BDA PHA
|
|
PEA $0000
|
|
PEA $0000
|
|
_ModalDialog
|
|
BCS L0D0BED
|
|
LDA #$0000
|
|
L0D0BED STAL L020002
|
|
PLA
|
|
STA $EC
|
|
LDA $EC
|
|
CMP #$0003
|
|
BEQ L0D0BFE
|
|
BRL L0D0C54
|
|
L0D0BFE PEA ^L03736C
|
|
PEA L03736C
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
JSL L014524
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
JSL L013A1F
|
|
PLY
|
|
PLY
|
|
PEI $F0
|
|
PEI $EE
|
|
PEA $0005
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
_SetIText
|
|
BCS L0D0C37
|
|
LDA #$0000
|
|
L0D0C37 STAL L020002
|
|
PEI $F0
|
|
PEI $EE
|
|
PEA $0003
|
|
_DisableDItem
|
|
BCS L0D0C4E
|
|
LDA #$0000
|
|
L0D0C4E STAL L020002
|
|
BRA L0D0BDA
|
|
L0D0C54 LDA $EC
|
|
CMP #$0002
|
|
BNE L0D0C72
|
|
PEI $F0
|
|
PEI $EE
|
|
_CloseDialog
|
|
BCS L0D0C6B
|
|
LDA #$0000
|
|
L0D0C6B STAL L020002
|
|
BRL L0D0D38
|
|
L0D0C72 PEI $F0
|
|
PEI $EE
|
|
PEA $0003
|
|
PEA ^L0376B2
|
|
PEA L0376B2
|
|
_GetIText
|
|
BCS L0D0C8B
|
|
LDA #$0000
|
|
L0D0C8B STAL L020002
|
|
PEA ^L0376B2
|
|
PEA L0376B2
|
|
JSL L013A8B
|
|
PLY
|
|
PLY
|
|
PEA ^L0376B2
|
|
PEA L0376B2
|
|
JSL L0140CE
|
|
PLY
|
|
PLY
|
|
TAY
|
|
BEQ L0D0CAD
|
|
BRL L0D0D04
|
|
L0D0CAD PEA ^L03736E
|
|
PEA L03736E
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
JSL L014524
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
JSL L013A1F
|
|
PLY
|
|
PLY
|
|
PEI $F0
|
|
PEI $EE
|
|
PEA $0005
|
|
PEA ^L0376C2
|
|
PEA L0376C2
|
|
_SetIText
|
|
BCS L0D0CE6
|
|
LDA #$0000
|
|
L0D0CE6 STAL L020002
|
|
PEI $F0
|
|
PEI $EE
|
|
PEA $0003
|
|
_EnableDItem
|
|
BCS L0D0CFD
|
|
LDA #$0000
|
|
L0D0CFD STAL L020002
|
|
BRL L0D0BDA
|
|
L0D0D04 PEA ^L0376B2
|
|
PEA L0376B2
|
|
LDY #$0006
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$FD],Y
|
|
PHX
|
|
PHA
|
|
JSL L014524
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
LDA #$0001
|
|
STA [$FD]
|
|
PEI $F0
|
|
PEI $EE
|
|
_CloseDialog
|
|
BCS L0D0D34
|
|
LDA #$0000
|
|
L0D0D34 STAL L020002
|
|
L0D0D38 TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D0D42 PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00F4
|
|
TCS
|
|
LDA #$0005
|
|
PHA
|
|
PHA
|
|
_Random
|
|
BCS L0D0D5E
|
|
LDA #$0000
|
|
L0D0D5E STAL L020002
|
|
PLA
|
|
CLC
|
|
JSL L012E82
|
|
PLA
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0373CA
|
|
LDX #^L0373CA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0D0D98 PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00F4
|
|
TCS
|
|
LDA #$0002
|
|
PHA
|
|
PHA
|
|
_Random
|
|
BCS L0D0DB4
|
|
LDA #$0000
|
|
L0D0DB4 STAL L020002
|
|
PLA
|
|
CLC
|
|
JSL L012E82
|
|
PLA
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L0373FA
|
|
LDX #^L0373FA
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0D0DEE ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00D2
|
|
TCS
|
|
STZ $D4
|
|
BRL L0D10CA
|
|
L0D0DFE PHX
|
|
PHA
|
|
LDAL L031DDC
|
|
TAX
|
|
LDAL L031DDA
|
|
PHX
|
|
PHA
|
|
LDA $D4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $001C
|
|
CLC
|
|
JSL L013048
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
CMP #$0000
|
|
BNE L0D0E6C
|
|
LDA $D4
|
|
PHA
|
|
LDA #$001C
|
|
CLC
|
|
JSL L013003
|
|
PLA
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDX $F8
|
|
LDA #$000C
|
|
CLC
|
|
ADC $F6
|
|
BCC L0D0E6A
|
|
INX
|
|
L0D0E6A BRA L0D0E98
|
|
L0D0E6C LDA $D4
|
|
PHA
|
|
LDA #$001C
|
|
CLC
|
|
JSL L013003
|
|
PLA
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDX $F8
|
|
LDA #$0014
|
|
CLC
|
|
ADC $F6
|
|
BCC L0D0E98
|
|
INX
|
|
L0D0E98 PHX
|
|
PHA
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0080
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA ^L0138ED
|
|
PEA L0138ED
|
|
LDA $D4
|
|
PHA
|
|
LDA #$001C
|
|
CLC
|
|
JSL L013003
|
|
PLA
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$000A
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0008
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
PEA $0000
|
|
_NewControl
|
|
BCS L0D0EF2
|
|
LDA #$0000
|
|
L0D0EF2 STAL L020002
|
|
PLA
|
|
PLX
|
|
PHA
|
|
TXA
|
|
STAL L031DFA
|
|
PLA
|
|
STAL L031DF8
|
|
PHX
|
|
PHA
|
|
_ShowControl
|
|
BCS L0D0F11
|
|
LDA #$0000
|
|
L0D0F11 STAL L020002
|
|
LDA $D4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $001C
|
|
CLC
|
|
JSL L013048
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
STA $F6
|
|
STX $F8
|
|
LDA [$F6]
|
|
BRL L0D10BB
|
|
L0D0F46 LDA $D4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $001C
|
|
CLC
|
|
JSL L013048
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0006
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
PEA ^L0374F1
|
|
PEA L0374F1
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L01508C
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D10C8
|
|
L0D0FA0 LDA $D4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $001C
|
|
CLC
|
|
JSL L013048
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0006
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
PEA ^L0374F7
|
|
PEA L0374F7
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L01508C
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D10C8
|
|
L0D0FFA LDA $D4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $001C
|
|
CLC
|
|
JSL L013048
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0006
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
PEA ^L0374FD
|
|
PEA L0374FD
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L01508C
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D10C8
|
|
L0D1054 LDA $D4
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $001C
|
|
CLC
|
|
JSL L013048
|
|
LDA #L03742D
|
|
LDX #^L03742D
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0006
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F6],Y
|
|
PHX
|
|
PHA
|
|
PEA ^L037503
|
|
PEA L037503
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L01508C
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$000C
|
|
TCS
|
|
TYA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00D6
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D10C8
|
|
L0D10AE BRL L0D10C8
|
|
L0D10B1 DA L0D0F46
|
|
DA L0D0FA0
|
|
DA L0D0FFA
|
|
DA L0D1054
|
|
DA L0D10AE
|
|
L0D10BB CMP #$0004
|
|
BCC L0D10C3
|
|
LDA #$0004
|
|
L0D10C3 ASL
|
|
TAX
|
|
JMP (L0D10B1,X)
|
|
|
|
L0D10C8 INC $D4
|
|
L0D10CA LDA $D4
|
|
CMP #$0007
|
|
BCS L0D10D4
|
|
BRL L0D0DFE
|
|
L0D10D4 TSC
|
|
CLC
|
|
ADC #$0028
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0D10DC ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$00F0
|
|
TCS
|
|
LDX $FF
|
|
LDA $FD
|
|
SEC
|
|
SBC #$0036
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L037509
|
|
LDX #^L037509
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDA [$F2]
|
|
STX L0200D4
|
|
STA L0200D2
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDA [$F2]
|
|
CMP #$0000
|
|
BNE L0D1177
|
|
LDX $FF
|
|
LDA $FD
|
|
SEC
|
|
SBC #$0036
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
ASL
|
|
ASL
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDA #L03756B
|
|
LDX #^L03756B
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDA [$F2]
|
|
PHX
|
|
PHA
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
PHX
|
|
PHA
|
|
JSL L0D0AFA
|
|
PLY
|
|
PLY
|
|
LDA #$0028
|
|
BRA L0D117A
|
|
BRA L0D117A
|
|
L0D1177 LDA #$0029
|
|
L0D117A TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D1184 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$00EE
|
|
TCS
|
|
LDA #$0029
|
|
STA $F0
|
|
LDY #$0004
|
|
LDA [$FD],Y
|
|
BRL L0D1267
|
|
L0D119C LDX #$0000
|
|
LDA #$0035
|
|
PHX
|
|
PHA
|
|
LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
JSL L013333
|
|
BNE L0D11B5
|
|
BRL L0D1209
|
|
L0D11B5 BCS L0D11BA
|
|
BRL L0D1209
|
|
L0D11BA LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
BRL L0D11F6
|
|
L0D11C5 PEA ^L037587
|
|
PEA L037587
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D1207
|
|
L0D11D4 LDA #$0028
|
|
STA $F0
|
|
BRL L0D1207
|
|
L0D11DC PEA ^L037593
|
|
PEA L037593
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D1207
|
|
L0D11EB BRL L0D1207
|
|
L0D11EE DA L0D11C5
|
|
DA L0D11D4
|
|
DA L0D11DC
|
|
DA L0D11EB
|
|
L0D11F6 SEC
|
|
SBC #$0032
|
|
CMP #$0003
|
|
BCC L0D1202
|
|
LDA #$0003
|
|
L0D1202 ASL
|
|
TAX
|
|
JMP (L0D11EE,X)
|
|
|
|
L0D1207 BRA L0D1250
|
|
L0D1209 LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
SEC
|
|
SBC #$0035
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $000C
|
|
CLC
|
|
JSL L013048
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$000E
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$000C
|
|
LDA [$F2],Y
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STX L0200D8
|
|
STA L0200D6
|
|
LDA #$002A
|
|
STA $F0
|
|
L0D1250 BRL L0D1272
|
|
L0D1253 PEA $0029
|
|
PEI $FF
|
|
PEI $FD
|
|
JSL L0A0082
|
|
PLY
|
|
PLY
|
|
PLY
|
|
STA $F0
|
|
BRA L0D1272
|
|
BRA L0D1272
|
|
L0D1267 CMP #$0103
|
|
BNE L0D126F
|
|
BRL L0D119C
|
|
L0D126F JMP L0D1253
|
|
|
|
L0D1272 LDA $F0
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0008
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L0D127E ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$00DE
|
|
TCS
|
|
LDA #$002A
|
|
STA $F0
|
|
LDY #$0004
|
|
LDA [$FD],Y
|
|
BRL L0D15BD
|
|
L0D1296 LDX #$0000
|
|
LDA #$0036
|
|
PHX
|
|
PHA
|
|
LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
JSL L013333
|
|
BNE L0D12AF
|
|
BRL L0D1408
|
|
L0D12AF BCS L0D12B4
|
|
BRL L0D1408
|
|
L0D12B4 LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
BRL L0D13F4
|
|
L0D12BF LDX L0200D8
|
|
LDA L0200D6
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0006
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
PHX
|
|
PHA
|
|
JSL L0D06BA
|
|
PLY
|
|
PLY
|
|
STA $EC
|
|
LDA $EC
|
|
SEC
|
|
SBC #$FFFF
|
|
BNE L0D12E9
|
|
BRL L0D13BE
|
|
L0D12E9 BVS L0D12EE
|
|
EOR #$8000
|
|
L0D12EE BMI L0D12F3
|
|
BRL L0D13BE
|
|
L0D12F3 LDX L0200D8
|
|
LDA L0200D6
|
|
STA $F2
|
|
STX $F4
|
|
LDA [$F2]
|
|
CMP $EC
|
|
BEQ L0D1306
|
|
BRL L0D13BA
|
|
L0D1306 LDX L0200D8
|
|
LDA L0200D6
|
|
STA $F2
|
|
STX $F4
|
|
LDA #$0001
|
|
LDY #$0002
|
|
STA [$F2],Y
|
|
STZ $EE
|
|
BRA L0D1359
|
|
L0D131C LDA $EE
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $000C
|
|
CLC
|
|
JSL L013048
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$000E
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$000C
|
|
LDA [$F2],Y
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
CMP #$0000
|
|
BNE L0D1357
|
|
BRA L0D136E
|
|
L0D1357 INC $EE
|
|
L0D1359 LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
CMP $EE
|
|
BEQ L0D136E
|
|
BCS L0D131C
|
|
L0D136E LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
CMP $EE
|
|
BEQ L0D1398
|
|
BCC L0D1398
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDA #$0002
|
|
STA [$F2]
|
|
JSL L0D0D42
|
|
BRA L0D13B3
|
|
L0D1398 LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDA #$0003
|
|
STA [$F2]
|
|
PEA ^L0375A1
|
|
PEA L0375A1
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
L0D13B3 LDA #$0029
|
|
STA $F0
|
|
BRA L0D13BE
|
|
L0D13BA JSL L0D0D98
|
|
L0D13BE BRL L0D1405
|
|
L0D13C1 PEA ^L0375AD
|
|
PEA L0375AD
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D1405
|
|
L0D13D0 LDA #$0028
|
|
STA $F0
|
|
BRL L0D1405
|
|
L0D13D8 PEA ^L0375B9
|
|
PEA L0375B9
|
|
JSL L0133D4
|
|
PLY
|
|
PLY
|
|
BRL L0D1405
|
|
L0D13E7 BRL L0D1405
|
|
L0D13EA DA L0D12BF
|
|
DA L0D13C1
|
|
DA L0D13D0
|
|
DA L0D13D8
|
|
DA L0D13E7
|
|
L0D13F4 SEC
|
|
SBC #$0032
|
|
CMP #$0004
|
|
BCC L0D1400
|
|
LDA #$0004
|
|
L0D1400 ASL
|
|
TAX
|
|
JMP (L0D13EA,X)
|
|
|
|
L0D1405 BRL L0D15A6
|
|
L0D1408 LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
LDX #$0000
|
|
PHX
|
|
PHA
|
|
LDX #$0000
|
|
LDA #$0036
|
|
JSL L012E77
|
|
LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
JSL L013333
|
|
BEQ L0D1480
|
|
BCC L0D1480
|
|
LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
SEC
|
|
SBC #$0036
|
|
PHA
|
|
TXA
|
|
SBC #$0000
|
|
TAX
|
|
PLA
|
|
LDX #$0000
|
|
PEA $0000
|
|
PEA $000C
|
|
CLC
|
|
JSL L013048
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$000E
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$000C
|
|
LDA [$F2],Y
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
STX L0200D8
|
|
STA L0200D6
|
|
LDA #$002A
|
|
STA $F0
|
|
BRL L0D15A6
|
|
L0D1480 LDX #$0000
|
|
LDA #$0002
|
|
PHX
|
|
PHA
|
|
LDX L0200D4
|
|
LDA L0200D2
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0002
|
|
LDA [$F2],Y
|
|
PHA
|
|
LDA #$0036
|
|
PLX
|
|
STX $F6
|
|
CLC
|
|
ADC $F6
|
|
LDX #$0000
|
|
SEC
|
|
JSL L013B17
|
|
LDX #$0000
|
|
LDA #$0002
|
|
PHX
|
|
PHA
|
|
LDY #$0002
|
|
LDA [$FD],Y
|
|
TAX
|
|
LDA [$FD]
|
|
LDX #$0000
|
|
SEC
|
|
JSL L013B17
|
|
LDX L0200D8
|
|
LDA L0200D6
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$000A
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$0008
|
|
LDA [$F2],Y
|
|
JSL L012E77
|
|
PLA
|
|
PLX
|
|
JSL L012FF8
|
|
PLA
|
|
PLX
|
|
STX $E2
|
|
STA $E0
|
|
LDA [$E0]
|
|
BRL L0D154A
|
|
L0D14EB LDA #L0375C7
|
|
LDX #^L0375C7
|
|
STX $EA
|
|
STA $E8
|
|
LDA #L033C86
|
|
LDX #^L033C86
|
|
STX $E6
|
|
STA $E4
|
|
BRL L0D1558
|
|
L0D1502 LDA #L0375D2
|
|
LDX #^L0375D2
|
|
STX $EA
|
|
STA $E8
|
|
LDA #L0338EB
|
|
LDX #^L0338EB
|
|
STX $E6
|
|
STA $E4
|
|
BRL L0D1558
|
|
L0D1519 LDA #L0375DA
|
|
LDX #^L0375DA
|
|
STX $EA
|
|
STA $E8
|
|
LDA #L033B90
|
|
LDX #^L033B90
|
|
STX $E6
|
|
STA $E4
|
|
BRL L0D1558
|
|
L0D1530 PEA ^L0375F1
|
|
PEA L0375F1
|
|
JSL L050256
|
|
PLY
|
|
PLY
|
|
BRL L0D1558
|
|
BRL L0D1558
|
|
L0D1542 DA L0D14EB
|
|
DA L0D1502
|
|
DA L0D1519
|
|
DA L0D1530
|
|
L0D154A DEC
|
|
CMP #$0003
|
|
BCC L0D1553
|
|
LDA #$0003
|
|
L0D1553 ASL
|
|
TAX
|
|
JMP (L0D1542,X)
|
|
|
|
L0D1558 LDY #$0002
|
|
LDA [$E0],Y
|
|
PHA
|
|
LDA [$E0]
|
|
PHA
|
|
PEA ^L03760D
|
|
PEA L03760D
|
|
JSL L050256
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
LDY #$0002
|
|
LDA [$E0],Y
|
|
PHA
|
|
LDX L0200D8
|
|
LDA L0200D6
|
|
STA $F2
|
|
STX $F4
|
|
LDY #$0006
|
|
LDA [$F2],Y
|
|
TAX
|
|
LDY #$0004
|
|
LDA [$F2],Y
|
|
PHX
|
|
PHA
|
|
PEA $0020
|
|
PEA $0020
|
|
PEI $E6
|
|
PEI $E4
|
|
PEI $EA
|
|
PEI $E8
|
|
JSL L0B0000
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0012
|
|
TCS
|
|
TYA
|
|
L0D15A6 BRL L0D15C8
|
|
L0D15A9 PEA $0029
|
|
PEI $FF
|
|
PEI $FD
|
|
JSL L0A0082
|
|
PLY
|
|
PLY
|
|
PLY
|
|
STA $F0
|
|
BRA L0D15C8
|
|
BRA L0D15C8
|
|
L0D15BD CMP #$0103
|
|
BNE L0D15C5
|
|
BRL L0D1296
|
|
L0D15C5 JMP L0D15A9
|
|
|
|
L0D15C8 LDA $F0
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0018
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
|