mirror of
https://github.com/antoinevignau/source.git
synced 2024-12-29 11:30:55 +00:00
dfc90148c3
and not A2-3D1
4501 lines
94 KiB
ArmAsm
4501 lines
94 KiB
ArmAsm
*
|
|
* A2-3D2
|
|
* by Bruce Artwick
|
|
*
|
|
* (c) 1980, subLOGIC
|
|
* (d) 2024, Antoine Vignau
|
|
*
|
|
|
|
TYP BIN
|
|
ORG $006000
|
|
MX %11
|
|
LST OFF
|
|
|
|
*-----------------------------------
|
|
* FIRMWARE EQUATES
|
|
*-----------------------------------
|
|
|
|
TXTCLR EQU $C050
|
|
MIXSET EQU $C053
|
|
TXTPAGE1 EQU $C054
|
|
HIRES EQU $C057
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L6000 JMP L606C
|
|
JMP L6090
|
|
JMP L61F7
|
|
JMP L6210
|
|
|
|
L600C DB $08
|
|
DB $16
|
|
DB $08
|
|
DB $7E
|
|
DB $7E
|
|
DB $06
|
|
DB $08
|
|
DB $06
|
|
DB $08
|
|
DB $0F
|
|
DB $00
|
|
DB $F5
|
|
DB $F5
|
|
DB $3E
|
|
DB $10
|
|
DB $3E
|
|
DB $10
|
|
DB $00
|
|
DB $00
|
|
DB $D3
|
|
DB $74
|
|
DB $C3
|
|
DB $24
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $D2
|
|
DB $3F
|
|
DB $01
|
|
DB $3E
|
|
DB $50
|
|
DB $3E
|
|
DB $50
|
|
DB $00
|
|
DB $00
|
|
DB $D3
|
|
DB $74
|
|
DB $F1
|
|
DB $F1
|
|
DB $E3
|
|
DB $E3
|
|
DB $E3
|
|
DB $E3
|
|
DB $05
|
|
DB $00
|
|
DB $C3
|
|
DB $52
|
|
DB $01
|
|
DB $C2
|
|
DB $15
|
|
DB $01
|
|
DB $23
|
|
DB $00
|
|
DB $FE
|
|
DB $60
|
|
DB $FE
|
|
DB $60
|
|
DB $C3
|
|
DB $5E
|
|
DB $01
|
|
DB $C2
|
|
DB $0B
|
|
DB $01
|
|
DB $00
|
|
DB $15
|
|
DB $C3
|
|
DB $66
|
|
DB $01
|
|
DB $C2
|
|
DB $0F
|
|
DB $01
|
|
DB $C3
|
|
DB $00
|
|
DB $00
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L606C PHP
|
|
PHA
|
|
TXA
|
|
PHA
|
|
TYA
|
|
PHA
|
|
LDX #$60
|
|
L6074 LDA $5F,X
|
|
STA L600C-1,X
|
|
DEX
|
|
BNE L6074
|
|
JSR L6090
|
|
LDX #$60
|
|
L6081 LDA L600C-1,X
|
|
STA $5F,X
|
|
DEX
|
|
BNE L6081
|
|
PLA
|
|
TAY
|
|
PLA
|
|
TAX
|
|
PLA
|
|
PLP
|
|
RTS
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L6090 CLD
|
|
LDX #$21
|
|
LDA #$00
|
|
L6095 STA $7B,X
|
|
DEX
|
|
BNE L6095
|
|
LDA #>L7FC5
|
|
STA $9B+1
|
|
LDA #<L7FC5
|
|
STA $9B
|
|
LDA #$FD
|
|
STA $7E
|
|
STA $86
|
|
STA $8E
|
|
LDA #$7F
|
|
STA $7F
|
|
STA $87
|
|
STA $8F
|
|
LDA #$00
|
|
STA $BB
|
|
LDA #$20
|
|
STA $BC
|
|
LDA #$40
|
|
STA $BD
|
|
JMP L6118
|
|
|
|
L60C1 INY
|
|
LDA ($9B),Y
|
|
LDY #$01
|
|
STA ($9D),Y
|
|
DEY
|
|
LDA #$12
|
|
L60CB STA ($9D),Y
|
|
LDA #$02
|
|
CLC
|
|
CLC
|
|
ADC $9D
|
|
STA $9D
|
|
BCC L60D9
|
|
INC $9D+1
|
|
L60D9 JMP L63CA
|
|
|
|
L60DC DA L62E2
|
|
DA L6266
|
|
DA L62A0
|
|
DA L62C6
|
|
DA L63C5
|
|
DA L63D2
|
|
DA L63E3
|
|
DA L63F4
|
|
DA L7478
|
|
DA L7BFA
|
|
DA L6401
|
|
DA L6410
|
|
DA L7F4B
|
|
DA L641E
|
|
DA L6442
|
|
DA L6467
|
|
DA L642F
|
|
DA L643D
|
|
DA L7C28
|
|
DA L6D1C
|
|
DA L7F06
|
|
DA L710A
|
|
DA L713F
|
|
DA L7156
|
|
DA L7184
|
|
DA L719C
|
|
DA L71D4
|
|
DA L71E9
|
|
DA L721E
|
|
DA L722F
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L6118 LDA #$0A
|
|
STA $B1
|
|
L611C LDY #$00
|
|
LDA ($9B),Y
|
|
BMI L6126
|
|
CMP #$1E
|
|
BMI L612F
|
|
L6126 LDA $7D
|
|
BEQ L612E
|
|
LDA #$79
|
|
STA ($9D),Y
|
|
L612E RTS
|
|
|
|
L612F ASL
|
|
TAX
|
|
LDA L60DC,X
|
|
STA $A3
|
|
LDA L60DC+1,X
|
|
STA $A4
|
|
JMP ($00A3)
|
|
|
|
L613E DB $00
|
|
L613F DB $00
|
|
L6140 DB $00
|
|
L6141 DB $63
|
|
L6142 DB $FF
|
|
L6143 DB $7F
|
|
L6144 DB $FF
|
|
L6145 DB $7F
|
|
L6146 DB $00
|
|
|
|
L6147 DW $7FFF
|
|
DW $7FF5
|
|
DW $7FD7
|
|
DW $7FA6
|
|
DW $7F61
|
|
DW $7F09
|
|
DW $7E9C
|
|
DW $7E1C
|
|
DW $7D89
|
|
DW $7CE3
|
|
DW $7C29
|
|
DW $7B5C
|
|
DW $7A7C
|
|
DW $7989
|
|
DW $7883
|
|
DW $776B
|
|
DW $7640
|
|
DW $7503
|
|
DW $73B5
|
|
DW $7254
|
|
DW $70E1
|
|
DW $6F5E
|
|
DW $6DC9
|
|
DW $6C23
|
|
DW $6A6C
|
|
DW $6779
|
|
DW $66CE
|
|
DW $64E7
|
|
DW $62F1
|
|
DW $60EB
|
|
DW $5ED6
|
|
DW $5CB3
|
|
DW $5A81
|
|
DW $5842
|
|
DW $55F4
|
|
DW $539A
|
|
DW $5133
|
|
DW $4EBF
|
|
DW $4C3F
|
|
DW $49B3
|
|
DW $471C
|
|
DW $447A
|
|
DW $41CD
|
|
DW $3F16
|
|
DW $3C56
|
|
DW $398C
|
|
DW $36B9
|
|
DW $33DE
|
|
DW $30FB
|
|
DW $2E10
|
|
DW $2B1F
|
|
DW $2826
|
|
DW $2527
|
|
DW $2223
|
|
DW $1F19
|
|
DW $1C0B
|
|
DW $18F9
|
|
DW $15E1
|
|
DW $12C7
|
|
DW $0FAB
|
|
DW $0C8C
|
|
DW $096A
|
|
DW $0647
|
|
DW $0324
|
|
DW $0000
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L61C9 SEC
|
|
SBC #$40
|
|
L61CC TAX
|
|
BMI L61EE
|
|
L61CF CMP #$40
|
|
BMI L61E5
|
|
CLC
|
|
ADC #$7F
|
|
EOR #$FF
|
|
L61D8 ASL
|
|
TAY
|
|
SEC
|
|
LDA #$00
|
|
SBC L6147+1,Y
|
|
TAX
|
|
SBC L6147,Y
|
|
RTS
|
|
|
|
L61E5 ASL
|
|
TAY
|
|
LDX L6147+1,Y
|
|
LDA L6147,Y
|
|
RTS
|
|
|
|
L61EE EOR #$FF
|
|
CLC
|
|
ADC #$01
|
|
BPL L61CF
|
|
BMI L61D8
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L61F7 PHP
|
|
PHA
|
|
TXA
|
|
PHA
|
|
TYA
|
|
PHA
|
|
LDA L613E
|
|
JSR L61C9
|
|
L6203 STX L613F
|
|
STA L613E
|
|
PLA
|
|
TAY
|
|
PLA
|
|
TAX
|
|
PLA
|
|
PLP
|
|
RTS
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L6210 PHP
|
|
PHA
|
|
TXA
|
|
PHA
|
|
TYA
|
|
PHA
|
|
LDA L613E
|
|
JSR L61CC
|
|
JMP L6203
|
|
|
|
L621F DB $00
|
|
|
|
L6220 CLC
|
|
ADC $9B
|
|
STA $9B
|
|
BCC L6229
|
|
INC $9B+1
|
|
L6229 RTS
|
|
|
|
L622A LDY #$68
|
|
JSR L6862
|
|
JSR L6A90
|
|
LDX #$07
|
|
L6234 LDA $67,X
|
|
STA $6F,X
|
|
DEX
|
|
BNE L6234
|
|
LDA #$07
|
|
JSR L6220
|
|
LDA L621F
|
|
CMP #$02
|
|
BEQ L6261
|
|
LDA $66
|
|
AND $6E
|
|
RTS
|
|
|
|
L624C LDY #$60
|
|
JSR L6862
|
|
JSR L6A37
|
|
LDA #$07
|
|
JSR L6220
|
|
LDA L621F
|
|
CMP #$02
|
|
BEQ L6261
|
|
RTS
|
|
|
|
L6261 PLA
|
|
PLA
|
|
JMP L6118
|
|
|
|
L6266 JSR L624C
|
|
JSR L622A
|
|
BNE L62C3
|
|
LDA $66
|
|
BNE L6286
|
|
L6272 LDA $6E
|
|
BNE L6279
|
|
JMP L6333
|
|
|
|
L6279 LDA $7C
|
|
BNE L629B
|
|
JSR L6B03
|
|
DEC $B1
|
|
BEQ L62C3
|
|
BNE L6272
|
|
L6286 LDA $7C
|
|
BNE L629B
|
|
L628A JSR L6AE9
|
|
LDA $66
|
|
BEQ L6272
|
|
AND $6E
|
|
BNE L62C3
|
|
DEC $B1
|
|
BNE L628A
|
|
BEQ L62C3
|
|
L629B STA L6146
|
|
BNE L62C3
|
|
L62A0 LDX #$07
|
|
L62A2 LDA $6F,X
|
|
STA $5F,X
|
|
DEX
|
|
BNE L62A2
|
|
JSR L622A
|
|
BNE L62C3
|
|
LDA $66
|
|
BNE L6286
|
|
L62B2 LDA $6E
|
|
BEQ L6314
|
|
LDA $7C
|
|
BNE L629B
|
|
JSR L6B03
|
|
DEC $B1
|
|
BEQ L62C3
|
|
BNE L62B2
|
|
L62C3 JMP L6118
|
|
|
|
L62C6 LDX #$07
|
|
L62C8 LDA $6F,X
|
|
STA $67,X
|
|
DEX
|
|
BNE L62C8
|
|
JSR L624C
|
|
LDA $66
|
|
AND $6E
|
|
BNE L62C3
|
|
LDA $66
|
|
BNE L6286
|
|
LDA $6E
|
|
BNE L6279
|
|
BEQ L6324
|
|
L62E2 JSR L624C
|
|
LDA $66
|
|
BEQ L62EC
|
|
JMP L611C
|
|
|
|
L62EC LDY #$60
|
|
LDX #$9F
|
|
JSR L637C
|
|
TAY
|
|
LDX $9F
|
|
LDA $7D
|
|
BMI L6300
|
|
JSR L7571
|
|
JMP L611C
|
|
|
|
L6300 LDA #$0A
|
|
LDY #$00
|
|
STA ($9D),Y
|
|
INY
|
|
LDA $9F
|
|
STA ($9D),Y
|
|
INY
|
|
LDA $A0
|
|
STA ($9D),Y
|
|
LDA #$03
|
|
BPL L6370
|
|
L6314 LDA L6146
|
|
BNE L6333
|
|
LDA $A1
|
|
LDX $A2
|
|
STA $9F
|
|
STX $A0
|
|
JMP L633F
|
|
|
|
L6324 LDA L6146
|
|
BNE L6333
|
|
LDY #$60
|
|
LDX #$9F
|
|
JSR L637C
|
|
JMP L6346
|
|
|
|
L6333 LDA #$00
|
|
STA L6146
|
|
LDY #$60
|
|
LDX #$9F
|
|
JSR L637C
|
|
L633F LDY #$68
|
|
LDX #$A1
|
|
JSR L637C
|
|
L6346 LDA $7D
|
|
BNE L6360
|
|
LDA $9F
|
|
LDX $A0
|
|
STA $B3
|
|
STX $B4
|
|
LDA $A1
|
|
LDX $A2
|
|
STA $B5
|
|
STX $B6
|
|
JSR L75AD
|
|
JMP L6118
|
|
|
|
L6360 LDA #$06
|
|
LDY #$00
|
|
L6364 STA ($9D),Y
|
|
LDA |$009F,Y
|
|
INY
|
|
CPY #$05
|
|
BNE L6364
|
|
LDA #$05
|
|
L6370 CLC
|
|
ADC $9D
|
|
STA $9D
|
|
BCC L6379
|
|
INC $9E
|
|
L6379 JMP L6118
|
|
|
|
L637C STX $A7
|
|
STY $A8
|
|
LDA |$0004,Y
|
|
STA $7A
|
|
LDA |$0005,Y
|
|
STA $7B
|
|
LDX $00,Y
|
|
LDA |$0001,Y
|
|
JSR L65F3
|
|
LDA $79
|
|
L6394 LDX #$45
|
|
JSR L65B2
|
|
CLC
|
|
L639A ADC #$00
|
|
LDY $A7
|
|
STA |$0000,Y
|
|
LDY $A8
|
|
LDA |$0004,Y
|
|
STA $7A
|
|
LDA |$0005,Y
|
|
STA $7B
|
|
LDX $02,Y
|
|
LDA |$0003,Y
|
|
JSR L65F3
|
|
LDA $79
|
|
L63B7 LDX #$5E
|
|
JSR L65B2
|
|
CLC
|
|
L63BD ADC #$00
|
|
LDY $A7
|
|
STA |$0001,Y
|
|
RTS
|
|
|
|
L63C5 INY
|
|
LDA ($9B),Y
|
|
STA $7C
|
|
L63CA LDA #$02
|
|
L63CC JSR L6220
|
|
JMP L6118
|
|
|
|
L63D2 INY
|
|
LDA ($9B),Y
|
|
STA |$008F,Y
|
|
CPY #$09
|
|
BNE L63D2
|
|
JSR L6683
|
|
LDA #$0A
|
|
BNE L63CC
|
|
L63E3 INY
|
|
LDA ($9B),Y
|
|
STA |$00B2,Y
|
|
CPY #$04
|
|
BNE L63E3
|
|
JSR L75AD
|
|
L63F0 LDA #$05
|
|
BNE L63CC
|
|
L63F4 INY
|
|
LDA ($9B),Y
|
|
STA L63FC+1
|
|
LDA #$00
|
|
L63FC STA TXTPAGE1
|
|
BEQ L63CA
|
|
L6401 INY
|
|
LDA ($9B),Y
|
|
TAX
|
|
INY
|
|
LDA ($9B),Y
|
|
TAY
|
|
JSR L7571
|
|
L640C LDA #$03
|
|
BNE L63CC
|
|
L6410 INY
|
|
LDA ($9B),Y
|
|
TAX
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $9B+1
|
|
STX $9B
|
|
JMP L611C
|
|
|
|
L641E LDA #$FF
|
|
STA $7D
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $9D
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $9E
|
|
JMP L640C
|
|
|
|
L642F LDA #$00
|
|
STA MIXSET
|
|
STA HIRES
|
|
STA TXTCLR
|
|
STA TXTPAGE1
|
|
L643D LDA #$01
|
|
JMP L63CC
|
|
|
|
L6442 INY
|
|
LDA ($9B),Y
|
|
CLC
|
|
ROR
|
|
SEC
|
|
SBC #$01
|
|
STA L6394+1
|
|
INY
|
|
LDA ($9B),Y
|
|
CLC
|
|
ROR
|
|
SEC
|
|
SBC #$01
|
|
STA L63B7+1
|
|
INY
|
|
LDA ($9B),Y
|
|
STA L639A+1
|
|
INY
|
|
LDA ($9B),Y
|
|
STA L63BD+1
|
|
JMP L63F0
|
|
|
|
L6467 INY
|
|
LDA ($9B),Y
|
|
STA L613F,Y
|
|
CPY #$06
|
|
BNE L6467
|
|
LDA #$07
|
|
JMP L63CC
|
|
|
|
L6476 STA $A3
|
|
LDA $00,X
|
|
STA $78
|
|
LDA $01,X
|
|
STA $79
|
|
LDA |$0000,Y
|
|
STA $7A
|
|
LDA |$0001,Y
|
|
STA $7B
|
|
JSR L6495
|
|
LDY $A3
|
|
STA |$0000,Y
|
|
STX $01,Y
|
|
RTS
|
|
|
|
L6495 LDA $78
|
|
ORA $79
|
|
BEQ L64A1
|
|
LDA $7A
|
|
ORA $7B
|
|
BNE L64A6
|
|
L64A1 LDA #$00
|
|
LDX #$00
|
|
RTS
|
|
|
|
L64A6 LDA $79
|
|
EOR $7B
|
|
TAY
|
|
LDA $79
|
|
BMI L64BD
|
|
LDA #$FF
|
|
EOR $78
|
|
STA $78
|
|
LDA #$FF
|
|
EOR $79
|
|
STA $79
|
|
BMI L64C5
|
|
L64BD LDA $78
|
|
BNE L64C3
|
|
DEC $79
|
|
L64C3 DEC $78
|
|
L64C5 LDA $7B
|
|
BPL L64D6
|
|
LDA #$00
|
|
SEC
|
|
SBC $7A
|
|
STA $7A
|
|
LDA #$00
|
|
SBC $7B
|
|
STA $7B
|
|
L64D6 LSR $78
|
|
BCC L64DC
|
|
LDA #$00
|
|
L64DC LSR
|
|
ROR $78
|
|
BCS L64E3
|
|
ADC $7B
|
|
L64E3 LSR
|
|
ROR $78
|
|
BCS L64EA
|
|
ADC $7B
|
|
L64EA LSR
|
|
ROR $78
|
|
BCS L64F1
|
|
ADC $7B
|
|
L64F1 LSR
|
|
ROR $78
|
|
BCS L64F8
|
|
ADC $7B
|
|
L64F8 LSR
|
|
ROR $78
|
|
BCS L64FF
|
|
ADC $7B
|
|
L64FF LSR
|
|
LDX #$00
|
|
STX $A5
|
|
LSR $78
|
|
BCS L6512
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6512 LSR
|
|
ROR $A5
|
|
LSR $78
|
|
BCS L6523
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6523 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L6534
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6534 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L6545
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6545 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L6556
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6556 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L6567
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6567 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L6578
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6578 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L6589
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L6589 LSR
|
|
ROR $A5
|
|
LSR $79
|
|
BCS L659A
|
|
TAX
|
|
LDA $A5
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
L659A LSR
|
|
ROR $A5
|
|
CPY #$00
|
|
BPL L65AE
|
|
STA $A6
|
|
LDA #$00
|
|
SEC
|
|
SBC $A5
|
|
STA $A5
|
|
LDA #$00
|
|
SBC $A6
|
|
L65AE TAX
|
|
LDA $A5
|
|
RTS
|
|
|
|
L65B2 EOR #$FF
|
|
STA $78
|
|
STX $7B
|
|
LDA #$00
|
|
ROR $78
|
|
BCS L65BF
|
|
TXA
|
|
L65BF LSR
|
|
ROR $78
|
|
BCS L65C6
|
|
ADC $7B
|
|
L65C6 LSR
|
|
ROR $78
|
|
BCS L65CD
|
|
ADC $7B
|
|
L65CD LSR
|
|
ROR $78
|
|
BCS L65D4
|
|
ADC $7B
|
|
L65D4 LSR
|
|
ROR $78
|
|
BCS L65DB
|
|
ADC $7B
|
|
L65DB LSR
|
|
ROR $78
|
|
BCS L65E2
|
|
ADC $7B
|
|
L65E2 LSR
|
|
ROR $78
|
|
BCS L65E9
|
|
ADC $7B
|
|
L65E9 LSR
|
|
ROR $78
|
|
BCS L65F2
|
|
SEC
|
|
SEC
|
|
SBC $7B
|
|
L65F2 RTS
|
|
|
|
L65F3 ORA #$00
|
|
BMI L6603
|
|
LDY $7B
|
|
BMI L65FD
|
|
BPL L6641
|
|
L65FD JSR L6620
|
|
JMP L6630
|
|
|
|
L6603 JSR L6612
|
|
LDY $7B
|
|
BMI L660C
|
|
BPL L6630
|
|
L660C JSR L6620
|
|
JMP L6641
|
|
|
|
L6612 TAY
|
|
TXA
|
|
EOR #$FF
|
|
CLC
|
|
ADC #$01
|
|
TAX
|
|
TYA
|
|
EOR #$FF
|
|
ADC #$00
|
|
RTS
|
|
|
|
L6620 TAY
|
|
LDA #$00
|
|
SEC
|
|
SBC $7A
|
|
STA $7A
|
|
LDA #$00
|
|
SBC $7B
|
|
STA $7B
|
|
TYA
|
|
RTS
|
|
|
|
L6630 JSR L6641
|
|
LDA #$00
|
|
SEC
|
|
SBC $78
|
|
STA $78
|
|
LDA #$00
|
|
SBC $79
|
|
STA $79
|
|
RTS
|
|
|
|
L6641 LDY #$0F
|
|
STX $A5
|
|
L6645 TAX
|
|
LDA $A5
|
|
SEC
|
|
SBC $7A
|
|
STA $A5
|
|
TXA
|
|
SBC $7B
|
|
BMI L665F
|
|
L6652 SEC
|
|
ROL $78
|
|
ROL $79
|
|
ASL $A5
|
|
ROL
|
|
DEY
|
|
BNE L6645
|
|
BEQ L6678
|
|
L665F ASL $78
|
|
ROL $79
|
|
ASL $A5
|
|
ROL
|
|
DEY
|
|
BEQ L6678
|
|
TAX
|
|
LDA $A5
|
|
CLC
|
|
ADC $7A
|
|
STA $A5
|
|
TXA
|
|
ADC $7B
|
|
BMI L665F
|
|
BPL L6652
|
|
L6678 ASL $78
|
|
ROL $79
|
|
BPL L6682
|
|
DEC $78
|
|
DEC $79
|
|
L6682 RTS
|
|
|
|
L6683 LDA $96
|
|
JSR L61C9
|
|
STA $60
|
|
STX $61
|
|
LDA $97
|
|
JSR L61C9
|
|
STA $62
|
|
STX $63
|
|
LDA $98
|
|
JSR L61C9
|
|
STA $64
|
|
STX $65
|
|
LDA $96
|
|
JSR L61CC
|
|
STA $66
|
|
STX $67
|
|
LDA $97
|
|
JSR L61CC
|
|
STA $68
|
|
STX $69
|
|
LDA $98
|
|
JSR L61CC
|
|
STA $6A
|
|
STX $6B
|
|
LDX #$6A
|
|
LDY #$68
|
|
LDA #$6C
|
|
JSR L6476
|
|
LDX #$64
|
|
LDY #$62
|
|
LDA #$6E
|
|
JSR L6476
|
|
LDX #$6A
|
|
LDY #$62
|
|
LDA #$70
|
|
JSR L6476
|
|
LDX #$64
|
|
LDY #$68
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$60
|
|
LDY #$6E
|
|
LDA #$74
|
|
JSR L6476
|
|
LDX #$60
|
|
LDY #$72
|
|
LDA #$76
|
|
JSR L6476
|
|
LDX #$70
|
|
LDY #$60
|
|
LDA #$B3
|
|
JSR L6476
|
|
LDX #$60
|
|
LDY #$6C
|
|
LDA #$B5
|
|
JSR L6476
|
|
CLC
|
|
LDA $6C
|
|
ADC $74
|
|
STA $7E
|
|
LDA $6D
|
|
ADC $75
|
|
STA $7F
|
|
SEC
|
|
LDA $76
|
|
SBC $70
|
|
STA $80
|
|
LDA $77
|
|
SBC $71
|
|
STA $81
|
|
LDX #$64
|
|
LDY #$66
|
|
LDA #$82
|
|
JSR L6476
|
|
LDX #$62
|
|
LDY #$66
|
|
LDA #$84
|
|
JSR L6476
|
|
LDX #$66
|
|
LDY #$68
|
|
LDA #$86
|
|
JSR L6476
|
|
LDA #$00
|
|
SEC
|
|
SBC $60
|
|
STA $88
|
|
LDA #$00
|
|
SBC $61
|
|
STA $89
|
|
SEC
|
|
LDA $B3
|
|
SBC $72
|
|
STA $8A
|
|
LDA $B4
|
|
SBC $73
|
|
STA $8B
|
|
CLC
|
|
LDA $6E
|
|
ADC $B5
|
|
STA $8C
|
|
LDA $6F
|
|
ADC $B6
|
|
STA $8D
|
|
LDX #$6A
|
|
LDY #$66
|
|
LDA #$8E
|
|
JSR L6476
|
|
LDX L6141
|
|
CPX #$7F
|
|
BNE L6774
|
|
LDA L6140
|
|
CMP #$FF
|
|
BEQ L67B9
|
|
L6774 STA $78
|
|
STX $79
|
|
LDA $7E
|
|
LDX $7F
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $7E
|
|
STX $7F
|
|
LDA $84
|
|
LDX $85
|
|
STA $78
|
|
STX $79
|
|
LDA L6140
|
|
LDX L6141
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $84
|
|
STX $85
|
|
LDA $8A
|
|
LDX $8B
|
|
STA $78
|
|
STX $79
|
|
LDA L6140
|
|
LDX L6141
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $8A
|
|
STX $8B
|
|
L67B9 LDX L6143
|
|
CPX #$7F
|
|
BNE L67C7
|
|
LDA L6142
|
|
CMP #$FF
|
|
BEQ L680C
|
|
L67C7 STA $78
|
|
STX $79
|
|
LDA $80
|
|
LDX $81
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $80
|
|
STX $81
|
|
LDA L6142
|
|
LDX L6143
|
|
STA $78
|
|
STX $79
|
|
LDA $86
|
|
LDX $87
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $86
|
|
STX $87
|
|
LDA L6142
|
|
LDX L6143
|
|
STA $78
|
|
STX $79
|
|
LDA $8C
|
|
LDX $8D
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $8C
|
|
STX $8D
|
|
L680C LDX L6145
|
|
CPX #$7F
|
|
BNE L681A
|
|
LDA L6144
|
|
CMP #$FF
|
|
BEQ L685F
|
|
L681A STA $78
|
|
STX $79
|
|
LDA $82
|
|
LDX $83
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $82
|
|
STX $83
|
|
LDA L6144
|
|
LDX L6145
|
|
STA $78
|
|
STX $79
|
|
LDA $88
|
|
LDX $89
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $88
|
|
STX $89
|
|
LDA L6144
|
|
LDX L6145
|
|
STA $78
|
|
STX $79
|
|
LDA $8E
|
|
LDX $8F
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
STA $8E
|
|
STX $8F
|
|
L685F RTS
|
|
|
|
L6860 DB $00
|
|
L6861 DB $00
|
|
|
|
L6862 STY $B2
|
|
LDY #$01
|
|
LDA ($9B),Y
|
|
INY
|
|
SEC
|
|
SBC $90
|
|
STA $AB
|
|
LDA ($9B),Y
|
|
INY
|
|
SBC $91
|
|
BVC L6878
|
|
JMP L69AC
|
|
|
|
L6878 STA $AC
|
|
LDA ($9B),Y
|
|
INY
|
|
SEC
|
|
SBC $92
|
|
STA $AD
|
|
LDA ($9B),Y
|
|
INY
|
|
SBC $93
|
|
BVC L688C
|
|
JMP L69E2
|
|
|
|
L688C STA $AE
|
|
LDA ($9B),Y
|
|
INY
|
|
SEC
|
|
SBC $94
|
|
STA $AF
|
|
LDA ($9B),Y
|
|
INY
|
|
SBC $95
|
|
BVC L68A0
|
|
JMP L69F1
|
|
|
|
L68A0 STA $B0
|
|
L68A2 LDA $AC
|
|
AND #$C0
|
|
BEQ L68AC
|
|
CMP #$C0
|
|
BNE L68C0
|
|
L68AC LDA $AE
|
|
AND #$C0
|
|
BEQ L68B6
|
|
CMP #$C0
|
|
BNE L68C0
|
|
L68B6 LDA $B0
|
|
AND #$C0
|
|
BEQ L68DA
|
|
CMP #$C0
|
|
BEQ L68DA
|
|
L68C0 LDA L621F
|
|
BNE L68DA
|
|
LDA $AC
|
|
ROL
|
|
ROR $AC
|
|
ROR $AB
|
|
LDA $AE
|
|
ROL
|
|
ROR $AE
|
|
ROR $AD
|
|
LDA $B0
|
|
ROL
|
|
ROR $B0
|
|
ROR $AF
|
|
L68DA LDA #$00
|
|
STA L6860
|
|
STA L6861
|
|
LDX #$AB
|
|
LDY #$7E
|
|
LDA #$A7
|
|
JSR L6476
|
|
LDX #$AD
|
|
LDY #$84
|
|
LDA #$A9
|
|
JSR L6476
|
|
LDA $AF
|
|
LDX $B0
|
|
STA $78
|
|
STX $79
|
|
LDA $8A
|
|
LDX $8B
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
JSR L6A07
|
|
LDX #$AB
|
|
LDY #$80
|
|
LDA #$A7
|
|
JSR L6476
|
|
LDX #$AD
|
|
LDY #$86
|
|
LDA #$A9
|
|
JSR L6476
|
|
LDA $AF
|
|
LDX $B0
|
|
STA $78
|
|
STX $79
|
|
LDA $8C
|
|
LDX $8D
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
JSR L6A07
|
|
LDX #$AB
|
|
LDY #$82
|
|
LDA #$A7
|
|
JSR L6476
|
|
LDX #$AD
|
|
LDY #$88
|
|
LDA #$A9
|
|
JSR L6476
|
|
LDA $AF
|
|
LDX $B0
|
|
STA $78
|
|
STX $79
|
|
LDA $8E
|
|
LDX $8F
|
|
STA $7A
|
|
STX $7B
|
|
JSR L6495
|
|
JSR L6A07
|
|
LDA L621F
|
|
BEQ L6962
|
|
JSR L7205
|
|
L6962 LDX $B2
|
|
LDA L6861
|
|
BEQ L697F
|
|
LDA $FF,X
|
|
ROL
|
|
ROR $FF,X
|
|
ROR $FE,X
|
|
LDA $FD,X
|
|
ROL
|
|
ROR $FD,X
|
|
ROR $FC,X
|
|
LDA $FB,X
|
|
ROL
|
|
ROR $FB,X
|
|
ROR $FA,X
|
|
RTS
|
|
|
|
L697F LDA L6860
|
|
BNE L69AB
|
|
LDA $FE,X
|
|
ASL
|
|
ROL $FF,X
|
|
ASL
|
|
ROL $FF,X
|
|
ASL
|
|
ROL $FF,X
|
|
STA $FE,X
|
|
LDA $FC,X
|
|
ASL
|
|
ROL $FD,X
|
|
ASL
|
|
ROL $FD,X
|
|
ASL
|
|
ROL $FD,X
|
|
STA $FC,X
|
|
LDA $FA,X
|
|
ASL
|
|
ROL $FB,X
|
|
ASL
|
|
ROL $FB,X
|
|
ASL
|
|
ROL $FB,X
|
|
STA $FA,X
|
|
L69AB RTS
|
|
|
|
L69AC ROR
|
|
STA $AC
|
|
ROR $AB
|
|
LDA ($9B),Y
|
|
INY
|
|
SEC
|
|
SBC $92
|
|
STA $AD
|
|
LDA ($9B),Y
|
|
INY
|
|
SBC $93
|
|
BVS L69C4
|
|
STA $AE
|
|
ROL $AE
|
|
L69C4 ROR
|
|
STA $AE
|
|
ROR $AD
|
|
L69C9 LDA ($9B),Y
|
|
INY
|
|
SEC
|
|
SBC $94
|
|
STA $AF
|
|
LDA ($9B),Y
|
|
INY
|
|
SBC $95
|
|
BVS L69DA
|
|
CMP #$80
|
|
L69DA ROR
|
|
STA $B0
|
|
ROR $AF
|
|
JMP L68A2
|
|
|
|
L69E2 ROR
|
|
STA $AE
|
|
ROR $AD
|
|
LDA $AC
|
|
ROL
|
|
ROR $AC
|
|
ROR $AB
|
|
JMP L69C9
|
|
|
|
L69F1 ROR
|
|
STA $B0
|
|
ROR $AF
|
|
LDA $AE
|
|
ROL
|
|
ROR $AE
|
|
ROR $AD
|
|
LDA $AC
|
|
ROL
|
|
ROR $AC
|
|
ROR $AB
|
|
JMP L68A2
|
|
|
|
L6A07 CLC
|
|
ADC $A7
|
|
TAY
|
|
TXA
|
|
ADC $A8
|
|
TAX
|
|
TYA
|
|
CLC
|
|
ADC $A9
|
|
TAY
|
|
TXA
|
|
ADC $AA
|
|
LDX $B2
|
|
STA $01,X
|
|
STY $00,X
|
|
INC $B2
|
|
INC $B2
|
|
TAX
|
|
BEQ L6A36
|
|
CMP #$FF
|
|
BEQ L6A36
|
|
INC L6860
|
|
AND #$E0
|
|
BEQ L6A36
|
|
CMP #$E0
|
|
BEQ L6A36
|
|
INC L6861
|
|
L6A36 RTS
|
|
|
|
L6A37 LDX #$00
|
|
LDA $60
|
|
CLC
|
|
ADC $64
|
|
LDA $61
|
|
ADC $65
|
|
BMI L6A48
|
|
BVC L6A4C
|
|
BVS L6A4A
|
|
L6A48 BVS L6A4C
|
|
L6A4A LDX #$40
|
|
L6A4C LDA $64
|
|
SEC
|
|
SBC $60
|
|
LDA $65
|
|
SBC $61
|
|
BMI L6A5B
|
|
BVC L6A61
|
|
BVS L6A5D
|
|
L6A5B BVS L6A61
|
|
L6A5D TXA
|
|
ORA #$20
|
|
TAX
|
|
L6A61 LDA $62
|
|
CLC
|
|
ADC $64
|
|
LDA $63
|
|
ADC $65
|
|
BMI L6A70
|
|
BVC L6A76
|
|
BVS L6A72
|
|
L6A70 BVS L6A76
|
|
L6A72 TXA
|
|
ORA #$10
|
|
TAX
|
|
L6A76 LDA $64
|
|
SEC
|
|
SBC $62
|
|
LDA $65
|
|
SBC $63
|
|
BMI L6A85
|
|
BVC L6A8D
|
|
BVS L6A87
|
|
L6A85 BVS L6A8D
|
|
L6A87 TXA
|
|
ORA #$08
|
|
STA $66
|
|
RTS
|
|
|
|
L6A8D STX $66
|
|
RTS
|
|
|
|
L6A90 LDX #$00
|
|
LDA $68
|
|
CLC
|
|
ADC $6C
|
|
LDA $69
|
|
ADC $6D
|
|
BMI L6AA1
|
|
BVC L6AA5
|
|
BVS L6AA3
|
|
L6AA1 BVS L6AA5
|
|
L6AA3 LDX #$40
|
|
L6AA5 LDA $6C
|
|
SEC
|
|
SBC $68
|
|
LDA $6D
|
|
SBC $69
|
|
BMI L6AB4
|
|
BVC L6ABA
|
|
BVS L6AB6
|
|
L6AB4 BVS L6ABA
|
|
L6AB6 TXA
|
|
ORA #$20
|
|
TAX
|
|
L6ABA LDA $6A
|
|
CLC
|
|
ADC $6C
|
|
LDA $6B
|
|
ADC $6D
|
|
BMI L6AC9
|
|
BVC L6ACF
|
|
BVS L6ACB
|
|
L6AC9 BVS L6ACF
|
|
L6ACB TXA
|
|
ORA #$10
|
|
TAX
|
|
L6ACF LDA $6C
|
|
SEC
|
|
SBC $6A
|
|
LDA $6D
|
|
SBC $6B
|
|
BMI L6ADE
|
|
BVC L6AE6
|
|
BVS L6AE0
|
|
L6ADE BVS L6AE6
|
|
L6AE0 TXA
|
|
ORA #$08
|
|
STA $6E
|
|
RTS
|
|
|
|
L6AE6 STX $6E
|
|
RTS
|
|
|
|
L6AE9 JSR L6AF3
|
|
JSR L6B03
|
|
JSR L6AF3
|
|
RTS
|
|
|
|
L6AF3 LDY #$08
|
|
L6AF5 LDA |$005F,Y
|
|
LDX $67,Y
|
|
STA |$0067,Y
|
|
STX $5F,Y
|
|
DEY
|
|
BNE L6AF5
|
|
RTS
|
|
|
|
L6B03 LDA $6E
|
|
AND #$BF
|
|
BEQ L6B13
|
|
AND #$DF
|
|
BEQ L6B16
|
|
AND #$EF
|
|
BEQ L6B19
|
|
BNE L6B1C
|
|
L6B13 JMP L6C97
|
|
L6B16 JMP L6C1C
|
|
L6B19 JMP L6B97
|
|
|
|
L6B1C SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $62
|
|
SEC
|
|
SBC $6A
|
|
TAX
|
|
LDA $63
|
|
SBC $6B
|
|
TAY
|
|
TXA
|
|
SEC
|
|
SBC $7A
|
|
STA $7A
|
|
TYA
|
|
SBC $7B
|
|
STA $7B
|
|
LDA $6C
|
|
SEC
|
|
SBC $6A
|
|
TAX
|
|
LDA $6D
|
|
SBC $6B
|
|
JSR L65F3
|
|
SEC
|
|
LDA $60
|
|
SBC $68
|
|
STA $7A
|
|
LDA $61
|
|
SBC $69
|
|
STA $7B
|
|
LDA $78
|
|
LDX $79
|
|
STA $A7
|
|
STX $A8
|
|
JSR L6495
|
|
CLC
|
|
ADC $68
|
|
STA $68
|
|
TXA
|
|
ADC $69
|
|
STA $69
|
|
SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $A7
|
|
LDX $A8
|
|
STA $78
|
|
STX $79
|
|
JSR L6495
|
|
CLC
|
|
ADC $6C
|
|
STA $6C
|
|
STA $6A
|
|
TXA
|
|
ADC $6D
|
|
STA $6D
|
|
STA $6B
|
|
JMP L6A90
|
|
|
|
L6B97 SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $6A
|
|
SEC
|
|
SBC $62
|
|
TAX
|
|
LDA $6B
|
|
SBC $63
|
|
TAY
|
|
TXA
|
|
SEC
|
|
SBC $7A
|
|
STA $7A
|
|
TYA
|
|
SBC $7B
|
|
STA $7B
|
|
LDA $6C
|
|
CLC
|
|
ADC $6A
|
|
TAX
|
|
LDA $6D
|
|
ADC $6B
|
|
JSR L65F3
|
|
SEC
|
|
LDA $60
|
|
SBC $68
|
|
STA $7A
|
|
LDA $61
|
|
SBC $69
|
|
STA $7B
|
|
LDA $78
|
|
LDX $79
|
|
STA $A7
|
|
STX $A8
|
|
JSR L6495
|
|
CLC
|
|
ADC $68
|
|
STA $68
|
|
TXA
|
|
ADC $69
|
|
STA $69
|
|
SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $A7
|
|
LDX $A8
|
|
STA $78
|
|
STX $79
|
|
JSR L6495
|
|
CLC
|
|
ADC $6C
|
|
STA $6C
|
|
EOR #$FF
|
|
STA $6A
|
|
TXA
|
|
ADC $6D
|
|
STA $6D
|
|
EOR #$FF
|
|
STA $6B
|
|
INC $6A
|
|
BNE L6C19
|
|
INC $6B
|
|
L6C19 JMP L6A90
|
|
|
|
L6C1C SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $60
|
|
SEC
|
|
SBC $68
|
|
TAX
|
|
LDA $61
|
|
SBC $69
|
|
TAY
|
|
TXA
|
|
SEC
|
|
SBC $7A
|
|
STA $7A
|
|
TYA
|
|
SBC $7B
|
|
STA $7B
|
|
LDA $6C
|
|
SEC
|
|
SBC $68
|
|
TAX
|
|
LDA $6D
|
|
SBC $69
|
|
JSR L65F3
|
|
SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $78
|
|
LDX $79
|
|
STA $A7
|
|
STX $A8
|
|
JSR L6495
|
|
CLC
|
|
ADC $6C
|
|
STA $6C
|
|
STA $68
|
|
TXA
|
|
ADC $6D
|
|
STA $6D
|
|
STA $69
|
|
SEC
|
|
LDA $62
|
|
SBC $6A
|
|
STA $7A
|
|
LDA $63
|
|
SBC $6B
|
|
STA $7B
|
|
LDA $A7
|
|
LDX $A8
|
|
STA $78
|
|
STX $79
|
|
JSR L6495
|
|
CLC
|
|
ADC $6A
|
|
STA $6A
|
|
TXA
|
|
ADC $6B
|
|
STA $6B
|
|
JMP L6A90
|
|
|
|
L6C97 SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $68
|
|
SEC
|
|
SBC $60
|
|
TAX
|
|
LDA $69
|
|
SBC $61
|
|
TAY
|
|
TXA
|
|
SEC
|
|
SBC $7A
|
|
STA $7A
|
|
TYA
|
|
SBC $7B
|
|
STA $7B
|
|
LDA $6C
|
|
CLC
|
|
ADC $68
|
|
TAX
|
|
LDA $6D
|
|
ADC $69
|
|
JSR L65F3
|
|
SEC
|
|
LDA $62
|
|
SBC $6A
|
|
STA $7A
|
|
LDA $63
|
|
SBC $6B
|
|
STA $7B
|
|
LDA $78
|
|
LDX $79
|
|
STA $A7
|
|
STX $A8
|
|
JSR L6495
|
|
CLC
|
|
ADC $6A
|
|
STA $6A
|
|
TXA
|
|
ADC $6B
|
|
STA $6B
|
|
SEC
|
|
LDA $64
|
|
SBC $6C
|
|
STA $7A
|
|
LDA $65
|
|
SBC $6D
|
|
STA $7B
|
|
LDA $A7
|
|
LDX $A8
|
|
STA $78
|
|
STX $79
|
|
JSR L6495
|
|
CLC
|
|
ADC $6C
|
|
STA $6C
|
|
EOR #$FF
|
|
STA $68
|
|
TXA
|
|
ADC $6D
|
|
STA $6D
|
|
EOR #$FF
|
|
STA $69
|
|
INC $68
|
|
BNE L6D19
|
|
INC $69
|
|
L6D19 JMP L6A90
|
|
|
|
L6D1C INY
|
|
LDA ($9B),Y
|
|
BNE L6D24
|
|
JMP L70F3
|
|
|
|
L6D24 CMP #$FF
|
|
BEQ L6D2D
|
|
SEC
|
|
SBC #$01
|
|
STA ($9B),Y
|
|
L6D2D LDX #$1E
|
|
L6D2F LDA $7E,X
|
|
PHA
|
|
DEX
|
|
BPL L6D2F
|
|
LDX #$90
|
|
JSR L70F8
|
|
JSR L70F8
|
|
JSR L70F8
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $96
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $97
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $98
|
|
INY
|
|
LDA ($9B),Y
|
|
PHA
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $9B+1
|
|
PLA
|
|
STA $9B
|
|
LDA $96
|
|
JSR L61C9
|
|
STA $60
|
|
STX $61
|
|
LDA $97
|
|
JSR L61C9
|
|
STA $64
|
|
STX $65
|
|
LDA $98
|
|
JSR L61C9
|
|
STA $68
|
|
STX $69
|
|
LDA $96
|
|
JSR L61CC
|
|
STA $62
|
|
STX $63
|
|
LDA $97
|
|
JSR L61CC
|
|
STA $66
|
|
STX $67
|
|
LDA $98
|
|
JSR L61CC
|
|
STA $6A
|
|
STX $6B
|
|
LDX #$90
|
|
LDY #$6A
|
|
LDA #$AB
|
|
JSR L6476
|
|
LDX #$90
|
|
LDY #$68
|
|
LDA #$AF
|
|
JSR L6476
|
|
LDX #$94
|
|
LDY #$68
|
|
LDA #$AD
|
|
JSR L6476
|
|
SEC
|
|
LDA $AB
|
|
SBC $AD
|
|
STA $90
|
|
LDA $AC
|
|
SBC $AE
|
|
STA $91
|
|
LDX #$94
|
|
LDY #$6A
|
|
LDA #$AD
|
|
JSR L6476
|
|
CLC
|
|
LDA $AD
|
|
ADC $AF
|
|
STA $94
|
|
LDA $AE
|
|
ADC $B0
|
|
STA $95
|
|
LDX #$92
|
|
LDY #$62
|
|
LDA #$AB
|
|
JSR L6476
|
|
LDX #$92
|
|
LDY #$60
|
|
LDA #$AF
|
|
JSR L6476
|
|
LDX #$94
|
|
LDY #$60
|
|
LDA #$AD
|
|
JSR L6476
|
|
CLC
|
|
LDA $AB
|
|
ADC $AD
|
|
STA $92
|
|
LDA $AC
|
|
ADC $AE
|
|
STA $93
|
|
LDX #$94
|
|
LDY #$62
|
|
LDA #$AD
|
|
JSR L6476
|
|
SEC
|
|
LDA $AD
|
|
SBC $AF
|
|
STA $94
|
|
LDA $AE
|
|
SBC $B0
|
|
STA $95
|
|
LDX #$90
|
|
LDY #$66
|
|
LDA #$AB
|
|
JSR L6476
|
|
LDX #$90
|
|
LDY #$64
|
|
LDA #$AF
|
|
JSR L6476
|
|
LDX #$92
|
|
LDY #$64
|
|
LDA #$AD
|
|
JSR L6476
|
|
CLC
|
|
LDA $AB
|
|
ADC $AD
|
|
STA $90
|
|
LDA $AC
|
|
ADC $AE
|
|
STA $91
|
|
LDX #$92
|
|
LDY #$66
|
|
LDA #$AD
|
|
JSR L6476
|
|
SEC
|
|
LDA $AD
|
|
SBC $AF
|
|
STA $92
|
|
LDA $AE
|
|
SBC $B0
|
|
STA $93
|
|
LDA #$00
|
|
SEC
|
|
SBC $68
|
|
STA $74
|
|
LDA #$00
|
|
SBC $69
|
|
STA $75
|
|
LDX #$6A
|
|
LDY #$7E
|
|
LDA #$6C
|
|
JSR L6476
|
|
LDX #$74
|
|
LDY #$8A
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $6C
|
|
ADC $72
|
|
STA $6C
|
|
LDA $6D
|
|
ADC $73
|
|
STA $6D
|
|
LDX #$6A
|
|
LDY #$80
|
|
LDA #$6E
|
|
JSR L6476
|
|
LDX #$74
|
|
LDY #$8C
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $6E
|
|
ADC $72
|
|
STA $6E
|
|
LDA $6F
|
|
ADC $73
|
|
STA $6F
|
|
LDX #$6A
|
|
LDY #$82
|
|
LDA #$70
|
|
JSR L6476
|
|
LDX #$74
|
|
LDY #$8E
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $70
|
|
ADC $72
|
|
STA $70
|
|
LDA $71
|
|
ADC $73
|
|
STA $71
|
|
LDX #$68
|
|
LDY #$7E
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$6A
|
|
LDY #$8A
|
|
LDA #$8A
|
|
JSR L6476
|
|
CLC
|
|
LDA $8A
|
|
ADC $72
|
|
STA $8A
|
|
LDA $8B
|
|
ADC $73
|
|
STA $8B
|
|
LDA $6C
|
|
LDX $6D
|
|
STA $7E
|
|
STX $7F
|
|
LDX #$68
|
|
LDY #$80
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$6A
|
|
LDY #$8C
|
|
LDA #$8C
|
|
JSR L6476
|
|
CLC
|
|
LDA $8C
|
|
ADC $72
|
|
STA $8C
|
|
LDA $8D
|
|
ADC $73
|
|
STA $8D
|
|
LDA $6E
|
|
LDX $6F
|
|
STA $80
|
|
STX $81
|
|
LDX #$68
|
|
LDY #$82
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$6A
|
|
LDY #$8E
|
|
LDA #$8E
|
|
JSR L6476
|
|
CLC
|
|
LDA $8E
|
|
ADC $72
|
|
STA $8E
|
|
LDA $8F
|
|
ADC $73
|
|
STA $8F
|
|
LDA $70
|
|
LDX $71
|
|
STA $82
|
|
STX $83
|
|
LDA #$00
|
|
SEC
|
|
SBC $60
|
|
STA $74
|
|
LDA #$00
|
|
SBC $61
|
|
STA $75
|
|
LDX #$62
|
|
LDY #$84
|
|
LDA #$6C
|
|
JSR L6476
|
|
LDX #$60
|
|
LDY #$8A
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $6C
|
|
ADC $72
|
|
STA $6C
|
|
LDA $6D
|
|
ADC $73
|
|
STA $6D
|
|
LDX #$62
|
|
LDY #$86
|
|
LDA #$6E
|
|
JSR L6476
|
|
LDX #$60
|
|
LDY #$8C
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $6E
|
|
ADC $72
|
|
STA $6E
|
|
LDA $6F
|
|
ADC $73
|
|
STA $6F
|
|
LDX #$62
|
|
LDY #$88
|
|
LDA #$70
|
|
JSR L6476
|
|
LDX #$60
|
|
LDY #$8E
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $70
|
|
ADC $72
|
|
STA $70
|
|
LDA $71
|
|
ADC $73
|
|
STA $71
|
|
LDX #$74
|
|
LDY #$84
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$62
|
|
LDY #$8A
|
|
LDA #$8A
|
|
JSR L6476
|
|
CLC
|
|
LDA $8A
|
|
ADC $72
|
|
STA $8A
|
|
LDA $8B
|
|
ADC $73
|
|
STA $8B
|
|
LDA $6C
|
|
LDX $6D
|
|
STA $84
|
|
STX $85
|
|
LDX #$74
|
|
LDY #$86
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$62
|
|
LDY #$8C
|
|
LDA #$8C
|
|
JSR L6476
|
|
CLC
|
|
LDA $8C
|
|
ADC $72
|
|
STA $8C
|
|
LDA $8D
|
|
ADC $73
|
|
STA $8D
|
|
LDA $6E
|
|
LDX $6F
|
|
STA $86
|
|
STX $87
|
|
LDX #$74
|
|
LDY #$88
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$62
|
|
LDY #$8E
|
|
LDA #$8E
|
|
JSR L6476
|
|
CLC
|
|
LDA $8E
|
|
ADC $72
|
|
STA $8E
|
|
LDA $8F
|
|
ADC $73
|
|
STA $8F
|
|
LDA $70
|
|
LDX $71
|
|
STA $88
|
|
STX $89
|
|
LDA #$00
|
|
SEC
|
|
SBC $64
|
|
STA $74
|
|
LDA #$00
|
|
SBC $65
|
|
STA $75
|
|
LDX #$66
|
|
LDY #$7E
|
|
LDA #$6C
|
|
JSR L6476
|
|
LDX #$64
|
|
LDY #$84
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $6C
|
|
ADC $72
|
|
STA $6C
|
|
LDA $6D
|
|
ADC $73
|
|
STA $6D
|
|
LDX #$66
|
|
LDY #$80
|
|
LDA #$6E
|
|
JSR L6476
|
|
LDX #$64
|
|
LDY #$86
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $6E
|
|
ADC $72
|
|
STA $6E
|
|
LDA $6F
|
|
ADC $73
|
|
STA $6F
|
|
LDX #$66
|
|
LDY #$82
|
|
LDA #$70
|
|
JSR L6476
|
|
LDX #$64
|
|
LDY #$88
|
|
LDA #$72
|
|
JSR L6476
|
|
CLC
|
|
LDA $70
|
|
ADC $72
|
|
STA $70
|
|
LDA $71
|
|
ADC $73
|
|
STA $71
|
|
LDX #$74
|
|
LDY #$7E
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$66
|
|
LDY #$84
|
|
LDA #$84
|
|
JSR L6476
|
|
CLC
|
|
LDA $84
|
|
ADC $72
|
|
STA $84
|
|
LDA $85
|
|
ADC $73
|
|
STA $85
|
|
LDA $6C
|
|
LDX $6D
|
|
STA $7E
|
|
STX $7F
|
|
LDX #$74
|
|
LDY #$80
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$66
|
|
LDY #$86
|
|
LDA #$86
|
|
JSR L6476
|
|
CLC
|
|
LDA $86
|
|
ADC $72
|
|
STA $86
|
|
LDA $87
|
|
ADC $73
|
|
STA $87
|
|
LDA $6E
|
|
LDX $6F
|
|
STA $80
|
|
STX $81
|
|
LDX #$74
|
|
LDY #$82
|
|
LDA #$72
|
|
JSR L6476
|
|
LDX #$66
|
|
LDY #$88
|
|
LDA #$88
|
|
JSR L6476
|
|
CLC
|
|
LDA $88
|
|
ADC $72
|
|
STA $88
|
|
LDA $89
|
|
ADC $73
|
|
STA $89
|
|
LDA $70
|
|
LDX $71
|
|
STA $82
|
|
STX $83
|
|
JSR L6118
|
|
LDX #$E1
|
|
L70ED PLA
|
|
STA $9D,X
|
|
INX
|
|
BNE L70ED
|
|
L70F3 LDA #$0D
|
|
JMP L63CC
|
|
|
|
L70F8 SEC
|
|
LDA $00,X
|
|
INY
|
|
SBC ($9B),Y
|
|
STA $00,X
|
|
INX
|
|
LDA $00,X
|
|
INY
|
|
SBC ($9B),Y
|
|
STA $00,X
|
|
INX
|
|
RTS
|
|
|
|
L710A INY
|
|
LDA ($9B),Y
|
|
STA $B3
|
|
INY
|
|
LDA ($9B),Y
|
|
ROR
|
|
ROR $B3
|
|
LDA #$00
|
|
ROR
|
|
STA $A4
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $B4
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $B5
|
|
INY
|
|
LDA ($9B),Y
|
|
ROR
|
|
ROR $B5
|
|
LDA #$00
|
|
ROR
|
|
STA $A3
|
|
INY
|
|
LDA ($9B),Y
|
|
STA $B6
|
|
JSR L7CF6
|
|
LDA #$07
|
|
JMP L63CC
|
|
|
|
L713C BRK $00
|
|
L713E BRK $C8
|
|
LDA ($9B),Y
|
|
STA L713C+1
|
|
INY
|
|
LDA ($9B),Y
|
|
STA L713C
|
|
INY
|
|
LDA ($9B),Y
|
|
STA L713E
|
|
LDA #$04
|
|
JMP L63CC
|
|
|
|
L7156 INY
|
|
LDA ($9B),Y
|
|
JSR L71B4
|
|
STA $A4
|
|
STX $B3
|
|
INY
|
|
LDA ($9B),Y
|
|
CLC
|
|
ADC L713E
|
|
STA $B4
|
|
INY
|
|
LDA ($9B),Y
|
|
JSR L71B4
|
|
STA $A3
|
|
STX $B5
|
|
INY
|
|
LDA ($9B),Y
|
|
CLC
|
|
ADC L713E
|
|
STA $B6
|
|
JSR L7CF6
|
|
LDA #$05
|
|
JMP L63CC
|
|
|
|
L7184 INY
|
|
LDA ($9B),Y
|
|
TAX
|
|
INY
|
|
LDA ($9B),Y
|
|
JSR L71CC
|
|
STA $A4
|
|
INY
|
|
LDA ($9B),Y
|
|
TAY
|
|
JSR L7569
|
|
LDA #$04
|
|
JMP L63CC
|
|
|
|
L719C INY
|
|
LDA ($9B),Y
|
|
JSR L71B4
|
|
STA $A4
|
|
INY
|
|
LDA ($9B),Y
|
|
CLC
|
|
ADC L713E
|
|
TAY
|
|
JSR L7569
|
|
LDA #$03
|
|
JMP L63CC
|
|
|
|
L71B4 CLC
|
|
BMI L71C3
|
|
ADC L713C+1
|
|
TAX
|
|
LDA #$00
|
|
ADC L713C
|
|
JMP L71CC
|
|
|
|
L71C3 ADC L713C+1
|
|
TAX
|
|
LDA #$FF
|
|
ADC L713C
|
|
L71CC ROR
|
|
TXA
|
|
ROR
|
|
TAX
|
|
LDA #$00
|
|
ROR
|
|
RTS
|
|
|
|
L71D4 INY
|
|
LDA ($9B),Y
|
|
TAX
|
|
INY
|
|
LDA ($9B),Y
|
|
BEQ L71E2
|
|
LDA #$03
|
|
JMP L63CC
|
|
|
|
L71E2 TXA
|
|
CLC
|
|
ADC #$03
|
|
JMP L63CC
|
|
|
|
L71E9 INY
|
|
LDA ($9B),Y
|
|
TAX
|
|
BEQ L7202
|
|
L71EF LDA #$9D
|
|
STA $A4
|
|
LDA #$71
|
|
STA $A3
|
|
L71F7 INC $A3
|
|
BNE L71F7
|
|
INC $A4
|
|
BNE L71F7
|
|
DEX
|
|
BNE L71EF
|
|
L7202 JMP L63CA
|
|
|
|
L7205 LDX #$05
|
|
L7207 LDA $AB,X
|
|
L7209 STA L7FC5,X
|
|
DEX
|
|
BPL L7207
|
|
LDA L7209+1
|
|
CLC
|
|
ADC #$06
|
|
STA L7209+1
|
|
BCC L721D
|
|
INC L7209+2
|
|
L721D RTS
|
|
|
|
L721E INY
|
|
LDA ($9B),Y
|
|
STA L7209+1
|
|
INY
|
|
LDA ($9B),Y
|
|
STA L7209+2
|
|
LDA #$03
|
|
JMP L63CC
|
|
|
|
L722F INY
|
|
LDA ($9B),Y
|
|
STA L621F
|
|
JMP L63CA
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L7238 HEX 3D3935312D2925213C3834302C282420
|
|
HEX 3F3B37332F2B27233E3A36322E2A2622
|
|
L7258 HEX A828A828800080008000800000000000
|
|
HEX D0D0D0D0D050D050D050D050A828A828
|
|
|
|
L7278 HEX 14141414151515161616161717171818
|
|
HEX 18181919191A1A1A1A1B1B1B1C1C1C1C
|
|
HEX 1D1D1D1E1E1E1E1F1F1F202020202121
|
|
HEX 21222222222323232424242425252526
|
|
HEX 26262627272700000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000101
|
|
HEX 01020202020303030404040405050506
|
|
HEX 060606070707080808080909090A0A0A
|
|
HEX 0A0B0B0B0C0C0C0C0D0D0D0E0E0E0E0F
|
|
HEX 0F0F1010101011111112121212131313
|
|
|
|
L7378 HEX 030C30C0061860030C30C0061860030C
|
|
HEX 30C0061860030C30C0061860030C30C0
|
|
HEX 061860030C30C0061860030C30C00618
|
|
HEX 60030C30C0061860030C30C006186003
|
|
HEX 0C30C006186000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000000000000000
|
|
HEX 00000000000000000000030C30C00618
|
|
HEX 60030C30C0061860030C30C006186003
|
|
HEX 0C30C0061860030C30C0061860030C30
|
|
HEX C0061860030C30C0061860030C30C006
|
|
HEX 1860030C30C0061860030C30C0061860
|
|
|
|
*-----------------------------------
|
|
*
|
|
*-----------------------------------
|
|
|
|
L7478 JSR L74E6
|
|
JMP L63CA
|
|
|
|
L747E LDX #$00
|
|
L7480 STA $2000,X
|
|
STA $2100,X
|
|
STA $2200,X
|
|
STA $2300,X
|
|
STA $2400,X
|
|
STA $2500,X
|
|
STA $2600,X
|
|
STA $2700,X
|
|
STA $2800,X
|
|
STA $2900,X
|
|
STA $2A00,X
|
|
STA $2B00,X
|
|
STA $2C00,X
|
|
STA $2D00,X
|
|
STA $2E00,X
|
|
STA $2F00,X
|
|
STA $3000,X
|
|
STA $3100,X
|
|
STA $3200,X
|
|
STA $3300,X
|
|
STA $3400,X
|
|
STA $3500,X
|
|
STA $3600,X
|
|
STA $3700,X
|
|
STA $3800,X
|
|
STA $3900,X
|
|
STA $3A00,X
|
|
STA $3B00,X
|
|
STA $3C00,X
|
|
STA $3D00,X
|
|
STA $3E00,X
|
|
STA $3F00,X
|
|
INX
|
|
INX
|
|
INX
|
|
BNE L7480
|
|
RTS
|
|
|
|
L74E6 INY
|
|
LDA ($9B),Y
|
|
BEQ L747E
|
|
CMP #$02
|
|
BMI L74F9
|
|
BEQ L74F5
|
|
LDA #$FF
|
|
BNE L74FD
|
|
L74F5 LDA #$FF
|
|
BNE L747E
|
|
L74F9 LDA #$00
|
|
BEQ L74FD
|
|
L74FD LDX #$00
|
|
L74FF STA $4000,X
|
|
STA $4100,X
|
|
STA $4200,X
|
|
STA $4300,X
|
|
STA $4400,X
|
|
STA $4500,X
|
|
STA $4600,X
|
|
STA $4700,X
|
|
STA $4800,X
|
|
STA $4900,X
|
|
STA $4A00,X
|
|
STA $4B00,X
|
|
STA $4C00,X
|
|
STA $4D00,X
|
|
STA $4E00,X
|
|
STA $4F00,X
|
|
STA $5000,X
|
|
STA $5100,X
|
|
STA $5200,X
|
|
STA $5300,X
|
|
STA $5400,X
|
|
STA $5500,X
|
|
STA $5600,X
|
|
STA $5700,X
|
|
STA $5800,X
|
|
STA $5900,X
|
|
STA $5A00,X
|
|
STA $5B00,X
|
|
STA $5C00,X
|
|
STA $5D00,X
|
|
STA $5E00,X
|
|
STA $5F00,X
|
|
INX
|
|
INX
|
|
INX
|
|
BNE L74FF
|
|
RTS
|
|
|
|
L7565 LDA #$00
|
|
STA $A4
|
|
L7569 JSR L7D64
|
|
L756C ORA ($99),Y
|
|
STA ($99),Y
|
|
RTS
|
|
L7571 JMP L7574
|
|
|
|
L7574 TYA
|
|
LSR
|
|
STA $A4
|
|
AND #$18
|
|
STA $A3
|
|
TYA
|
|
AND #$07
|
|
ORA $A3
|
|
TAY
|
|
LDA L7238,Y
|
|
CLC
|
|
ADC $BB
|
|
STA $9A
|
|
LDA $A4
|
|
LSR
|
|
LSR
|
|
TAY
|
|
LDA L7258,Y
|
|
CLC
|
|
ADC L7278,X
|
|
TAY
|
|
LDA L7378,X
|
|
BMI L75A1
|
|
L759C ORA ($99),Y
|
|
STA ($99),Y
|
|
RTS
|
|
|
|
L75A1 ORA ($99),Y
|
|
STA ($99),Y
|
|
INY
|
|
LDA #$01
|
|
L75A8 ORA ($99),Y
|
|
STA ($99),Y
|
|
RTS
|
|
L75AD JMP L75B0
|
|
|
|
L75B0 LDA $B5
|
|
SEC
|
|
SBC $B3
|
|
BMI L75E5
|
|
BVS L75E7
|
|
L75B9 STA $B9
|
|
LDA $B6
|
|
SEC
|
|
SBC $B4
|
|
L75C0 BMI L75D1
|
|
BVS L75D3
|
|
L75C4 STA $BA
|
|
SEC
|
|
SBC $B9
|
|
BCS L75CE
|
|
JMP L75FE
|
|
L75CE JMP L7A88
|
|
|
|
L75D1 BVS L75C4
|
|
L75D3 EOR #$FF
|
|
CLC
|
|
ADC #$01
|
|
STA $BA
|
|
SEC
|
|
SBC $B9
|
|
BCC L75E2
|
|
JMP L7B31
|
|
L75E2 JMP L7843
|
|
|
|
L75E5 BVS L75B9
|
|
L75E7 LDX $B5
|
|
STX $B3
|
|
EOR #$FF
|
|
CLC
|
|
ADC #$01
|
|
STA $B9
|
|
LDA $B4
|
|
LDX $B6
|
|
SEC
|
|
SBC $B6
|
|
STX $B4
|
|
JMP L75C0
|
|
|
|
L75FE LDA #$00
|
|
SEC
|
|
SBC $B9
|
|
SEC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
TYA
|
|
LSR
|
|
STA $A4
|
|
AND #$18
|
|
STA $A3
|
|
TYA
|
|
AND #$07
|
|
ORA $A3
|
|
TAY
|
|
LDA L7238,Y
|
|
CLC
|
|
ADC $BB
|
|
STA $9A
|
|
LDA $A4
|
|
LSR
|
|
LSR
|
|
TAY
|
|
LDA L7258,Y
|
|
CLC
|
|
ADC L7278,X
|
|
TAY
|
|
LDA L7378,X
|
|
STA $B7
|
|
LDX $B9
|
|
INX
|
|
AND #$7F
|
|
CMP #$18
|
|
BMI L7658
|
|
BEQ L7653
|
|
CMP #$40
|
|
BMI L7649
|
|
BEQ L764E
|
|
JSR L7805
|
|
BNE L766B
|
|
L7649 JSR L76F7
|
|
BNE L766B
|
|
L764E JSR L7738
|
|
BNE L766B
|
|
L7653 JSR L77BD
|
|
BNE L766B
|
|
L7658 CMP #$06
|
|
BMI L7663
|
|
BEQ L7668
|
|
JSR L7683
|
|
BNE L766B
|
|
L7663 JSR L7670
|
|
BNE L766B
|
|
L7668 JSR L774C
|
|
L766B ORA ($99),Y
|
|
STA ($99),Y
|
|
RTS
|
|
|
|
L7670 LDA $B8
|
|
L7672 DEX
|
|
BEQ L768F
|
|
CLC
|
|
ADC $BA
|
|
BCS L7698
|
|
DEX
|
|
BEQ L7692
|
|
ADC $BA
|
|
BCS L76B2
|
|
BNE L76D4
|
|
L7683 DEX
|
|
BEQ L7695
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L76BA
|
|
BNE L76EA
|
|
L768F LDA #$03
|
|
RTS
|
|
|
|
L7692 LDA #$0F
|
|
RTS
|
|
|
|
L7695 LDA #$0C
|
|
RTS
|
|
|
|
L7698 SBC $B9
|
|
STA $B8
|
|
LDA #$03
|
|
L769E ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L7683
|
|
JSR L7821
|
|
BCS L7683
|
|
L76B2 SBC $B9
|
|
STA $B8
|
|
LDA #$0F
|
|
BNE L76C0
|
|
L76BA SBC $B9
|
|
STA $B8
|
|
LDA #$0C
|
|
L76C0 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L76F7
|
|
JSR L7821
|
|
BCS L76F7
|
|
L76D4 DEX
|
|
BEQ L76E4
|
|
ADC $BA
|
|
BCS L7720
|
|
STA $B8
|
|
LDA #$7F
|
|
BPL L7705
|
|
L76E1 LDA #$3C
|
|
RTS
|
|
|
|
L76E4 LDA #$3F
|
|
RTS
|
|
|
|
L76E7 LDA #$30
|
|
RTS
|
|
|
|
L76EA DEX
|
|
BEQ L76E1
|
|
ADC $BA
|
|
BCS L7718
|
|
STA $B8
|
|
LDA #$7C
|
|
BPL L7705
|
|
L76F7 DEX
|
|
BEQ L76E7
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L7710
|
|
STA $B8
|
|
LDA #$70
|
|
L7705 ORA ($99),Y
|
|
STA ($99),Y
|
|
INY
|
|
DEX
|
|
BNE L773D
|
|
LDA #$01
|
|
RTS
|
|
|
|
L7710 SBC $B9
|
|
STA $B8
|
|
LDA #$30
|
|
BNE L7726
|
|
L7718 SBC $B9
|
|
STA $B8
|
|
LDA #$3C
|
|
BNE L7726
|
|
L7720 SBC $B9
|
|
STA $B8
|
|
LDA #$3F
|
|
L7726 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L7738
|
|
JSR L7821
|
|
L7738 LDA #$40
|
|
CLC
|
|
BNE L7705
|
|
L773D LDA $B8
|
|
ADC $BA
|
|
BCS L775E
|
|
DEX
|
|
BEQ L7758
|
|
ADC $BA
|
|
BCS L7778
|
|
BNE L779A
|
|
L774C DEX
|
|
BEQ L775B
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L7780
|
|
BNE L77B0
|
|
L7758 LDA #$07
|
|
RTS
|
|
|
|
L775B LDA #$06
|
|
RTS
|
|
|
|
L775E SBC $B9
|
|
STA $B8
|
|
LDA #$01
|
|
L7764 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L774C
|
|
JSR L7821
|
|
BCS L774C
|
|
L7778 SBC $B9
|
|
STA $B8
|
|
LDA #$07
|
|
BNE L7786
|
|
L7780 SBC $B9
|
|
STA $B8
|
|
LDA #$06
|
|
L7786 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L77BD
|
|
JSR L7821
|
|
BCS L77BD
|
|
L779A DEX
|
|
BEQ L77AA
|
|
ADC $BA
|
|
BCS L77ED
|
|
STA $B8
|
|
LDA #$7F
|
|
BPL L77CB
|
|
L77A7 LDA #$1E
|
|
RTS
|
|
|
|
L77AA LDA #$1F
|
|
RTS
|
|
|
|
L77AD LDA #$18
|
|
RTS
|
|
|
|
L77B0 DEX
|
|
BEQ L77A7
|
|
ADC $BA
|
|
BCS L77E5
|
|
STA $B8
|
|
LDA #$7E
|
|
BPL L77CB
|
|
L77BD DEX
|
|
BEQ L77AD
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L77DD
|
|
STA $B8
|
|
LDA #$78
|
|
L77CB ORA ($99),Y
|
|
STA ($99),Y
|
|
INY
|
|
DEX
|
|
BEQ L7809
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L780C
|
|
JMP L7672
|
|
|
|
L77DD SBC $B9
|
|
STA $B8
|
|
LDA #$18
|
|
BNE L77F3
|
|
L77E5 SBC $B9
|
|
STA $B8
|
|
LDA #$1E
|
|
BNE L77F3
|
|
L77ED SBC $B9
|
|
STA $B8
|
|
LDA #$1F
|
|
L77F3 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L7805
|
|
JSR L7821
|
|
L7805 LDA #$60
|
|
BNE L77CB
|
|
L7809 PLA
|
|
PLA
|
|
RTS
|
|
|
|
L780C SBC $B9
|
|
STA $B8
|
|
LDA $9A
|
|
CLC
|
|
SBC #$03
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L781E
|
|
JSR L7821
|
|
L781E JMP L7670
|
|
|
|
L7821 CMP #$1C
|
|
BEQ L7832
|
|
CLC
|
|
TYA
|
|
L7827 ADC #$80
|
|
TAY
|
|
LDA $9A
|
|
ADC #$1F
|
|
STA $9A
|
|
SEC
|
|
RTS
|
|
|
|
L7832 TYA
|
|
CMP #$80
|
|
CLC
|
|
BPL L7827
|
|
ADC #$58
|
|
TAY
|
|
LDA $9A
|
|
ADC #$23
|
|
STA $9A
|
|
SEC
|
|
RTS
|
|
|
|
L7843 LDA #$00
|
|
SEC
|
|
SBC $B9
|
|
SEC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
TYA
|
|
LSR
|
|
STA $A4
|
|
AND #$18
|
|
STA $A3
|
|
TYA
|
|
AND #$07
|
|
ORA $A3
|
|
TAY
|
|
LDA L7238,Y
|
|
CLC
|
|
ADC $BB
|
|
STA $9A
|
|
LDA $A4
|
|
LSR
|
|
LSR
|
|
TAY
|
|
LDA L7258,Y
|
|
CLC
|
|
ADC L7278,X
|
|
TAY
|
|
LDA L7378,X
|
|
STA $B7
|
|
LDX $B9
|
|
INX
|
|
AND #$7F
|
|
CMP #$18
|
|
BMI L789D
|
|
BEQ L7898
|
|
CMP #$40
|
|
BMI L788E
|
|
BEQ L7893
|
|
JSR L7A4A
|
|
BNE L78B0
|
|
L788E JSR L793C
|
|
BNE L78B0
|
|
L7893 JSR L797D
|
|
BNE L78B0
|
|
L7898 JSR L7A02
|
|
BNE L78B0
|
|
L789D CMP #$06
|
|
BMI L78A8
|
|
BEQ L78AD
|
|
JSR L78C8
|
|
BNE L78B0
|
|
L78A8 JSR L78B5
|
|
BNE L78B0
|
|
L78AD JSR L7991
|
|
L78B0 ORA ($99),Y
|
|
STA ($99),Y
|
|
RTS
|
|
|
|
L78B5 LDA $B8
|
|
L78B7 DEX
|
|
BEQ L78D4
|
|
CLC
|
|
ADC $BA
|
|
BCS L78DD
|
|
DEX
|
|
BEQ L78D7
|
|
ADC $BA
|
|
BCS L78F7
|
|
BNE L7919
|
|
L78C8 DEX
|
|
BEQ L78DA
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L78FF
|
|
BNE L792F
|
|
L78D4 LDA #$03
|
|
RTS
|
|
|
|
L78D7 LDA #$0F
|
|
RTS
|
|
|
|
L78DA LDA #$0C
|
|
RTS
|
|
|
|
L78DD SBC $B9
|
|
STA $B8
|
|
LDA #$03
|
|
L78E3 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L78C8
|
|
JSR L7A66
|
|
BCS L78C8
|
|
L78F7 SBC $B9
|
|
STA $B8
|
|
LDA #$0F
|
|
BNE L7905
|
|
L78FF SBC $B9
|
|
STA $B8
|
|
LDA #$0C
|
|
L7905 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L793C
|
|
JSR L7A66
|
|
BCS L793C
|
|
L7919 DEX
|
|
BEQ L7929
|
|
ADC $BA
|
|
BCS L7965
|
|
STA $B8
|
|
LDA #$7F
|
|
BPL L794A
|
|
L7926 LDA #$3C
|
|
RTS
|
|
|
|
L7929 LDA #$3F
|
|
RTS
|
|
|
|
L792C LDA #$30
|
|
RTS
|
|
|
|
L792F DEX
|
|
BEQ L7926
|
|
ADC $BA
|
|
BCS L795D
|
|
STA $B8
|
|
LDA #$7C
|
|
BPL L794A
|
|
L793C DEX
|
|
BEQ L792C
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L7955
|
|
STA $B8
|
|
LDA #$70
|
|
L794A ORA ($99),Y
|
|
STA ($99),Y
|
|
INY
|
|
DEX
|
|
BNE L7982
|
|
LDA #$01
|
|
RTS
|
|
|
|
L7955 SBC $B9
|
|
STA $B8
|
|
LDA #$30
|
|
BNE L796B
|
|
L795D SBC $B9
|
|
STA $B8
|
|
LDA #$3C
|
|
BNE L796B
|
|
L7965 SBC $B9
|
|
STA $B8
|
|
LDA #$3F
|
|
L796B ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L797D
|
|
JSR L7A66
|
|
L797D LDA #$40
|
|
CLC
|
|
BNE L794A
|
|
L7982 LDA $B8
|
|
ADC $BA
|
|
BCS L79A3
|
|
DEX
|
|
BEQ L799D
|
|
ADC $BA
|
|
BCS L79BD
|
|
BNE L79DF
|
|
L7991 DEX
|
|
BEQ L79A0
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L79C5
|
|
BNE L79F5
|
|
L799D LDA #$07
|
|
RTS
|
|
|
|
L79A0 LDA #$06
|
|
RTS
|
|
|
|
L79A3 SBC $B9
|
|
STA $B8
|
|
LDA #$01
|
|
L79A9 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L7991
|
|
JSR L7A66
|
|
BCS L7991
|
|
L79BD SBC $B9
|
|
STA $B8
|
|
LDA #$07
|
|
BNE L79CB
|
|
L79C5 SBC $B9
|
|
STA $B8
|
|
LDA #$06
|
|
L79CB ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L7A02
|
|
JSR L7A66
|
|
BCS L7A02
|
|
L79DF DEX
|
|
BEQ L79EF
|
|
ADC $BA
|
|
BCS L7A32
|
|
STA $B8
|
|
LDA #$7F
|
|
BPL L7A10
|
|
L79EC LDA #$1E
|
|
RTS
|
|
|
|
L79EF LDA #$1F
|
|
RTS
|
|
|
|
L79F2 LDA #$18
|
|
RTS
|
|
|
|
L79F5 DEX
|
|
BEQ L79EC
|
|
ADC $BA
|
|
BCS L7A2A
|
|
STA $B8
|
|
LDA #$7E
|
|
BPL L7A10
|
|
L7A02 DEX
|
|
BEQ L79F2
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L7A22
|
|
STA $B8
|
|
LDA #$78
|
|
L7A10 ORA ($99),Y
|
|
STA ($99),Y
|
|
INY
|
|
DEX
|
|
BEQ L7A4E
|
|
LDA $B8
|
|
CLC
|
|
ADC $BA
|
|
BCS L7A51
|
|
JMP L78B7
|
|
|
|
L7A22 SBC $B9
|
|
STA $B8
|
|
LDA #$18
|
|
BNE L7A38
|
|
L7A2A SBC $B9
|
|
STA $B8
|
|
LDA #$1E
|
|
BNE L7A38
|
|
L7A32 SBC $B9
|
|
STA $B8
|
|
LDA #$1F
|
|
L7A38 ORA ($99),Y
|
|
STA ($99),Y
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L7A4A
|
|
JSR L7A66
|
|
L7A4A LDA #$60
|
|
BNE L7A10
|
|
L7A4E PLA
|
|
PLA
|
|
RTS
|
|
|
|
L7A51 SBC $B9
|
|
STA $B8
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L7A63
|
|
JSR L7A66
|
|
L7A63 JMP L78B5
|
|
|
|
L7A66 CMP #$43
|
|
BEQ L7A77
|
|
SEC
|
|
TYA
|
|
L7A6C SBC #$80
|
|
TAY
|
|
LDA $9A
|
|
SBC #$1F
|
|
STA $9A
|
|
SEC
|
|
RTS
|
|
|
|
L7A77 TYA
|
|
CMP #$80
|
|
SEC
|
|
BMI L7A6C
|
|
SBC #$58
|
|
TAY
|
|
LDA $9A
|
|
SBC #$23
|
|
STA $9A
|
|
SEC
|
|
RTS
|
|
|
|
L7A88 LDA $BA
|
|
CLC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
TYA
|
|
LSR
|
|
STA $A4
|
|
AND #$18
|
|
STA $A3
|
|
TYA
|
|
AND #$07
|
|
ORA $A3
|
|
TAY
|
|
LDA L7238,Y
|
|
CLC
|
|
ADC $BB
|
|
STA $9A
|
|
LDA $A4
|
|
LSR
|
|
LSR
|
|
TAY
|
|
LDA L7258,Y
|
|
CLC
|
|
ADC L7278,X
|
|
TAY
|
|
LDA L7378,X
|
|
STA $B7
|
|
LDX $BA
|
|
INX
|
|
L7ABD LDA $B7
|
|
BMI L7AF3
|
|
L7AC1 ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BEQ L7AF2
|
|
L7AC8 LDA $9A
|
|
SEC
|
|
SBC #$04
|
|
L7ACD CMP #$20
|
|
BCC L7B08
|
|
L7AD1 STA $9A
|
|
LDA $B8
|
|
SEC
|
|
SBC $B9
|
|
STA $B8
|
|
BCS L7ABD
|
|
ADC $BA
|
|
STA $B8
|
|
CLC
|
|
LDA $B7
|
|
BMI L7B2C
|
|
ROL
|
|
ROL
|
|
BMI L7AFF
|
|
L7AE9 STA $B7
|
|
L7AEB ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BNE L7AC8
|
|
L7AF2 RTS
|
|
|
|
L7AF3 INY
|
|
LDA #$01
|
|
L7AF6 ORA ($99),Y
|
|
STA ($99),Y
|
|
DEY
|
|
LDA #$C0
|
|
BMI L7AC1
|
|
L7AFF CMP #$80
|
|
BNE L7B26
|
|
INY
|
|
LDA #$03
|
|
BPL L7AE9
|
|
L7B08 CMP #$1C
|
|
BEQ L7B17
|
|
CLC
|
|
TYA
|
|
L7B0E ADC #$80
|
|
TAY
|
|
LDA $9A
|
|
ADC #$1B
|
|
BCC L7AD1
|
|
L7B17 TYA
|
|
CMP #$80
|
|
CLC
|
|
BPL L7B0E
|
|
ADC #$58
|
|
TAY
|
|
LDA $9A
|
|
ADC #$1F
|
|
BCC L7AD1
|
|
L7B26 LDA #$C0
|
|
STA $B7
|
|
BMI L7AF3
|
|
L7B2C INY
|
|
LDA #$06
|
|
BNE L7AE9
|
|
L7B31 LDA $BA
|
|
CLC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
TYA
|
|
LSR
|
|
STA $A4
|
|
AND #$18
|
|
STA $A3
|
|
TYA
|
|
AND #$07
|
|
ORA $A3
|
|
TAY
|
|
LDA L7238,Y
|
|
CLC
|
|
ADC $BB
|
|
STA $9A
|
|
LDA $A4
|
|
LSR
|
|
LSR
|
|
TAY
|
|
LDA L7258,Y
|
|
CLC
|
|
ADC L7278,X
|
|
TAY
|
|
LDA L7378,X
|
|
STA $B7
|
|
LDX $BA
|
|
INX
|
|
L7B66 LDA $B7
|
|
BMI L7B9C
|
|
L7B6A ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BEQ L7B9B
|
|
L7B71 LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
L7B76 CMP #$40
|
|
BCS L7BB1
|
|
L7B7A STA $9A
|
|
LDA $B8
|
|
SEC
|
|
SBC $B9
|
|
STA $B8
|
|
BCS L7B66
|
|
ADC $BA
|
|
STA $B8
|
|
CLC
|
|
LDA $B7
|
|
BMI L7BD5
|
|
ROL
|
|
ROL
|
|
BMI L7BA8
|
|
L7B92 STA $B7
|
|
L7B94 ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BNE L7B71
|
|
L7B9B RTS
|
|
|
|
L7B9C INY
|
|
LDA #$01
|
|
L7B9F ORA ($99),Y
|
|
STA ($99),Y
|
|
DEY
|
|
LDA #$C0
|
|
BMI L7B6A
|
|
L7BA8 CMP #$80
|
|
BNE L7BCF
|
|
INY
|
|
LDA #$03
|
|
BPL L7B92
|
|
L7BB1 CMP #$43
|
|
BEQ L7BC0
|
|
SEC
|
|
TYA
|
|
L7BB7 SBC #$80
|
|
TAY
|
|
LDA $9A
|
|
SBC #$1B
|
|
BCS L7B7A
|
|
L7BC0 TYA
|
|
CMP #$80
|
|
SEC
|
|
BMI L7BB7
|
|
SBC #$58
|
|
TAY
|
|
LDA $9A
|
|
SBC #$1F
|
|
BCS L7B7A
|
|
L7BCF LDA #$C0
|
|
STA $B7
|
|
BMI L7B9C
|
|
L7BD5 INY
|
|
LDA #$06
|
|
BNE L7B92
|
|
STA $A9
|
|
EOR #$FF
|
|
AND ($99),Y
|
|
L7BE0 ORA #$80
|
|
STA $A3
|
|
TYA
|
|
ROR
|
|
BCS L7BF1
|
|
LDA $A9
|
|
AND $BE
|
|
ORA $A3
|
|
STA ($99),Y
|
|
RTS
|
|
|
|
L7BF1 LDA $A9
|
|
AND $BF
|
|
ORA $A3
|
|
STA ($99),Y
|
|
RTS
|
|
|
|
L7BFA INY
|
|
LDA ($9B),Y
|
|
BEQ L7C01
|
|
LDA #$20
|
|
L7C01 STA $BB
|
|
CLC
|
|
ADC #$20
|
|
STA L7ACD+1
|
|
STA $BC
|
|
SEC
|
|
SBC #$04
|
|
STA L7821+1
|
|
STA L7B08+1
|
|
CLC
|
|
ADC #$24
|
|
STA L7B76+1
|
|
STA $BD
|
|
CLC
|
|
ADC #$03
|
|
STA L7A66+1
|
|
STA L7BB1+1
|
|
JMP L63CA
|
|
|
|
L7C28 LDA $7D
|
|
BEQ L7C2F
|
|
JMP L60C1
|
|
|
|
L7C2F INY
|
|
LDA ($9B),Y
|
|
BEQ L7C5A
|
|
CMP #$01
|
|
BEQ L7C54
|
|
CMP #$02
|
|
BEQ L7C73
|
|
CMP #$03
|
|
BNE L7C46
|
|
LDA #$55
|
|
LDX #$2A
|
|
BNE L7C4A
|
|
L7C46 LDA #$2A
|
|
LDX #$55
|
|
L7C4A STA $BE
|
|
STX $BF
|
|
LDA #$09
|
|
LDX #$80
|
|
BNE L7C7F
|
|
L7C54 LDA #$2A
|
|
LDX #$55
|
|
BNE L7C77
|
|
L7C5A LDX #$00
|
|
LDA #$11
|
|
JSR L7CA1
|
|
INX
|
|
LDA #$99
|
|
JSR L7CA1
|
|
INX
|
|
LDA #$91
|
|
JSR L7CA1
|
|
INX
|
|
LDA #$99
|
|
JMP L7C9B
|
|
|
|
L7C73 LDA #$55
|
|
LDX #$2A
|
|
L7C77 STA $BE
|
|
STX $BF
|
|
LDA #$29
|
|
LDX #$7F
|
|
L7C7F STA L7BE0
|
|
STX L7BE0+1
|
|
LDX #$00
|
|
LDA #$20
|
|
JSR L7CA1
|
|
INX
|
|
LDA #$DA
|
|
JSR L7CA1
|
|
INX
|
|
LDA #$7B
|
|
JSR L7CA1
|
|
INX
|
|
LDA #$EA
|
|
L7C9B JSR L7CA1
|
|
JMP L63CA
|
|
|
|
L7CA1 STA L766B,X
|
|
STA L769E,X
|
|
STA L76C0,X
|
|
STA L7705,X
|
|
STA L7726,X
|
|
STA L7764,X
|
|
STA L7786,X
|
|
STA L77CB,X
|
|
STA L77F3,X
|
|
STA L7AC1,X
|
|
STA L7AEB,X
|
|
STA L7AF6,X
|
|
STA L7B6A,X
|
|
STA L7B94,X
|
|
STA L7B9F,X
|
|
STA L78B0,X
|
|
STA L78E3,X
|
|
STA L7905,X
|
|
STA L794A,X
|
|
STA L796B,X
|
|
STA L79A9,X
|
|
STA L79CB,X
|
|
STA L7A10,X
|
|
STA L7A38,X
|
|
STA L759C,X
|
|
STA L75A1,X
|
|
RTS
|
|
|
|
L7CF0 LDA #$00
|
|
STA $A3
|
|
STA $A4
|
|
L7CF6 LDA $A3
|
|
SEC
|
|
SBC $A4
|
|
STA $A5
|
|
LDA $B5
|
|
SBC $B3
|
|
BVS L7D4B
|
|
BMI L7D3B
|
|
STA $B9
|
|
LDA $B6
|
|
SEC
|
|
SBC $B4
|
|
L7D0C BMI L7D22
|
|
BVS L7D24
|
|
L7D10 STA $BA
|
|
ROL $A5
|
|
ROL $B9
|
|
LDA $BA
|
|
SBC $B9
|
|
BCS L7D1F
|
|
JMP L7DA4
|
|
L7D1F JMP L7DEE
|
|
|
|
L7D22 BVS L7D10
|
|
L7D24 EOR #$FF
|
|
CLC
|
|
ADC #$01
|
|
STA $BA
|
|
ROL $A5
|
|
ROL $B9
|
|
LDA $BA
|
|
SBC $B9
|
|
BCC L7D38
|
|
JMP L7E33
|
|
L7D38 JMP L7E78
|
|
|
|
L7D3B STA $B9
|
|
LDA $A4
|
|
SEC
|
|
SBC $A3
|
|
STA $A5
|
|
LDA $B3
|
|
SBC $B5
|
|
BPL L7D4E
|
|
SEC
|
|
L7D4B JMP L7EC2
|
|
|
|
L7D4E STA $B9
|
|
LDX $A3
|
|
STX $A4
|
|
LDX $B5
|
|
STX $B3
|
|
LDA $B4
|
|
LDX $B6
|
|
SEC
|
|
SBC $B6
|
|
STX $B4
|
|
JMP L7D0C
|
|
|
|
L7D64 TYA
|
|
LSR
|
|
STA $A4
|
|
AND #$18
|
|
STA $A3
|
|
TYA
|
|
AND #$07
|
|
ORA $A3
|
|
TAY
|
|
LDA L7238,Y
|
|
CLC
|
|
ADC $BB
|
|
STA $9A
|
|
LDA $A4
|
|
LSR
|
|
LSR
|
|
TAY
|
|
LDA L7258,Y
|
|
CLC
|
|
ADC L7278,X
|
|
TAY
|
|
LSR
|
|
ROR
|
|
EOR $A4
|
|
BMI L7D91
|
|
LDA #$55
|
|
BNE L7D9E
|
|
L7D91 LDA #$2A
|
|
AND L7378,X
|
|
BNE L7D9B
|
|
INY
|
|
LDA #$01
|
|
L7D9B STA $B7
|
|
RTS
|
|
|
|
L7D9E AND L7378,X
|
|
STA $B7
|
|
RTS
|
|
|
|
L7DA4 LDA #$00
|
|
SEC
|
|
SBC $B9
|
|
SEC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
JSR L7D64
|
|
LDX $B9
|
|
INX
|
|
L7DB7 LDA $B7
|
|
L7DB9 ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BEQ L7DED
|
|
ASL $B7
|
|
BMI L7DE5
|
|
L7DC4 LDA $B8
|
|
ADC $BA
|
|
BCS L7DCF
|
|
STA $B8
|
|
JMP L7DB7
|
|
|
|
L7DCF SEC
|
|
SBC $B9
|
|
STA $B8
|
|
LDA $9A
|
|
SEC
|
|
SBC #$04
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L7DB7
|
|
JSR L7821
|
|
JMP L7DB7
|
|
|
|
L7DE5 INY
|
|
LDA #$01
|
|
STA $B7
|
|
JMP L7DC4
|
|
L7DED RTS
|
|
|
|
L7DEE LDA $BA
|
|
CLC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
JSR L7D64
|
|
LDX $BA
|
|
INX
|
|
L7DFE LDA $B7
|
|
L7E00 ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BEQ L7E32
|
|
LDA $9A
|
|
SEC
|
|
SBC #$04
|
|
STA $9A
|
|
CMP $BC
|
|
BCS L7E15
|
|
JSR L7821
|
|
L7E15 LDA $B8
|
|
SEC
|
|
SBC $B9
|
|
STA $B8
|
|
BCS L7DFE
|
|
ADC $BA
|
|
STA $B8
|
|
LDA $B7
|
|
ASL
|
|
BMI L7E2B
|
|
STA $B7
|
|
BNE L7DFE
|
|
L7E2B INY
|
|
LDA #$01
|
|
STA $B7
|
|
BNE L7DFE
|
|
L7E32 RTS
|
|
|
|
L7E33 LDA $BA
|
|
CLC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
JSR L7D64
|
|
LDX $BA
|
|
INX
|
|
L7E43 LDA $B7
|
|
L7E45 ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BEQ L7E77
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L7E5A
|
|
JSR L7A66
|
|
L7E5A LDA $B8
|
|
SEC
|
|
SBC $B9
|
|
STA $B8
|
|
BCS L7E43
|
|
ADC $BA
|
|
STA $B8
|
|
LDA $B7
|
|
ASL
|
|
BMI L7E70
|
|
STA $B7
|
|
BNE L7E43
|
|
L7E70 INY
|
|
LDA #$01
|
|
STA $B7
|
|
BNE L7E43
|
|
L7E77 RTS
|
|
|
|
L7E78 LDA #$00
|
|
SEC
|
|
SBC $B9
|
|
SEC
|
|
ROR
|
|
STA $B8
|
|
LDX $B3
|
|
LDY $B4
|
|
JSR L7D64
|
|
LDX $B9
|
|
INX
|
|
L7E8B LDA $B7
|
|
L7E8D ORA ($99),Y
|
|
STA ($99),Y
|
|
DEX
|
|
BEQ L7EC1
|
|
ASL $B7
|
|
BMI L7EB9
|
|
L7E98 LDA $B8
|
|
ADC $BA
|
|
BCS L7EA3
|
|
STA $B8
|
|
JMP L7E8B
|
|
|
|
L7EA3 SEC
|
|
SBC $B9
|
|
STA $B8
|
|
LDA $9A
|
|
CLC
|
|
ADC #$04
|
|
STA $9A
|
|
CMP $BD
|
|
BCC L7E8B
|
|
JSR L7A66
|
|
JMP L7E8B
|
|
|
|
L7EB9 INY
|
|
LDA #$01
|
|
STA $B7
|
|
JMP L7E98
|
|
L7EC1 RTS
|
|
|
|
L7EC2 ROR
|
|
STA $B9
|
|
ROR $A5
|
|
LDA $A3
|
|
PHA
|
|
LDA $B5
|
|
PHA
|
|
LDA $A4
|
|
CLC
|
|
ADC $A5
|
|
STA $A3
|
|
PHA
|
|
LDA $B3
|
|
ADC $B9
|
|
STA $B5
|
|
PHA
|
|
LDA $B6
|
|
PHA
|
|
SEC
|
|
SBC $B4
|
|
BVS L7EE6
|
|
CMP #$80
|
|
L7EE6 ROR
|
|
CLC
|
|
ADC $B4
|
|
STA $B6
|
|
PHA
|
|
JSR L7CF6
|
|
PLA
|
|
STA $B4
|
|
PLA
|
|
STA $B6
|
|
PLA
|
|
STA $B3
|
|
PLA
|
|
STA $A4
|
|
PLA
|
|
STA $B5
|
|
PLA
|
|
STA $A3
|
|
JSR L7CF6
|
|
RTS
|
|
|
|
L7F06 LDA $7D
|
|
BNE L7F3E
|
|
INY
|
|
LDA ($9B),Y
|
|
BEQ L7F15
|
|
JSR L7F1B
|
|
JMP L63CA
|
|
|
|
L7F15 JSR L7F29
|
|
JMP L63CA
|
|
|
|
L7F1B LDA #<L7CF0
|
|
STA L75AD+1
|
|
LDA #>L7CF0
|
|
LDX #<L7565
|
|
LDY #>L7565
|
|
JMP L7F34
|
|
|
|
L7F29 LDA #<L75B0
|
|
STA L75AD+1
|
|
LDA #>L75B0
|
|
LDX #<L7574
|
|
LDY #>L7574
|
|
L7F34 STA L75AD+2
|
|
STX L7571+1
|
|
STY L7571+2
|
|
RTS
|
|
|
|
L7F3E INY
|
|
LDA ($9B),Y
|
|
LDY #$01
|
|
STA ($9D),Y
|
|
DEY
|
|
LDA #$14
|
|
JMP L60CB
|
|
|
|
L7F4B INY
|
|
LDA ($9B),Y
|
|
BEQ L7F54
|
|
LDA #$51
|
|
BPL L7F56
|
|
L7F54 LDA #$11
|
|
L7F56 STA L759C
|
|
STA L75A1
|
|
STA L75A8
|
|
STA L78B0
|
|
STA L794A
|
|
STA L7A10
|
|
STA L766B
|
|
STA L769E
|
|
STA L76C0
|
|
STA L7705
|
|
STA L7726
|
|
STA L7764
|
|
STA L7786
|
|
STA L77CB
|
|
STA L77F3
|
|
STA L78E3
|
|
STA L7905
|
|
STA L796B
|
|
STA L79A9
|
|
STA L79CB
|
|
STA L7A38
|
|
STA L7AC1
|
|
STA L7AEB
|
|
STA L7AF6
|
|
STA L7B6A
|
|
STA L7B94
|
|
STA L756C
|
|
STA L7DB9
|
|
STA L7E00
|
|
STA L7E45
|
|
STA L7E8D
|
|
STA L7B9F
|
|
LDA $7D
|
|
BEQ L7FC2
|
|
LDA #$79
|
|
LDY #$00
|
|
STA ($9D),Y
|
|
STY $7D
|
|
L7FC2 JMP L63CA
|
|
|
|
L7FC5 DB $0B
|
|
DB $FB
|
|
DB $80
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
DB $11
|
|
|
|
*-----------------------------------
|
|
* End of transmission
|
|
*-----------------------------------
|