Apple-2-SW/antoine-source
1
0
Fork 0
mirror of https://github.com/antoinevignau/source.git synced 2024-12-29 11:30:55 +00:00
Code Issues Projects Releases Wiki Activity
b5a4b2096a
antoine-source/a23d2/A23D2.S
Antoine Vignau dfc90148c3 A2-3D2 
and not A2-3D1
2024-07-20 11:34:10 +02:00

4501 lines
94 KiB
ArmAsm
Raw Blame History

*
* 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
*-----------------------------------
Reference in New Issue View Git Blame Copy Permalink