3048 lines
59 KiB
ArmAsm
3048 lines
59 KiB
ArmAsm
; da65 V2.14 - Git c3bec93
|
|
; Created: 2015-12-18 08:47:18
|
|
; Input file: directorybrowser
|
|
; Page: 1
|
|
|
|
|
|
.setcpu "6502"
|
|
|
|
L0120 := $0120
|
|
L05F5 := $05F5
|
|
L060B := $060B
|
|
L3156 := $3156
|
|
L3844 := $3844
|
|
L3A20 := $3A20
|
|
L414F := $414F
|
|
L4150 := $4150
|
|
L4843 := $4843
|
|
L4944 := $4944
|
|
L4957 := $4957
|
|
L4C43 := $4C43
|
|
L4F46 := $4F46
|
|
L4F49 := $4F49
|
|
L4F4C := $4F4C
|
|
L4F52 := $4F52
|
|
L5055 := $5055
|
|
L522B := $522B
|
|
L5245 := $5245
|
|
L5250 := $5250
|
|
L5345 := $5345
|
|
L5551 := $5551
|
|
L5552 := $5552
|
|
L867E := $867E
|
|
L8818 := $8818
|
|
L8BBE := $8BBE
|
|
L8BEA := $8BEA
|
|
LD888 := $D888
|
|
LD88B := $D88B
|
|
LFF90 := $FF90
|
|
LFFBA := $FFBA
|
|
LFFBD := $FFBD
|
|
LFFC0 := $FFC0
|
|
LFFC3 := $FFC3
|
|
LFFC6 := $FFC6
|
|
LFFC9 := $FFC9
|
|
LFFCC := $FFCC
|
|
LFFCF := $FFCF
|
|
LFFD2 := $FFD2
|
|
LFFD5 := $FFD5
|
|
ora ($10,x)
|
|
.byte $0B
|
|
bpl L1010
|
|
brk
|
|
.byte $9E
|
|
.byte $34
|
|
and ($30),y
|
|
and $00,y
|
|
brk
|
|
.byte $8D
|
|
L1010: rol $A9FF,x
|
|
brk
|
|
sta $D0
|
|
lda #$D0
|
|
sta $D1
|
|
lda #$00
|
|
sta $D2
|
|
lda #$28
|
|
sta $D3
|
|
ldy #$00
|
|
L1024: lda ($D0),y
|
|
sta ($D2),y
|
|
inc $D0
|
|
inc $D2
|
|
bne L1024
|
|
inc $D1
|
|
inc $D3
|
|
lda $D3
|
|
cmp #$30
|
|
bne L1024
|
|
ldx #$00
|
|
L103A: lda L110A,x
|
|
sta $2B20,x
|
|
lda L1112,x
|
|
sta $28F0,x
|
|
inx
|
|
cpx #$08
|
|
bne L103A
|
|
lda #$C0
|
|
sta $FF12
|
|
lda #$28
|
|
sta $FF13
|
|
sei
|
|
sta $FF3F
|
|
ldx #$00
|
|
L105B: txa
|
|
cmp #$C0
|
|
bcc L1066
|
|
sec
|
|
sbc #$C0
|
|
jmp L106B
|
|
|
|
L1066: cmp #$40
|
|
bcc L106D
|
|
sec
|
|
L106B: sbc #$40
|
|
L106D: sta $3020,x
|
|
inx
|
|
bne L105B
|
|
lda #$64
|
|
sta $307F
|
|
lda #$1E
|
|
sta $309F
|
|
sta $311F
|
|
jsr L1655
|
|
lda L2169
|
|
sta $FF15
|
|
lda L216A
|
|
sta $FF19
|
|
lda #$B6
|
|
sta $D0
|
|
lda #$10
|
|
sta $D1
|
|
lda #$00
|
|
ldx #$00
|
|
jsr L1F34
|
|
lda $AE
|
|
cmp #$00
|
|
bne L10A6
|
|
lda #$08
|
|
L10A6: sta L140E
|
|
lda #$00
|
|
sta L16CD
|
|
lda #$00
|
|
sta L140D
|
|
jmp L111A
|
|
|
|
brk
|
|
brk
|
|
asl $0E
|
|
ora ($48,x)
|
|
.byte $0C
|
|
ora $44
|
|
.byte $52
|
|
eor #$56
|
|
eor $01
|
|
cpy #$0C
|
|
.byte $52
|
|
.byte $4F
|
|
.byte $57
|
|
.byte $53
|
|
ora ($38,x)
|
|
ora L4944
|
|
.byte $52
|
|
.byte $53
|
|
ora ($B0,x)
|
|
ora $4946
|
|
jmp L5345
|
|
|
|
ora ($71,x)
|
|
.byte $0C
|
|
asl $05
|
|
jsr L2020
|
|
jsr L0120
|
|
sbc #$0C
|
|
jsr L2020
|
|
jsr L0120
|
|
.byte $03
|
|
.byte $0C
|
|
asl $06
|
|
.byte $04
|
|
.byte $22
|
|
.byte $02
|
|
.byte $1A
|
|
ldy #$22
|
|
ora $01
|
|
.byte $2B
|
|
.byte $0C
|
|
asl $09
|
|
.byte $02
|
|
.byte $1C
|
|
rti
|
|
|
|
ora ($B8,x)
|
|
.byte $0F
|
|
asl $04
|
|
pha
|
|
eor $4C
|
|
bvc L1138
|
|
.byte $46
|
|
L110A: .byte $37
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
L1112: ror $3200,x
|
|
ror a:$4C,x
|
|
brk
|
|
brk
|
|
L111A: brk
|
|
brk
|
|
lda #$00
|
|
jsr L177D
|
|
ldx L140E
|
|
jsr L2213
|
|
lda $90
|
|
cmp #$40
|
|
beq L114A
|
|
jsr L17A8
|
|
lda #$00
|
|
sta L1408
|
|
sta L1408
|
|
L1138: lda #$01
|
|
sta L140F
|
|
lda #$00
|
|
sta L16CD
|
|
lda #$00
|
|
sta L140D
|
|
jmp L11B1
|
|
|
|
L114A: stx L1408
|
|
sty L1409
|
|
lda $D0
|
|
sta L140A
|
|
lda $D1
|
|
sta L140B
|
|
lda #$57
|
|
sta L2166
|
|
lda $E2
|
|
sta L21DE
|
|
lda $E3
|
|
sta L21DF
|
|
jsr L217B
|
|
lda #$EF
|
|
sta $D0
|
|
lda #$21
|
|
sta $D1
|
|
lda #$61
|
|
sta $D2
|
|
lda #$0D
|
|
sta $D3
|
|
lda #$01
|
|
ldx #$00
|
|
ldy #$05
|
|
jsr L1F34
|
|
lda $E0
|
|
sta L21DE
|
|
lda $E1
|
|
sta L21DF
|
|
jsr L217B
|
|
lda #$EF
|
|
sta $D0
|
|
lda #$21
|
|
sta $D1
|
|
lda #$D9
|
|
sta $D2
|
|
lda #$0D
|
|
sta $D3
|
|
lda #$01
|
|
ldx #$00
|
|
ldy #$05
|
|
jsr L1F34
|
|
lda #$00
|
|
sta L140F
|
|
.byte $20
|
|
L11B1: .byte $9B
|
|
.byte $17
|
|
jsr L1874
|
|
lda #$20
|
|
sta $D0
|
|
lda #$31
|
|
sta $D1
|
|
lda #$03
|
|
sta $D2
|
|
lda #$0C
|
|
sta $D3
|
|
lda L1408
|
|
sta $D4
|
|
lda L1409
|
|
sta $D5
|
|
lda L140A
|
|
sta $D6
|
|
lda L140B
|
|
sta $D7
|
|
lda L140D
|
|
cmp #$02
|
|
bne L1248
|
|
lda L16CD
|
|
cmp #$00
|
|
beq L1248
|
|
jsr L16C3
|
|
sta L1411
|
|
jsr L16C3
|
|
sta L1410
|
|
jsr L16C3
|
|
sta $DC
|
|
jsr L16C3
|
|
sta $DB
|
|
jsr L16C3
|
|
sta $DA
|
|
jsr L16C3
|
|
sta $D9
|
|
jsr L16C3
|
|
sta $D8
|
|
lda L1408
|
|
cmp L1410
|
|
bne L121D
|
|
lda L1409
|
|
cmp L1411
|
|
beq L1243
|
|
L121D: lda #$00
|
|
sta $DC
|
|
sta $DB
|
|
sta $DA
|
|
lda L1CA7
|
|
sta $D8
|
|
lda L1CA8
|
|
sta $D9
|
|
lda L1CA7
|
|
sta L1CA9
|
|
lda L1CA8
|
|
sta L1CAA
|
|
lda #$00
|
|
sta L1CB9
|
|
sta L1CBA
|
|
L1243: ldy #$01
|
|
jmp L1248
|
|
|
|
L1248: ldy #$00
|
|
ldx #$00
|
|
stx L140D
|
|
lda L140F
|
|
sta $DD
|
|
lda #$16
|
|
ldx #$21
|
|
jsr L1938
|
|
cmp #$01
|
|
beq L1262
|
|
jmp L1320
|
|
|
|
L1262: ldy #$1D
|
|
lda ($D0),y
|
|
cmp #$44
|
|
bne L129A
|
|
iny
|
|
lda ($D0),y
|
|
cmp #$49
|
|
bne L129A
|
|
iny
|
|
lda ($D0),y
|
|
cmp #$52
|
|
L1276: bne L129A
|
|
jsr L162F
|
|
jsr L1669
|
|
lda #$03
|
|
sta L140C
|
|
ldx #$00
|
|
jsr L15DD
|
|
lda L140E
|
|
sta $D0
|
|
lda L140C
|
|
ldx #$00
|
|
ldy #$30
|
|
jsr L2554
|
|
jmp L111A
|
|
|
|
L129A: ldy #$1D
|
|
lda ($D0),y
|
|
cmp #$43
|
|
bne L12CF
|
|
iny
|
|
lda ($D0),y
|
|
cmp #$42
|
|
bne L12CF
|
|
iny
|
|
lda ($D0),y
|
|
cmp #$4D
|
|
bne L12CF
|
|
jsr L1669
|
|
lda #$03
|
|
sta L140C
|
|
ldx #$01
|
|
jsr L15DD
|
|
lda L140E
|
|
sta $D0
|
|
lda L140C
|
|
ldx #$00
|
|
ldy #$30
|
|
jsr L2580
|
|
jmp L111A
|
|
|
|
L12CF: ldy #$06
|
|
lda ($D0),y
|
|
cmp #$20
|
|
beq L12E2
|
|
ldy #$04
|
|
lda ($D0),y
|
|
cmp #$34
|
|
bcc L12E2
|
|
jmp L1276
|
|
|
|
L12E2: lda $D0
|
|
sta $D8
|
|
lda $D1
|
|
sta $D9
|
|
lda L1923
|
|
cmp #$00
|
|
beq L12F6
|
|
lda #$02
|
|
jmp L12F6
|
|
|
|
L12F6: lda #$01
|
|
jsr L177D
|
|
lda $D8
|
|
sta $D0
|
|
lda $D9
|
|
sta $D1
|
|
lda #$00
|
|
sta L140C
|
|
jsr L15DD
|
|
lda L140E
|
|
sta $D0
|
|
lda L140C
|
|
sta $D1
|
|
lda L1923
|
|
sta $D4
|
|
lda L1925
|
|
sta $D5
|
|
.byte $4C
|
|
L1320: .byte $E7
|
|
and $C9
|
|
.byte $02
|
|
bne L1368
|
|
jsr L1669
|
|
lda L1924
|
|
cmp #$00
|
|
beq L1341
|
|
lda L140E
|
|
sta $D0
|
|
lda #$01
|
|
ldx #$12
|
|
ldy #$14
|
|
jsr L2580
|
|
jmp L111A
|
|
|
|
L1341: lda #$00
|
|
sta $D2
|
|
lda #$30
|
|
sta $D3
|
|
jsr L21F5
|
|
ldy #$00
|
|
lda #$5F
|
|
sta ($D2),y
|
|
lda L140E
|
|
sta $D0
|
|
lda #$04
|
|
ldx #$00
|
|
ldy #$30
|
|
jsr L2554
|
|
lda #$02
|
|
sta L140D
|
|
jmp L111A
|
|
|
|
L1368: cmp #$0B
|
|
bne L1377
|
|
lda #$01
|
|
sta L140D
|
|
jsr L1669
|
|
jmp L111A
|
|
|
|
L1377: cmp #$05
|
|
bne L1390
|
|
L137B: lda #$08
|
|
sta L140E
|
|
lda #$03
|
|
sta L140D
|
|
lda #$00
|
|
sta L16CD
|
|
jsr L1669
|
|
jmp L111A
|
|
|
|
L1390: cmp #$06
|
|
bne L1399
|
|
lda #$09
|
|
jmp L137B
|
|
|
|
L1399: cmp #$03
|
|
bne L13A2
|
|
lda #$0A
|
|
jmp L137B
|
|
|
|
L13A2: cmp #$04
|
|
bne L13AB
|
|
lda #$0B
|
|
jmp L137B
|
|
|
|
L13AB: cmp #$0A
|
|
bne L13DD
|
|
jsr L1655
|
|
lda #$13
|
|
sta $D0
|
|
lda #$14
|
|
sta $D1
|
|
lda #$00
|
|
ldx #$00
|
|
jsr L1F34
|
|
L13C1: lda L1919
|
|
cmp #$10
|
|
bne L13C1
|
|
jsr L1655
|
|
lda #$B6
|
|
sta $D0
|
|
lda #$10
|
|
sta $D1
|
|
lda #$00
|
|
ldx #$00
|
|
jsr L1F34
|
|
jmp L111A
|
|
|
|
L13DD: cmp #$0D
|
|
bne L1407
|
|
sta $FF3E
|
|
lda #$C4
|
|
sta $FF12
|
|
lda #$D0
|
|
sta $FF13
|
|
lda #$F1
|
|
sta $FF15
|
|
lda #$EE
|
|
sta $FF19
|
|
lda #$90
|
|
jsr LFFD2
|
|
jsr LD88B
|
|
lda #$00
|
|
sta $EF
|
|
jmp L867E
|
|
|
|
L1407: .byte $4C
|
|
L1408: .byte $B4
|
|
L1409: .byte $11
|
|
L140A: brk
|
|
L140B: brk
|
|
L140C: brk
|
|
L140D: brk
|
|
L140E: brk
|
|
L140F: brk
|
|
L1410: brk
|
|
L1411: brk
|
|
brk
|
|
brk
|
|
.byte $2F
|
|
asl $0E
|
|
ora $01
|
|
ora #$0C
|
|
.byte $44
|
|
eor #$52
|
|
eor $43
|
|
.byte $54
|
|
.byte $4F
|
|
.byte $52
|
|
eor $4220,y
|
|
.byte $52
|
|
.byte $4F
|
|
.byte $57
|
|
.byte $53
|
|
eor $52
|
|
jsr L3156
|
|
rol $0B32
|
|
bvc L1440
|
|
.byte $52
|
|
eor $54
|
|
eor $52,x
|
|
lsr L2020
|
|
jsr L2020
|
|
.byte $20
|
|
L1440: jsr L203A
|
|
eor $4E
|
|
.byte $54
|
|
eor $52
|
|
jsr L4944
|
|
.byte $52
|
|
eor $43
|
|
.byte $54
|
|
.byte $4F
|
|
.byte $52
|
|
eor $490C,y
|
|
lsr $5453
|
|
.byte $2F
|
|
.byte $44
|
|
eor $4C
|
|
jsr L2020
|
|
jsr L3A20
|
|
jsr L5250
|
|
eor $56
|
|
eor #$4F
|
|
eor $53,x
|
|
jsr L4944
|
|
.byte $52
|
|
eor $43
|
|
.byte $54
|
|
.byte $4F
|
|
.byte $52
|
|
eor $430C,y
|
|
.byte $4F
|
|
eor $2B4D
|
|
eor #$4E
|
|
.byte $53
|
|
.byte $54
|
|
.byte $2F
|
|
.byte $44
|
|
eor $4C
|
|
.byte $3A
|
|
jsr L4F52
|
|
.byte $4F
|
|
.byte $54
|
|
jsr L3844
|
|
and ($20),y
|
|
.byte $44
|
|
eor #$52
|
|
eor $43
|
|
.byte $54
|
|
.byte $4F
|
|
.byte $52
|
|
eor $430C,y
|
|
.byte $4F
|
|
eor $2B4D
|
|
.byte $52
|
|
and $454B
|
|
eor L2020,y
|
|
jsr L203A
|
|
.byte $52
|
|
eor $4C
|
|
.byte $4F
|
|
eor ($44,x)
|
|
jsr L4944
|
|
.byte $52
|
|
eor $43
|
|
.byte $54
|
|
.byte $4F
|
|
.byte $52
|
|
eor $0C0C,y
|
|
.byte $43
|
|
.byte $4F
|
|
eor $2B4D
|
|
sec
|
|
bit $2C39
|
|
bmi L14EF
|
|
and ($20),y
|
|
.byte $3A
|
|
jsr L4843
|
|
eor ($4E,x)
|
|
.byte $47
|
|
eor $20
|
|
.byte $44
|
|
.byte $52
|
|
eor #$56
|
|
eor $0C
|
|
.byte $0C
|
|
.byte $52
|
|
eor $54
|
|
eor $52,x
|
|
lsr L2020
|
|
jsr L2020
|
|
jsr L3A20
|
|
jsr L4F4C
|
|
eor ($44,x)
|
|
jsr L5250
|
|
.byte $47
|
|
jsr L4957
|
|
L14EF: .byte $54
|
|
pha
|
|
jsr L5552
|
|
lsr $2820
|
|
bit $2C38
|
|
and ($29),y
|
|
.byte $0C
|
|
.byte $43
|
|
.byte $54
|
|
.byte $52
|
|
jmp L522B
|
|
|
|
eor $54
|
|
eor $52,x
|
|
lsr L2020
|
|
.byte $3A
|
|
jsr L4F4C
|
|
eor ($44,x)
|
|
jsr L5250
|
|
.byte $47
|
|
jsr L4957
|
|
.byte $54
|
|
pha
|
|
jsr L5552
|
|
lsr $2820
|
|
bit $2938
|
|
.byte $0C
|
|
.byte $53
|
|
pha
|
|
eor #$46
|
|
.byte $54
|
|
.byte $2B
|
|
.byte $52
|
|
eor $54
|
|
eor $52,x
|
|
lsr L3A20
|
|
jsr L4F4C
|
|
eor ($44,x)
|
|
jsr L5250
|
|
.byte $4F
|
|
.byte $47
|
|
.byte $52
|
|
eor ($4D,x)
|
|
jsr L4957
|
|
.byte $54
|
|
pha
|
|
.byte $4F
|
|
eor $54,x
|
|
jsr L5552
|
|
lsr $0C0C
|
|
.byte $43
|
|
.byte $4F
|
|
eor $2B4D
|
|
eor ($2D),y
|
|
.byte $4B
|
|
eor $59
|
|
jsr L2020
|
|
.byte $3A
|
|
jsr L5551
|
|
eor #$54
|
|
.byte $0C
|
|
.byte $0C
|
|
eor $50,x
|
|
.byte $2F
|
|
.byte $44
|
|
.byte $4F
|
|
.byte $57
|
|
lsr L2020
|
|
jsr L2020
|
|
jsr L203A
|
|
.byte $43
|
|
eor $52,x
|
|
.byte $53
|
|
.byte $4F
|
|
.byte $52
|
|
jsr L5055
|
|
.byte $2F
|
|
.byte $44
|
|
.byte $4F
|
|
.byte $57
|
|
lsr $4C0C
|
|
eor $46
|
|
.byte $54
|
|
.byte $2F
|
|
.byte $52
|
|
eor #$47
|
|
pha
|
|
.byte $54
|
|
jsr L2020
|
|
.byte $3A
|
|
jsr L4150
|
|
.byte $47
|
|
eor $20
|
|
eor $50,x
|
|
.byte $2F
|
|
.byte $44
|
|
.byte $4F
|
|
.byte $57
|
|
lsr $530C
|
|
pha
|
|
eor #$46
|
|
.byte $54
|
|
.byte $2B
|
|
eor $50,x
|
|
jsr L2020
|
|
jsr L3A20
|
|
jsr L4150
|
|
.byte $47
|
|
eor $20
|
|
pha
|
|
.byte $4F
|
|
eor $0C45
|
|
.byte $53
|
|
pha
|
|
eor #$46
|
|
.byte $54
|
|
.byte $2B
|
|
.byte $44
|
|
.byte $4F
|
|
.byte $57
|
|
lsr L2020
|
|
jsr L203A
|
|
bvc L1606
|
|
.byte $47
|
|
eor $20
|
|
eor $4E
|
|
.byte $44
|
|
.byte $0C
|
|
ora ($CC,x)
|
|
.byte $0F
|
|
eor $53
|
|
.byte $43
|
|
.byte $3A
|
|
jsr L4C43
|
|
.byte $4F
|
|
.byte $53
|
|
eor $20
|
|
pha
|
|
eor $4C
|
|
L15DD: bvc L15DF
|
|
L15DF: lda #$00
|
|
sta $D2
|
|
lda #$30
|
|
sta $D3
|
|
cpx #$00
|
|
beq L15F1
|
|
jsr L1611
|
|
jmp L15F2
|
|
|
|
L15F1: .byte $20
|
|
L15F2: sbc $21,x
|
|
lda $D0
|
|
clc
|
|
adc #$0B
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
ldy #$00
|
|
lda ($D0),y
|
|
.byte $C9
|
|
L1606: .byte $22
|
|
beq L1612
|
|
sta ($D2),y
|
|
iny
|
|
inc L140C
|
|
.byte $4C
|
|
.byte $01
|
|
L1611: .byte $16
|
|
L1612: rts
|
|
|
|
ldy #$00
|
|
lda #$2F
|
|
sta ($D2),y
|
|
iny
|
|
lda #$30
|
|
sta ($D2),y
|
|
iny
|
|
lda #$3A
|
|
sta ($D2),y
|
|
lda $D2
|
|
clc
|
|
adc #$03
|
|
sta $D2
|
|
lda $D3
|
|
adc #$00
|
|
.byte $85
|
|
L162F: .byte $D3
|
|
rts
|
|
|
|
lda $D2
|
|
jsr L16B9
|
|
lda $D3
|
|
jsr L16B9
|
|
lda $D4
|
|
jsr L16B9
|
|
lda $D5
|
|
jsr L16B9
|
|
lda $D6
|
|
jsr L16B9
|
|
lda L1408
|
|
jsr L16B9
|
|
lda L1409
|
|
.byte $20
|
|
.byte $B9
|
|
L1655: asl $60,x
|
|
ldx #$00
|
|
lda #$20
|
|
sta $0C00,x
|
|
sta $0D00,x
|
|
sta $0E00,x
|
|
sta $0F00,x
|
|
inx
|
|
.byte $D0
|
|
L1669: sbc ($60),y
|
|
lda #$04
|
|
sta $D2
|
|
lda #$0C
|
|
sta $D3
|
|
ldy #$00
|
|
lda #$A0
|
|
L1677: sta ($D2),y
|
|
iny
|
|
cpy #$1A
|
|
bne L1677
|
|
lda #$53
|
|
sta $D2
|
|
lda #$0C
|
|
sta $D3
|
|
ldx #$00
|
|
L1688: ldy #$00
|
|
L168A: lda #$20
|
|
sta ($D2),y
|
|
iny
|
|
cpy #$1C
|
|
bne L168A
|
|
lda $D2
|
|
clc
|
|
adc #$28
|
|
sta $D2
|
|
lda $D3
|
|
adc #$00
|
|
sta $D3
|
|
inx
|
|
cpx #$16
|
|
bne L1688
|
|
ldx #$00
|
|
lda #$20
|
|
sta $0C71,x
|
|
sta $0CE9,x
|
|
sta $0D61,x
|
|
sta $0DD9,x
|
|
inx
|
|
cpx #$05
|
|
.byte $D0
|
|
L16B9: .byte $EF
|
|
rts
|
|
|
|
ldx L16CD
|
|
sta L16CE,x
|
|
.byte $EE
|
|
.byte $CD
|
|
L16C3: asl $60,x
|
|
dec L16CD
|
|
ldx L16CD
|
|
.byte $BD
|
|
.byte $CE
|
|
L16CD: .byte $16
|
|
L16CE: rts
|
|
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
brk
|
|
L177D: brk
|
|
brk
|
|
tay
|
|
jsr L179B
|
|
tya
|
|
tax
|
|
lda L17E1,x
|
|
sta $D0
|
|
lda L17E4,x
|
|
sta $D1
|
|
lda #$C0
|
|
sta $D2
|
|
lda #$0F
|
|
sta $D3
|
|
lda #$01
|
|
.byte $20
|
|
.byte $34
|
|
L179B: .byte $1F
|
|
rts
|
|
|
|
ldx #$00
|
|
lda #$20
|
|
sta $0FC0,x
|
|
inx
|
|
cpx #$28
|
|
.byte $D0
|
|
L17A8: sed
|
|
rts
|
|
|
|
sta L17E0
|
|
jsr L179B
|
|
ldx #$00
|
|
L17B2: lda L182E,x
|
|
cmp L17E0
|
|
beq L17CA
|
|
inx
|
|
cpx #$0A
|
|
bne L17B2
|
|
lda #$60
|
|
sta $D0
|
|
lda #$18
|
|
sta $D1
|
|
jmp L17D2
|
|
|
|
L17CA: lda L1830,x
|
|
sta $D0
|
|
lda L1832,x
|
|
L17D2: sta $D1
|
|
lda #$C0
|
|
sta $D2
|
|
lda #$0F
|
|
sta $D3
|
|
lda #$01
|
|
.byte $20
|
|
.byte $34
|
|
L17E0: .byte $1F
|
|
L17E1: rts
|
|
|
|
brk
|
|
.byte $E7
|
|
L17E4: brk
|
|
.byte $17
|
|
.byte $17
|
|
clc
|
|
clc
|
|
asl $0B
|
|
ora $3E
|
|
jmp L414F
|
|
|
|
.byte $44
|
|
eor #$4E
|
|
.byte $47
|
|
jsr L4944
|
|
.byte $52
|
|
eor $43
|
|
.byte $54
|
|
.byte $4F
|
|
.byte $52
|
|
eor $2E2E,y
|
|
rol $0600
|
|
.byte $0B
|
|
ora $3E
|
|
jmp L414F
|
|
|
|
.byte $44
|
|
eor #$4E
|
|
.byte $47
|
|
jsr L5250
|
|
.byte $4F
|
|
.byte $47
|
|
.byte $52
|
|
eor ($4D,x)
|
|
rol $2E2E
|
|
brk
|
|
asl $0B
|
|
ora $3E
|
|
jmp L414F
|
|
|
|
.byte $44
|
|
eor #$4E
|
|
.byte $47
|
|
jsr L5250
|
|
.byte $4F
|
|
.byte $47
|
|
.byte $52
|
|
eor ($4D,x)
|
|
.byte $2E
|
|
.byte $2E
|
|
L182E: .byte $2E
|
|
brk
|
|
L1830: .byte $42
|
|
.byte $80
|
|
L1832: .byte $34
|
|
pha
|
|
clc
|
|
clc
|
|
asl $0D
|
|
ora $3E
|
|
lsr $49
|
|
jmp L2045
|
|
|
|
lsr $544F
|
|
jsr L4F46
|
|
eor $4E,x
|
|
.byte $44
|
|
and ($00,x)
|
|
asl $0D
|
|
ora $3E
|
|
.byte $44
|
|
eor $56
|
|
eor #$43
|
|
eor $20
|
|
lsr $544F
|
|
jsr L5250
|
|
eor $53
|
|
eor $4E
|
|
.byte $54
|
|
and ($00,x)
|
|
asl $0D
|
|
ora $3E
|
|
.byte $4F
|
|
.byte $54
|
|
pha
|
|
eor $52
|
|
jsr L4F49
|
|
jsr L5245
|
|
.byte $52
|
|
.byte $4F
|
|
.byte $52
|
|
L1874: and ($00,x)
|
|
sei
|
|
sta $FF3F
|
|
lda #$91
|
|
sta $FFFE
|
|
lda #$18
|
|
sta $FFFF
|
|
lda #$02
|
|
sta $FF09
|
|
sta $FF0A
|
|
lda #$80
|
|
sta $FF0B
|
|
cli
|
|
rts
|
|
|
|
pha
|
|
txa
|
|
pha
|
|
tya
|
|
pha
|
|
lda $FF09
|
|
sta $FF09
|
|
jsr L18C7
|
|
lda L1926
|
|
cmp #$00
|
|
beq L18B9
|
|
lda L1924
|
|
cmp #$00
|
|
bne L18B9
|
|
lda $0FC0
|
|
cmp #$20
|
|
beq L18B9
|
|
jsr L179B
|
|
L18B9: lda L1937
|
|
cmp #$00
|
|
beq L18C3
|
|
dec L1937
|
|
L18C3: pla
|
|
tay
|
|
pla
|
|
tax
|
|
L18C7: pla
|
|
rti
|
|
|
|
lda #$00
|
|
sta L1926
|
|
ldx #$00
|
|
L18D0: lda L191B,x
|
|
sta $FD30
|
|
sta $FF08
|
|
lda $FF08
|
|
eor #$FF
|
|
sta L1913,x
|
|
ora L1926
|
|
sta L1926
|
|
inx
|
|
cpx #$08
|
|
bne L18D0
|
|
lda L1914
|
|
and #$80
|
|
sta L1923
|
|
lda L191A
|
|
and #$20
|
|
sta L1924
|
|
lda L191A
|
|
and #$04
|
|
sta L1925
|
|
lda L1914
|
|
and #$7F
|
|
sta L1914
|
|
lda L191A
|
|
and #$DB
|
|
.byte $8D
|
|
.byte $1A
|
|
L1913: .byte $19
|
|
L1914: rts
|
|
|
|
L1915: brk
|
|
L1916: brk
|
|
L1917: brk
|
|
L1918: brk
|
|
L1919: brk
|
|
L191A: brk
|
|
L191B: brk
|
|
brk
|
|
inc $FBFD,x
|
|
.byte $F7
|
|
.byte $EF
|
|
.byte $DF
|
|
L1923: .byte $BF
|
|
L1924: .byte $7F
|
|
L1925: brk
|
|
L1926: brk
|
|
L1927: brk
|
|
brk
|
|
L1929: ldx L1926
|
|
cpx #$00
|
|
beq L1937
|
|
ldx L1937
|
|
cpx #$00
|
|
.byte $D0
|
|
L1936: .byte $F2
|
|
L1937: rts
|
|
|
|
L1938: brk
|
|
brk
|
|
sta L1CB1
|
|
stx L1CB4
|
|
sty L1CC3
|
|
lda $D0
|
|
sta L1CA5
|
|
lda $D1
|
|
sta L1CA6
|
|
lda $D2
|
|
sta L1CAB
|
|
lda $D3
|
|
sta L1CAC
|
|
lda $D4
|
|
sta L1CAF
|
|
lda $D5
|
|
sta L1CB0
|
|
lda $D6
|
|
sta L1CC1
|
|
lda $D7
|
|
sta L1CC2
|
|
lda #$00
|
|
sta L1CC4
|
|
lda L1CAF
|
|
cmp #$00
|
|
bne L1981
|
|
lda L1CB0
|
|
bne L1981
|
|
lda #$01
|
|
sta L1CC4
|
|
L1981: lda $DD
|
|
cmp #$01
|
|
beq L198C
|
|
lda #$01
|
|
jsr L1F34
|
|
L198C: lda L1CC4
|
|
cmp #$01
|
|
beq L19FF
|
|
lda L1CB1
|
|
sta L1CB6
|
|
dec L1CB6
|
|
jsr L1DBB
|
|
lda L1CA5
|
|
clc
|
|
adc L1CB4
|
|
sta L1CA7
|
|
lda L1CA6
|
|
adc #$00
|
|
sta L1CA8
|
|
lda L1CAB
|
|
clc
|
|
adc #$50
|
|
sta L1CAD
|
|
lda L1CAC
|
|
adc #$00
|
|
sta L1CAE
|
|
lda L1CC3
|
|
cmp #$01
|
|
bne L19E5
|
|
lda $D8
|
|
sta L1CA9
|
|
lda $D9
|
|
sta L1CAA
|
|
lda $DA
|
|
sta L1CB9
|
|
lda $DB
|
|
sta L1CBA
|
|
lda $DC
|
|
sta L1CB5
|
|
jmp L19FA
|
|
|
|
L19E5: lda #$00
|
|
sta L1CB5
|
|
sta L1CB9
|
|
sta L1CBA
|
|
lda L1CA7
|
|
sta L1CA9
|
|
lda L1CA8
|
|
.byte $8D
|
|
L19FA: tax
|
|
.byte $1C
|
|
.byte $20
|
|
L19FD: .byte $59
|
|
.byte $1E
|
|
L19FF: lda L1918
|
|
cmp #$01
|
|
beq L1A09
|
|
jmp L1A92
|
|
|
|
L1A09: lda L1CC4
|
|
cmp #$01
|
|
bne L1A13
|
|
jmp L19FD
|
|
|
|
L1A13: lda L1923
|
|
cmp #$80
|
|
bne L1A4C
|
|
lda L1CB8
|
|
cmp #$00
|
|
bne L1A40
|
|
lda L1CB7
|
|
cmp L1CB1
|
|
bcc L1A2C
|
|
jmp L1A3E
|
|
|
|
L1A2C: lda L1CB5
|
|
cmp L1CB7
|
|
bne L1A37
|
|
jmp L19FD
|
|
|
|
L1A37: lda L1CB7
|
|
sta L1CB5
|
|
.byte $4C
|
|
L1A3E: dey
|
|
.byte $1C
|
|
L1A40: lda L1CB6
|
|
sta L1CB5
|
|
jsr L1D56
|
|
jmp L1C88
|
|
|
|
L1A4C: lda L1CB8
|
|
cmp #$00
|
|
bne L1A5B
|
|
lda L1CB5
|
|
cmp L1CB7
|
|
beq L19FF
|
|
L1A5B: lda L1CB5
|
|
cmp L1CB6
|
|
beq L1A69
|
|
inc L1CB5
|
|
jmp L1C88
|
|
|
|
L1A69: lda L1CB9
|
|
clc
|
|
adc L1CB5
|
|
sta L1CBB
|
|
lda L1CBA
|
|
adc #$00
|
|
sta L1CBC
|
|
lda L1CBB
|
|
cmp L1CB7
|
|
bne L1A8E
|
|
lda L1CBC
|
|
cmp L1CB8
|
|
bne L1A8E
|
|
jmp L19FD
|
|
|
|
L1A8E: jsr L1D06
|
|
.byte $4C
|
|
L1A92: dey
|
|
.byte $1C
|
|
cmp #$08
|
|
bne L1AF0
|
|
lda L1CC4
|
|
cmp #$01
|
|
bne L1AA2
|
|
jmp L19FD
|
|
|
|
L1AA2: lda L1923
|
|
cmp #$80
|
|
bne L1ACC
|
|
lda L1CB9
|
|
cmp #$00
|
|
bne L1AC1
|
|
lda L1CBA
|
|
cmp #$00
|
|
bne L1AC1
|
|
lda L1CB5
|
|
cmp #$00
|
|
bne L1AC1
|
|
jmp L19FD
|
|
|
|
L1AC1: lda #$00
|
|
sta L1CB5
|
|
jsr L1D41
|
|
jmp L1C88
|
|
|
|
L1ACC: lda L1CB5
|
|
cmp #$00
|
|
beq L1AD9
|
|
dec L1CB5
|
|
jmp L1C88
|
|
|
|
L1AD9: lda L1CB9
|
|
cmp #$00
|
|
bne L1AEA
|
|
lda L1CBA
|
|
cmp #$00
|
|
bne L1AEA
|
|
jmp L19FD
|
|
|
|
L1AEA: jsr L1D21
|
|
jmp L1C88
|
|
|
|
L1AF0: lda L1919
|
|
cmp #$08
|
|
beq L1AFA
|
|
jmp L1B8F
|
|
|
|
L1AFA: lda L1CC4
|
|
cmp #$01
|
|
bne L1B04
|
|
jmp L19FD
|
|
|
|
L1B04: lda L1CB8
|
|
cmp #$00
|
|
bne L1B27
|
|
lda L1CB7
|
|
cmp L1CB6
|
|
bcs L1B27
|
|
lda L1CB5
|
|
cmp L1CB7
|
|
bne L1B1E
|
|
jmp L19FD
|
|
|
|
L1B1E: lda L1CB7
|
|
sta L1CB5
|
|
jmp L1C88
|
|
|
|
L1B27: lda L1CB5
|
|
cmp L1CB6
|
|
beq L1B38
|
|
lda L1CB6
|
|
sta L1CB5
|
|
jmp L1C88
|
|
|
|
L1B38: lda L1CB9
|
|
clc
|
|
adc L1CB5
|
|
sta $D0
|
|
lda L1CBA
|
|
adc #$00
|
|
sta $D1
|
|
lda L1CB7
|
|
cmp $D0
|
|
bne L1B59
|
|
lda L1CB7
|
|
cmp $D1
|
|
bne L1B59
|
|
jmp L19FD
|
|
|
|
L1B59: lda L1CB9
|
|
clc
|
|
adc L1CB6
|
|
sta $D0
|
|
lda L1CBA
|
|
adc #$00
|
|
sta $D1
|
|
lda L1CB7
|
|
sec
|
|
sbc $D0
|
|
sta $D0
|
|
lda L1CB8
|
|
sbc $D1
|
|
sta $D1
|
|
lda $D1
|
|
cmp #$00
|
|
bne L1B85
|
|
lda $D0
|
|
cmp L1CB6
|
|
bcc L1B8B
|
|
L1B85: jsr L1D6F
|
|
jmp L1C88
|
|
|
|
L1B8B: jsr L1D56
|
|
.byte $4C
|
|
L1B8F: dey
|
|
.byte $1C
|
|
cmp #$01
|
|
bne L1BD0
|
|
lda L1CC4
|
|
cmp #$01
|
|
bne L1B9F
|
|
jmp L19FD
|
|
|
|
L1B9F: lda L1CB5
|
|
cmp #$00
|
|
beq L1BAE
|
|
lda #$00
|
|
sta L1CB5
|
|
jmp L1C88
|
|
|
|
L1BAE: lda L1CBA
|
|
cmp #$00
|
|
bne L1BC4
|
|
lda L1CB9
|
|
cmp #$00
|
|
bne L1BBF
|
|
jmp L19FD
|
|
|
|
L1BBF: cmp L1CB6
|
|
bcc L1BCA
|
|
L1BC4: jsr L1D95
|
|
jmp L1C88
|
|
|
|
L1BCA: jsr L1D41
|
|
jmp L1C88
|
|
|
|
L1BD0: lda L1913
|
|
cmp #$02
|
|
bne L1BE9
|
|
lda L1CC4
|
|
cmp #$01
|
|
bne L1BE1
|
|
jmp L19FD
|
|
|
|
L1BE1: jsr L1CC5
|
|
lda #$01
|
|
jmp L1C9C
|
|
|
|
L1BE9: cmp #$01
|
|
bne L1BF2
|
|
lda #$02
|
|
jmp L1C9C
|
|
|
|
L1BF2: cmp #$08
|
|
bne L1BFB
|
|
lda #$0A
|
|
jmp L1C9C
|
|
|
|
L1BFB: cmp #$10
|
|
bne L1C04
|
|
lda #$07
|
|
jmp L1C9C
|
|
|
|
L1C04: cmp #$20
|
|
bne L1C0D
|
|
lda #$08
|
|
jmp L1C9C
|
|
|
|
L1C0D: cmp #$40
|
|
bne L1C16
|
|
lda #$09
|
|
jmp L1C9C
|
|
|
|
L1C16: lda L1915
|
|
cmp #$02
|
|
bne L1C29
|
|
ldx L1924
|
|
cpx #$00
|
|
beq L1C29
|
|
lda #$0B
|
|
jmp L1C9C
|
|
|
|
L1C29: lda L1917
|
|
cmp #$08
|
|
bne L1C3C
|
|
ldx L1924
|
|
cpx #$00
|
|
beq L1C3C
|
|
lda #$03
|
|
jmp L1C9C
|
|
|
|
L1C3C: cmp #$01
|
|
bne L1C4C
|
|
ldx L1924
|
|
cpx #$00
|
|
beq L1C4C
|
|
lda #$06
|
|
jmp L1C9C
|
|
|
|
L1C4C: lda L1916
|
|
cmp #$08
|
|
bne L1C5F
|
|
ldx L1924
|
|
cpx #$00
|
|
beq L1C5F
|
|
lda #$05
|
|
jmp L1C9C
|
|
|
|
L1C5F: lda L191A
|
|
cmp #$01
|
|
bne L1C72
|
|
ldx L1924
|
|
cpx #$00
|
|
beq L1C72
|
|
lda #$04
|
|
jmp L1C9C
|
|
|
|
L1C72: cmp #$40
|
|
bne L1C82
|
|
ldx L1924
|
|
cpx #$00
|
|
beq L1C82
|
|
lda #$0D
|
|
jmp L1C9C
|
|
|
|
L1C82: lda #$0B
|
|
sta L1936
|
|
.byte $4C
|
|
L1C88: sbc $AD19,x
|
|
rol $19,x
|
|
sta L1937
|
|
jsr L1E59
|
|
lda #$02
|
|
sta L1936
|
|
jsr L1927
|
|
.byte $4C
|
|
L1C9C: sbc $A219,x
|
|
.byte $0B
|
|
stx L1937
|
|
.byte $20
|
|
.byte $27
|
|
L1CA5: .byte $19
|
|
L1CA6: rts
|
|
|
|
L1CA7: brk
|
|
L1CA8: brk
|
|
L1CA9: brk
|
|
L1CAA: brk
|
|
L1CAB: brk
|
|
L1CAC: brk
|
|
L1CAD: brk
|
|
L1CAE: brk
|
|
L1CAF: brk
|
|
L1CB0: brk
|
|
L1CB1: brk
|
|
L1CB2: brk
|
|
L1CB3: brk
|
|
L1CB4: brk
|
|
L1CB5: brk
|
|
L1CB6: brk
|
|
L1CB7: brk
|
|
L1CB8: brk
|
|
L1CB9: brk
|
|
L1CBA: brk
|
|
L1CBB: brk
|
|
L1CBC: brk
|
|
L1CBD: brk
|
|
L1CBE: brk
|
|
L1CBF: brk
|
|
L1CC0: brk
|
|
L1CC1: brk
|
|
L1CC2: brk
|
|
L1CC3: brk
|
|
L1CC4: brk
|
|
L1CC5: brk
|
|
brk
|
|
lda L1CA9
|
|
sta $D0
|
|
lda L1CAA
|
|
sta $D1
|
|
lda L1CB5
|
|
cmp #$00
|
|
beq L1CEE
|
|
ldx #$00
|
|
L1CDA: lda $D0
|
|
clc
|
|
adc L1CB4
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
inx
|
|
cpx L1CB5
|
|
bne L1CDA
|
|
L1CEE: lda L1CA9
|
|
sta $D2
|
|
lda L1CAA
|
|
sta $D3
|
|
lda L1CB9
|
|
sta $D4
|
|
lda L1CBA
|
|
sta $D5
|
|
lda L1CB5
|
|
.byte $85
|
|
L1D06: dec $60,x
|
|
lda L1CA9
|
|
clc
|
|
adc L1CB4
|
|
sta L1CA9
|
|
lda L1CAA
|
|
adc #$00
|
|
sta L1CAA
|
|
inc L1CB9
|
|
bne L1D22
|
|
.byte $EE
|
|
tsx
|
|
L1D21: .byte $1C
|
|
L1D22: rts
|
|
|
|
lda L1CA9
|
|
sec
|
|
sbc L1CB4
|
|
sta L1CA9
|
|
lda L1CAA
|
|
sbc #$00
|
|
sta L1CAA
|
|
dec L1CB9
|
|
lda L1CB9
|
|
cmp #$FF
|
|
bne L1D42
|
|
.byte $CE
|
|
tsx
|
|
L1D41: .byte $1C
|
|
L1D42: rts
|
|
|
|
lda L1CA7
|
|
sta L1CA9
|
|
lda L1CA8
|
|
sta L1CAA
|
|
lda #$00
|
|
sta L1CB9
|
|
.byte $8D
|
|
tsx
|
|
L1D56: .byte $1C
|
|
rts
|
|
|
|
lda L1CBD
|
|
sta L1CA9
|
|
lda L1CBE
|
|
sta L1CAA
|
|
lda L1CBF
|
|
sta L1CB9
|
|
lda L1CC0
|
|
.byte $8D
|
|
tsx
|
|
L1D6F: .byte $1C
|
|
rts
|
|
|
|
lda L1CA9
|
|
clc
|
|
adc L1CB2
|
|
sta L1CA9
|
|
lda L1CAA
|
|
adc L1CB3
|
|
sta L1CAA
|
|
lda L1CB9
|
|
clc
|
|
adc L1CB6
|
|
sta L1CB9
|
|
lda L1CBA
|
|
adc #$00
|
|
.byte $8D
|
|
tsx
|
|
L1D95: .byte $1C
|
|
rts
|
|
|
|
lda L1CA9
|
|
sec
|
|
sbc L1CB2
|
|
sta L1CA9
|
|
lda L1CAA
|
|
sbc L1CB3
|
|
sta L1CAA
|
|
lda L1CB9
|
|
sec
|
|
sbc L1CB6
|
|
sta L1CB9
|
|
lda L1CBA
|
|
sbc #$00
|
|
.byte $8D
|
|
tsx
|
|
L1DBB: .byte $1C
|
|
rts
|
|
|
|
lda L1CAF
|
|
sta L1CB7
|
|
lda L1CB0
|
|
sta L1CB8
|
|
dec L1CB7
|
|
lda L1CB7
|
|
cmp #$FF
|
|
bne L1DD6
|
|
dec L1CB8
|
|
L1DD6: lda L1CB0
|
|
cmp #$00
|
|
bne L1DFC
|
|
lda L1CAF
|
|
cmp L1CB1
|
|
bcs L1DFC
|
|
lda #$00
|
|
sta L1CBF
|
|
sta L1CC0
|
|
lda L1CA7
|
|
sta L1CBD
|
|
lda L1CA8
|
|
sta L1CBE
|
|
jmp L1E38
|
|
|
|
L1DFC: lda L1CB7
|
|
sec
|
|
sbc L1CB1
|
|
sta L1CBF
|
|
lda L1CB8
|
|
sbc #$00
|
|
sta L1CC0
|
|
inc L1CBF
|
|
bne L1E16
|
|
inc L1CC0
|
|
L1E16: lda L1CC1
|
|
sta L1CBD
|
|
lda L1CC2
|
|
sta L1CBE
|
|
ldx L1CB1
|
|
L1E25: lda L1CBD
|
|
sec
|
|
sbc L1CB4
|
|
sta L1CBD
|
|
lda L1CBE
|
|
sbc #$00
|
|
sta L1CBE
|
|
dex
|
|
L1E38: bne L1E25
|
|
lda #$00
|
|
sta L1CB2
|
|
sta L1CB3
|
|
ldx L1CB6
|
|
lda L1CB2
|
|
clc
|
|
adc L1CB4
|
|
sta L1CB2
|
|
lda L1CB3
|
|
adc #$00
|
|
sta L1CB3
|
|
dex
|
|
.byte $D0
|
|
L1E59: .byte $EB
|
|
rts
|
|
|
|
lda L1CB0
|
|
cmp #$00
|
|
bne L1E73
|
|
lda L1CAF
|
|
cmp L1CB1
|
|
bcs L1E73
|
|
lda L1CAF
|
|
sta L1E98
|
|
jmp L1E77
|
|
|
|
L1E73: lda L1CB1
|
|
.byte $8D
|
|
L1E77: tya
|
|
asl $A9AD,x
|
|
.byte $1C
|
|
sta $D0
|
|
lda L1CAA
|
|
sta $D1
|
|
lda L1CAD
|
|
sta $D2
|
|
lda L1CAE
|
|
sta $D3
|
|
lda L1CB5
|
|
ldx L1CB4
|
|
ldy L1E98
|
|
.byte $20
|
|
.byte $99
|
|
L1E98: asl a:$60,x
|
|
sta L1F30
|
|
stx L1F31
|
|
sty L1F32
|
|
lda #$00
|
|
sta L1F2F
|
|
sta L1F33
|
|
lda $D0
|
|
sta L1F2D
|
|
lda $D1
|
|
sta L1F2E
|
|
lda $D2
|
|
sta L1F2B
|
|
lda $D3
|
|
sta L1F2C
|
|
lda L1F2F
|
|
cmp L1F30
|
|
bne L1ED3
|
|
lda #$01
|
|
sta L1F33
|
|
ldy #$00
|
|
lda #$04
|
|
sta ($D0),y
|
|
L1ED3: ldx #$00
|
|
lda #$01
|
|
jsr L1F34
|
|
lda L1F33
|
|
cmp #$01
|
|
bne L1EF6
|
|
lda #$00
|
|
sta L1F33
|
|
lda L1F2D
|
|
sta $D0
|
|
lda L1F2E
|
|
sta $D1
|
|
ldy #$00
|
|
lda #$05
|
|
sta ($D0),y
|
|
L1EF6: lda L1F2D
|
|
clc
|
|
adc L1F31
|
|
sta L1F2D
|
|
sta $D0
|
|
lda L1F2E
|
|
adc #$00
|
|
sta L1F2E
|
|
sta $D1
|
|
lda L1F2B
|
|
clc
|
|
adc #$28
|
|
sta L1F2B
|
|
sta $D2
|
|
lda L1F2C
|
|
adc #$00
|
|
sta L1F2C
|
|
sta $D3
|
|
inc L1F2F
|
|
lda L1F2F
|
|
cmp L1F32
|
|
.byte $D0
|
|
L1F2B: .byte $94
|
|
L1F2C: rts
|
|
|
|
L1F2D: brk
|
|
L1F2E: brk
|
|
L1F2F: brk
|
|
L1F30: brk
|
|
L1F31: brk
|
|
L1F32: brk
|
|
L1F33: brk
|
|
L1F34: brk
|
|
brk
|
|
stx L2163
|
|
cmp #$00
|
|
bne L1F50
|
|
lda #$00
|
|
sta $D2
|
|
lda #$0C
|
|
sta $D3
|
|
lda #$00
|
|
sta $D4
|
|
lda #$08
|
|
sta $D5
|
|
jmp L1F5F
|
|
|
|
L1F50: lda $D2
|
|
sta $D4
|
|
lda $D3
|
|
sec
|
|
sbc #$04
|
|
sta $D5
|
|
lda L2169,y
|
|
.byte $8D
|
|
L1F5F: ror $21
|
|
ldy #$00
|
|
lda ($D0),y
|
|
cmp #$00
|
|
bne L1F6C
|
|
jmp L2162
|
|
|
|
L1F6C: cmp #$01
|
|
bne L1F95
|
|
ldy #$00
|
|
iny
|
|
lda ($D0),y
|
|
sta $D2
|
|
sta $D4
|
|
iny
|
|
lda ($D0),y
|
|
sta $D3
|
|
sec
|
|
sbc #$04
|
|
sta $D5
|
|
lda $D0
|
|
clc
|
|
adc #$03
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
ldy #$00
|
|
jmp L1F5F
|
|
|
|
L1F95: cmp #$02
|
|
bne L1FCE
|
|
iny
|
|
lda ($D0),y
|
|
tax
|
|
iny
|
|
lda ($D0),y
|
|
sta L2165
|
|
ldy #$00
|
|
L1FA5: lda L2165
|
|
sta ($D2),y
|
|
lda L2166
|
|
sta ($D4),y
|
|
inc $D2
|
|
bne L1FB5
|
|
inc $D3
|
|
L1FB5: inc $D4
|
|
bne L1FBB
|
|
inc $D5
|
|
L1FBB: dex
|
|
bne L1FA5
|
|
lda $D0
|
|
clc
|
|
adc #$03
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
jmp L1F5F
|
|
|
|
L1FCE: cmp #$03
|
|
bne L2017
|
|
iny
|
|
lda ($D0),y
|
|
tax
|
|
iny
|
|
lda ($D0),y
|
|
sta L2165
|
|
L1FDC: ldy #$00
|
|
lda L2165
|
|
sta ($D2),y
|
|
lda L2166
|
|
sta ($D4),y
|
|
lda $D2
|
|
clc
|
|
adc #$28
|
|
sta $D2
|
|
lda $D3
|
|
adc #$00
|
|
sta $D3
|
|
lda $D4
|
|
clc
|
|
adc #$28
|
|
sta $D4
|
|
lda $D5
|
|
adc #$00
|
|
sta $D5
|
|
dex
|
|
bne L1FDC
|
|
lda $D0
|
|
clc
|
|
adc #$03
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
ldy #$00
|
|
jmp L1F5F
|
|
|
|
L2017: cmp #$04
|
|
bne L2029
|
|
lda #$80
|
|
sta L2164
|
|
L2020: inc $D0
|
|
bne L2026
|
|
inc $D1
|
|
L2026: jmp L1F5F
|
|
|
|
L2029: cmp #$05
|
|
bne L203B
|
|
lda #$00
|
|
sta L2164
|
|
inc $D0
|
|
bne L2038
|
|
inc $D1
|
|
L2038: .byte $4C
|
|
.byte $5F
|
|
L203A: .byte $1F
|
|
L203B: cmp #$06
|
|
bne L205B
|
|
iny
|
|
lda ($D0),y
|
|
tax
|
|
.byte $BD
|
|
.byte $69
|
|
L2045: and ($8D,x)
|
|
ror $21
|
|
lda $D0
|
|
clc
|
|
adc #$02
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
ldy #$00
|
|
jmp L1F5F
|
|
|
|
L205B: cmp #$07
|
|
bne L206F
|
|
lda $D0
|
|
clc
|
|
adc #$02
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
jmp L1F5F
|
|
|
|
L206F: cmp #$08
|
|
bne L20BB
|
|
iny
|
|
lda ($D0),y
|
|
sta L21DE
|
|
iny
|
|
lda ($D0),y
|
|
sta L21DF
|
|
jsr L217B
|
|
dec $D0
|
|
lda $D0
|
|
cmp #$FF
|
|
bne L208C
|
|
dec $D1
|
|
L208C: lda #$09
|
|
ldy #$00
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L2098
|
|
inc $D1
|
|
L2098: ldy #$00
|
|
lda L21EF
|
|
sta ($D0),y
|
|
iny
|
|
lda L21F0
|
|
sta ($D0),y
|
|
iny
|
|
lda L21F1
|
|
sta ($D0),y
|
|
iny
|
|
lda L21F2
|
|
sta ($D0),y
|
|
iny
|
|
lda L21F3
|
|
sta ($D0),y
|
|
ldy #$00
|
|
lda ($D0),y
|
|
L20BB: cmp #$09
|
|
bne L20E2
|
|
inc $D0
|
|
bne L20C5
|
|
inc $D1
|
|
L20C5: ldy #$00
|
|
lda ($D0),y
|
|
cmp #$00
|
|
beq L20DF
|
|
tax
|
|
lda $3020,x
|
|
ora L2164
|
|
sta ($D2),y
|
|
lda L2166
|
|
sta ($D4),y
|
|
iny
|
|
jmp L20C5
|
|
|
|
L20DF: jmp L2162
|
|
|
|
L20E2: cmp #$0A
|
|
bne L20EF
|
|
inc $D0
|
|
bne L20EC
|
|
inc $D1
|
|
L20EC: jmp L1F5F
|
|
|
|
L20EF: cmp #$0B
|
|
bne L2110
|
|
ldy #$01
|
|
lda ($D0),y
|
|
sta L2167
|
|
iny
|
|
lda ($D0),y
|
|
sta L2168
|
|
lda $D0
|
|
clc
|
|
adc #$03
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
jmp L2129
|
|
|
|
L2110: cmp #$0C
|
|
bne L2141
|
|
lda L2167
|
|
clc
|
|
adc #$28
|
|
sta L2167
|
|
lda L2168
|
|
adc #$00
|
|
sta L2168
|
|
inc $D0
|
|
bne L212B
|
|
L2129: inc $D1
|
|
L212B: lda L2167
|
|
sta $D2
|
|
sta $D4
|
|
lda L2168
|
|
sta $D3
|
|
sec
|
|
sbc #$04
|
|
sta $D5
|
|
ldy #$00
|
|
jmp L1F5F
|
|
|
|
L2141: tax
|
|
lda $3020,x
|
|
ora L2164
|
|
sta ($D2),y
|
|
lda L2166
|
|
sta ($D4),y
|
|
inc $D0
|
|
bne L2155
|
|
inc $D1
|
|
L2155: inc $D2
|
|
bne L215B
|
|
inc $D3
|
|
L215B: inc $D4
|
|
bne L2161
|
|
inc $D5
|
|
L2161: .byte $4C
|
|
L2162: .byte $5F
|
|
L2163: .byte $1F
|
|
L2164: rts
|
|
|
|
L2165: brk
|
|
L2166: brk
|
|
L2167: brk
|
|
L2168: brk
|
|
L2169: brk
|
|
L216A: brk
|
|
and $5300
|
|
.byte $53
|
|
eor ($57),y
|
|
eor $5D51,x
|
|
eor $5151,x
|
|
eor ($52),y
|
|
eor ($55),y
|
|
L217B: eor ($61),y
|
|
ldy #$00
|
|
sty L21ED
|
|
sty L21EE
|
|
lda #$20
|
|
sta L21EF
|
|
sta L21F0
|
|
sta L21F1
|
|
sta L21F2
|
|
sta L21F3
|
|
lda #$00
|
|
sta L21F4
|
|
ldx L21EE
|
|
lda #$30
|
|
.byte $9D
|
|
L21A1: .byte $EF
|
|
.byte $21
|
|
L21A3: ldx L21ED
|
|
lda L21DE
|
|
sec
|
|
sbc L21E1,x
|
|
sta L21E0
|
|
lda L21DF
|
|
sbc L21E2,x
|
|
bcc L21CB
|
|
sta L21DF
|
|
lda L21E0
|
|
sta L21DE
|
|
ldx L21EE
|
|
inc L21EF,x
|
|
iny
|
|
jmp L21A1
|
|
|
|
L21CB: cpx #$08
|
|
beq L21DF
|
|
inc L21ED
|
|
inc L21ED
|
|
cpy #$00
|
|
beq L21A3
|
|
inc L21EE
|
|
.byte $4C
|
|
.byte $99
|
|
L21DE: .byte $21
|
|
L21DF: rts
|
|
|
|
L21E0: brk
|
|
L21E1: brk
|
|
L21E2: brk
|
|
bpl L220C
|
|
inx
|
|
.byte $03
|
|
.byte $64
|
|
brk
|
|
asl a
|
|
brk
|
|
ora ($00,x)
|
|
L21ED: brk
|
|
L21EE: brk
|
|
L21EF: brk
|
|
L21F0: brk
|
|
L21F1: brk
|
|
L21F2: brk
|
|
L21F3: brk
|
|
L21F4: brk
|
|
L21F5: brk
|
|
brk
|
|
ldy #$00
|
|
lda #$43
|
|
sta ($D2),y
|
|
iny
|
|
lda #$44
|
|
sta ($D2),y
|
|
iny
|
|
lda #$3A
|
|
sta ($D2),y
|
|
lda $D2
|
|
clc
|
|
adc #$03
|
|
L220C: sta $D2
|
|
lda $D3
|
|
adc #$00
|
|
.byte $85
|
|
L2213: .byte $D3
|
|
rts
|
|
|
|
sta $FF3E
|
|
cli
|
|
lda #$01
|
|
ldy #$00
|
|
jsr LFFBA
|
|
lda #$01
|
|
ldx #$F5
|
|
ldy #$24
|
|
jsr LFFBD
|
|
jsr LFFC0
|
|
lda $90
|
|
cmp #$80
|
|
bne L2235
|
|
jmp L24D2
|
|
|
|
L2235: ldx #$01
|
|
jsr LFFC6
|
|
lda #$20
|
|
sta $D0
|
|
lda #$31
|
|
sta $D1
|
|
lda #$FD
|
|
sta $D2
|
|
lda #$24
|
|
sta $D3
|
|
ldy #$00
|
|
lda #$04
|
|
sta ($D0),y
|
|
iny
|
|
lda #$06
|
|
sta ($D0),y
|
|
iny
|
|
lda #$06
|
|
sta ($D0),y
|
|
iny
|
|
lda #$0A
|
|
sta ($D0),y
|
|
lda $D0
|
|
clc
|
|
adc #$04
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
L226C: lda $90
|
|
beq L2273
|
|
jmp L24D2
|
|
|
|
L2273: jsr LFFCF
|
|
cmp #$22
|
|
bne L226C
|
|
lda #$04
|
|
sta L24F6
|
|
lda #$00
|
|
sta L2514
|
|
ldy #$00
|
|
lda #$22
|
|
sta ($D0),y
|
|
iny
|
|
lda L140E
|
|
sec
|
|
sbc #$08
|
|
tax
|
|
lda L2504,x
|
|
sta $0C71
|
|
sta ($D0),y
|
|
iny
|
|
lda L250C,x
|
|
sta $0C72
|
|
sta ($D0),y
|
|
iny
|
|
lda #$3A
|
|
sta ($D0),y
|
|
lda $D0
|
|
clc
|
|
adc #$04
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
jmp L22C3
|
|
|
|
L22B8: ldy #$00
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L22C2
|
|
inc $D1
|
|
L22C2: .byte $EE
|
|
L22C3: inc $24,x
|
|
lda $90
|
|
beq L22CC
|
|
jmp L24D2
|
|
|
|
L22CC: jsr LFFCF
|
|
cmp #$00
|
|
bne L22DB
|
|
lda #$01
|
|
sta L2514
|
|
jmp L22E0
|
|
|
|
L22DB: ldx L24F6
|
|
cpx #$1B
|
|
L22E0: bne L2304
|
|
ldy #$00
|
|
lda #$22
|
|
sta ($D0),y
|
|
iny
|
|
lda #$00
|
|
sta ($D0),y
|
|
lda $D0
|
|
clc
|
|
adc #$02
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
lda L2514
|
|
cmp #$01
|
|
beq L232F
|
|
jmp L231F
|
|
|
|
L2304: cmp #$22
|
|
bne L22B8
|
|
ldy #$00
|
|
L230A: lda #$20
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L2314
|
|
inc $D1
|
|
L2314: inc L24F6
|
|
lda L24F6
|
|
cmp #$1B
|
|
bne L230A
|
|
.byte $4C
|
|
L231F: .byte $E2
|
|
.byte $22
|
|
L2321: lda $90
|
|
beq L2328
|
|
jmp L24D2
|
|
|
|
L2328: jsr LFFCF
|
|
cmp #$00
|
|
bne L2321
|
|
L232F: lda #$00
|
|
sta L24F7
|
|
sta L24F8
|
|
sta L24F9
|
|
sta L24FA
|
|
sta L24FB
|
|
sta L24FC
|
|
sta L24F6
|
|
lda #$30
|
|
sta L254F
|
|
lda #$00
|
|
sta L2550
|
|
sta L2551
|
|
sta L2552
|
|
sta L2553
|
|
L2359: lda $90
|
|
beq L2360
|
|
jmp L24D2
|
|
|
|
L2360: jsr LFFCF
|
|
ldy #$00
|
|
sta ($D2),y
|
|
inc $D2
|
|
bne L236D
|
|
inc $D3
|
|
L236D: inc L24F6
|
|
lda L24F6
|
|
cmp #$04
|
|
bne L2359
|
|
L2377: lda $90
|
|
beq L237E
|
|
jmp L24D2
|
|
|
|
L237E: jsr LFFCF
|
|
cmp #$22
|
|
bne L2377
|
|
tax
|
|
ldy #$00
|
|
lda #$05
|
|
sta ($D0),y
|
|
iny
|
|
lda #$06
|
|
sta ($D0),y
|
|
iny
|
|
lda #$08
|
|
sta ($D0),y
|
|
lda $D0
|
|
sta $D4
|
|
lda $D1
|
|
sta $D5
|
|
iny
|
|
lda #$0A
|
|
sta ($D0),y
|
|
iny
|
|
lda #$08
|
|
sta ($D0),y
|
|
iny
|
|
lda L24FF
|
|
sta ($D0),y
|
|
iny
|
|
lda L2500
|
|
sta ($D0),y
|
|
iny
|
|
lda #$20
|
|
sta ($D0),y
|
|
iny
|
|
sta ($D0),y
|
|
iny
|
|
sta ($D0),y
|
|
lda $D0
|
|
clc
|
|
adc #$0A
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
txa
|
|
ldx #$00
|
|
stx L24F6
|
|
L23D2: ldy #$00
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L23DC
|
|
inc $D1
|
|
L23DC: inc L24F6
|
|
lda $90
|
|
beq L23E6
|
|
jmp L24D2
|
|
|
|
L23E6: jsr LFFCF
|
|
cmp #$22
|
|
bne L240E
|
|
ldy #$00
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L23F7
|
|
inc $D1
|
|
L23F7: lda #$20
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L2401
|
|
inc $D1
|
|
L2401: inc L24F6
|
|
lda L24F6
|
|
cmp #$12
|
|
bne L23F7
|
|
jmp L2439
|
|
|
|
L240E: ldx L24F6
|
|
cpx #$11
|
|
bne L23D2
|
|
ldy #$00
|
|
lda #$22
|
|
sta ($D0),y
|
|
iny
|
|
lda #$20
|
|
sta ($D0),y
|
|
lda $D0
|
|
clc
|
|
adc #$02
|
|
sta $D0
|
|
lda $D1
|
|
adc #$00
|
|
sta $D1
|
|
L242D: lda $90
|
|
beq L2434
|
|
jmp L24D2
|
|
|
|
L2434: jsr LFFCF
|
|
cmp #$22
|
|
L2439: bne L242D
|
|
L243B: lda $90
|
|
beq L2442
|
|
jmp L24D2
|
|
|
|
L2442: jsr LFFCF
|
|
cmp #$20
|
|
beq L243B
|
|
ldx #$00
|
|
.byte $8E
|
|
L244C: inc $24,x
|
|
ldy #$00
|
|
sta ($D0),y
|
|
tax
|
|
lda L24F6
|
|
cmp #$01
|
|
bne L2482
|
|
cpx #$49
|
|
bne L2463
|
|
lda #$07
|
|
jmp L2467
|
|
|
|
L2463: cpx #$42
|
|
bne L247A
|
|
L2467: lda #$0F
|
|
ldy #$02
|
|
sta ($D4),y
|
|
ldy #$00
|
|
inc L24FB
|
|
bne L2482
|
|
inc L24FC
|
|
jmp L2480
|
|
|
|
L247A: inc L24F9
|
|
bne L2482
|
|
.byte $EE
|
|
L2480: .byte $FA
|
|
.byte $24
|
|
L2482: inc $D0
|
|
bne L2488
|
|
inc $D1
|
|
L2488: inc L24F6
|
|
lda L24F6
|
|
cmp #$03
|
|
beq L249F
|
|
lda $90
|
|
beq L2499
|
|
jmp L24D2
|
|
|
|
L2499: jsr LFFCF
|
|
jmp L244C
|
|
|
|
L249F: lda $90
|
|
beq L24A6
|
|
jmp L24D2
|
|
|
|
L24A6: jsr LFFCF
|
|
cmp #$00
|
|
bne L249F
|
|
inc L24F7
|
|
bne L24B5
|
|
inc L24F8
|
|
L24B5: ldy #$00
|
|
lda #$00
|
|
sta ($D0),y
|
|
inc $D0
|
|
bne L24C1
|
|
inc $D1
|
|
L24C1: lda #$FD
|
|
sta $D2
|
|
lda #$24
|
|
sta $D3
|
|
lda #$00
|
|
sta L24F6
|
|
jsr L2515
|
|
.byte $4C
|
|
L24D2: .byte $57
|
|
.byte $23
|
|
jsr LFFCC
|
|
lda #$01
|
|
jsr LFFC3
|
|
ldx L24F7
|
|
ldy L24F8
|
|
lda L24F9
|
|
sta $E0
|
|
lda L24FA
|
|
sta $E1
|
|
lda L24FB
|
|
sta $E2
|
|
lda L24FC
|
|
sta $E3
|
|
L24F6: rts
|
|
|
|
L24F7: .byte $24
|
|
L24F8: brk
|
|
L24F9: brk
|
|
L24FA: brk
|
|
L24FB: brk
|
|
L24FC: brk
|
|
brk
|
|
brk
|
|
L24FF: brk
|
|
L2500: brk
|
|
brk
|
|
brk
|
|
brk
|
|
L2504: brk
|
|
brk
|
|
bmi L2538
|
|
and ($31),y
|
|
and ($31),y
|
|
L250C: and ($31),y
|
|
sec
|
|
and $3130,y
|
|
.byte $32
|
|
.byte $33
|
|
L2514: .byte $34
|
|
L2515: and $00,x
|
|
L2517: ldx #$00
|
|
L2519: inc L254F,x
|
|
lda L254F,x
|
|
cmp #$3A
|
|
bne L2536
|
|
lda #$30
|
|
sta L254F,x
|
|
inx
|
|
ldy L254F,x
|
|
cpy #$00
|
|
bne L2519
|
|
sta L254F,x
|
|
jmp L2517
|
|
|
|
L2536: ldx #$00
|
|
L2538: lda L254F,x
|
|
beq L2541
|
|
inx
|
|
jmp L2536
|
|
|
|
L2541: dex
|
|
ldy #$00
|
|
lda L254F,x
|
|
sta $0CE9,y
|
|
iny
|
|
dex
|
|
cpx #$FF
|
|
.byte $D0
|
|
L254F: .byte $F4
|
|
L2550: rts
|
|
|
|
L2551: brk
|
|
L2552: brk
|
|
L2553: brk
|
|
L2554: brk
|
|
brk
|
|
sta $D1
|
|
stx $D2
|
|
sty $D3
|
|
sta $FF3E
|
|
cli
|
|
lda #$01
|
|
ldx $D0
|
|
ldy #$0F
|
|
jsr LFFBA
|
|
lda $D1
|
|
ldx $D2
|
|
ldy $D3
|
|
jsr LFFBD
|
|
jsr LFFC0
|
|
jsr LFFCC
|
|
lda #$01
|
|
jsr LFFC3
|
|
sei
|
|
.byte $8D
|
|
.byte $3F
|
|
L2580: .byte $FF
|
|
rts
|
|
|
|
sta $D1
|
|
stx $D2
|
|
sty $D3
|
|
sta $FF3E
|
|
cli
|
|
lda #$0F
|
|
ldx $D0
|
|
ldy #$0F
|
|
jsr LFFBA
|
|
lda #$00
|
|
jsr LFFBD
|
|
jsr LFFC0
|
|
ldx #$0F
|
|
jsr LFFC9
|
|
lda #$00
|
|
sta $D0
|
|
L25A6: ldy $D0
|
|
lda ($D2),y
|
|
jsr LFFD2
|
|
inc $D0
|
|
lda $D0
|
|
cmp $D1
|
|
bne L25A6
|
|
jsr LFFCC
|
|
lda #$0F
|
|
jsr LFFC3
|
|
sei
|
|
.byte $8D
|
|
.byte $3F
|
|
L25C0: .byte $FF
|
|
rts
|
|
|
|
inx
|
|
iny
|
|
stx L25E5
|
|
sty L25E6
|
|
ldy #$00
|
|
L25CC: lda ($D8),y
|
|
sta ($DA),y
|
|
inc $D8
|
|
bne L25D6
|
|
inc $D9
|
|
L25D6: inc $DA
|
|
bne L25DC
|
|
inc $DB
|
|
L25DC: dec L25E5
|
|
bne L25CC
|
|
dec L25E6
|
|
.byte $D0
|
|
L25E5: .byte $E6
|
|
L25E6: rts
|
|
|
|
brk
|
|
brk
|
|
lda #$01
|
|
sta $D8
|
|
lda #$26
|
|
sta $D9
|
|
lda #$F5
|
|
sta $DA
|
|
lda #$05
|
|
sta $DB
|
|
ldx #$73
|
|
ldy #$00
|
|
jsr L25C0
|
|
jmp L05F5
|
|
|
|
sei
|
|
sta $FF3E
|
|
cli
|
|
lda $D5
|
|
cmp #$00
|
|
bne L2615
|
|
ldy #$01
|
|
lda #$00
|
|
jmp L060B
|
|
|
|
L2615: ldy #$00
|
|
lda #$01
|
|
sta $DA
|
|
lda #$01
|
|
ldx $D0
|
|
jsr LFFBA
|
|
lda $D1
|
|
ldx $D2
|
|
ldy $D3
|
|
jsr LFFBD
|
|
lda #$00
|
|
jsr LFF90
|
|
lda #$00
|
|
ldx $2B
|
|
ldy $2C
|
|
jsr LFFD5
|
|
stx $2D
|
|
sty $2E
|
|
jsr LD888
|
|
lda #$EE
|
|
sta $FF19
|
|
lda #$F1
|
|
sta $FF15
|
|
lda #$C4
|
|
sta $FF12
|
|
lda #$D0
|
|
sta $FF13
|
|
lda #$90
|
|
jsr LFFD2
|
|
jsr LD88B
|
|
lda #$00
|
|
sta $EF
|
|
lda $DA
|
|
beq L2667
|
|
jsr L8818
|
|
L2667: jsr L8BBE
|
|
lda $D4
|
|
cmp #$00
|
|
bne L2673
|
|
jmp L8BEA
|
|
|
|
L2673: jmp L867E
|
|
|