618 lines
13 KiB
ArmAsm
618 lines
13 KiB
ArmAsm
|
|
*---------------------------------------------------------*
|
|
* Disassembled with The Flaming Bird Disassembler *
|
|
* (c) Phoenix corp. 1992,93 - All rights reserved *
|
|
*---------------------------------------------------------*
|
|
|
|
REL
|
|
|
|
L080000 PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F7
|
|
TCD
|
|
ADC #$00F0
|
|
TCS
|
|
LDA $FD
|
|
CLC
|
|
ADC #$0010
|
|
LDX $FF
|
|
BCC L080016
|
|
INX
|
|
L080016 TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L080020 PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00FB
|
|
TCD
|
|
ADC #$00F4
|
|
TCS
|
|
LDX L020046
|
|
LDA L020044
|
|
STX $F6
|
|
ORA $F6
|
|
BNE L08003A
|
|
BRL L0800B8
|
|
L08003A LDX #$0000
|
|
LDA #$0032
|
|
PHX
|
|
PHA
|
|
LDX L020046
|
|
LDA L020044
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0022
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDY #$0020
|
|
LDA [$F6],Y
|
|
JSL L013333
|
|
BEQ L080070
|
|
BVS L08006E
|
|
EOR #$8000
|
|
L08006E BMI L0800B8
|
|
L080070 LDX L020046
|
|
LDA L020044
|
|
STA $F6
|
|
STX $F8
|
|
LDY #$0002
|
|
LDA [$F6],Y
|
|
TAX
|
|
LDA [$F6]
|
|
STA $F6
|
|
STX $F8
|
|
LDX $F8
|
|
LDA #$0008
|
|
CLC
|
|
ADC $F6
|
|
BCC L080091
|
|
INX
|
|
L080091 STX L020070
|
|
STA L02006E
|
|
PEA $0000
|
|
LDX L020046
|
|
LDA L020044
|
|
PHX
|
|
PHA
|
|
_HiliteControl
|
|
BCS L0800AE
|
|
LDA #$0000
|
|
L0800AE STAL L020002
|
|
STZ L020044
|
|
STZ L020046
|
|
L0800B8 TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0800C0 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00DF
|
|
TCD
|
|
ADC #$008C
|
|
TCS
|
|
STZ $D8
|
|
STZ $D6
|
|
LDA #$0103
|
|
LDY #$0004
|
|
STA [$E5],Y
|
|
LDX #$FFFF
|
|
LDA #$FFFF
|
|
LDY #$0002
|
|
PHA
|
|
TXA
|
|
STA [$E5],Y
|
|
PLA
|
|
STA [$E5]
|
|
PHA
|
|
PEA $FFFF
|
|
PEA $0000
|
|
_FlushEvents
|
|
BCS L0800FA
|
|
LDA #$0000
|
|
L0800FA STAL L020002
|
|
PLA
|
|
PHX
|
|
PHA
|
|
_GetDblTime
|
|
BCS L08010D
|
|
LDA #$0000
|
|
L08010D STAL L020002
|
|
PLA
|
|
PLX
|
|
STX $CA
|
|
STA $C8
|
|
STZ $C0
|
|
STZ $C2
|
|
STZ $A0
|
|
STZ $A2
|
|
LDX #$0000
|
|
LDA #$0F7D
|
|
STX $BE
|
|
STA $BC
|
|
LDA L020050
|
|
STA $9E
|
|
L08012E LDA $D8
|
|
BEQ L080135
|
|
BRL L08048E
|
|
L080135 LDX $EF
|
|
LDA $ED
|
|
STX $DA
|
|
ORA $DA
|
|
BEQ L080165
|
|
LDA $ED
|
|
LDX $EF
|
|
JSL L014572
|
|
TAY
|
|
BEQ L080165
|
|
LDA #$0103
|
|
LDY #$0004
|
|
STA [$E5],Y
|
|
LDX #$0000
|
|
LDA #$000D
|
|
LDY #$0002
|
|
PHA
|
|
TXA
|
|
STA [$E5],Y
|
|
PLA
|
|
STA [$E5]
|
|
BRL L08048E
|
|
L080165 PHA
|
|
PEA $FFFF
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00A8
|
|
PHA
|
|
_TaskMaster
|
|
BCS L08017E
|
|
LDA #$0000
|
|
L08017E STAL L020002
|
|
PLA
|
|
STA $D0
|
|
LDA $D0
|
|
CMP #$0000
|
|
BNE L0801D1
|
|
SEC
|
|
LDA $B8
|
|
SBC #$0000
|
|
BNE L08019B
|
|
LDA $BA
|
|
SBC #$0000
|
|
BRA L0801A2
|
|
L08019B LDA $BA
|
|
SBC #$0000
|
|
REP #$02
|
|
L0801A2 BEQ L0801D1
|
|
LDX $BA
|
|
LDA $B8
|
|
STA $9A
|
|
LDX #$0000
|
|
LDA #$0010
|
|
PHX
|
|
PHA
|
|
LDX $BA
|
|
LDA $B8
|
|
CLC
|
|
JSL L013B83
|
|
PLA
|
|
PLX
|
|
STA $9C
|
|
LDA $9A
|
|
CMP $9E
|
|
BNE L0801D1
|
|
LDA $9C
|
|
CMP #$0001
|
|
BNE L0801D1
|
|
LDA #$0001
|
|
STA $D6
|
|
L0801D1 LDA $D6
|
|
BEQ L0801DF
|
|
LDA $D0
|
|
CMP #$0008
|
|
BEQ L0801DF
|
|
BRL L08012E
|
|
L0801DF LDX $FB
|
|
LDA $F9
|
|
STX $DA
|
|
ORA $DA
|
|
BEQ L08022F
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00A8
|
|
PHA
|
|
_IsDialogEvent
|
|
BCS L0801FF
|
|
LDA #$0000
|
|
L0801FF STAL L020002
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00A8
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$0096
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$0092
|
|
PHA
|
|
_DialogSelect
|
|
BCS L08022A
|
|
LDA #$0000
|
|
L08022A STAL L020002
|
|
PLA
|
|
L08022F LDA $D0
|
|
BRL L080463
|
|
L080234 PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00A8
|
|
PHA
|
|
JSL L080000
|
|
PLY
|
|
PLY
|
|
STX $CE
|
|
STA $CC
|
|
LDA [$CC]
|
|
LDY #$0004
|
|
STA [$E5],Y
|
|
PEA $0000
|
|
LDY #$0002
|
|
LDA [$CC],Y
|
|
PHA
|
|
_HiliteMenu
|
|
BCS L080263
|
|
LDA #$0000
|
|
L080263 STAL L020002
|
|
LDA #$0001
|
|
STA $D8
|
|
BRL L080483
|
|
L08026F PHX
|
|
PHA
|
|
_GetTick
|
|
BCS L08027D
|
|
LDA #$0000
|
|
L08027D STAL L020002
|
|
PLA
|
|
PLX
|
|
STX $C6
|
|
STA $C4
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$00A4
|
|
PHA
|
|
PEI $B4
|
|
PEI $B2
|
|
PEI $EB
|
|
PEI $E9
|
|
_FindControl
|
|
BCS L0802A5
|
|
LDA #$0000
|
|
L0802A5 STAL L020002
|
|
PLA
|
|
STA $D4
|
|
LDA $D4
|
|
BRL L0803A9
|
|
L0802B1 LDY #$0002
|
|
LDA [$A4],Y
|
|
TAX
|
|
LDA [$A4]
|
|
STA $DA
|
|
STX $DC
|
|
LDY #$0022
|
|
LDA [$DA],Y
|
|
TAX
|
|
LDY #$0020
|
|
LDA [$DA],Y
|
|
LDY #$0002
|
|
PHA
|
|
TXA
|
|
STA [$E5],Y
|
|
PLA
|
|
STA [$E5]
|
|
LDX $FF
|
|
LDA $FD
|
|
STX $DA
|
|
ORA $DA
|
|
BEQ L0802F8
|
|
LDX $FF
|
|
LDA $FD
|
|
PHX
|
|
PHA
|
|
LDY #$0002
|
|
LDA [$E5],Y
|
|
TAX
|
|
LDA [$E5]
|
|
JSL L013333
|
|
BCS L0802F8
|
|
LDA #$0001
|
|
STA $D8
|
|
BRL L08012E
|
|
L0802F8 LDA $A0
|
|
CMP $A4
|
|
BNE L080329
|
|
LDA $A2
|
|
CMP $A6
|
|
BNE L080329
|
|
LDX $CA
|
|
LDA $C8
|
|
PHX
|
|
PHA
|
|
LDX $C6
|
|
LDA $C4
|
|
SEC
|
|
SBC $C0
|
|
PHA
|
|
TXA
|
|
SBC $C2
|
|
TAX
|
|
PLA
|
|
JSL L013333
|
|
BEQ L080329
|
|
BCC L080329
|
|
LDA #$0001
|
|
STA $D8
|
|
BRL L08012E
|
|
BRA L080369
|
|
L080329 JSL L080020
|
|
LDY #$0002
|
|
LDA [$A4],Y
|
|
TAX
|
|
LDA [$A4]
|
|
STA $DA
|
|
STX $DC
|
|
LDX $DC
|
|
LDA #$0008
|
|
CLC
|
|
ADC $DA
|
|
BCC L080344
|
|
INX
|
|
L080344 STX L020070
|
|
STA L02006E
|
|
PEA $0002
|
|
LDX $A6
|
|
LDA $A4
|
|
STX L020046
|
|
STA L020044
|
|
PHX
|
|
PHA
|
|
_HiliteControl
|
|
BCS L080365
|
|
LDA #$0000
|
|
L080365 STAL L020002
|
|
L080369 LDX $A6
|
|
LDA $A4
|
|
STX $A2
|
|
STA $A0
|
|
BRL L0803B8
|
|
L080374 PHA
|
|
PEI $B4
|
|
PEI $B2
|
|
PEI $F3
|
|
PEI $F1
|
|
PEI $A6
|
|
PEI $A4
|
|
_TrackControl
|
|
BCS L08038D
|
|
LDA #$0000
|
|
L08038D STAL L020002
|
|
PLA
|
|
STA $D2
|
|
BRL L0803B8
|
|
L080397 JSL L080020
|
|
BRL L0803B8
|
|
BRL L0803B8
|
|
L0803A1 DA L0802B1
|
|
DA L080397
|
|
DA L080374
|
|
STA [$03],Y
|
|
L0803A9 DEC
|
|
DEC
|
|
CMP #$0003
|
|
BCC L0803B3
|
|
LDA #$0003
|
|
L0803B3 ASL
|
|
TAX
|
|
JMP (L0803A1,X)
|
|
|
|
L0803B8 BRL L080483
|
|
L0803BB LDX $F7
|
|
LDA $F5
|
|
STX $DA
|
|
ORA $DA
|
|
BEQ L08043C
|
|
LDA $AA
|
|
CMP #$000D
|
|
BNE L08043C
|
|
LDA $AC
|
|
CMP #$0000
|
|
BNE L08043C
|
|
LDA #$0103
|
|
LDY #$0004
|
|
STA [$E5],Y
|
|
LDX #$0000
|
|
LDA #$000D
|
|
LDY #$0002
|
|
PHA
|
|
TXA
|
|
STA [$E5],Y
|
|
PLA
|
|
STA [$E5]
|
|
PEI $F7
|
|
PEI $F5
|
|
JSL L012A2D
|
|
PLY
|
|
PLY
|
|
STX $90
|
|
STA $8E
|
|
STX $DA
|
|
ORA $DA
|
|
BEQ L080437
|
|
JSL L080020
|
|
LDY #$0002
|
|
LDA [$8E],Y
|
|
TAX
|
|
LDA [$8E]
|
|
STA $DA
|
|
STX $DC
|
|
LDX $DC
|
|
LDA #$0008
|
|
CLC
|
|
ADC $DA
|
|
BCC L08041A
|
|
INX
|
|
L08041A STX L020070
|
|
STA L02006E
|
|
PEA $0002
|
|
PEI $90
|
|
PEI $8E
|
|
_HiliteControl
|
|
BCS L080433
|
|
LDA #$0000
|
|
L080433 STAL L020002
|
|
L080437 LDA #$0001
|
|
STA $D8
|
|
L08043C BRL L080483
|
|
L08043F LDA $9A
|
|
CMP $9E
|
|
BEQ L08045C
|
|
LDA $D6
|
|
BEQ L08045C
|
|
STZ $D6
|
|
LDA $9E
|
|
STA $9A
|
|
LDA #$0001
|
|
STA $D8
|
|
LDA #$0192
|
|
LDY #$0004
|
|
STA [$E5],Y
|
|
L08045C BRL L080483
|
|
L08045F BRA L080483
|
|
BRA L080483
|
|
L080463 CMP #$0003
|
|
BNE L08046B
|
|
BRL L0803BB
|
|
L08046B CMP #$0008
|
|
BEQ L08043F
|
|
CMP #$0011
|
|
BNE L080478
|
|
BRL L080234
|
|
L080478 CMP #$0013
|
|
BNE L080480
|
|
BRL L08026F
|
|
L080480 JMP L08045F
|
|
|
|
L080483 LDX $C6
|
|
LDA $C4
|
|
STX $C2
|
|
STA $C0
|
|
BRL L08012E
|
|
L08048E TAY
|
|
TSC
|
|
CLC
|
|
ADC #$0052
|
|
TCS
|
|
TYA
|
|
PLD
|
|
RTL
|
|
|
|
L080498 ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00F3
|
|
TCD
|
|
ADC #$00EC
|
|
TCS
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEI $FF
|
|
PEI $FD
|
|
PEI $FB
|
|
PEI $F9
|
|
JSL L0800C0
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$001C
|
|
TCS
|
|
TYA
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L0804DD ENT
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$00E7
|
|
TCD
|
|
ADC #$00E0
|
|
TCS
|
|
PEA $0000
|
|
PEA $0000
|
|
PEI $FB
|
|
PEI $F9
|
|
PEI $FF
|
|
PEI $FD
|
|
PEA $0000
|
|
PEA $0000
|
|
PEI $F7
|
|
PEI $F5
|
|
PEI $F3
|
|
PEI $F1
|
|
PEI $EF
|
|
PEI $ED
|
|
JSL L0800C0
|
|
TAY
|
|
TSC
|
|
CLC
|
|
ADC #$001C
|
|
TCS
|
|
TYA
|
|
TSC
|
|
CLC
|
|
ADC #$0006
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
|