1241 lines
24 KiB
ArmAsm
1241 lines
24 KiB
ArmAsm
; da65 V2.14 - Git c3bec93
|
|
; Created: 2015-12-18 08:45:31
|
|
; Input file: fb
|
|
; Page: 1
|
|
|
|
|
|
.setcpu "6502"
|
|
|
|
L0FE2 := $0FE2
|
|
L8003 := $8003
|
|
L8818 := $8818
|
|
L8A98 := $8A98
|
|
L8B40 := $8B40
|
|
L8BBE := $8BBE
|
|
L9088 := $9088
|
|
LD888 := $D888
|
|
LFF81 := $FF81
|
|
LFF84 := $FF84
|
|
LFF8A := $FF8A
|
|
LFFAE := $FFAE
|
|
LFFB1 := $FFB1
|
|
LFFBA := $FFBA
|
|
LFFBD := $FFBD
|
|
LFFC0 := $FFC0
|
|
LFFD2 := $FFD2
|
|
LFFD5 := $FFD5
|
|
LFFE4 := $FFE4
|
|
LFFF0 := $FFF0
|
|
LFFF6 := $FFF6
|
|
ora ($10,x)
|
|
.byte $0B
|
|
bpl L0FE2
|
|
.byte $07
|
|
.byte $9E
|
|
.byte $34
|
|
and ($30),y
|
|
and $00,y
|
|
brk
|
|
lda #$00
|
|
sta $9A
|
|
lda #$05
|
|
jsr LFFD2
|
|
jsr LD888
|
|
lda #$36
|
|
sta $FF19
|
|
lda #$F0
|
|
sta $FF15
|
|
jsr L1798
|
|
lda $AE
|
|
sta L17E2
|
|
ldx #$01
|
|
jsr L1357
|
|
ldx #$17
|
|
jsr L1357
|
|
ldx #$18
|
|
ldy #$1A
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$18
|
|
lda #$05
|
|
jsr L9088
|
|
jsr L11D9
|
|
ldx #$18
|
|
ldy #$08
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$17
|
|
lda #$FD
|
|
jsr L9088
|
|
.byte $20
|
|
L1059: .byte $92
|
|
.byte $13
|
|
lda #$1C
|
|
jsr LFFD2
|
|
ldy #$08
|
|
ldx #$02
|
|
clc
|
|
jsr LFFF0
|
|
lda #$3E
|
|
jsr LFFD2
|
|
ldy #$19
|
|
ldx #$02
|
|
clc
|
|
jsr LFFF0
|
|
lda #$3C
|
|
jsr LFFD2
|
|
lda #$05
|
|
jsr LFFD2
|
|
lda #$00
|
|
sta $58
|
|
lda #$00
|
|
L1085: beq L1089
|
|
lda #$01
|
|
L1089: sta $29
|
|
lda #$00
|
|
sta $28
|
|
sta $23
|
|
lda #$23
|
|
sta $D8
|
|
lda #$00
|
|
sta $D9
|
|
lda #$85
|
|
sta $DA
|
|
lda #$18
|
|
sta $DB
|
|
jsr L165C
|
|
lda $58
|
|
beq L10B2
|
|
sta $D9
|
|
lda $57
|
|
sta $D8
|
|
lda #$00
|
|
L10B0: sta $58
|
|
L10B2: jsr L1411
|
|
lda L17E4
|
|
beq L10BD
|
|
jsr L1744
|
|
L10BD: .byte $20
|
|
L10BE: rol $2014,x
|
|
L10C1: .byte $CD
|
|
.byte $14
|
|
L10C3: lda #$A1
|
|
L10C5: cmp $FF0B
|
|
bne L10C5
|
|
iny
|
|
cpy #$C8
|
|
bcc L10D6
|
|
ldy #$00
|
|
lda #$FF
|
|
sta L17E3
|
|
L10D6: jsr L17C0
|
|
rol a
|
|
bcs L10E0
|
|
and #$DF
|
|
bcc L10E2
|
|
L10E0: ora #$20
|
|
L10E2: lsr a
|
|
ora #$E0
|
|
tax
|
|
eor L17E3
|
|
and L17E3
|
|
stx L17E3
|
|
sta $22
|
|
and #$1F
|
|
bne L10FB
|
|
jsr LFFE4
|
|
tax
|
|
beq L10C3
|
|
L10FB: lda $22
|
|
lsr a
|
|
bcs L1104
|
|
cpx #$91
|
|
bne L111B
|
|
L1104: lda $28
|
|
and #$01
|
|
bne L10C3
|
|
sec
|
|
lda $D8
|
|
sbc #$11
|
|
sta $D8
|
|
bcs L1115
|
|
dec $D9
|
|
L1115: jsr L155F
|
|
jmp L10BE
|
|
|
|
L111B: lsr a
|
|
bcs L1122
|
|
cpx #$11
|
|
bne L1139
|
|
L1122: lda $28
|
|
and #$04
|
|
bne L10C3
|
|
clc
|
|
lda $D8
|
|
adc #$11
|
|
sta $D8
|
|
bcc L1133
|
|
inc $D9
|
|
L1133: jsr L14E9
|
|
jmp L10BE
|
|
|
|
L1139: cpx #$14
|
|
bne L1140
|
|
jmp L1085
|
|
|
|
L1140: cpx #$51
|
|
bne L1153
|
|
jsr L17B4
|
|
jsr LFF8A
|
|
jsr LFF81
|
|
jsr LFF84
|
|
jmp L8003
|
|
|
|
L1153: cpx #$1B
|
|
bne L115A
|
|
jmp LFFF6
|
|
|
|
L115A: cpx #$8B
|
|
L115C: bne L1169
|
|
lda #$88
|
|
sta $D8
|
|
lda #$18
|
|
sta $D9
|
|
jmp L10B0
|
|
|
|
L1169: cpx #$8C
|
|
bne L1178
|
|
lda $26
|
|
sta $D8
|
|
lda $27
|
|
sta $D9
|
|
jmp L10B0
|
|
|
|
L1178: lsr a
|
|
bcs L1183
|
|
cpx #$9D
|
|
.byte $F0
|
|
L117E: .byte $04
|
|
cpx #$87
|
|
bne L1186
|
|
L1183: jmp L1329
|
|
|
|
L1186: lsr a
|
|
bcs L1191
|
|
cpx #$1D
|
|
beq L1191
|
|
cpx #$88
|
|
bne L1194
|
|
L1191: jmp L12FB
|
|
|
|
L1194: lsr a
|
|
bcs L11F7
|
|
cpx #$0D
|
|
beq L11F7
|
|
cpx #$8D
|
|
beq L11F7
|
|
cpx #$53
|
|
beq L11AD
|
|
cpx #$44
|
|
bne L11AA
|
|
jmp L136A
|
|
|
|
L11AA: jmp L10C1
|
|
|
|
L11AD: lda L17E4
|
|
eor #$FF
|
|
sta L17E4
|
|
jsr L11D9
|
|
lda #$00
|
|
sta $28
|
|
sta $23
|
|
sta $29
|
|
sta $58
|
|
lda L17E4
|
|
beq L11D8
|
|
lda #$23
|
|
sta $D8
|
|
lda #$00
|
|
sta $D9
|
|
jsr L15F3
|
|
jsr L1744
|
|
jmp L115C
|
|
|
|
L11D8: .byte $4C
|
|
L11D9: .byte $8F
|
|
bpl L117E
|
|
clc
|
|
ldy #$16
|
|
clc
|
|
jsr LFFF0
|
|
lda L17E4
|
|
beq L11EF
|
|
lda #$13
|
|
ldy #$18
|
|
jmp L11F1
|
|
|
|
L11EF: lda #$0C
|
|
L11F1: ldy #$18
|
|
jsr L9088
|
|
rts
|
|
|
|
L11F7: lda $D9
|
|
cmp #$18
|
|
bne L1206
|
|
lda $D8
|
|
cmp #$88
|
|
bne L1206
|
|
jmp L1085
|
|
|
|
L1206: lda $D9
|
|
cmp #$18
|
|
bne L1227
|
|
lda $D8
|
|
cmp #$99
|
|
bne L1227
|
|
ldx #$85
|
|
ldy #$18
|
|
lda #$01
|
|
jsr L1643
|
|
ldx #$6C
|
|
ldy #$18
|
|
lda #$01
|
|
jsr L1643
|
|
jmp L1059
|
|
|
|
L1227: ldy #$10
|
|
sty $29
|
|
lda #$74
|
|
sta $DA
|
|
lda #$18
|
|
sta $DB
|
|
L1233: dey
|
|
L1234: php
|
|
lda ($D8),y
|
|
bne L123B
|
|
sty $29
|
|
L123B: sta ($DA),y
|
|
plp
|
|
bne L1233
|
|
bit $28
|
|
bmi L1293
|
|
ldy #$10
|
|
lda ($D8),y
|
|
cmp #$03
|
|
bne L1262
|
|
L124C: lda $D8
|
|
sta $57
|
|
lda $D9
|
|
sta $58
|
|
lda #$71
|
|
sta $DA
|
|
lda #$18
|
|
sta $DB
|
|
jsr L165C
|
|
jmp L10B0
|
|
|
|
L1262: ldy #$0F
|
|
L1264: lda ($DA),y
|
|
cmp #$2E
|
|
beq L126F
|
|
dey
|
|
bne L1264
|
|
beq L1293
|
|
L126F: iny
|
|
lda #$1C
|
|
sta L1635
|
|
lda #$18
|
|
sta L1636
|
|
lda #$04
|
|
ldx #$2C
|
|
jsr L1615
|
|
cpx #$00
|
|
beq L1293
|
|
lda #$00
|
|
sta $28
|
|
cpx #$04
|
|
beq L124C
|
|
lda #$80
|
|
sta $28
|
|
bne L124C
|
|
L1293: jsr L15F3
|
|
jsr L17B4
|
|
lda $0543
|
|
and #$02
|
|
cmp #$02
|
|
beq L12A8
|
|
ldy #$01
|
|
lda #$00
|
|
beq L12AA
|
|
L12A8: ldy #$00
|
|
L12AA: sta $DA
|
|
lda #$01
|
|
ldx L17E2
|
|
jsr LFFBA
|
|
lda $29
|
|
ldx #$74
|
|
ldy #$18
|
|
jsr LFFBD
|
|
ldy #$00
|
|
ldx #$2F
|
|
L12C1: lda L12CC,y
|
|
sta $0342,y
|
|
iny
|
|
dex
|
|
bne L12C1
|
|
.byte $4C
|
|
L12CC: .byte $42
|
|
.byte $03
|
|
lda #$00
|
|
ldx $2B
|
|
ldy $2C
|
|
jsr LFFD5
|
|
stx $2D
|
|
sty $2E
|
|
jsr LD888
|
|
lda #$EE
|
|
sta $FF19
|
|
lda #$F1
|
|
sta $FF15
|
|
lda #$90
|
|
jsr LFFD2
|
|
jsr L8A98
|
|
lda $DA
|
|
beq L12F7
|
|
jsr L8818
|
|
L12F7: jsr L8BBE
|
|
.byte $4C
|
|
L12FB: nop
|
|
.byte $8B
|
|
lda #$65
|
|
sta $23
|
|
lda #$01
|
|
sta $24
|
|
clc
|
|
lda $D8
|
|
adc $23
|
|
sta $D8
|
|
lda $D9
|
|
adc $24
|
|
sta $D9
|
|
lda $27
|
|
cmp $D9
|
|
bcc L1320
|
|
bne L1328
|
|
lda $26
|
|
cmp $D8
|
|
bcs L1328
|
|
L1320: lda $26
|
|
sta $D8
|
|
lda $27
|
|
sta $D9
|
|
L1328: .byte $4C
|
|
L1329: bcs L133B
|
|
lda #$65
|
|
sta $23
|
|
lda #$01
|
|
sta $24
|
|
sec
|
|
lda $D8
|
|
sbc $23
|
|
sta $D8
|
|
.byte $A5
|
|
L133B: cmp $24E5,y
|
|
sta $D9
|
|
lda #$18
|
|
cmp $D9
|
|
bcc L1356
|
|
bne L134E
|
|
lda #$88
|
|
cmp $D8
|
|
bcc L1356
|
|
L134E: lda #$88
|
|
sta $D8
|
|
lda #$18
|
|
sta $D9
|
|
L1356: .byte $4C
|
|
L1357: bcs L1369
|
|
ldy #$08
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$00
|
|
lda #$C0
|
|
jsr LFFD2
|
|
iny
|
|
cpy #$16
|
|
L1369: .byte $D0
|
|
L136A: inc $60,x
|
|
lda #$00
|
|
sta $90
|
|
ldx L17E2
|
|
cpx #$08
|
|
bmi L1384
|
|
cpx #$0E
|
|
bpl L1384
|
|
inx
|
|
txa
|
|
sta $AE
|
|
jsr L13D5
|
|
bne L138B
|
|
L1384: jsr L13CD
|
|
bne L138B
|
|
lda #$08
|
|
L138B: sta L17E2
|
|
jsr L1392
|
|
.byte $4C
|
|
L1392: eor $A210,y
|
|
clc
|
|
ldy #$0D
|
|
clc
|
|
jsr LFFF0
|
|
lda #$1C
|
|
jsr LFFD2
|
|
lda L17E2
|
|
cmp #$80
|
|
bpl L13B1
|
|
cmp #$0A
|
|
bpl L13B1
|
|
lda #$30
|
|
jsr LFFD2
|
|
L13B1: ldx L17E2
|
|
lda #$00
|
|
jsr L8B40
|
|
lda #$05
|
|
jsr LFFD2
|
|
lda L17E2
|
|
cmp #$80
|
|
bpl L13CE
|
|
cmp #$64
|
|
bpl L13CE
|
|
lda #$20
|
|
.byte $20
|
|
.byte $D2
|
|
L13CD: .byte $FF
|
|
L13CE: rts
|
|
|
|
lda #$00
|
|
sta $90
|
|
lda #$08
|
|
L13D5: sta $AE
|
|
L13D7: jsr LFFB1
|
|
jsr LFFAE
|
|
lda $90
|
|
beq L13F1
|
|
lda #$00
|
|
sta $90
|
|
inc $AE
|
|
lda $AE
|
|
cmp #$10
|
|
bne L13D7
|
|
lda #$00
|
|
sta $AE
|
|
L13F1: .byte $A5
|
|
L13F2: ldx $A960
|
|
.byte $12
|
|
jsr LFFD2
|
|
ldx #$00
|
|
ldy #$09
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$00
|
|
L1403: lda #$20
|
|
jsr LFFD2
|
|
iny
|
|
cpy #$10
|
|
bne L1403
|
|
lda #$92
|
|
.byte $20
|
|
.byte $D2
|
|
L1411: .byte $FF
|
|
rts
|
|
|
|
lda #$59
|
|
sta L1422
|
|
lda #$0C
|
|
sta L1423
|
|
ldx #$15
|
|
ldy #$00
|
|
.byte $A9
|
|
L1422: .byte $20
|
|
L1423: sta L1234,y
|
|
iny
|
|
cpy #$10
|
|
bne L1423
|
|
clc
|
|
lda L1422
|
|
adc #$28
|
|
sta L1422
|
|
lda L1423
|
|
adc #$00
|
|
sta L1423
|
|
dex
|
|
.byte $D0
|
|
L143E: cpx #$60
|
|
lda $28
|
|
and #$F0
|
|
tay
|
|
lda #$18
|
|
cmp $D9
|
|
bne L1452
|
|
lda #$88
|
|
cmp $D8
|
|
bne L1452
|
|
iny
|
|
L1452: sty $28
|
|
lda $D8
|
|
sta $DA
|
|
lda $D9
|
|
sta $DB
|
|
ldx #$02
|
|
L145E: ldy #$00
|
|
lda ($D8),y
|
|
beq L147A
|
|
ldy #$09
|
|
jsr L148F
|
|
cpx #$17
|
|
beq L1488
|
|
clc
|
|
lda $D8
|
|
adc #$11
|
|
sta $D8
|
|
bcc L145E
|
|
inc $D9
|
|
bne L145E
|
|
L147A: lda $28
|
|
ora #$02
|
|
sta $28
|
|
cpx #$03
|
|
bne L1486
|
|
ora #$04
|
|
L1486: sta $28
|
|
L1488: lda $DA
|
|
sta $D8
|
|
lda $DB
|
|
.byte $85
|
|
L148F: cmp $8A60,y
|
|
pha
|
|
tya
|
|
pha
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$00
|
|
L149B: lda ($D8),y
|
|
beq L14A7
|
|
jsr LFFD2
|
|
iny
|
|
cpy #$10
|
|
bne L149B
|
|
L14A7: pla
|
|
tay
|
|
pla
|
|
tax
|
|
L14AB: inx
|
|
rts
|
|
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$00
|
|
L14B3: lda ($DA),y
|
|
beq L14C0
|
|
jsr LFFD2
|
|
iny
|
|
cpy #$10
|
|
bne L14B3
|
|
rts
|
|
|
|
L14C0: lda #$20
|
|
L14C2: jsr LFFD2
|
|
iny
|
|
cpy #$10
|
|
bne L14C2
|
|
sec
|
|
.byte $20
|
|
.byte $F0
|
|
L14CD: .byte $FF
|
|
rts
|
|
|
|
ldy #$1B
|
|
ldx #$02
|
|
clc
|
|
jsr LFFF0
|
|
ldy #$10
|
|
lda ($D8),y
|
|
tax
|
|
ldy #$00
|
|
lda L1848,x
|
|
jsr LFFD2
|
|
inx
|
|
iny
|
|
cpy #$03
|
|
.byte $D0
|
|
L14E9: .byte $F4
|
|
rts
|
|
|
|
lda $28
|
|
and #$F0
|
|
sta $28
|
|
lda #$81
|
|
sta L1508
|
|
lda #$0C
|
|
sta L1509
|
|
lda #$59
|
|
sta L150B
|
|
lda #$0C
|
|
sta L150C
|
|
ldx #$14
|
|
L1507: .byte $A0
|
|
L1508: .byte $0F
|
|
L1509: .byte $B9
|
|
.byte $34
|
|
L150B: .byte $12
|
|
L150C: sta L1234,y
|
|
dey
|
|
cpy #$FF
|
|
bne L1509
|
|
clc
|
|
lda L1508
|
|
sta L150B
|
|
adc #$28
|
|
sta L1508
|
|
lda L1509
|
|
sta L150C
|
|
adc #$00
|
|
sta L1509
|
|
dex
|
|
bne L1507
|
|
jsr L15C9
|
|
lda $28
|
|
and #$02
|
|
beq L1543
|
|
lda #$00
|
|
sta $23
|
|
lda #$23
|
|
sta $DA
|
|
lda #$00
|
|
sta $DB
|
|
L1543: lda $27
|
|
cmp $D9
|
|
bne L1557
|
|
lda $26
|
|
cmp $D8
|
|
bne L1557
|
|
lda $28
|
|
ora #$04
|
|
sta $28
|
|
bne L155E
|
|
L1557: ldx #$16
|
|
ldy #$09
|
|
jsr L14AB
|
|
L155E: .byte $A0
|
|
L155F: brk
|
|
rts
|
|
|
|
lda $28
|
|
and #$F0
|
|
sta $28
|
|
lda #$51
|
|
sta L157E
|
|
lda #$0F
|
|
sta L157F
|
|
lda #$79
|
|
sta L1581
|
|
lda #$0F
|
|
sta L1582
|
|
ldx #$14
|
|
L157D: .byte $A0
|
|
L157E: .byte $0F
|
|
L157F: .byte $B9
|
|
.byte $34
|
|
L1581: .byte $12
|
|
L1582: sta L1234,y
|
|
dey
|
|
cpy #$FF
|
|
bne L157F
|
|
sec
|
|
lda L157E
|
|
sta L1581
|
|
sbc #$28
|
|
sta L157E
|
|
lda L157F
|
|
sta L1582
|
|
sbc #$00
|
|
sta L157F
|
|
dex
|
|
bne L157D
|
|
jsr L15C9
|
|
lda #$18
|
|
cmp $D9
|
|
bne L15B9
|
|
lda #$88
|
|
cmp $D8
|
|
bne L15B9
|
|
lda $28
|
|
ora #$01
|
|
sta $28
|
|
L15B9: lda $D8
|
|
sta $DA
|
|
lda $D9
|
|
sta $DB
|
|
ldx #$02
|
|
ldy #$09
|
|
jsr L14AB
|
|
.byte $A0
|
|
L15C9: brk
|
|
rts
|
|
|
|
lda #$54
|
|
sta $23
|
|
lda #$01
|
|
sta $24
|
|
clc
|
|
lda $D8
|
|
adc $23
|
|
sta $DA
|
|
lda $D9
|
|
adc $24
|
|
sta $DB
|
|
lda $27
|
|
cmp $DB
|
|
bcc L15EE
|
|
bne L15F4
|
|
lda $26
|
|
cmp $DA
|
|
bcs L15F4
|
|
L15EE: lda $28
|
|
ora #$02
|
|
.byte $85
|
|
L15F3: plp
|
|
L15F4: rts
|
|
|
|
jsr L1411
|
|
ldx #$02
|
|
ldy #$09
|
|
jsr L148F
|
|
lda $D8
|
|
pha
|
|
lda $D9
|
|
pha
|
|
lda #$60
|
|
sta $D8
|
|
lda #$18
|
|
sta $D9
|
|
jsr L148F
|
|
pla
|
|
sta $D9
|
|
pla
|
|
.byte $85
|
|
L1615: cld
|
|
rts
|
|
|
|
sty $23
|
|
sta L162A
|
|
stx L162F
|
|
ldx #$00
|
|
stx L163C
|
|
L1624: ldy $23
|
|
lda L163C
|
|
tax
|
|
L162A: clc
|
|
adc #$03
|
|
.byte $8D
|
|
.byte $3C
|
|
L162F: asl $E0,x
|
|
.byte $12
|
|
beq L1642
|
|
L1634: .byte $B1
|
|
L1635: .byte $DA
|
|
L1636: cmp L1234,x
|
|
bne L1624
|
|
iny
|
|
L163C: inx
|
|
cpx #$00
|
|
bne L1634
|
|
rts
|
|
|
|
L1642: .byte $A2
|
|
L1643: brk
|
|
rts
|
|
|
|
clc
|
|
adc #$03
|
|
jsr LFFBD
|
|
lda #$01
|
|
ldx L17E2
|
|
ldy #$0F
|
|
jsr LFFBA
|
|
jsr LFFC0
|
|
lda #$01
|
|
.byte $20
|
|
.byte $C3
|
|
L165C: .byte $FF
|
|
rts
|
|
|
|
jsr L13F2
|
|
jsr L15F3
|
|
lda #$4B
|
|
sta L1635
|
|
lda #$18
|
|
sta L1636
|
|
ldx $DA
|
|
ldy $DB
|
|
lda $29
|
|
jsr L1643
|
|
lda #$01
|
|
ldx L17E2
|
|
ldy #$00
|
|
jsr LFFBA
|
|
lda #$01
|
|
ldx #$6B
|
|
ldy #$18
|
|
jsr LFFBD
|
|
lda #$00
|
|
ldx #$99
|
|
stx $D8
|
|
stx $DA
|
|
ldy #$18
|
|
sty $D9
|
|
iny
|
|
sty $DB
|
|
ldy #$80
|
|
L169B: sta ($DA),y
|
|
dey
|
|
bne L169B
|
|
ldy $DB
|
|
jsr LFFD5
|
|
clc
|
|
lda $DA
|
|
adc #$06
|
|
sta $DA
|
|
bcc L16B0
|
|
inc $DB
|
|
L16B0: lda #$12
|
|
jsr LFFD2
|
|
ldx #$00
|
|
ldy #$09
|
|
jsr L14AB
|
|
lda #$92
|
|
jsr LFFD2
|
|
ldy #$00
|
|
L16C3: lda ($DA),y
|
|
beq L16CF
|
|
inc $DA
|
|
bne L16C3
|
|
inc $DB
|
|
bne L16C3
|
|
L16CF: clc
|
|
lda $D8
|
|
sta $26
|
|
adc #$11
|
|
sta $D8
|
|
lda $D9
|
|
sta $27
|
|
adc #$00
|
|
sta $D9
|
|
clc
|
|
lda $DA
|
|
adc #$05
|
|
sta $DA
|
|
bcc L16EB
|
|
inc $DB
|
|
L16EB: lda ($DA),y
|
|
beq L16FB
|
|
cmp #$22
|
|
beq L1706
|
|
inc $DA
|
|
bne L16EB
|
|
inc $DB
|
|
bne L16EB
|
|
L16FB: sta ($D8),y
|
|
lda #$88
|
|
sta $D8
|
|
lda #$18
|
|
sta $D9
|
|
rts
|
|
|
|
L1706: iny
|
|
ldx #$00
|
|
L1709: lda ($DA),y
|
|
cmp #$22
|
|
beq L1716
|
|
dey
|
|
sta ($D8),y
|
|
iny
|
|
iny
|
|
bne L1709
|
|
L1716: lda #$00
|
|
sty $24
|
|
dey
|
|
L171B: cpy #$11
|
|
beq L1724
|
|
sta ($D8),y
|
|
iny
|
|
bne L171B
|
|
L1724: ldy $24
|
|
iny
|
|
ldx #$00
|
|
L1729: lda ($DA),y
|
|
cmp #$20
|
|
bne L1732
|
|
iny
|
|
bne L1729
|
|
L1732: cmp #$2A
|
|
bne L1737
|
|
iny
|
|
L1737: lda #$03
|
|
ldx #$15
|
|
jsr L1615
|
|
ldy #$10
|
|
txa
|
|
sta ($D8),y
|
|
.byte $4C
|
|
L1744: .byte $BF
|
|
.byte $16
|
|
L1746: lda #$AA
|
|
sta $DA
|
|
lda #$18
|
|
sta $DB
|
|
lda #$00
|
|
sta $25
|
|
L1752: clc
|
|
lda $DA
|
|
sta $23
|
|
adc #$11
|
|
sta $DA
|
|
lda $DB
|
|
sta $24
|
|
adc #$00
|
|
sta $DB
|
|
lda $23
|
|
cmp $26
|
|
lda $24
|
|
sbc $27
|
|
bcc L1772
|
|
lda $25
|
|
bne L1746
|
|
rts
|
|
|
|
L1772: ldy #$00
|
|
L1774: lda ($DA),y
|
|
cmp ($23),y
|
|
bcc L1783
|
|
bne L1752
|
|
iny
|
|
cpy #$11
|
|
bne L1774
|
|
beq L1752
|
|
L1783: lda #$01
|
|
sta $25
|
|
ldy #$00
|
|
L1789: lda ($23),y
|
|
pha
|
|
lda ($DA),y
|
|
sta ($23),y
|
|
pla
|
|
sta ($DA),y
|
|
iny
|
|
cpy #$11
|
|
bne L1789
|
|
L1798: beq L1752
|
|
ldx #$10
|
|
L179C: lda $055E,x
|
|
sta $0331,x
|
|
dex
|
|
bne L179C
|
|
ldx #$08
|
|
lda #$01
|
|
sta $055E,x
|
|
lda L17E4,x
|
|
sta $0566,x
|
|
dex
|
|
.byte $D0
|
|
L17B4: .byte $F2
|
|
rts
|
|
|
|
ldx #$10
|
|
lda $0331,x
|
|
sta $055E,x
|
|
dex
|
|
.byte $D0
|
|
L17C0: .byte $F7
|
|
rts
|
|
|
|
ldx #$07
|
|
L17C4: lda L17ED,x
|
|
sta $FD30
|
|
sta $FF08
|
|
lda $FF08
|
|
sta L17F5,x
|
|
dex
|
|
bpl L17C4
|
|
lda #$FF
|
|
sta $FD30
|
|
lda #$FD
|
|
sta $FF08
|
|
.byte $AD
|
|
php
|
|
L17E2: .byte $FF
|
|
L17E3: rts
|
|
|
|
L17E4: brk
|
|
.byte $FF
|
|
brk
|
|
sta $89
|
|
stx $8A
|
|
.byte $87
|
|
.byte $8B
|
|
L17ED: dey
|
|
sty $FDFE
|
|
.byte $FB
|
|
.byte $F7
|
|
.byte $EF
|
|
.byte $DF
|
|
L17F5: .byte $BF
|
|
.byte $7F
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
.byte $12
|
|
.byte $44
|
|
.byte $92
|
|
.byte $52
|
|
eor #$56
|
|
eor $00
|
|
.byte $12
|
|
eor ($92),y
|
|
eor $49,x
|
|
.byte $54
|
|
brk
|
|
.byte $12
|
|
.byte $53
|
|
.byte $92
|
|
.byte $4F
|
|
.byte $52
|
|
.byte $54
|
|
brk
|
|
.byte $12
|
|
.byte $53
|
|
.byte $92
|
|
.byte $1C
|
|
.byte $4F
|
|
.byte $52
|
|
.byte $54
|
|
ora $00
|
|
.byte $44
|
|
lsr a:$50
|
|
.byte $44
|
|
rol $34,x
|
|
brk
|
|
.byte $44
|
|
.byte $37
|
|
and ($00),y
|
|
.byte $44
|
|
sec
|
|
and ($00),y
|
|
eor $4932
|
|
brk
|
|
.byte $44
|
|
.byte $34
|
|
and ($00),y
|
|
cpy $36
|
|
.byte $34
|
|
brk
|
|
cpy $34
|
|
and ($00),y
|
|
cpy $37
|
|
and ($00),y
|
|
cpy $38
|
|
and ($00),y
|
|
.byte $CD
|
|
.byte $32
|
|
L1848: cmp #$00
|
|
.byte $43
|
|
.byte $44
|
|
.byte $5F
|
|
.byte $44
|
|
eor #$52
|
|
.byte $44
|
|
eor $4C
|
|
.byte $53
|
|
eor $51
|
|
bvc L18AA
|
|
.byte $47
|
|
eor $53,x
|
|
.byte $52
|
|
.byte $52
|
|
eor $4C
|
|
.byte $43
|
|
.byte $42
|
|
eor $4F4C
|
|
eor ($44,x)
|
|
eor #$4E
|
|
.byte $47
|
|
rol $2E2E
|
|
brk
|
|
bit $43
|
|
.byte $44
|
|
.byte $2F
|
|
.byte $2F
|
|
brk
|
|
.byte $43
|
|
.byte $44
|
|
.byte $3A
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
.byte $43
|
|
.byte $44
|
|
.byte $3A
|
|
.byte $5F
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
.byte $2F
|
|
.byte $2F
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
L18AA: brk
|
|
brk
|