2570 lines
46 KiB
ArmAsm
2570 lines
46 KiB
ArmAsm
*
|
|
* HypercardGS
|
|
* segment: $11 Commands
|
|
*
|
|
* (k) 2015, Brutal Deluxe Software
|
|
*
|
|
|
|
mx %00
|
|
rel
|
|
dsk Commands.l
|
|
lst off
|
|
|
|
*---------------------------------------
|
|
|
|
use Commands.E
|
|
use Commands.X
|
|
|
|
use 4/Ctl.Macs
|
|
use 4/Desk.Macs
|
|
use 4/Dialog.Macs
|
|
use 4/Event.Macs
|
|
use 4/Int.Macs
|
|
use 4/Line.Macs
|
|
use 4/List.Macs
|
|
use 4/Locator.Macs
|
|
use 4/Mem.Macs
|
|
use 4/Menu.Macs
|
|
use 4/MidiSyn.Macs
|
|
use 4/Misc.Macs
|
|
use 4/Qd.Macs
|
|
use 4/Sound.Macs
|
|
use 4/Std.Macs
|
|
use 4/Text.Macs
|
|
use 4/Util.Macs
|
|
use 4/Window.Macs
|
|
|
|
*---------------------------------------
|
|
|
|
L110000 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFA8
|
|
TCS
|
|
TCD
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0054
|
|
PEA $0007
|
|
JSL L0E0656
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
JSL L0E0BFC
|
|
PHY
|
|
JSL L03198D
|
|
PLA
|
|
LSR
|
|
BCC L11003A
|
|
JSL L100D91
|
|
BRA L110041
|
|
L11003A PEA $000B
|
|
JSL L0B0B7A
|
|
L110041 TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0002
|
|
JSL L0E0184
|
|
TSC
|
|
CLC
|
|
ADC #$0058
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110059 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFC
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0E05E8
|
|
JSL L092E10
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L11006E ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFF6
|
|
TCS
|
|
TCD
|
|
LDA L05535F
|
|
BNE L11007D
|
|
BRA L1100CA
|
|
L11007D PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0001
|
|
BNE L110092
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $03
|
|
BRA L11009B
|
|
L110092 LDA #$0001
|
|
STA $03
|
|
JSL L0E0000
|
|
L11009B LDA $03
|
|
STA $01
|
|
LDA $01
|
|
SEC
|
|
SBC #$0001
|
|
BVS L1100AA
|
|
EOR #$8000
|
|
L1100AA BPL L1100CA
|
|
LDA #$0001
|
|
STA $05
|
|
L1100B1 PHY
|
|
JSL L07005C
|
|
PLA
|
|
LSR
|
|
BCC L1100BC
|
|
BRA L1100CA
|
|
L1100BC JSL L072314
|
|
LDA $05
|
|
CMP $01
|
|
BEQ L1100CA
|
|
INC $05
|
|
BRA L1100B1
|
|
L1100CA PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L1100D1 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFC
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0E05E8
|
|
JSL L090635
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L1100E6 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFF2
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0002
|
|
BNE L110111
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0006
|
|
PEA $000D
|
|
JSL L0E0656
|
|
BRA L110124
|
|
L110111 TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0006
|
|
JSL L071EC5
|
|
L110124 TDC
|
|
CLC
|
|
ADC #$0007
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0004
|
|
PEA $000B
|
|
JSL L0E0656
|
|
TDC
|
|
CLC
|
|
ADC #$0007
|
|
PEA $0000
|
|
PHA
|
|
JSL L121E9A
|
|
PEI $09
|
|
PEI $07
|
|
PEI $09
|
|
PEI $07
|
|
PEI $01
|
|
PEI $03
|
|
PEI $05
|
|
JSL L0930EA
|
|
TSC
|
|
CLC
|
|
ADC #$000E
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110161 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFC
|
|
TCS
|
|
TCD
|
|
JSL L0E0000
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L110171 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FEFC
|
|
TCS
|
|
ADC #$000D
|
|
TCD
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFF3
|
|
PHA
|
|
JSL L0E06AC
|
|
TSC
|
|
CLC
|
|
ADC #$0104
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110191 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FF9E
|
|
TCS
|
|
TCD
|
|
TDC
|
|
CLC
|
|
ADC #$0055
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $000A
|
|
PEA $0011
|
|
JSL L0E0656
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0054
|
|
PEA $0007
|
|
JSL L0E0656
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
JSL L0E0BFC
|
|
PHY
|
|
JSL L0319D4
|
|
PLA
|
|
LSR
|
|
BCC L1101F7
|
|
TDC
|
|
CLC
|
|
ADC #$0055
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $000A
|
|
PEA $0011
|
|
JSL L0E07C5
|
|
JSL L100802
|
|
BRA L1101FE
|
|
L1101F7 PEA $000B
|
|
JSL L0B0B7A
|
|
L1101FE TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0002
|
|
JSL L0E0184
|
|
TSC
|
|
CLC
|
|
ADC #$0062
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110216 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FEF4
|
|
TCS
|
|
ADC #$0015
|
|
TCD
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFEB
|
|
PHA
|
|
JSL L0E06AC
|
|
JSL L0904A1
|
|
PHY
|
|
PHY
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFEB
|
|
PHA
|
|
JSL L09390E
|
|
PLA
|
|
STA $EF
|
|
PLX
|
|
STX $F1
|
|
LDA $EF
|
|
ORA $F1
|
|
BNE L11025F
|
|
PEA $000D
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFEB
|
|
PHA
|
|
JSL L0B0841
|
|
BRA L11027F
|
|
L11025F LDA $F1
|
|
STA $EB
|
|
LDA $EF
|
|
STA $ED
|
|
LDA L0550B9
|
|
DEC
|
|
BNE L110277
|
|
PEI $EB
|
|
PEI $ED
|
|
JSL L0A0414
|
|
BRA L11027F
|
|
L110277 PEI $EB
|
|
PEI $ED
|
|
JSL L0A2CE3
|
|
L11027F TSC
|
|
CLC
|
|
ADC #$010C
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110287 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFEE
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0003
|
|
BNE L1102B2
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0006
|
|
PEA $000D
|
|
JSL L0E0656
|
|
BRA L1102C5
|
|
L1102B2 TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0006
|
|
JSL L071EC5
|
|
L1102C5 TDC
|
|
CLC
|
|
ADC #$000B
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0004
|
|
PEA $000B
|
|
JSL L0E0656
|
|
TDC
|
|
CLC
|
|
ADC #$0007
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0004
|
|
PEA $000B
|
|
JSL L0E0656
|
|
TDC
|
|
CLC
|
|
ADC #$000B
|
|
PEA $0000
|
|
PHA
|
|
JSL L121E9A
|
|
TDC
|
|
CLC
|
|
ADC #$0007
|
|
PEA $0000
|
|
PHA
|
|
JSL L121E9A
|
|
PEI $09
|
|
PEI $07
|
|
PEI $0D
|
|
PEI $0B
|
|
PEI $01
|
|
PEI $03
|
|
PEI $05
|
|
JSL L0930EA
|
|
TSC
|
|
CLC
|
|
ADC #$0012
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110325 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFC
|
|
TCS
|
|
TCD
|
|
PEA $0001
|
|
JSL L09091E
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L110338 PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FEFC
|
|
TCS
|
|
ADC #$0011
|
|
TCD
|
|
PEA ^L052406
|
|
PEA L052406
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFEF
|
|
PHA
|
|
JSL L094153
|
|
PEA $0100
|
|
JSL L0313BE
|
|
LDA $F6
|
|
STA $FA
|
|
LDA $F5
|
|
STA $F9
|
|
LDA $F3
|
|
TCD
|
|
TSC
|
|
CLC
|
|
ADC #$010A
|
|
TCS
|
|
RTL
|
|
|
|
L11036F ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFE0
|
|
TCS
|
|
TCD
|
|
JSL L0952F7
|
|
LDA #L051BE6
|
|
LDX #^L051BE6
|
|
STA L0553B9
|
|
STX L0553BB
|
|
JSL L0B1910
|
|
PEA $0000
|
|
PHD
|
|
JSL L110338
|
|
PHY
|
|
PHY
|
|
PEA ^L052406
|
|
PEA L052406
|
|
JSL L071F3F
|
|
PLA
|
|
STA $17
|
|
PLX
|
|
STX $19
|
|
TDC
|
|
CLC
|
|
ADC #$0017
|
|
PEA $0000
|
|
PHA
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
JSL L0B6E8B
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0001
|
|
JSL L0B2AF9
|
|
STZ L0553A5
|
|
LDA L05539D
|
|
DEC
|
|
STA L05539D
|
|
JSL L0B1BD6
|
|
LDA #$0001
|
|
STA L0553A3
|
|
PHY
|
|
PEA $0000
|
|
JSL L0B7A9C
|
|
PLA
|
|
STA $1B
|
|
STZ L0553A3
|
|
LDA L05539D
|
|
INC
|
|
STA L05539D
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
JSL L0B0F05
|
|
LDA $1B
|
|
BEQ L110414
|
|
PEA ^L050FE8
|
|
PEA L050FE8
|
|
PEA $0002
|
|
JSL L0E0184
|
|
BRA L11041B
|
|
L110414 STZ L0553A5
|
|
JSL L0B8B50
|
|
L11041B JSL L0B1BD6
|
|
LDA L0551F1
|
|
BEQ L11044B
|
|
LDA L0550C5
|
|
LDX L0550C7
|
|
CLC
|
|
ADC #$00CE
|
|
BCC L110431
|
|
INX
|
|
L110431 STA $1D
|
|
STX $1F
|
|
LDA #$0020
|
|
AND [$1D]
|
|
BEQ L110448
|
|
LDA L0550E1
|
|
LDX L0550E3
|
|
PHX
|
|
PHA
|
|
JSL L09A5A7
|
|
L110448 STZ L0551F1
|
|
L11044B TSC
|
|
CLC
|
|
ADC #$0020
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110453 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FEFA
|
|
TCS
|
|
ADC #$000F
|
|
TCD
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFF1
|
|
PHA
|
|
JSL L0E06AC
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFF1
|
|
PHA
|
|
JSL L093529
|
|
TSC
|
|
CLC
|
|
ADC #$0106
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110480 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFC
|
|
TCS
|
|
TCD
|
|
PEA $0003
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
CLC
|
|
ADC #$00F9
|
|
PHA
|
|
JSL L09971B
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L11049E ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFC
|
|
TCS
|
|
TCD
|
|
JSL L0E0074
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L1104AE ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FE9C
|
|
TCS
|
|
ADC #$006D
|
|
TCD
|
|
STZ $EF
|
|
STZ $F1
|
|
LDA #$0006
|
|
STA $BF
|
|
LDA L055039
|
|
LDX L05503B
|
|
STA $EB
|
|
STX $ED
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
DEC
|
|
BPL L1104D8
|
|
BRL L110583
|
|
L1104D8 CMP #$0004
|
|
BMI L1104E0
|
|
BRL L110583
|
|
L1104E0 SEC
|
|
SBC #$0000
|
|
BEQ L1104F2
|
|
DEC
|
|
BEQ L110543
|
|
DEC
|
|
BEQ L110559
|
|
DEC
|
|
BEQ L11056B
|
|
BRL L110583
|
|
L1104F2 LDA #$0002
|
|
STA $93
|
|
LDA #$0001
|
|
LDX #$0000
|
|
STA $99
|
|
STX $9B
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FF93
|
|
PHA
|
|
JSL L0E06AC
|
|
PHY
|
|
PHY
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FF93
|
|
PHA
|
|
JSL L0735A8
|
|
PLA
|
|
STA $EF
|
|
PLX
|
|
STX $F1
|
|
PHY
|
|
PHY
|
|
PEI $F1
|
|
PEI $EF
|
|
JSL L078841
|
|
PLA
|
|
STA $EB
|
|
PLX
|
|
STX $ED
|
|
PEI $F1
|
|
PEI $EF
|
|
JSL L07185A
|
|
LDA #$0001
|
|
STA L055415
|
|
BRA L110583
|
|
L110543 LDA #$0002
|
|
STA $93
|
|
PHY
|
|
PHY
|
|
JSL L0E05AF
|
|
PLA
|
|
STA $99
|
|
PLX
|
|
STX $9B
|
|
STZ L055415
|
|
BRA L110583
|
|
L110559 LDA #$0003
|
|
STA $93
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $9D
|
|
STZ L055415
|
|
BRA L110583
|
|
L11056B TDC
|
|
CLC
|
|
ADC #$0093
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $005C
|
|
PEA $0002
|
|
JSL L0E0656
|
|
BRA L110583
|
|
L110583 LDA L05502B
|
|
LDX L05502D
|
|
CMP $EB
|
|
BNE L11058F
|
|
CPX $ED
|
|
L11058F BEQ L110596
|
|
LDA #$0000
|
|
BRA L110599
|
|
L110596 LDA #$0001
|
|
L110599 AND L055415
|
|
BEQ L1105A7
|
|
PEA $0000
|
|
JSL L098852
|
|
BRA L1105E4
|
|
L1105A7 PHY
|
|
TDC
|
|
CLC
|
|
ADC #$0093
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
JSL L096479
|
|
PLA
|
|
LSR
|
|
BCC L1105BE
|
|
BRA L1105E4
|
|
L1105BE LDA L055257
|
|
BEQ L1105CF
|
|
PEA ^L040355
|
|
PEA L040355
|
|
JSL L0B2D94
|
|
BRA L1105E4
|
|
L1105CF LDA L055259
|
|
BEQ L1105DD
|
|
PEA $0001
|
|
JSL L122130
|
|
BRA L1105E4
|
|
L1105DD PEA $0002
|
|
JSL L122130
|
|
L1105E4 TSC
|
|
CLC
|
|
ADC #$0164
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L1105EC ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FEF8
|
|
TCS
|
|
ADC #$0011
|
|
TCD
|
|
PHY
|
|
PHY
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFEF
|
|
PHA
|
|
PEA $0BE6
|
|
JSL L072809
|
|
JSL L0735A8
|
|
PLA
|
|
STA $EF
|
|
PLX
|
|
STX $F1
|
|
PEA $0000
|
|
PEA $0001
|
|
PEI $F1
|
|
PEI $EF
|
|
PEA $0000
|
|
JSL L0968FC
|
|
PEI $F1
|
|
PEI $EF
|
|
JSL L07185A
|
|
TSC
|
|
CLC
|
|
ADC #$0108
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110634 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FF80
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
SEC
|
|
SBC #$0001
|
|
BPL L11064B
|
|
BRL L1107A4
|
|
L11064B CMP #$0006
|
|
BMI L110653
|
|
BRL L1107A4
|
|
L110653 ASL
|
|
TAX
|
|
LDAL L11065B,X
|
|
PHA
|
|
RTS
|
|
|
|
L11065B DA L110667-1
|
|
DA L11067C-1
|
|
DA L1106AF-1
|
|
DA L11072E-1
|
|
DA L110776-1
|
|
DA L11078D-1
|
|
|
|
L110667 STZ L055145
|
|
JSL L151484
|
|
JSL L09AFB1
|
|
JSL L0E0000
|
|
* BRL L1107A4
|
|
BRL L1107A4
|
|
L11067C PHY
|
|
PHY
|
|
JSL L0E061D
|
|
PLA
|
|
STA $73
|
|
PLX
|
|
STX $75
|
|
LDA $73
|
|
ORA $75
|
|
BNE L110697
|
|
PEA $0084
|
|
JSL L0B0B7A
|
|
BRA L1106AC
|
|
L110697 LDY #$00CE
|
|
LDA #$0020
|
|
AND [$73],Y
|
|
CMP #$0000
|
|
BEQ L1106AC
|
|
PEI $75
|
|
PEI $73
|
|
JSL L09A5A7
|
|
L1106AC BRL L1107A4
|
|
L1106AF TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0030
|
|
PEA $000A
|
|
JSL L0E0656
|
|
PHY
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
JSL L0D0F6E
|
|
PLA
|
|
STA $7B
|
|
LDA $03
|
|
LDX $05
|
|
STA $77
|
|
STX $79
|
|
PHY
|
|
PEI $79
|
|
PEI $77
|
|
PEI $7B
|
|
TDC
|
|
CLC
|
|
ADC #$0031
|
|
PEA $0000
|
|
PHA
|
|
JSL L07ABAE
|
|
PLA
|
|
LSR
|
|
BCC L11072A
|
|
LDA #$8000
|
|
AND $35
|
|
BNE L11072A
|
|
LDA #$8000
|
|
ORA $35
|
|
STA $35
|
|
PHY
|
|
PEI $79
|
|
PEI $77
|
|
TDC
|
|
CLC
|
|
ADC #$0031
|
|
PEA $0000
|
|
PHA
|
|
JSL L07D585
|
|
PLA
|
|
LSR
|
|
BCC L11072A
|
|
PEI $79
|
|
PEI $77
|
|
PEI $7B
|
|
PEA $0000
|
|
JSL L0876F4
|
|
L11072A BRA L1107A4
|
|
*L11072C BRA L1107A4
|
|
L11072E TDC
|
|
CLC
|
|
ADC #$005B
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0018
|
|
PEA $000F
|
|
JSL L0E0656
|
|
LDA $5B
|
|
DEC
|
|
DEC
|
|
BNE L110757
|
|
PEI $67
|
|
PEI $65
|
|
PEA $0000
|
|
JSL L099F77
|
|
BRA L110772
|
|
L110757 LDA #$0003
|
|
CMP $5B
|
|
BNE L11076B
|
|
PEI $63
|
|
PEI $61
|
|
PEA $0000
|
|
JSL L099EA4
|
|
BRA L110772
|
|
L11076B PEA $0067
|
|
JSL L0B0B7A
|
|
L110772 BRA L1107A4
|
|
*L110774 BRA L1107A4
|
|
L110776 LDA L055027
|
|
LDX L055029
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
JSL L099F77
|
|
JSL L0E0000
|
|
BRA L1107A4
|
|
*L11078B BRA L1107A4
|
|
L11078D LDA L05501F
|
|
LDX L055021
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
JSL L099EA4
|
|
JSL L0E0000
|
|
BRA L1107A4
|
|
BRA L1107A4
|
|
L1107A4 TSC
|
|
CLC
|
|
ADC #$0080
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L1107AC ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FEFA
|
|
TCS
|
|
ADC #$000F
|
|
TCD
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFF1
|
|
PHA
|
|
JSL L0E06AC
|
|
LDA L0550BB
|
|
STA $F1
|
|
PEA $0004
|
|
JSL L090635
|
|
LDA L0550B9
|
|
DEC
|
|
BNE L1107F6
|
|
PHY
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFF1
|
|
PHA
|
|
JSL L160288
|
|
PLA
|
|
LSR
|
|
BCC L1107EE
|
|
JSL L1602F8
|
|
BRA L1107F4
|
|
L1107EE PEI $F1
|
|
JSL L090635
|
|
L1107F4 BRA L1107FC
|
|
L1107F6 PEI $F1
|
|
JSL L090635
|
|
L1107FC TSC
|
|
CLC
|
|
ADC #$0106
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110804 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFFA
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0001
|
|
BNE L11081D
|
|
JSL L096029
|
|
BRA L11083B
|
|
L11081D PHY
|
|
JSL L16072E
|
|
PLA
|
|
LSR
|
|
BCC L11083B
|
|
PHY
|
|
PEA $0001
|
|
JSL L16073C
|
|
PLA
|
|
STA $01
|
|
* PEA ^L16073C
|
|
* PEA L16073C
|
|
* JSL L07187A
|
|
L11083B JSL L0E0000
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLD
|
|
RTL
|
|
|
|
L110844 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFA8
|
|
TCS
|
|
TCD
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0054
|
|
PEA $0007
|
|
PEA $0001
|
|
JSL L0B3145
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
JSL L0E0BFC
|
|
PHY
|
|
JSL L03198D
|
|
PLA
|
|
LSR
|
|
BCC L110881
|
|
JSL L100DA4
|
|
BRA L110888
|
|
L110881 PEA $000B
|
|
JSL L0B0B7A
|
|
L110888 TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0002
|
|
JSL L0E0184
|
|
TSC
|
|
CLC
|
|
ADC #$0058
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L1108A0 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FDB0
|
|
TCS
|
|
ADC #$0159
|
|
TCD
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0004
|
|
BNE L1108C3
|
|
JSL L0B8C8B
|
|
JSL L0E0000
|
|
BRL L110FF4
|
|
BRA L1108CD
|
|
L1108C3 LDA #$0018
|
|
LDX #$0000
|
|
STA $CD
|
|
STX $CF
|
|
L1108CD LDA #$0004
|
|
STA $E1
|
|
STZ $E3
|
|
STZ $DD
|
|
LDA #$00FF
|
|
STA $D7
|
|
LDA #$0078
|
|
STA $E5
|
|
LDA #$0001
|
|
STA $D5
|
|
LDA #$0001
|
|
STA $EF
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0003
|
|
BNE L110936
|
|
STZ $EF
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFA7
|
|
PHA
|
|
JSL L0E06AC
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0002
|
|
BNE L110936
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $E5
|
|
LDA $E5
|
|
BEQ L11091D
|
|
BPL L110922
|
|
L11091D LDA #$0078
|
|
STA $E5
|
|
L110922 LDA $E5
|
|
SEC
|
|
SBC #$03E7
|
|
BEQ L110936
|
|
BVS L11092F
|
|
EOR #$8000
|
|
L11092F BPL L110936
|
|
LDA #$03E7
|
|
STA $E5
|
|
L110936 PEA ^L05088E
|
|
PEA L05088E
|
|
JSL L0E06AC
|
|
LDA L05535F
|
|
EOR #$0001
|
|
CMP #$0000
|
|
BNE L110960
|
|
PHY
|
|
PEA $001E
|
|
JSL L151681
|
|
PLA
|
|
BEQ L11095B
|
|
LDA #$0000
|
|
BRA L11095E
|
|
L11095B LDA #$0001
|
|
L11095E BEQ L110963
|
|
L110960 BRL L110FF4
|
|
L110963 LDA #$0001
|
|
STA $DB
|
|
PHY
|
|
PHY
|
|
PEA $8024
|
|
PEA ^L05088E
|
|
PEA L05088E
|
|
JSL L072EAE
|
|
PLA
|
|
STA $D1
|
|
PLX
|
|
STX $D3
|
|
LDA $D1
|
|
ORA $D3
|
|
BNE L1109D7
|
|
LDA L0551FD
|
|
BNE L11098B
|
|
BRL L110FF4
|
|
L11098B PEA $0004
|
|
PEA $8000
|
|
PEA $0000
|
|
PEA $0000
|
|
PEA ^L05088E
|
|
PEA L05088E
|
|
TDC
|
|
CLC
|
|
ADC #$00B1
|
|
PEA $0000
|
|
PHA
|
|
_SendRequest
|
|
STAL L05565D
|
|
LDAL L05565D
|
|
BEQ L1109BA
|
|
BRL L110FF4
|
|
L1109BA LDA $B3
|
|
LDX $B5
|
|
STA $D1
|
|
STX $D3
|
|
LDA #$8000
|
|
AND $B7
|
|
BNE L1109D0
|
|
LDA #$0003
|
|
STA $DB
|
|
BRA L1109D5
|
|
L1109D0 LDA #$0002
|
|
STA $DB
|
|
L1109D5 BRA L1109EC
|
|
L1109D7 TDC
|
|
CLC
|
|
ADC #$00AB
|
|
PEA $0000
|
|
PHA
|
|
PEI $D3
|
|
PEI $D1
|
|
JSL L1502EE
|
|
LDA $AD
|
|
STA $E9
|
|
L1109EC PHY
|
|
JSL L07005C
|
|
PLA
|
|
LSR
|
|
BCC L110A1F
|
|
LDA $DB
|
|
DEC
|
|
BNE L110A0E
|
|
PEA $0003
|
|
PEA $8024
|
|
LDA $E9
|
|
JSL L150488
|
|
PHX
|
|
PHA
|
|
JSL L1510BF
|
|
BRA L110A1C
|
|
L110A0E LDA $DB
|
|
DEC
|
|
DEC
|
|
BNE L110A1C
|
|
PEI $D3
|
|
PEI $D1
|
|
JSL L07185A
|
|
L110A1C BRL L110FF4
|
|
L110A1F PHY
|
|
JSL L0301E4
|
|
PLA
|
|
BNE L1109EC
|
|
JSL L0B392B
|
|
LDA $D1
|
|
LDX $D3
|
|
STA L055359
|
|
STX L05535B
|
|
LDA L055359
|
|
LDX L05535B
|
|
PHX
|
|
PHA
|
|
JSL L0718BF
|
|
LDA $E9
|
|
JSL L150488
|
|
STA L055355
|
|
STX L055357
|
|
LDA $EF
|
|
BNE L110A54
|
|
BRL L110B03
|
|
L110A54 PHY
|
|
PHY
|
|
PEA $0000
|
|
PEA $0010
|
|
LDA L055019
|
|
PHA
|
|
JSL L0B249C
|
|
PLA
|
|
STA L05534F
|
|
PLA
|
|
STA L055351
|
|
LDA L05534F
|
|
ORA L055351
|
|
BNE L110A77
|
|
BRL L110FF4
|
|
L110A77 PHY
|
|
PHY
|
|
PEA $0000
|
|
PEA $0100
|
|
LDA L055019
|
|
PHA
|
|
JSL L0B249C
|
|
PLA
|
|
STA L05534B
|
|
PLA
|
|
STA L05534D
|
|
LDA L05534B
|
|
ORA L05534D
|
|
BNE L110A9A
|
|
BRL L110FF4
|
|
L110A9A LDA L05534F
|
|
LDX L055351
|
|
PHX
|
|
PHA
|
|
JSL L0718BF
|
|
LDA L05534B
|
|
LDX L05534D
|
|
PHX
|
|
PHA
|
|
JSL L0718BF
|
|
PEI $E3
|
|
LDA $E1
|
|
INC
|
|
PEA $000C
|
|
JSL L150BEE
|
|
PLA
|
|
CLC
|
|
ADC $01,S
|
|
PLX
|
|
STA $D9
|
|
LDA $D9
|
|
XBA
|
|
AND #$FF00
|
|
ORA $D7
|
|
STA $A7
|
|
LDA $DD
|
|
XBA
|
|
AND #$FF00
|
|
ORA $CD
|
|
STA $A9
|
|
LDA L05534B
|
|
LDX L05534D
|
|
STA $F3
|
|
STX $F5
|
|
LDY #$0002
|
|
LDA [$F3],Y
|
|
TAX
|
|
LDA [$F3]
|
|
STA $F3
|
|
STX $F5
|
|
LDA $A7
|
|
LDX $A9
|
|
STA [$F3]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$F3],Y
|
|
LDA #$0002
|
|
STA $D5
|
|
BRL L110F4A
|
|
L110B03 PHY
|
|
PHY
|
|
PEA $0000
|
|
PEA $0010
|
|
LDA L055019
|
|
PHA
|
|
JSL L0B249C
|
|
PLA
|
|
STA L05534F
|
|
PLA
|
|
STA L055351
|
|
LDA L05534F
|
|
ORA L055351
|
|
BNE L110B26
|
|
BRL L110FF4
|
|
L110B26 PHY
|
|
PHY
|
|
PEA $0000
|
|
PEA $0100
|
|
LDA L055019
|
|
PHA
|
|
JSL L0B249C
|
|
PLA
|
|
STA L05534B
|
|
PLA
|
|
STA L05534D
|
|
LDA L05534B
|
|
ORA L05534D
|
|
BNE L110B49
|
|
BRL L110FF4
|
|
L110B49 LDA L05534F
|
|
LDX L055351
|
|
PHX
|
|
PHA
|
|
JSL L0718BF
|
|
LDA L05534B
|
|
LDX L05534D
|
|
PHX
|
|
PHA
|
|
JSL L0718BF
|
|
PHY
|
|
PHY
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FFA7
|
|
PHA
|
|
JSL L071F3F
|
|
PLA
|
|
STA $BD
|
|
PLX
|
|
STX $BF
|
|
TDC
|
|
CLC
|
|
ADC #$00BD
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FEA7
|
|
PHA
|
|
JSL L0B0361
|
|
L110B8C LDA #$00FF
|
|
LDX #$FEA7
|
|
AND $00,X
|
|
BNE L110B99
|
|
BRL L110F4A
|
|
L110B99 PHY
|
|
PHY
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FEA7
|
|
PHA
|
|
JSL L071F3F
|
|
PLA
|
|
STA $B9
|
|
PLX
|
|
STX $BB
|
|
STZ $DF
|
|
STZ $ED
|
|
LDA #$00FF
|
|
AND [$B9]
|
|
SEC
|
|
SBC #$0030
|
|
BVS L110BC0
|
|
EOR #$8000
|
|
L110BC0 BMI L110BC7
|
|
LDA #$0000
|
|
BRA L110BCA
|
|
L110BC7 LDA #$0001
|
|
L110BCA PHA
|
|
LDA #$00FF
|
|
AND [$B9]
|
|
SEC
|
|
SBC #$0039
|
|
BEQ L110BE2
|
|
BVS L110BDB
|
|
EOR #$8000
|
|
L110BDB BPL L110BE2
|
|
LDA #$0000
|
|
BRA L110BE5
|
|
L110BE2 LDA #$0001
|
|
L110BE5 AND $01,S
|
|
PLX
|
|
STA $F1
|
|
STZ $E7
|
|
STZ $C9
|
|
STZ $CB
|
|
L110BF0 LDX #$0000
|
|
LDA #$00FF
|
|
AND [$B9]
|
|
CMP #$0020
|
|
BEQ L110BFE
|
|
INX
|
|
L110BFE PHX
|
|
LDA #$00FF
|
|
AND [$B9]
|
|
BEQ L110C09
|
|
LDA #$0001
|
|
L110C09 AND $01,S
|
|
PLX
|
|
LSR
|
|
BCS L110C12
|
|
BRL L110E58
|
|
L110C12 PHY
|
|
LDA #$00FF
|
|
AND [$B9]
|
|
PHA
|
|
JSL L071498
|
|
PLA
|
|
STA $EB
|
|
LDA $DF
|
|
INC
|
|
STA $DF
|
|
LDA $EB
|
|
SEC
|
|
SBC #$0030
|
|
BVS L110C30
|
|
EOR #$8000
|
|
L110C30 BMI L110C37
|
|
LDA #$0000
|
|
BRA L110C3A
|
|
L110C37 LDA #$0001
|
|
L110C3A AND $F1
|
|
PHA
|
|
LDA $EB
|
|
SEC
|
|
SBC #$0039
|
|
BEQ L110C51
|
|
BVS L110C4A
|
|
EOR #$8000
|
|
L110C4A BPL L110C51
|
|
LDA #$0000
|
|
BRA L110C54
|
|
L110C51 LDA #$0001
|
|
L110C54 AND $01,S
|
|
PLX
|
|
PHA
|
|
LDX #$0000
|
|
LDA $C9
|
|
ORA $CB
|
|
BNE L110C62
|
|
INX
|
|
L110C62 TXA
|
|
AND $01,S
|
|
PLX
|
|
LSR
|
|
BCC L110C7F
|
|
LDA $E7
|
|
PEA $000A
|
|
JSL L150BEE
|
|
PLA
|
|
CLC
|
|
ADC $EB
|
|
SEC
|
|
SBC #$0030
|
|
STA $E7
|
|
BRL L110E49
|
|
L110C7F LDA $EB
|
|
SEC
|
|
SBC #$0023
|
|
BPL L110C8A
|
|
BRL L110E49
|
|
L110C8A CMP #$0056
|
|
BMI L110C92
|
|
BRL L110E49
|
|
L110C92 SEC
|
|
SBC #$0000
|
|
BNE L110C9B
|
|
BRL L110D6E
|
|
L110C9B SEC
|
|
SBC #$000B
|
|
BNE L110CA4
|
|
BRL L110E27
|
|
L110CA4 DEC
|
|
DEC
|
|
BNE L110CAB
|
|
BRL L110D7E
|
|
L110CAB DEC
|
|
BNE L110CB1
|
|
BRL L110D83
|
|
L110CB1 DEC
|
|
BNE L110CB7
|
|
BRL L110D8B
|
|
L110CB7 DEC
|
|
BNE L110CBD
|
|
BRL L110D93
|
|
L110CBD DEC
|
|
BNE L110CC3
|
|
BRL L110DC3
|
|
L110CC3 DEC
|
|
BNE L110CC9
|
|
BRL L110DCA
|
|
L110CC9 DEC
|
|
BNE L110CCF
|
|
BRL L110DD1
|
|
L110CCF DEC
|
|
BNE L110CD5
|
|
BRL L110DD8
|
|
L110CD5 SEC
|
|
SBC #$002A
|
|
BEQ L110D1C
|
|
DEC
|
|
BEQ L110D24
|
|
DEC
|
|
BEQ L110D38
|
|
DEC
|
|
BEQ L110D3D
|
|
DEC
|
|
BEQ L110D45
|
|
DEC
|
|
BEQ L110D5E
|
|
DEC
|
|
BEQ L110D66
|
|
DEC
|
|
BNE L110CF3
|
|
BRL L110DEB
|
|
L110CF3 SEC
|
|
SBC #$0009
|
|
BNE L110CFC
|
|
BRL L110DF7
|
|
L110CFC DEC
|
|
BEQ L110D76
|
|
DEC
|
|
BNE L110D05
|
|
BRL L110E03
|
|
L110D05 DEC
|
|
BNE L110D0B
|
|
BRL L110E0F
|
|
L110D0B DEC
|
|
DEC
|
|
DEC
|
|
BNE L110D13
|
|
BRL L110DDF
|
|
L110D13 DEC
|
|
BNE L110D19
|
|
BRL L110E1B
|
|
L110D19 BRL L110E49
|
|
L110D1C LDA #$0009
|
|
STA $E3
|
|
BRL L110E49
|
|
L110D24 LDA $DF
|
|
DEC
|
|
BNE L110D30
|
|
LDA #$000B
|
|
STA $E3
|
|
BRA L110D35
|
|
L110D30 LDA $E3
|
|
DEC
|
|
STA $E3
|
|
L110D35 BRL L110E49
|
|
L110D38 STZ $E3
|
|
BRL L110E49
|
|
L110D3D LDA #$0002
|
|
STA $E3
|
|
BRL L110E49
|
|
L110D45 LDA $DF
|
|
DEC
|
|
BNE L110D51
|
|
LDA #$0004
|
|
STA $E3
|
|
BRA L110D5B
|
|
L110D51 LDA #$000C
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
L110D5B BRL L110E49
|
|
L110D5E LDA #$0005
|
|
STA $E3
|
|
BRL L110E49
|
|
L110D66 LDA #$0007
|
|
STA $E3
|
|
BRL L110E49
|
|
L110D6E LDA $E3
|
|
INC
|
|
STA $E3
|
|
BRL L110E49
|
|
L110D76 LDA #$0001
|
|
STA $ED
|
|
BRL L110E49
|
|
L110D7E STZ $E1
|
|
BRL L110E49
|
|
L110D83 LDA #$0001
|
|
STA $E1
|
|
BRL L110E49
|
|
L110D8B LDA #$0002
|
|
STA $E1
|
|
BRL L110E49
|
|
L110D93 LDA $C9
|
|
ORA $CB
|
|
BEQ L110DBB
|
|
LDA $C9
|
|
LDX $CB
|
|
PEA $0000
|
|
PEA $0002
|
|
JSL L150D50
|
|
PEA $0000
|
|
PEA $0003
|
|
JSL L150290
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110DC0
|
|
L110DBB LDA #$0003
|
|
STA $E1
|
|
L110DC0 BRL L110E49
|
|
L110DC3 LDA #$0004
|
|
STA $E1
|
|
BRA L110E49
|
|
L110DCA LDA #$0005
|
|
STA $E1
|
|
BRA L110E49
|
|
L110DD1 LDA #$0006
|
|
STA $E1
|
|
BRA L110E49
|
|
L110DD8 LDA #$0007
|
|
STA $E1
|
|
BRA L110E49
|
|
L110DDF LDA #$0060
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110DEB LDA #$0030
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110DF7 LDA #$0018
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110E03 LDA #$0006
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110E0F LDA #$0003
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110E1B LDA #$0001
|
|
LDX #$0000
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110E27 LDA $C9
|
|
LDX $CB
|
|
PEA $0000
|
|
PEA $0003
|
|
JSL L150D50
|
|
PEA $0000
|
|
PEA $0002
|
|
JSL L150290
|
|
PLY
|
|
PLY
|
|
PLY
|
|
PLY
|
|
STA $C9
|
|
STX $CB
|
|
BRA L110E49
|
|
L110E49 LDA $B9
|
|
LDX $BB
|
|
INC
|
|
BNE L110E51
|
|
INX
|
|
L110E51 STA $B9
|
|
STX $BB
|
|
BRL L110BF0
|
|
L110E58 LDA $F1
|
|
BEQ L110E83
|
|
PEI $E7
|
|
PEA $000C
|
|
JSL L1500F5
|
|
PLX
|
|
PLX
|
|
DEC
|
|
STA $E1
|
|
PEI $E7
|
|
PEA $000C
|
|
JSL L150318
|
|
PLX
|
|
PLX
|
|
STA $E3
|
|
LDA $E3
|
|
BPL L110E83
|
|
LDA #$000C
|
|
CLC
|
|
ADC $E3
|
|
STA $E3
|
|
L110E83 LDA $C9
|
|
ORA $CB
|
|
BEQ L110E91
|
|
LDA $C9
|
|
LDX $CB
|
|
STA $CD
|
|
STX $CF
|
|
L110E91 LDA $CD
|
|
LDX $CF
|
|
STA $C5
|
|
STX $C7
|
|
LDA $ED
|
|
BEQ L110EBD
|
|
PEI $E3
|
|
LDA $E1
|
|
INC
|
|
PEA $000C
|
|
JSL L150BEE
|
|
PLA
|
|
CLC
|
|
ADC $01,S
|
|
PLX
|
|
STA $D9
|
|
LDA $D9
|
|
XBA
|
|
AND #$FF00
|
|
ORA #$0000
|
|
STA $A7
|
|
BRA L110EDA
|
|
L110EBD PEI $E3
|
|
LDA $E1
|
|
INC
|
|
PEA $000C
|
|
JSL L150BEE
|
|
PLA
|
|
CLC
|
|
ADC $01,S
|
|
PLX
|
|
STA $D9
|
|
LDA $D9
|
|
XBA
|
|
AND #$FF00
|
|
ORA $D7
|
|
STA $A7
|
|
L110EDA LDA $DD
|
|
XBA
|
|
AND #$FF00
|
|
ORA $C5
|
|
STA $A9
|
|
LDA L05534B
|
|
LDX L05534D
|
|
STA $F3
|
|
STX $F5
|
|
LDY #$0002
|
|
LDA [$F3],Y
|
|
TAX
|
|
LDA [$F3]
|
|
PHX
|
|
PHA
|
|
LDA $D5
|
|
JSL L150488
|
|
TAY
|
|
BNE L110F02
|
|
DEX
|
|
L110F02 DEC
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
PEA $0002
|
|
JSL L151137
|
|
PLA
|
|
PLX
|
|
JSL L150F53
|
|
STA $F3
|
|
STX $F5
|
|
LDA $A7
|
|
LDX $A9
|
|
STA [$F3]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$F3],Y
|
|
TDC
|
|
CLC
|
|
ADC #$00BD
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FEA7
|
|
PHA
|
|
JSL L0B0361
|
|
LDA $D5
|
|
INC
|
|
STA $D5
|
|
LDA #$0040
|
|
CMP $D5
|
|
BEQ L110F4A
|
|
BRL L110B8C
|
|
L110F4A STZ $A7
|
|
STZ $A9
|
|
LDA L05534B
|
|
LDX L05534D
|
|
STA $F3
|
|
STX $F5
|
|
LDY #$0002
|
|
LDA [$F3],Y
|
|
TAX
|
|
LDA [$F3]
|
|
PHX
|
|
PHA
|
|
LDA $D5
|
|
JSL L150488
|
|
TAY
|
|
BNE L110F6C
|
|
DEX
|
|
L110F6C DEC
|
|
PHX
|
|
PHA
|
|
PEA $0000
|
|
PEA $0002
|
|
JSL L151137
|
|
PLA
|
|
PLX
|
|
JSL L150F53
|
|
STA $F3
|
|
STX $F5
|
|
LDA $A7
|
|
LDX $A9
|
|
STA [$F3]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$F3],Y
|
|
LDA L05534F
|
|
LDX L055351
|
|
STA $F3
|
|
STX $F5
|
|
LDY #$0002
|
|
LDA [$F3],Y
|
|
TAX
|
|
LDA [$F3]
|
|
STA $C1
|
|
STX $C3
|
|
LDA L055359
|
|
LDX L05535B
|
|
STA [$C1]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$C1],Y
|
|
LDA $E5
|
|
LDY #$0004
|
|
STA [$C1],Y
|
|
LDA #$0001
|
|
LDY #$0006
|
|
STA [$C1],Y
|
|
LDA L05534B
|
|
LDX L05534D
|
|
LDY #$0008
|
|
STA [$C1],Y
|
|
INY
|
|
INY
|
|
TXA
|
|
STA [$C1],Y
|
|
LDA #$0000
|
|
TAX
|
|
LDY #$000C
|
|
STA [$C1],Y
|
|
INY
|
|
INY
|
|
TXA
|
|
STA [$C1],Y
|
|
LDA $DB
|
|
STA L05535D
|
|
PEA $0001
|
|
LDA L05534F
|
|
LDX L055351
|
|
PHX
|
|
PHA
|
|
JSL L03022C
|
|
L110FF4 TSC
|
|
CLC
|
|
ADC #$0250
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L110FFC PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFF8
|
|
TCS
|
|
TCD
|
|
LDA #$00E7
|
|
CLC
|
|
ADC $0E
|
|
LDX $10
|
|
BCC L11100F
|
|
INX
|
|
L11100F PHX
|
|
PHA
|
|
LDA L0551E5
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L052C1A
|
|
LDX #^L052C1A
|
|
BCC L111024
|
|
INX
|
|
L111024 PHX
|
|
PHA
|
|
PEA $0008
|
|
JSL L0313BE
|
|
LDA L0551E5
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L052C1A
|
|
LDX #^L052C1A
|
|
BCC L111040
|
|
INX
|
|
L111040 STA $01
|
|
STX $03
|
|
LDA #$0000
|
|
TAX
|
|
LDY #$0004
|
|
STA [$01],Y
|
|
INY
|
|
INY
|
|
TXA
|
|
STA [$01],Y
|
|
LDA #$0000
|
|
TAX
|
|
STA [$01]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$01],Y
|
|
LDA L0551E5
|
|
DEC
|
|
STA L0551E5
|
|
LDA L0551E5
|
|
SEC
|
|
SBC #$0001
|
|
BVS L111071
|
|
EOR #$8000
|
|
L111071 BMI L111079
|
|
LDA #$0014
|
|
STA L0551E5
|
|
L111079 LDA $0C
|
|
STA $10
|
|
LDA $0B
|
|
STA $0F
|
|
LDA $09
|
|
TCD
|
|
TSC
|
|
CLC
|
|
ADC #$000E
|
|
TCS
|
|
RTL
|
|
|
|
L11108B ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FD84
|
|
TCS
|
|
ADC #$0185
|
|
TCD
|
|
PEA $0000
|
|
PHD
|
|
JSL L110FFC
|
|
STZ $8F
|
|
STZ $91
|
|
LDX #$0000
|
|
LDA $EB
|
|
ORA $ED
|
|
BNE L1110AC
|
|
INX
|
|
L1110AC PHX
|
|
LDX #$0000
|
|
LDA $E7
|
|
ORA $E9
|
|
BNE L1110B7
|
|
INX
|
|
L1110B7 TXA
|
|
ORA $01,S
|
|
PLX
|
|
LSR
|
|
BCC L1110D2
|
|
LDA L05502B
|
|
LDX L05502D
|
|
STA $EB
|
|
STX $ED
|
|
LDA L05527D
|
|
LDX L05527F
|
|
STA $E7
|
|
STX $E9
|
|
L1110D2 PHY
|
|
PHY
|
|
PEI $ED
|
|
PEI $EB
|
|
JSL L07899F
|
|
PLA
|
|
STA $8F
|
|
PLX
|
|
STX $91
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0001
|
|
BNE L111115
|
|
LDA L0551E5
|
|
STA $EF
|
|
PEI $E9
|
|
PEI $E7
|
|
PEI $91
|
|
PEI $8F
|
|
PEA $0000
|
|
JSL L0968AD
|
|
L111101 LDA $EF
|
|
CMP L0551E5
|
|
BEQ L111112
|
|
PEA $0000
|
|
PHD
|
|
JSL L110FFC
|
|
BRA L111101
|
|
L111112 BRL L1111A9
|
|
L111115 PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0003
|
|
BNE L111138
|
|
TDC
|
|
CLC
|
|
ADC #$0093
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0054
|
|
PEA $0007
|
|
JSL L0E0656
|
|
BRA L11114A
|
|
L111138 LDA #$0001
|
|
STA $93
|
|
LDA #$0001
|
|
STA $B5
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $B7
|
|
L11114A PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $F1
|
|
PEA ^L040363
|
|
PEA L040363
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FF7B
|
|
PHA
|
|
PEI $E9
|
|
PEI $E7
|
|
JSL L0715D9
|
|
PEA ^L04036C
|
|
PEA L04036C
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FE7B
|
|
PHA
|
|
PEI $91
|
|
PEI $8F
|
|
JSL L072CD4
|
|
PEA ^L040378
|
|
PEA L040378
|
|
PEA $0000
|
|
TDC
|
|
CLC
|
|
ADC #$FF8F
|
|
PHA
|
|
PEA $0005
|
|
JSL L1509CE
|
|
JSL L0E0F0F
|
|
TDC
|
|
CLC
|
|
ADC #$0093
|
|
PEA $0000
|
|
PHA
|
|
PEI $F1
|
|
JSL L0E0184
|
|
L1111A9 JSL L0E0000
|
|
PEI $91
|
|
PEI $8F
|
|
JSL L07185A
|
|
TSC
|
|
CLC
|
|
ADC #$027C
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L1111BD ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FF34
|
|
TCS
|
|
TCD
|
|
LDA L0551E5
|
|
INC
|
|
STA L0551E5
|
|
LDA L0551E5
|
|
SEC
|
|
SBC #$0014
|
|
BEQ L1111E2
|
|
BVS L1111DA
|
|
EOR #$8000
|
|
L1111DA BPL L1111E2
|
|
LDA #$0001
|
|
STA L0551E5
|
|
L1111E2 TDC
|
|
CLC
|
|
ADC #$000D
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $005C
|
|
PEA $0002
|
|
JSL L0E0656
|
|
LDX #$0000
|
|
LDA #$0003
|
|
CMP $0D
|
|
BNE L111203
|
|
INX
|
|
L111203 PHX
|
|
LDX #$0000
|
|
LDA $17
|
|
BNE L11120C
|
|
INX
|
|
L11120C TXA
|
|
AND $01,S
|
|
PLX
|
|
LSR
|
|
BCC L11124B
|
|
LDA L0551E5
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L052C1A
|
|
LDX #^L052C1A
|
|
BCC L111226
|
|
INX
|
|
L111226 STA $09
|
|
STX $0B
|
|
LDA L055027
|
|
LDX L055029
|
|
STA [$09]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$09],Y
|
|
LDA L055039
|
|
LDX L05503B
|
|
LDY #$0004
|
|
STA [$09],Y
|
|
INY
|
|
INY
|
|
TXA
|
|
STA [$09],Y
|
|
BRL L111381
|
|
L11124B LDX #$0000
|
|
LDA #$0005
|
|
CMP $0D
|
|
BNE L111256
|
|
INX
|
|
L111256 PHX
|
|
LDX #$0000
|
|
LDA $17
|
|
DEC
|
|
BNE L111260
|
|
INX
|
|
L111260 TXA
|
|
AND $01,S
|
|
PLX
|
|
LSR
|
|
BCS L11126A
|
|
BRL L11131D
|
|
L11126A LDA L0551E1
|
|
STA $C7
|
|
L11126F LDA $C7
|
|
DEC
|
|
STA $C7
|
|
LDA $C7
|
|
SEC
|
|
SBC #$0001
|
|
BVS L11127F
|
|
EOR #$8000
|
|
L11127F BMI L111286
|
|
LDA #$00C8
|
|
STA $C7
|
|
L111286 LDA $C7
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
LDAL L0525DA,X
|
|
ORAL L0525DC,X
|
|
BEQ L11129A
|
|
LDA #$0001
|
|
L11129A PHA
|
|
LDX #$0000
|
|
LDA L0551E1
|
|
CMP $C7
|
|
BNE L1112A6
|
|
INX
|
|
L1112A6 TXA
|
|
ORA $01,S
|
|
PLX
|
|
LSR
|
|
BCC L11126F
|
|
LDA L0551E1
|
|
CMP $C7
|
|
BEQ L1112E6
|
|
LDA L0551E5
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L052C1A
|
|
LDX #^L052C1A
|
|
BCC L1112C7
|
|
INX
|
|
L1112C7 PHX
|
|
PHA
|
|
LDA $C7
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L0525DA
|
|
LDX #^L0525DA
|
|
BCC L1112DB
|
|
INX
|
|
L1112DB PHX
|
|
PHA
|
|
PEA $0008
|
|
JSL L0313BE
|
|
BRA L11131B
|
|
L1112E6 LDA L0551E5
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L052C1A
|
|
LDX #^L052C1A
|
|
BCC L1112F9
|
|
INX
|
|
L1112F9 STA $05
|
|
STX $07
|
|
LDA L05502B
|
|
LDX L05502D
|
|
LDY #$0004
|
|
STA [$05],Y
|
|
INY
|
|
INY
|
|
TXA
|
|
STA [$05],Y
|
|
LDA L05527D
|
|
LDX L05527F
|
|
STA [$05]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$05],Y
|
|
L11131B BRA L111381
|
|
L11131D TDC
|
|
CLC
|
|
ADC #$0069
|
|
PEA $0000
|
|
PHA
|
|
JSL L0940E5
|
|
PHY
|
|
TDC
|
|
CLC
|
|
ADC #$000D
|
|
PEA $0000
|
|
PHA
|
|
JSL L0953DD
|
|
PLA
|
|
STA $C5
|
|
LDA L0551E5
|
|
DEC
|
|
ASL
|
|
ASL
|
|
ASL
|
|
TAX
|
|
TXA
|
|
CLC
|
|
ADC #L052C1A
|
|
LDX #^L052C1A
|
|
BCC L11134E
|
|
INX
|
|
L11134E STA $01
|
|
STX $03
|
|
LDA L055027
|
|
LDX L055029
|
|
STA [$01]
|
|
TXA
|
|
LDY #$0002
|
|
STA [$01],Y
|
|
LDA L055039
|
|
LDX L05503B
|
|
LDY #$0004
|
|
STA [$01],Y
|
|
INY
|
|
INY
|
|
TXA
|
|
STA [$01],Y
|
|
PHY
|
|
TDC
|
|
CLC
|
|
ADC #$0069
|
|
PEA $0000
|
|
PHA
|
|
JSL L0953DD
|
|
PLA
|
|
STA $C5
|
|
L111381 TSC
|
|
CLC
|
|
ADC #$00CC
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|
|
L111389 ENT
|
|
PHD
|
|
TSC
|
|
CLC
|
|
ADC #$FFA6
|
|
TCS
|
|
TCD
|
|
PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0004
|
|
BNE L1113B4
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0054
|
|
PEA $0007
|
|
JSL L0E0656
|
|
BRA L1113E9
|
|
L1113B4 PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0005
|
|
BNE L1113D3
|
|
LDA #$0001
|
|
STA $01
|
|
LDA #$0001
|
|
STA $23
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $25
|
|
BRA L1113E9
|
|
L1113D3 TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA ^L050FE8
|
|
PEA L050FE8
|
|
PEA $0054
|
|
JSL L0313BE
|
|
L1113E9 PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0003
|
|
BNE L11140A
|
|
TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEA $0000
|
|
PEA $0022
|
|
PEA $0004
|
|
JSL L0E0656
|
|
L11140A PHY
|
|
JSL L0314F6
|
|
PLA
|
|
CMP #$0002
|
|
BNE L11141F
|
|
PHY
|
|
JSL L0E05E8
|
|
PLA
|
|
STA $55
|
|
BRA L111424
|
|
L11141F LDA #$0002
|
|
STA $55
|
|
L111424 TDC
|
|
CLC
|
|
ADC #$0001
|
|
PEA $0000
|
|
PHA
|
|
PEI $55
|
|
JSL L0E0184
|
|
TSC
|
|
CLC
|
|
ADC #$005A
|
|
TCS
|
|
PLD
|
|
RTL
|
|
|