mirror of
https://github.com/antoinevignau/source.git
synced 2024-12-30 18:31:21 +00:00
688 lines
15 KiB
ArmAsm
688 lines
15 KiB
ArmAsm
|
|
*---------------------------------------------------------*
|
|
* Disassembled with The Flaming Bird Disassembler *
|
|
* (c) Phoenix corp. 1992,93 - All rights reserved *
|
|
*---------------------------------------------------------*
|
|
|
|
REL
|
|
|
|
PHB
|
|
PHD
|
|
TSC
|
|
SEC
|
|
SBC #$0010
|
|
TCD
|
|
TCS
|
|
STZ $21
|
|
STZ $23
|
|
PHB
|
|
PHK
|
|
PLB
|
|
LDY #$0002
|
|
LDA [$17]
|
|
STA $01
|
|
LDA [$17],Y
|
|
STA $03
|
|
LDA $1F
|
|
CMP #$0000
|
|
BEQ L0064
|
|
CMP #$0002
|
|
BEQ L0072
|
|
CMP #$0008
|
|
BEQ L004D
|
|
CMP #$0003
|
|
BEQ L0050
|
|
CMP #$0009
|
|
BEQ L0053
|
|
CMP #$0005
|
|
BEQ L0056
|
|
CMP #$0006
|
|
BEQ L0056
|
|
CMP #$000A
|
|
BEQ L0059
|
|
CMP #$000C
|
|
BEQ L005C
|
|
JMP L01C9
|
|
L004D JMP L0124
|
|
L0050 JMP L01A1
|
|
L0053 JMP L01BF
|
|
L0056 JMP L01C7
|
|
L0059 JMP L01AF
|
|
|
|
L005C LDA #$0028
|
|
STA $21
|
|
JMP L01C9
|
|
|
|
L0064 LDA $1B
|
|
JSR L01DE
|
|
LDA #$000F
|
|
STA L0445
|
|
JMP L01C9
|
|
|
|
L0072 LDY #$0010
|
|
LDA [$01],Y
|
|
LDY #$0000
|
|
AND #$0001
|
|
CMP #$0000
|
|
BEQ L0085
|
|
LDY #$0010
|
|
L0085 TYA
|
|
CLC
|
|
ADC #$000E
|
|
TAY
|
|
LDX #$000E
|
|
L008E LDA L0447,Y
|
|
STA L0431,X
|
|
DEY
|
|
DEY
|
|
DEX
|
|
DEX
|
|
BPL L008E
|
|
LDA #^L0431
|
|
PHA
|
|
LDA #L0431
|
|
PHA
|
|
LDY #$000A
|
|
LDA [$01],Y
|
|
PHA
|
|
LDY #$0008
|
|
LDA [$01],Y
|
|
PHA
|
|
_OffsetRect
|
|
LDA #^L0439
|
|
PHA
|
|
LDA #L0439
|
|
PHA
|
|
LDY #$000A
|
|
LDA [$01],Y
|
|
PHA
|
|
LDY #$0008
|
|
LDA [$01],Y
|
|
PHA
|
|
_OffsetRect
|
|
LDA $1B
|
|
STA L0441
|
|
LDA $1D
|
|
STA L0443
|
|
PEA $0000
|
|
LDA #^L0441
|
|
PHA
|
|
LDA #L0441
|
|
PHA
|
|
LDA #^L0431
|
|
PHA
|
|
LDA #L0431
|
|
PHA
|
|
_PtInRect
|
|
PLA
|
|
BEQ L00FF
|
|
LDA #$0028
|
|
STA $21
|
|
JMP L01C9
|
|
|
|
L00FF PEA $0000
|
|
LDA #^L0441
|
|
PHA
|
|
LDA #L0441
|
|
PHA
|
|
LDA #^L0439
|
|
PHA
|
|
LDA #L0439
|
|
PHA
|
|
_PtInRect
|
|
PLA
|
|
BEQ L0121
|
|
LDA #$0029
|
|
STA $21
|
|
L0121 JMP L01C9
|
|
|
|
L0124 LDA $1B
|
|
CMP #$0028
|
|
BEQ L0130
|
|
CMP #$0029
|
|
BEQ L0157
|
|
L0130 LDY #$001E
|
|
LDA [$01],Y
|
|
STA $09
|
|
LDY #$0012
|
|
LDA [$01],Y
|
|
CMP $09
|
|
BMI L0142
|
|
BRA L017F
|
|
L0142 INC
|
|
STA [$01],Y
|
|
CMP $09
|
|
BMI L014B
|
|
BRA L017F
|
|
L014B INC
|
|
STA [$01],Y
|
|
LDA #$0028
|
|
JSR L01DE
|
|
JMP L017F
|
|
|
|
L0157 LDY #$001C
|
|
LDA [$01],Y
|
|
STA $09
|
|
LDY #$0012
|
|
LDA [$01],Y
|
|
CMP $09
|
|
BEQ L017F
|
|
BPL L016B
|
|
BRA L017F
|
|
L016B DEC
|
|
STA [$01],Y
|
|
CMP $09
|
|
BEQ L017F
|
|
BPL L0176
|
|
BRA L017F
|
|
L0176 DEC
|
|
STA [$01],Y
|
|
LDA #$0029
|
|
JSR L01DE
|
|
L017F JSR L037B
|
|
CLC
|
|
ADC L0445
|
|
STA $09
|
|
L0188 JSR L037B
|
|
CMP $09
|
|
BMI L0188
|
|
LDA L0445
|
|
BEQ L019E
|
|
DEC
|
|
BEQ L019B
|
|
DEC
|
|
BEQ L019B
|
|
DEC
|
|
L019B STA L0445
|
|
L019E JMP L01C9
|
|
|
|
L01A1 LDY #$0018
|
|
LDA #$FFFF
|
|
STA [$01],Y
|
|
INY
|
|
INY
|
|
STA [$01],Y
|
|
BRA L01C9
|
|
L01AF LDA $1B
|
|
LDY #$001C
|
|
STA [$01],Y
|
|
LDA $1D
|
|
LDY #$001E
|
|
STA [$01],Y
|
|
BRA L01C9
|
|
L01BF LDA #$0001
|
|
JSR L01DE
|
|
BRA L01C9
|
|
L01C7 INC $21
|
|
L01C9 PLB
|
|
LDA $15
|
|
STA $1F
|
|
LDA $13
|
|
STA $1D
|
|
LDX $11
|
|
TDC
|
|
CLC
|
|
ADC #$001C
|
|
TCS
|
|
TXA
|
|
TCD
|
|
PLB
|
|
RTL
|
|
|
|
L01DE STA $09
|
|
LDY #$0010
|
|
LDA [$01],Y
|
|
TAX
|
|
AND #$0080
|
|
BEQ L01EC
|
|
RTS
|
|
|
|
L01EC TXA
|
|
AND #$0001
|
|
STA $0B
|
|
LDY #$0011
|
|
LDA [$01],Y
|
|
AND #$00FF
|
|
CMP #$0028
|
|
BEQ L0209
|
|
CMP #$0029
|
|
BEQ L0209
|
|
CMP #$00FF
|
|
BNE L0211
|
|
L0209 LDA $0B
|
|
CLC
|
|
ADC #$0004
|
|
STA $0B
|
|
L0211 LDA $09
|
|
CMP #$0000
|
|
BEQ L021D
|
|
CMP #$0029
|
|
BNE L0221
|
|
L021D CLC
|
|
JSR L038B
|
|
L0221 LDA $09
|
|
CMP #$0000
|
|
BEQ L022D
|
|
CMP #$0028
|
|
BNE L0231
|
|
L022D SEC
|
|
JSR L038B
|
|
L0231 LDY #$0020
|
|
LDA [$01],Y
|
|
AND #$0006
|
|
TAX
|
|
PHX
|
|
LDY #$0010
|
|
LDA [$01],Y
|
|
AND #$0001
|
|
CMP #$0001
|
|
BEQ L025E
|
|
TXA
|
|
LDX #$1388
|
|
CMP #$0004
|
|
BNE L0254
|
|
LDX #$0C35
|
|
L0254 CMP #$0006
|
|
BNE L0272
|
|
LDX #$30D4
|
|
BRA L0272
|
|
L025E TXA
|
|
LDX #$2710
|
|
CMP #$0004
|
|
BNE L026A
|
|
LDX #$1B58
|
|
L026A CMP #$0006
|
|
BNE L0272
|
|
LDX #$6B6C
|
|
L0272 PEA $0000
|
|
PEA $0000
|
|
PHX
|
|
PEA $2710
|
|
_FixRatio
|
|
PLX
|
|
PLA
|
|
STX $0D
|
|
STA $0F
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA $0000
|
|
LDY #$0012
|
|
LDA [$01],Y
|
|
PHA
|
|
_Long2Fix
|
|
PLX
|
|
PLY
|
|
PEA $0000
|
|
PEA $0000
|
|
PHY
|
|
PHX
|
|
LDA $0F
|
|
PHA
|
|
LDA $0D
|
|
PHA
|
|
_FixMul
|
|
PLA
|
|
STA $0D
|
|
PLA
|
|
STA $0F
|
|
PLA
|
|
CMP #$0004
|
|
BEQ L02C7
|
|
CMP #$0002
|
|
BNE L02CC
|
|
L02C7 JSR L03DD
|
|
BRA L02E6
|
|
L02CC CLC
|
|
LDA $0F
|
|
ADC #$03E8
|
|
STA $0F
|
|
JSR L03DD
|
|
SEP #$20
|
|
LDA L0411+2
|
|
STA L0411+1
|
|
LDA #$2E
|
|
STA L0411+2
|
|
REP #$20
|
|
L02E6 LDY #$000A
|
|
LDA [$01],Y
|
|
CLC
|
|
ADC #$002A
|
|
PHA
|
|
STA L0433
|
|
LDY #$0008
|
|
LDA [$01],Y
|
|
INC
|
|
STA L0431
|
|
CLC
|
|
ADC #$0009
|
|
PHA
|
|
STA L0435
|
|
LDY #$000E
|
|
LDA [$01],Y
|
|
STA L0437
|
|
LDA #^L0431
|
|
PHA
|
|
LDA #L0431
|
|
PHA
|
|
_EraseRect
|
|
_MoveTo
|
|
LDA #^L0411
|
|
PHA
|
|
LDA #L0411
|
|
PHA
|
|
_DrawString
|
|
LDY #$0011
|
|
LDA [$01],Y
|
|
AND #$00FF
|
|
CMP #$00FF
|
|
BEQ L033F
|
|
RTS
|
|
|
|
L033F LDA #$3333
|
|
LDX #$CCCC
|
|
JSR L03B3
|
|
PEA $8001
|
|
_SetPenMode
|
|
CLC
|
|
LDA $01
|
|
ADC #$0008
|
|
TAX
|
|
LDA $03
|
|
ADC #$0000
|
|
PHA
|
|
PHX
|
|
_PaintRect
|
|
PEA $0000
|
|
_SetPenMode
|
|
LDA #$0000
|
|
LDX #$0000
|
|
JSR L03B3
|
|
RTS
|
|
|
|
L037B PEA $0000
|
|
PEA $0000
|
|
_GetTick
|
|
PLA
|
|
PLX
|
|
RTS
|
|
|
|
L038B LDA $0B
|
|
BCC L0391
|
|
INC
|
|
INC
|
|
L0391 ASL
|
|
TAY
|
|
LDA L0467,Y
|
|
TAX
|
|
LDA #^L0467
|
|
PHA
|
|
PHX
|
|
PEA $F000
|
|
LDY #$000A
|
|
LDA [$01],Y
|
|
PHA
|
|
LDY #$0008
|
|
LDA [$01],Y
|
|
PHA
|
|
_DrawIcon
|
|
RTS
|
|
|
|
L03B3 STX $07
|
|
STA $05
|
|
LDY #$0020
|
|
L03BA DEY
|
|
DEY
|
|
LDA $05
|
|
STA L0411,Y
|
|
DEY
|
|
DEY
|
|
LDA $07
|
|
STA L0411,Y
|
|
CPY #$0000
|
|
BNE L03BA
|
|
LDA #^L0411
|
|
PHA
|
|
LDA #L0411
|
|
PHA
|
|
_SetPenPat
|
|
RTS
|
|
|
|
L03DD PEA $0000
|
|
LDA $0F
|
|
PHA
|
|
LDA $0D
|
|
PHA
|
|
_FixRound
|
|
PLA
|
|
PEA $0000
|
|
PHA
|
|
LDA #^L0411
|
|
PHA
|
|
LDA #L0411
|
|
PHA
|
|
PEA $0005
|
|
PEA $0000
|
|
_Long2Dec
|
|
SEP #$20
|
|
LDA #$04
|
|
STA L0411
|
|
REP #$20
|
|
RTS
|
|
|
|
L0411 DS $20
|
|
L0431 DW $0000
|
|
L0433 DW $0000
|
|
L0435 DW $0000
|
|
L0437 DW $0000
|
|
L0439 DW $0000
|
|
DW $0000
|
|
DW $0000
|
|
DW $0000
|
|
L0441 DW $0000
|
|
L0443 DW $0000
|
|
L0445 DW $0000
|
|
L0447 DW $0000
|
|
DW $000D
|
|
DW $000B
|
|
DW $0017
|
|
DW $0000
|
|
DW $0000
|
|
DW $000B
|
|
DW $000D
|
|
DW $0007
|
|
DW $0000
|
|
DW $000C
|
|
DW $0017
|
|
DW $0001
|
|
DW $0000
|
|
DW $0007
|
|
DW $0017
|
|
L0467 DA L062F
|
|
DA L0477
|
|
DA L06DF
|
|
DA L0517
|
|
DA L0687
|
|
DA L04C7
|
|
DA L075F
|
|
DA L05A3
|
|
L0477 DW $0080 ; Icon type
|
|
DW $0024 ; Icon size
|
|
DW $0006 ; Icon height
|
|
DW $000C ; Icon width
|
|
HEX FFFFFFFFFFFF ; Icon image
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFC3FFFFF
|
|
HEX FFFFC3C3FFFF
|
|
HEX FFFC3FFC3FFF
|
|
HEX FFC0000003FF
|
|
HEX 000000000000 ; Icon mask
|
|
HEX 000000000000
|
|
HEX 000003C00000
|
|
HEX 00003FFC0000
|
|
HEX 0003FFFFC000
|
|
HEX 003FFFFFFC00
|
|
L04C7 DW $0080 ; Icon type
|
|
DW $0024 ; Icon size
|
|
DW $0006 ; Icon height
|
|
DW $000C ; Icon width
|
|
HEX FFFFFFFFFFFF ; Icon image
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFC3FFFFF
|
|
HEX FFFFC003FFFF
|
|
HEX FFFC00003FFF
|
|
HEX FFC0000003FF
|
|
HEX 000000000000 ; Icon mask
|
|
HEX 000000000000
|
|
HEX 000003C00000
|
|
HEX 00003FFC0000
|
|
HEX 0003FFFFC000
|
|
HEX 003FFFFFFC00
|
|
L0517 DW $0080 ; Icon type
|
|
DW $0042 ; Icon size
|
|
DW $000B ; Icon height
|
|
DW $000C ; Icon width
|
|
HEX FFFFFFFFFFFF ; Icon image
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFC0000003FF
|
|
HEX FFFC3FFC3FFF
|
|
HEX FFFFC3C3FFFF
|
|
HEX FFFFFC3FFFFF
|
|
HEX 000000000000 ; Icon mask
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 003FFFFFFC00
|
|
HEX 0003FFFFC000
|
|
HEX 00003FFC0000
|
|
HEX 000003C00000
|
|
L05A3 DW $0080 ; Icon type
|
|
DW $0042 ; Icon size
|
|
DW $000B ; Icon height
|
|
DW $000C ; Icon width
|
|
HEX FFFFFFFFFFFF ; Icon image
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFC0000003FF
|
|
HEX FFFC00003FFF
|
|
HEX FFFFC003FFFF
|
|
HEX FFFFFC3FFFFF
|
|
HEX 000000000000 ; Icon mask
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 003FFFFFFC00
|
|
HEX 0003FFFFC000
|
|
HEX 00003FFC0000
|
|
HEX 000003C00000
|
|
L062F DW $0080 ; Icon type
|
|
DW $0028 ; Icon size
|
|
DW $000A ; Icon height
|
|
DW $0008 ; Icon width
|
|
HEX FFFFFFFF ; Icon image
|
|
HEX FFFFFFFF
|
|
HEX FFFFFFFF
|
|
HEX FFFFC3FF
|
|
HEX FFFC03FF
|
|
HEX FFC3C3FF
|
|
HEX FC3FC3FF
|
|
HEX FFC3C3FF
|
|
HEX FFFC03FF
|
|
HEX FFFFC3FF
|
|
HEX 00000000 ; Icon mask
|
|
HEX 00000000
|
|
HEX 00000000
|
|
HEX 00003C00
|
|
HEX 0003FC00
|
|
HEX 003FFC00
|
|
HEX 03FFFC00
|
|
HEX 003FFC00
|
|
HEX 0003FC00
|
|
HEX 00003C00
|
|
L0687 DW $0080 ; Icon type
|
|
DW $0028 ; Icon size
|
|
DW $000A ; Icon height
|
|
DW $0008 ; Icon width
|
|
HEX FFFFFFFF ; Icon image
|
|
HEX FFFFFFFF
|
|
HEX FFFFFFFF
|
|
HEX FFFFC3FF
|
|
HEX FFFC03FF
|
|
HEX FFC003FF
|
|
HEX FC0003FF
|
|
HEX FFC003FF
|
|
HEX FFFC03FF
|
|
HEX FFFFC3FF
|
|
HEX 00000000 ; Icon mask
|
|
HEX 00000000
|
|
HEX 00000000
|
|
HEX 00003C00
|
|
HEX 0003FC00
|
|
HEX 003FFC00
|
|
HEX 03FFFC00
|
|
HEX 003FFC00
|
|
HEX 0003FC00
|
|
HEX 00003C00
|
|
L06DF DW $0080 ; Icon type
|
|
DW $003C ; Icon size
|
|
DW $000A ; Icon height
|
|
DW $000C ; Icon width
|
|
HEX FFFFFFFFFFFF ; Icon image
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFC3FFFF
|
|
HEX FFFFFFC03FFF
|
|
HEX FFFFFFC3C3FF
|
|
HEX FFFFFFC3FC3F
|
|
HEX FFFFFFC3C3FF
|
|
HEX FFFFFFC03FFF
|
|
HEX FFFFFFC3FFFF
|
|
HEX 000000000000 ; Icon mask
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 0000003C0000
|
|
HEX 0000003FC000
|
|
HEX 0000003FFC00
|
|
HEX 0000003FFFC0
|
|
HEX 0000003FFC00
|
|
HEX 0000003FC000
|
|
HEX 0000003C0000
|
|
L075F DW $0080 ; Icon type
|
|
DW $003C ; Icon size
|
|
DW $000A ; Icon height
|
|
DW $000C ; Icon width
|
|
HEX FFFFFFFFFFFF ; Icon image
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFFFFFFF
|
|
HEX FFFFFFC3FFFF
|
|
HEX FFFFFFC03FFF
|
|
HEX FFFFFFC003FF
|
|
HEX FFFFFFC0003F
|
|
HEX FFFFFFC003FF
|
|
HEX FFFFFFC03FFF
|
|
HEX FFFFFFC3FFFF
|
|
HEX 000000000000 ; Icon mask
|
|
HEX 000000000000
|
|
HEX 000000000000
|
|
HEX 0000003C0000
|
|
HEX 0000003FC000
|
|
HEX 0000003FFC00
|
|
HEX 0000003FFFC0
|
|
HEX 0000003FFC00
|
|
HEX 0000003FC000
|
|
HEX 0000003C0000
|