2539 lines
33 KiB
ArmAsm
2539 lines
33 KiB
ArmAsm
.word $1001
|
|
* = $1001
|
|
|
|
.byt $0b
|
|
l1002 bpl l100e
|
|
.byt $00,$9e,$34
|
|
.byt $31
|
|
l1008 bmi l1043
|
|
.byt $00,$00,$00
|
|
l100d l100e = * + 1
|
|
; Instruction parameter jumped to.
|
|
sta $ff3e
|
|
l1010 lda #$00
|
|
sta $d0
|
|
lda #$d0
|
|
sta $d1
|
|
lda #$00
|
|
sta $d2
|
|
lda #$28
|
|
sta $d3
|
|
ldy #$00
|
|
l1022 lda ($d0),y
|
|
sta ($d2),y
|
|
inc $d0
|
|
inc $d2
|
|
bne l1022
|
|
l102c inc $d1
|
|
inc $d3
|
|
lda $d3
|
|
cmp #$30
|
|
bne l1022
|
|
l1036 ldx #$00
|
|
l1038 lda l110a,x
|
|
sta $2b20,x
|
|
lda l1112,x
|
|
l1043 = * + 2
|
|
; Instruction parameter jumped to.
|
|
sta $28f0,x
|
|
inx
|
|
cpx #$08
|
|
bne l1038
|
|
l1049 lda #$c0
|
|
sta $ff12
|
|
lda #$28
|
|
sta $ff13
|
|
sei
|
|
sta $ff3f
|
|
ldx #$00
|
|
l1059 txa
|
|
cmp #$c0
|
|
bcc l1064
|
|
l105e sec
|
|
sbc #$c0
|
|
jmp l106b
|
|
l1064 cmp #$40
|
|
bcc l106b
|
|
l1068 sec
|
|
sbc #$40
|
|
l106b sta $3020,x
|
|
inx
|
|
bne l1059
|
|
l1071 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 l10a4
|
|
l10a2 lda #$08
|
|
l10a4 sta l140e
|
|
lda #$00
|
|
sta l16cd
|
|
lda #$00
|
|
sta l140d
|
|
jmp l111a
|
|
.byt $00,$00,$06
|
|
.byt $0e,$01,$48
|
|
.byt $0c,$05,$44
|
|
.byt $52,$49,$56
|
|
.byt $45,$01,$c0
|
|
.byt $0c,$52,$4f
|
|
.byt $57,$53,$01
|
|
.byt $38,$0d,$44
|
|
.byt $49,$52,$53
|
|
l10cf ora ($b0,x)
|
|
ora $4946
|
|
jmp $5345
|
|
.byt $01,$71,$0c
|
|
.byt $06,$05
|
|
.word l2020
|
|
.word l2020
|
|
.byt $20,$01,$e9
|
|
.byt $0c
|
|
.word l2020
|
|
.word l2020
|
|
.byt $20,$01,$03
|
|
.byt $0c,$06,$06
|
|
.byt $04,$22,$02
|
|
.byt $1a,$a0,$22
|
|
.byt $05,$01,$2b
|
|
.byt $0c,$06,$09
|
|
.byt $02,$1c,$40
|
|
.byt $01,$b8,$0f
|
|
l1100 asl $04
|
|
pha
|
|
eor $4c
|
|
bvc l1136
|
|
.byt $46,$37,$00
|
|
l110a .byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
l1112 = * + 2
|
|
.byt $7e,$00,$32
|
|
.byt $7e
|
|
l1114 jmp $0000
|
|
.byt $00,$00,$00
|
|
l111a lda #$00
|
|
jsr l177d
|
|
ldx l140e
|
|
jsr l2213
|
|
lda $90
|
|
cmp #$40
|
|
beq l1148
|
|
l112b jsr l17a8
|
|
lda #$00
|
|
sta l1408
|
|
sta l1408
|
|
l1136 lda #$01
|
|
sta l140f
|
|
lda #$00
|
|
sta l16cd
|
|
lda #$00
|
|
sta l140d
|
|
jmp l11b1
|
|
l1148 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
|
|
jsr l179b
|
|
l11b1 jsr l1874
|
|
l11b4 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 l1246
|
|
l11df lda l16cd
|
|
cmp #$00
|
|
beq l1246
|
|
l11e6 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 l121b
|
|
l1213 lda l1409
|
|
cmp l1411
|
|
beq l1241
|
|
l121b 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
|
|
l1241 ldy #$01
|
|
jmp l1248
|
|
l1246 ldy #$00
|
|
l1248 ldx #$00
|
|
stx l140d
|
|
lda l140f
|
|
sta $dd
|
|
lda #$16
|
|
ldx #$21
|
|
jsr l1938
|
|
cmp #$01
|
|
beq l1260
|
|
l125d jmp l1320
|
|
l1260 ldy #$1d
|
|
lda ($d0),y
|
|
cmp #$44
|
|
bne l1298
|
|
l1268 iny
|
|
lda ($d0),y
|
|
cmp #$49
|
|
bne l1298
|
|
l126f iny
|
|
lda ($d0),y
|
|
cmp #$52
|
|
bne l1298
|
|
l1276 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
|
|
l1298 ldy #$1d
|
|
lda ($d0),y
|
|
cmp #$43
|
|
bne l12cd
|
|
l12a0 iny
|
|
lda ($d0),y
|
|
cmp #$42
|
|
bne l12cd
|
|
l12a7 iny
|
|
lda ($d0),y
|
|
cmp #$4d
|
|
bne l12cd
|
|
l12ae jsr l1669
|
|
lda #$03
|
|
sta l140c
|
|
ldx #$01
|
|
jsr l15dd
|
|
lda l140e
|
|
sta $d0
|
|
lda l140c
|
|
ldx #$00
|
|
ldy #$30
|
|
jsr l2580
|
|
jmp l111a
|
|
l12cd ldy #$06
|
|
lda ($d0),y
|
|
cmp #$20
|
|
beq l12e0
|
|
l12d5 ldy #$04
|
|
lda ($d0),y
|
|
cmp #$34
|
|
bcc l12e0
|
|
l12dd jmp l1276
|
|
l12e0 lda $d0
|
|
sta $d8
|
|
lda $d1
|
|
sta $d9
|
|
lda l1923
|
|
cmp #$00
|
|
beq l12f4
|
|
l12ef lda #$02
|
|
jmp l12f6
|
|
l12f4 lda #$01
|
|
l12f6 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
|
|
jmp l25e7
|
|
l1320 cmp #$02
|
|
bne l1366
|
|
l1324 jsr l1669
|
|
lda l1924
|
|
cmp #$00
|
|
beq l133f
|
|
l132e lda l140e
|
|
sta $d0
|
|
lda #$01
|
|
ldx #$12
|
|
ldy #$14
|
|
jsr l2580
|
|
jmp l111a
|
|
l133f 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
|
|
l1366 cmp #$0b
|
|
bne l1375
|
|
l136a lda #$01
|
|
sta l140d
|
|
jsr l1669
|
|
jmp l111a
|
|
l1375 cmp #$05
|
|
bne l138e
|
|
l1379 lda #$08
|
|
l137b sta l140e
|
|
lda #$03
|
|
sta l140d
|
|
lda #$00
|
|
sta l16cd
|
|
jsr l1669
|
|
jmp l111a
|
|
l138e cmp #$06
|
|
bne l1397
|
|
l1392 lda #$09
|
|
jmp l137b
|
|
l1397 cmp #$03
|
|
bne l13a0
|
|
l139b lda #$0a
|
|
jmp l137b
|
|
l13a0 cmp #$04
|
|
bne l13a9
|
|
l13a4 lda #$0b
|
|
jmp l137b
|
|
l13a9 cmp #$0a
|
|
bne l13db
|
|
l13ad jsr l1655
|
|
lda #$13
|
|
sta $d0
|
|
lda #$14
|
|
sta $d1
|
|
lda #$00
|
|
ldx #$00
|
|
jsr l1f34
|
|
l13bf lda l1919
|
|
cmp #$10
|
|
bne l13bf
|
|
l13c6 jsr l1655
|
|
lda #$b6
|
|
sta $d0
|
|
lda #$10
|
|
sta $d1
|
|
lda #$00
|
|
ldx #$00
|
|
jsr l1f34
|
|
jmp l111a
|
|
l13db cmp #$0d
|
|
bne l1405
|
|
l13df sta $ff3e
|
|
lda #$c4
|
|
sta $ff12
|
|
lda #$d0
|
|
sta $ff13
|
|
lda #$f1
|
|
sta $ff15
|
|
lda #$ee
|
|
sta $ff19
|
|
lda #$90
|
|
jsr $ffd2
|
|
jsr $d88b
|
|
lda #$00
|
|
sta $ef
|
|
jmp $867e
|
|
l1405 jmp l11b4
|
|
l1408 l1409 = * + 1
|
|
l140a = * + 2
|
|
.byt $00,$00,$00
|
|
l140b l140c = * + 1
|
|
l140d = * + 2
|
|
.byt $00,$00,$00
|
|
l140e l140f = * + 1
|
|
l1410 = * + 2
|
|
.byt $00,$00,$00
|
|
l1411 .byt $00,$2f,$06
|
|
.byt $0e,$05,$01
|
|
.byt $09,$0c,$44
|
|
.byt $49,$52,$45
|
|
.byt $43,$54,$4f
|
|
.byt $52,$59,$20
|
|
.byt $42,$52,$4f
|
|
.byt $57,$53
|
|
l1428 eor $52
|
|
jsr $3156
|
|
rol $0b32
|
|
bvc l143e
|
|
.byt $52,$45,$54
|
|
.byt $55,$52,$4e
|
|
.word l2020
|
|
.word l2020
|
|
.word l2020
|
|
l143e .byt $20,$3a,$20
|
|
.byt $45,$4e,$54
|
|
.byt $45,$52,$20
|
|
.byt $44,$49,$52
|
|
.byt $45,$43,$54
|
|
.byt $4f,$52,$59
|
|
.byt $0c,$49,$4e
|
|
.byt $53,$54,$2f
|
|
.byt $44,$45
|
|
l1458 jmp l2020
|
|
.byt $20,$20
|
|
l145d jsr l203a
|
|
bvc l14b4
|
|
.byt $45,$56,$49
|
|
.byt $4f,$55,$53
|
|
.byt $20,$44,$49
|
|
.byt $52,$45,$43
|
|
.byt $54,$4f,$52
|
|
.byt $59,$0c,$43
|
|
.byt $4f,$4d,$4d
|
|
.byt $2b,$49,$4e
|
|
.byt $53,$54,$2f
|
|
.byt $44,$45
|
|
l147f jmp l203a
|
|
.byt $52,$4f,$4f
|
|
.byt $54,$20,$44
|
|
.byt $38,$31,$20
|
|
.byt $44,$49,$52
|
|
.byt $45,$43,$54
|
|
.byt $4f,$52,$59
|
|
.byt $0c,$43,$4f
|
|
.byt $4d,$4d,$2b
|
|
.byt $52,$2d,$4b
|
|
.byt $45,$59,$20
|
|
l14a0 jsr $3a20
|
|
jsr $4552
|
|
jmp $414f
|
|
.byt $44,$20,$44
|
|
.byt $49,$52,$45
|
|
.byt $43,$54,$4f
|
|
l14b4 = * + 2
|
|
.byt $52,$59,$0c
|
|
.byt $0c,$43,$4f
|
|
l14b8 eor $2b4d
|
|
sec
|
|
bit $2c39
|
|
bmi l14ed
|
|
.byt $31,$20,$3a
|
|
.byt $20,$43,$48
|
|
.byt $41,$4e,$47
|
|
.byt $45,$20,$44
|
|
.byt $52,$49,$56
|
|
.byt $45,$0c,$0c
|
|
.byt $52,$45,$54
|
|
.byt $55,$52,$4e
|
|
l14d9 jsr l2020
|
|
jsr l2020
|
|
jsr l203a
|
|
jmp $414f
|
|
.byt $44,$20
|
|
l14e7 bvc l153b
|
|
.byt $47,$20,$57
|
|
l14ed = * + 1
|
|
.byt $49,$54,$48
|
|
.byt $20,$52,$55
|
|
.byt $4e,$20,$28
|
|
.byt $2c,$38,$2c
|
|
.byt $31,$29,$0c
|
|
.byt $43,$54,$52
|
|
l14fe jmp $522b
|
|
.byt $45,$54,$55
|
|
.byt $52,$4e,$20
|
|
l1507 jsr l203a
|
|
jmp $414f
|
|
.byt $44,$20
|
|
l150f bvc l1563
|
|
.byt $47,$20,$57
|
|
.byt $49,$54,$48
|
|
.byt $20,$52,$55
|
|
.byt $4e,$20,$28
|
|
.byt $2c,$38,$29
|
|
.byt $0c,$53,$48
|
|
.byt $49,$46,$54
|
|
.byt $2b,$52,$45
|
|
.byt $54,$55,$52
|
|
.byt $4e
|
|
l152d jsr l203a
|
|
jmp $414f
|
|
.byt $44,$20
|
|
l1535 bvc l1589
|
|
.byt $4f,$47,$52
|
|
.byt $41
|
|
l153b eor $5720
|
|
eor #$54
|
|
pha
|
|
.byt $4f,$55,$54
|
|
.byt $20,$52,$55
|
|
.byt $4e,$0c,$0c
|
|
.byt $43,$4f,$4d
|
|
.byt $4d,$2b,$51
|
|
.byt $2d,$4b,$45
|
|
.word l2059
|
|
.word l2020
|
|
.word l203a
|
|
.byt $51,$55,$49
|
|
.byt $54,$0c,$0c
|
|
.byt $55
|
|
l1560 bvc l1591
|
|
l1563 = * + 1
|
|
.byt $44,$4f,$57
|
|
.byt $4e
|
|
.word l2020
|
|
.word l2020
|
|
.word l2020
|
|
.word l203a
|
|
.byt $43,$55,$52
|
|
.byt $53,$4f,$52
|
|
.byt $20,$55
|
|
l1576 bvc l15a7
|
|
.byt $44,$4f,$57
|
|
.byt $4e,$0c
|
|
l157d jmp $4645
|
|
.byt $54,$2f,$52
|
|
.byt $49,$47,$48
|
|
.byt $54,$20,$20
|
|
l1589 .byt $20,$3a,$20
|
|
.byt $50
|
|
l158d eor ($47,x)
|
|
eor $20
|
|
l1591 eor $50,x
|
|
.byt $2f,$44,$4f
|
|
.byt $57,$4e,$0c
|
|
.byt $53,$48,$49
|
|
.byt $46,$54,$2b
|
|
l159f eor $50,x
|
|
jsr l2020
|
|
jsr $3a20
|
|
l15a7 jsr $4150
|
|
.byt $47,$45,$20
|
|
.byt $48,$4f,$4d
|
|
.byt $45,$0c,$53
|
|
.byt $48,$49,$46
|
|
.byt $54,$2b,$44
|
|
.byt $4f,$57
|
|
l15bb lsr l2020
|
|
jsr l203a
|
|
bvc l1604
|
|
.byt $47,$45,$20
|
|
.byt $45,$4e,$44
|
|
.byt $0c,$01,$cc
|
|
.byt $0f,$45,$53
|
|
l15cf .byt $43,$3a,$20
|
|
.byt $43
|
|
l15d3 jmp $534f
|
|
l15d6 eor $20
|
|
pha
|
|
eor $4c
|
|
bvc l15dd
|
|
l15dd lda #$00
|
|
sta $d2
|
|
lda #$30
|
|
sta $d3
|
|
cpx #$00
|
|
beq l15ef
|
|
l15e9 jsr l1611
|
|
jmp l15f2
|
|
l15ef jsr l21f5
|
|
l15f2 lda $d0
|
|
clc
|
|
adc #$0b
|
|
sta $d0
|
|
lda $d1
|
|
adc #$00
|
|
sta $d1
|
|
ldy #$00
|
|
l1601 lda ($d0),y
|
|
l1604 = * + 1
|
|
cmp #$22
|
|
beq l1610
|
|
l1607 sta ($d2),y
|
|
iny
|
|
inc l140c
|
|
jmp l1601
|
|
l1610 rts
|
|
l1611 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
|
|
sta $d3
|
|
rts
|
|
l162f 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
|
|
jsr l16b9
|
|
rts
|
|
l1655 ldx #$00
|
|
lda #$20
|
|
l1659 sta $0c00,x
|
|
sta $0d00,x
|
|
sta $0e00,x
|
|
sta $0f00,x
|
|
inx
|
|
bne l1659
|
|
l1668 rts
|
|
l1669 lda #$04
|
|
sta $d2
|
|
lda #$0c
|
|
sta $d3
|
|
ldy #$00
|
|
lda #$a0
|
|
l1675 sta ($d2),y
|
|
iny
|
|
cpy #$1a
|
|
bne l1675
|
|
l167c lda #$53
|
|
sta $d2
|
|
lda #$0c
|
|
sta $d3
|
|
ldx #$00
|
|
l1686 ldy #$00
|
|
l1688 lda #$20
|
|
sta ($d2),y
|
|
iny
|
|
cpy #$1c
|
|
bne l1688
|
|
l1691 lda $d2
|
|
clc
|
|
adc #$28
|
|
sta $d2
|
|
lda $d3
|
|
adc #$00
|
|
sta $d3
|
|
inx
|
|
cpx #$16
|
|
bne l1686
|
|
l16a3 ldx #$00
|
|
lda #$20
|
|
l16a7 sta $0c71,x
|
|
sta $0ce9,x
|
|
sta $0d61,x
|
|
sta $0dd9,x
|
|
inx
|
|
cpx #$05
|
|
bne l16a7
|
|
l16b8 rts
|
|
l16b9 ldx l16cd
|
|
sta l16ce,x
|
|
inc l16cd
|
|
rts
|
|
l16c3 dec l16cd
|
|
ldx l16cd
|
|
lda l16ce,x
|
|
rts
|
|
l16cd l16ce = * + 1
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
.byt $00,$00
|
|
l177d 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
|
|
jsr l1f34
|
|
rts
|
|
l179b ldx #$00
|
|
lda #$20
|
|
l179f sta $0fc0,x
|
|
inx
|
|
cpx #$28
|
|
bne l179f
|
|
l17a7 rts
|
|
l17a8 sta l17e0
|
|
jsr l179b
|
|
ldx #$00
|
|
l17b0 lda l182e,x
|
|
cmp l17e0
|
|
beq l17c8
|
|
l17b8 inx
|
|
cpx #$0a
|
|
bne l17b0
|
|
l17bd lda #$60
|
|
sta $d0
|
|
lda #$18
|
|
sta $d1
|
|
jmp l17d2
|
|
l17c8 lda l1830,x
|
|
sta $d0
|
|
lda l1832,x
|
|
sta $d1
|
|
l17d2 lda #$c0
|
|
sta $d2
|
|
lda #$0f
|
|
sta $d3
|
|
lda #$01
|
|
jsr l1f34
|
|
rts
|
|
l17e0 l17e1 = * + 1
|
|
.byt $00,$e7,$00
|
|
l17e4 = * + 1
|
|
.byt $17,$17
|
|
l17e5 clc
|
|
clc
|
|
asl $0b
|
|
ora $3e
|
|
jmp $414f
|
|
.byt $44,$49,$4e
|
|
.byt $47,$20,$44
|
|
.byt $49,$52,$45
|
|
.byt $43,$54,$4f
|
|
.byt $52,$59,$2e
|
|
l17fd rol !$002e
|
|
asl $0b
|
|
ora $3e
|
|
jmp $414f
|
|
.byt $44,$49
|
|
l1809 lsr l2047
|
|
bvc l1860
|
|
.byt $4f,$47,$52
|
|
.byt $41,$4d,$2e
|
|
l1814 rol !$002e
|
|
asl $0b
|
|
ora $3e
|
|
jmp $414f
|
|
.byt $44,$49
|
|
l1820 lsr l2047
|
|
bvc l1877
|
|
.byt $4f,$47,$52
|
|
.byt $41,$4d,$2e
|
|
.byt $2e,$2e,$00
|
|
l182e l1830 = * + 2
|
|
.byt $42,$80,$34
|
|
l1831 pha
|
|
l1832 clc
|
|
clc
|
|
asl $0d
|
|
ora $3e
|
|
lsr $49
|
|
jmp l2045
|
|
.byt $4e,$4f,$54
|
|
.byt $20,$46,$4f
|
|
.byt $55,$4e,$44
|
|
.byt $21,$00,$06
|
|
.byt $0d,$05,$3e
|
|
.byt $44,$45,$56
|
|
.byt $49,$43,$45
|
|
.byt $20,$4e,$4f
|
|
.byt $54,$20
|
|
l1857 bvc l18ab
|
|
.byt $45,$53,$45
|
|
.byt $4e,$54
|
|
l185e and ($00,x)
|
|
l1860 asl $0d
|
|
ora $3e
|
|
.byt $4f,$54,$48
|
|
.byt $45,$52,$20
|
|
.byt $49,$4f,$20
|
|
.byt $45,$52,$52
|
|
.byt $4f,$52
|
|
l1872 and ($00,x)
|
|
l1874 sei
|
|
l1877 = * + 2
|
|
sta $ff3f
|
|
lda #$91
|
|
sta $fffe
|
|
lda #$18
|
|
sta $ffff
|
|
lda #$02
|
|
sta $ff09
|
|
sta $ff0a
|
|
lda #$80
|
|
sta $ff0b
|
|
cli
|
|
rts
|
|
l1891 pha
|
|
txa
|
|
pha
|
|
tya
|
|
pha
|
|
lda $ff09
|
|
sta $ff09
|
|
jsr l18c7
|
|
lda l1926
|
|
cmp #$00
|
|
beq l18b7
|
|
l18a6 lda l1924
|
|
cmp #$00
|
|
l18ab bne l18b7
|
|
l18ad lda $0fc0
|
|
cmp #$20
|
|
beq l18b7
|
|
l18b4 jsr l179b
|
|
l18b7 lda l1937
|
|
cmp #$00
|
|
beq l18c1
|
|
l18be dec l1937
|
|
l18c1 pla
|
|
tay
|
|
pla
|
|
tax
|
|
pla
|
|
rti
|
|
l18c7 lda #$00
|
|
sta l1926
|
|
ldx #$00
|
|
l18ce lda l191b,x
|
|
sta $fd30
|
|
sta $ff08
|
|
lda $ff08
|
|
eor #$ff
|
|
sta l1913,x
|
|
ora l1926
|
|
sta l1926
|
|
inx
|
|
cpx #$08
|
|
bne l18ce
|
|
l18ea 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
|
|
sta l191a
|
|
rts
|
|
l1913 l1914 = * + 1
|
|
l1915 = * + 2
|
|
.byt $00,$00,$00
|
|
l1916 l1917 = * + 1
|
|
l1918 = * + 2
|
|
.byt $00,$00,$00
|
|
l1919 l191a = * + 1
|
|
l191b = * + 2
|
|
.byt $00,$00,$fe
|
|
.byt $fd,$fb,$f7
|
|
.byt $ef,$df,$bf
|
|
l1923 = * + 1
|
|
l1924 = * + 2
|
|
.byt $7f,$00,$00
|
|
l1925 l1926 = * + 1
|
|
.byt $00,$00
|
|
l1927 ldx l1926
|
|
cpx #$00
|
|
beq l1935
|
|
l192e ldx l1937
|
|
cpx #$00
|
|
bne l1927
|
|
l1935 rts
|
|
l1936 l1937 = * + 1
|
|
.byt $00,$00
|
|
l1938 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 l197f
|
|
l1975 lda l1cb0
|
|
bne l197f
|
|
l197a lda #$01
|
|
sta l1cc4
|
|
l197f lda $dd
|
|
cmp #$01
|
|
beq l198a
|
|
l1985 lda #$01
|
|
jsr l1f34
|
|
l198a lda l1cc4
|
|
cmp #$01
|
|
beq l19fd
|
|
l1991 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 l19e3
|
|
l19c7 lda $d8
|
|
sta l1ca9
|
|
lda $d9
|
|
sta l1caa
|
|
lda $da
|
|
sta l1cb9
|
|
lda $db
|
|
sta l1cba
|
|
lda $dc
|
|
sta l1cb5
|
|
jmp l19fa
|
|
l19e3 lda #$00
|
|
sta l1cb5
|
|
sta l1cb9
|
|
sta l1cba
|
|
lda l1ca7
|
|
sta l1ca9
|
|
lda l1ca8
|
|
sta l1caa
|
|
l19fa jsr l1e59
|
|
l19fd lda l1918
|
|
cmp #$01
|
|
beq l1a07
|
|
l1a04 jmp l1a92
|
|
l1a07 lda l1cc4
|
|
cmp #$01
|
|
bne l1a11
|
|
l1a0e jmp l19fd
|
|
l1a11 lda l1923
|
|
cmp #$80
|
|
bne l1a4a
|
|
l1a18 lda l1cb8
|
|
cmp #$00
|
|
bne l1a3e
|
|
l1a1f lda l1cb7
|
|
cmp l1cb1
|
|
bcc l1a2a
|
|
l1a27 jmp l1a3e
|
|
l1a2a lda l1cb5
|
|
cmp l1cb7
|
|
bne l1a35
|
|
l1a32 jmp l19fd
|
|
l1a35 lda l1cb7
|
|
sta l1cb5
|
|
jmp l1c88
|
|
l1a3e lda l1cb6
|
|
sta l1cb5
|
|
jsr l1d56
|
|
jmp l1c88
|
|
l1a4a lda l1cb8
|
|
cmp #$00
|
|
bne l1a59
|
|
l1a51 lda l1cb5
|
|
cmp l1cb7
|
|
beq l19fd
|
|
l1a59 lda l1cb5
|
|
cmp l1cb6
|
|
beq l1a67
|
|
l1a61 inc l1cb5
|
|
jmp l1c88
|
|
l1a67 lda l1cb9
|
|
clc
|
|
adc l1cb5
|
|
sta l1cbb
|
|
lda l1cba
|
|
adc #$00
|
|
sta l1cbc
|
|
lda l1cbb
|
|
cmp l1cb7
|
|
bne l1a8c
|
|
l1a81 lda l1cbc
|
|
cmp l1cb8
|
|
bne l1a8c
|
|
l1a89 jmp l19fd
|
|
l1a8c jsr l1d06
|
|
jmp l1c88
|
|
l1a92 cmp #$08
|
|
bne l1aee
|
|
l1a96 lda l1cc4
|
|
cmp #$01
|
|
bne l1aa0
|
|
l1a9d jmp l19fd
|
|
l1aa0 lda l1923
|
|
cmp #$80
|
|
bne l1aca
|
|
l1aa7 lda l1cb9
|
|
cmp #$00
|
|
bne l1abf
|
|
l1aae lda l1cba
|
|
cmp #$00
|
|
bne l1abf
|
|
l1ab5 lda l1cb5
|
|
cmp #$00
|
|
bne l1abf
|
|
l1abc jmp l19fd
|
|
l1abf lda #$00
|
|
sta l1cb5
|
|
jsr l1d41
|
|
jmp l1c88
|
|
l1aca lda l1cb5
|
|
cmp #$00
|
|
beq l1ad7
|
|
l1ad1 dec l1cb5
|
|
jmp l1c88
|
|
l1ad7 lda l1cb9
|
|
cmp #$00
|
|
bne l1ae8
|
|
l1ade lda l1cba
|
|
cmp #$00
|
|
bne l1ae8
|
|
l1ae5 jmp l19fd
|
|
l1ae8 jsr l1d21
|
|
jmp l1c88
|
|
l1aee lda l1919
|
|
cmp #$08
|
|
beq l1af8
|
|
l1af5 jmp l1b8f
|
|
l1af8 lda l1cc4
|
|
cmp #$01
|
|
bne l1b02
|
|
l1aff jmp l19fd
|
|
l1b02 lda l1cb8
|
|
cmp #$00
|
|
bne l1b25
|
|
l1b09 lda l1cb7
|
|
cmp l1cb6
|
|
bcs l1b25
|
|
l1b11 lda l1cb5
|
|
cmp l1cb7
|
|
bne l1b1c
|
|
l1b19 jmp l19fd
|
|
l1b1c lda l1cb7
|
|
sta l1cb5
|
|
jmp l1c88
|
|
l1b25 lda l1cb5
|
|
cmp l1cb6
|
|
beq l1b36
|
|
l1b2d lda l1cb6
|
|
sta l1cb5
|
|
jmp l1c88
|
|
l1b36 lda l1cb9
|
|
clc
|
|
adc l1cb5
|
|
sta $d0
|
|
lda l1cba
|
|
adc #$00
|
|
sta $d1
|
|
lda l1cb7
|
|
cmp $d0
|
|
bne l1b57
|
|
l1b4d lda l1cb7
|
|
cmp $d1
|
|
bne l1b57
|
|
l1b54 jmp l19fd
|
|
l1b57 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 l1b83
|
|
l1b7c lda $d0
|
|
cmp l1cb6
|
|
bcc l1b89
|
|
l1b83 jsr l1d6f
|
|
jmp l1c88
|
|
l1b89 jsr l1d56
|
|
jmp l1c88
|
|
l1b8f cmp #$01
|
|
bne l1bce
|
|
l1b93 lda l1cc4
|
|
cmp #$01
|
|
bne l1b9d
|
|
l1b9a jmp l19fd
|
|
l1b9d lda l1cb5
|
|
cmp #$00
|
|
beq l1bac
|
|
l1ba4 lda #$00
|
|
sta l1cb5
|
|
jmp l1c88
|
|
l1bac lda l1cba
|
|
cmp #$00
|
|
bne l1bc2
|
|
l1bb3 lda l1cb9
|
|
cmp #$00
|
|
bne l1bbd
|
|
l1bba jmp l19fd
|
|
l1bbd cmp l1cb6
|
|
bcc l1bc8
|
|
l1bc2 jsr l1d95
|
|
jmp l1c88
|
|
l1bc8 jsr l1d41
|
|
jmp l1c88
|
|
l1bce lda l1913
|
|
cmp #$02
|
|
bne l1be7
|
|
l1bd5 lda l1cc4
|
|
cmp #$01
|
|
bne l1bdf
|
|
l1bdc jmp l19fd
|
|
l1bdf jsr l1cc5
|
|
lda #$01
|
|
jmp l1c9c
|
|
l1be7 cmp #$01
|
|
bne l1bf0
|
|
l1beb lda #$02
|
|
jmp l1c9c
|
|
l1bf0 cmp #$08
|
|
bne l1bf9
|
|
l1bf4 lda #$0a
|
|
jmp l1c9c
|
|
l1bf9 cmp #$10
|
|
bne l1c02
|
|
l1bfd lda #$07
|
|
jmp l1c9c
|
|
l1c02 cmp #$20
|
|
bne l1c0b
|
|
l1c06 lda #$08
|
|
jmp l1c9c
|
|
l1c0b cmp #$40
|
|
bne l1c14
|
|
l1c0f lda #$09
|
|
jmp l1c9c
|
|
l1c14 lda l1915
|
|
cmp #$02
|
|
bne l1c27
|
|
l1c1b ldx l1924
|
|
cpx #$00
|
|
beq l1c27
|
|
l1c22 lda #$0b
|
|
jmp l1c9c
|
|
l1c27 lda l1917
|
|
cmp #$08
|
|
bne l1c3a
|
|
l1c2e ldx l1924
|
|
cpx #$00
|
|
beq l1c3a
|
|
l1c35 lda #$03
|
|
jmp l1c9c
|
|
l1c3a cmp #$01
|
|
bne l1c4a
|
|
l1c3e ldx l1924
|
|
cpx #$00
|
|
beq l1c4a
|
|
l1c45 lda #$06
|
|
jmp l1c9c
|
|
l1c4a lda l1916
|
|
cmp #$08
|
|
bne l1c5d
|
|
l1c51 ldx l1924
|
|
cpx #$00
|
|
beq l1c5d
|
|
l1c58 lda #$05
|
|
jmp l1c9c
|
|
l1c5d lda l191a
|
|
cmp #$01
|
|
bne l1c70
|
|
l1c64 ldx l1924
|
|
cpx #$00
|
|
beq l1c70
|
|
l1c6b lda #$04
|
|
jmp l1c9c
|
|
l1c70 cmp #$40
|
|
bne l1c80
|
|
l1c74 ldx l1924
|
|
cpx #$00
|
|
beq l1c80
|
|
l1c7b lda #$0d
|
|
jmp l1c9c
|
|
l1c80 lda #$0b
|
|
sta l1936
|
|
jmp l19fd
|
|
l1c88 lda l1936
|
|
sta l1937
|
|
jsr l1e59
|
|
lda #$02
|
|
sta l1936
|
|
jsr l1927
|
|
jmp l19fd
|
|
l1c9c ldx #$0b
|
|
stx l1937
|
|
jsr l1927
|
|
rts
|
|
l1ca5 l1ca6 = * + 1
|
|
l1ca7 = * + 2
|
|
.byt $00,$00,$00
|
|
l1ca8 l1ca9 = * + 1
|
|
l1caa = * + 2
|
|
.byt $00,$00,$00
|
|
l1cab l1cac = * + 1
|
|
l1cad = * + 2
|
|
.byt $00,$00,$00
|
|
l1cae l1caf = * + 1
|
|
l1cb0 = * + 2
|
|
.byt $00,$00,$00
|
|
l1cb1 l1cb2 = * + 1
|
|
l1cb3 = * + 2
|
|
.byt $00,$00,$00
|
|
l1cb4 l1cb5 = * + 1
|
|
l1cb6 = * + 2
|
|
.byt $00,$00,$00
|
|
l1cb7 l1cb8 = * + 1
|
|
l1cb9 = * + 2
|
|
.byt $00,$00,$00
|
|
l1cba l1cbb = * + 1
|
|
l1cbc = * + 2
|
|
.byt $00,$00,$00
|
|
l1cbd l1cbe = * + 1
|
|
l1cbf = * + 2
|
|
.byt $00,$00,$00
|
|
l1cc0 l1cc1 = * + 1
|
|
l1cc2 = * + 2
|
|
.byt $00,$00,$00
|
|
l1cc3 l1cc4 = * + 1
|
|
.byt $00,$00
|
|
l1cc5 lda l1ca9
|
|
sta $d0
|
|
lda l1caa
|
|
sta $d1
|
|
lda l1cb5
|
|
cmp #$00
|
|
beq l1cec
|
|
l1cd6 ldx #$00
|
|
l1cd8 lda $d0
|
|
clc
|
|
adc l1cb4
|
|
sta $d0
|
|
lda $d1
|
|
adc #$00
|
|
sta $d1
|
|
inx
|
|
cpx l1cb5
|
|
bne l1cd8
|
|
l1cec lda l1ca9
|
|
sta $d2
|
|
lda l1caa
|
|
sta $d3
|
|
lda l1cb9
|
|
sta $d4
|
|
lda l1cba
|
|
sta $d5
|
|
lda l1cb5
|
|
sta $d6
|
|
rts
|
|
l1d06 lda l1ca9
|
|
clc
|
|
adc l1cb4
|
|
sta l1ca9
|
|
lda l1caa
|
|
adc #$00
|
|
sta l1caa
|
|
inc l1cb9
|
|
bne l1d20
|
|
l1d1d inc l1cba
|
|
l1d20 rts
|
|
l1d21 lda l1ca9
|
|
sec
|
|
sbc l1cb4
|
|
sta l1ca9
|
|
lda l1caa
|
|
sbc #$00
|
|
sta l1caa
|
|
dec l1cb9
|
|
lda l1cb9
|
|
cmp #$ff
|
|
bne l1d40
|
|
l1d3d dec l1cba
|
|
l1d40 rts
|
|
l1d41 lda l1ca7
|
|
sta l1ca9
|
|
lda l1ca8
|
|
sta l1caa
|
|
lda #$00
|
|
sta l1cb9
|
|
sta l1cba
|
|
rts
|
|
l1d56 lda l1cbd
|
|
sta l1ca9
|
|
lda l1cbe
|
|
sta l1caa
|
|
lda l1cbf
|
|
sta l1cb9
|
|
lda l1cc0
|
|
sta l1cba
|
|
rts
|
|
l1d6f lda l1ca9
|
|
clc
|
|
adc l1cb2
|
|
sta l1ca9
|
|
lda l1caa
|
|
adc l1cb3
|
|
sta l1caa
|
|
lda l1cb9
|
|
clc
|
|
adc l1cb6
|
|
sta l1cb9
|
|
lda l1cba
|
|
adc #$00
|
|
sta l1cba
|
|
rts
|
|
l1d95 lda l1ca9
|
|
sec
|
|
sbc l1cb2
|
|
sta l1ca9
|
|
lda l1caa
|
|
sbc l1cb3
|
|
sta l1caa
|
|
lda l1cb9
|
|
sec
|
|
sbc l1cb6
|
|
sta l1cb9
|
|
lda l1cba
|
|
sbc #$00
|
|
sta l1cba
|
|
rts
|
|
l1dbb lda l1caf
|
|
sta l1cb7
|
|
lda l1cb0
|
|
sta l1cb8
|
|
dec l1cb7
|
|
lda l1cb7
|
|
cmp #$ff
|
|
bne l1dd4
|
|
l1dd1 dec l1cb8
|
|
l1dd4 lda l1cb0
|
|
cmp #$00
|
|
bne l1dfa
|
|
l1ddb lda l1caf
|
|
cmp l1cb1
|
|
bcs l1dfa
|
|
l1de3 lda #$00
|
|
sta l1cbf
|
|
sta l1cc0
|
|
lda l1ca7
|
|
sta l1cbd
|
|
lda l1ca8
|
|
sta l1cbe
|
|
jmp l1e38
|
|
l1dfa lda l1cb7
|
|
sec
|
|
sbc l1cb1
|
|
sta l1cbf
|
|
lda l1cb8
|
|
sbc #$00
|
|
sta l1cc0
|
|
inc l1cbf
|
|
bne l1e14
|
|
l1e11 inc l1cc0
|
|
l1e14 lda l1cc1
|
|
sta l1cbd
|
|
lda l1cc2
|
|
sta l1cbe
|
|
ldx l1cb1
|
|
l1e23 lda l1cbd
|
|
sec
|
|
sbc l1cb4
|
|
sta l1cbd
|
|
lda l1cbe
|
|
sbc #$00
|
|
sta l1cbe
|
|
dex
|
|
bne l1e23
|
|
l1e38 lda #$00
|
|
sta l1cb2
|
|
sta l1cb3
|
|
ldx l1cb6
|
|
l1e43 lda l1cb2
|
|
clc
|
|
adc l1cb4
|
|
sta l1cb2
|
|
lda l1cb3
|
|
adc #$00
|
|
sta l1cb3
|
|
dex
|
|
bne l1e43
|
|
l1e58 rts
|
|
l1e59 lda l1cb0
|
|
cmp #$00
|
|
bne l1e71
|
|
l1e60 lda l1caf
|
|
cmp l1cb1
|
|
bcs l1e71
|
|
l1e68 lda l1caf
|
|
sta l1e98
|
|
jmp l1e77
|
|
l1e71 lda l1cb1
|
|
sta l1e98
|
|
l1e77 lda l1ca9
|
|
sta $d0
|
|
lda l1caa
|
|
sta $d1
|
|
lda l1cad
|
|
sta $d2
|
|
lda l1cae
|
|
sta $d3
|
|
lda l1cb5
|
|
ldx l1cb4
|
|
ldy l1e98
|
|
jsr l1e99
|
|
rts
|
|
l1e98 .byt $00
|
|
l1e99 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
|
|
l1ebe lda l1f2f
|
|
cmp l1f30
|
|
bne l1ed1
|
|
l1ec6 lda #$01
|
|
sta l1f33
|
|
ldy #$00
|
|
lda #$04
|
|
sta ($d0),y
|
|
l1ed1 ldx #$00
|
|
lda #$01
|
|
jsr l1f34
|
|
lda l1f33
|
|
cmp #$01
|
|
bne l1ef4
|
|
l1edf lda #$00
|
|
sta l1f33
|
|
lda l1f2d
|
|
sta $d0
|
|
lda l1f2e
|
|
sta $d1
|
|
ldy #$00
|
|
lda #$05
|
|
sta ($d0),y
|
|
l1ef4 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
|
|
bne l1ebe
|
|
l1f2a rts
|
|
l1f2b l1f2c = * + 1
|
|
l1f2d = * + 2
|
|
.byt $00,$00,$00
|
|
l1f2e l1f2f = * + 1
|
|
l1f30 = * + 2
|
|
.byt $00,$00,$00
|
|
l1f31 l1f32 = * + 1
|
|
l1f33 = * + 2
|
|
.byt $00,$00,$00
|
|
l1f34 stx l2163
|
|
cmp #$00
|
|
bne l1f4e
|
|
l1f3b lda #$00
|
|
sta $d2
|
|
lda #$0c
|
|
sta $d3
|
|
lda #$00
|
|
sta $d4
|
|
lda #$08
|
|
sta $d5
|
|
jmp l1f5f
|
|
l1f4e lda $d2
|
|
sta $d4
|
|
lda $d3
|
|
sec
|
|
sbc #$04
|
|
sta $d5
|
|
lda l2169,y
|
|
sta l2166
|
|
l1f5f ldy #$00
|
|
lda ($d0),y
|
|
cmp #$00
|
|
bne l1f6a
|
|
l1f67 jmp l2162
|
|
l1f6a cmp #$01
|
|
bne l1f93
|
|
l1f6e 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
|
|
l1f93 cmp #$02
|
|
bne l1fcc
|
|
l1f97 iny
|
|
lda ($d0),y
|
|
tax
|
|
iny
|
|
lda ($d0),y
|
|
sta l2165
|
|
ldy #$00
|
|
l1fa3 lda l2165
|
|
sta ($d2),y
|
|
lda l2166
|
|
sta ($d4),y
|
|
inc $d2
|
|
bne l1fb3
|
|
l1fb1 inc $d3
|
|
l1fb3 inc $d4
|
|
bne l1fb9
|
|
l1fb7 inc $d5
|
|
l1fb9 dex
|
|
bne l1fa3
|
|
l1fbc lda $d0
|
|
clc
|
|
adc #$03
|
|
sta $d0
|
|
lda $d1
|
|
adc #$00
|
|
sta $d1
|
|
jmp l1f5f
|
|
l1fcc cmp #$03
|
|
bne l2015
|
|
l1fd0 iny
|
|
lda ($d0),y
|
|
tax
|
|
iny
|
|
lda ($d0),y
|
|
sta l2165
|
|
l1fda 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 l1fda
|
|
l2003 lda $d0
|
|
clc
|
|
adc #$03
|
|
sta $d0
|
|
lda $d1
|
|
adc #$00
|
|
sta $d1
|
|
ldy #$00
|
|
jmp l1f5f
|
|
l2015 cmp #$04
|
|
bne l2027
|
|
l2019 lda #$80
|
|
sta l2164
|
|
inc $d0
|
|
l2020; Instruction opcode accessed.
|
|
bne l2024
|
|
l2022 inc $d1
|
|
l2024 jmp l1f5f
|
|
l2027 cmp #$05
|
|
bne l2039
|
|
l202b lda #$00
|
|
sta l2164
|
|
inc $d0
|
|
bne l2036
|
|
l2034 inc $d1
|
|
l2036 jmp l1f5f
|
|
l2039 l203a = * + 1
|
|
; Instruction parameter jumped to.
|
|
cmp #$06
|
|
l203b bne l2059
|
|
l203d iny
|
|
lda ($d0),y
|
|
tax
|
|
lda l2169,x
|
|
l2045 = * + 1
|
|
; Instruction parameter jumped to.
|
|
sta l2166
|
|
l2047; Instruction opcode accessed.
|
|
lda $d0
|
|
clc
|
|
adc #$02
|
|
sta $d0
|
|
lda $d1
|
|
adc #$00
|
|
sta $d1
|
|
ldy #$00
|
|
jmp l1f5f
|
|
l2059 cmp #$07
|
|
bne l206d
|
|
l205d lda $d0
|
|
clc
|
|
adc #$02
|
|
sta $d0
|
|
lda $d1
|
|
adc #$00
|
|
sta $d1
|
|
jmp l1f5f
|
|
l206d cmp #$08
|
|
bne l20b9
|
|
l2071 iny
|
|
lda ($d0),y
|
|
sta l21de
|
|
iny
|
|
lda ($d0),y
|
|
sta l21df
|
|
jsr l217b
|
|
dec $d0
|
|
lda $d0
|
|
cmp #$ff
|
|
bne l208a
|
|
l2088 dec $d1
|
|
l208a lda #$09
|
|
ldy #$00
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l2096
|
|
l2094 inc $d1
|
|
l2096 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
|
|
l20b9 cmp #$09
|
|
bne l20e0
|
|
l20bd inc $d0
|
|
bne l20c3
|
|
l20c1 inc $d1
|
|
l20c3 ldy #$00
|
|
l20c5 lda ($d0),y
|
|
cmp #$00
|
|
beq l20dd
|
|
l20cb tax
|
|
lda $3020,x
|
|
ora l2164
|
|
sta ($d2),y
|
|
lda l2166
|
|
sta ($d4),y
|
|
iny
|
|
jmp l20c5
|
|
l20dd jmp l2162
|
|
l20e0 cmp #$0a
|
|
bne l20ed
|
|
l20e4 inc $d0
|
|
bne l20ea
|
|
l20e8 inc $d1
|
|
l20ea jmp l1f5f
|
|
l20ed cmp #$0b
|
|
bne l210e
|
|
l20f1 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
|
|
l210e cmp #$0c
|
|
bne l213f
|
|
l2112 lda l2167
|
|
clc
|
|
adc #$28
|
|
sta l2167
|
|
lda l2168
|
|
adc #$00
|
|
sta l2168
|
|
inc $d0
|
|
bne l2129
|
|
l2127 inc $d1
|
|
l2129 lda l2167
|
|
sta $d2
|
|
sta $d4
|
|
lda l2168
|
|
sta $d3
|
|
sec
|
|
sbc #$04
|
|
sta $d5
|
|
ldy #$00
|
|
jmp l1f5f
|
|
l213f tax
|
|
lda $3020,x
|
|
ora l2164
|
|
sta ($d2),y
|
|
lda l2166
|
|
sta ($d4),y
|
|
inc $d0
|
|
bne l2153
|
|
l2151 inc $d1
|
|
l2153 inc $d2
|
|
bne l2159
|
|
l2157 inc $d3
|
|
l2159 inc $d4
|
|
bne l215f
|
|
l215d inc $d5
|
|
l215f jmp l1f5f
|
|
l2162 rts
|
|
l2163 l2164 = * + 1
|
|
l2165 = * + 2
|
|
.byt $00,$00,$00
|
|
l2166 l2167 = * + 1
|
|
l2168 = * + 2
|
|
.byt $00,$00,$00
|
|
l2169 l216a = * + 1
|
|
.byt $2d,$00,$53
|
|
.byt $53
|
|
l216d eor ($57),y
|
|
eor $5d51,x
|
|
eor $5151,x
|
|
eor ($52),y
|
|
eor ($55),y
|
|
eor ($61),y
|
|
l217b ldy #$00
|
|
sty l21ed
|
|
sty l21ee
|
|
lda #$20
|
|
sta l21ef
|
|
sta l21f0
|
|
sta l21f1
|
|
sta l21f2
|
|
sta l21f3
|
|
lda #$00
|
|
sta l21f4
|
|
l2199 ldx l21ee
|
|
lda #$30
|
|
sta l21ef,x
|
|
l21a1 ldx l21ed
|
|
lda l21de
|
|
sec
|
|
sbc l21e1,x
|
|
sta l21e0
|
|
lda l21df
|
|
sbc l21e2,x
|
|
bcc l21c9
|
|
l21b6 sta l21df
|
|
lda l21e0
|
|
sta l21de
|
|
ldx l21ee
|
|
inc l21ef,x
|
|
iny
|
|
jmp l21a1
|
|
l21c9 cpx #$08
|
|
beq l21dd
|
|
l21cd inc l21ed
|
|
inc l21ed
|
|
cpy #$00
|
|
beq l21a1
|
|
l21d7 inc l21ee
|
|
jmp l2199
|
|
l21dd rts
|
|
l21de l21df = * + 1
|
|
l21e0 = * + 2
|
|
.byt $00,$00,$00
|
|
l21e1 l21e2 = * + 1
|
|
bpl l220a
|
|
l21e3 inx
|
|
.byt $03,$64,$00
|
|
.byt $0a,$00,$01
|
|
.byt $00,$00,$00
|
|
l21ed l21ee = * + 1
|
|
l21ef = * + 2
|
|
.byt $00,$00,$00
|
|
l21f0 l21f1 = * + 1
|
|
l21f2 = * + 2
|
|
.byt $00,$00,$00
|
|
l21f3 l21f4 = * + 1
|
|
.byt $00,$00
|
|
l21f5 ldy #$00
|
|
lda #$43
|
|
sta ($d2),y
|
|
iny
|
|
lda #$44
|
|
sta ($d2),y
|
|
iny
|
|
lda #$3a
|
|
sta ($d2),y
|
|
lda $d2
|
|
clc
|
|
adc #$03
|
|
l220a sta $d2
|
|
lda $d3
|
|
adc #$00
|
|
sta $d3
|
|
rts
|
|
l2213 sta $ff3e
|
|
cli
|
|
lda #$01
|
|
ldy #$00
|
|
jsr $ffba
|
|
lda #$01
|
|
ldx #$f5
|
|
ldy #$24
|
|
jsr $ffbd
|
|
jsr $ffc0
|
|
lda $90
|
|
cmp #$80
|
|
bne l2233
|
|
l2230 jmp l24d2
|
|
l2233 ldx #$01
|
|
jsr $ffc6
|
|
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
|
|
l226a lda $90
|
|
beq l2271
|
|
l226e jmp l24d2
|
|
l2271 jsr $ffcf
|
|
cmp #$22
|
|
bne l226a
|
|
l2278 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
|
|
l22b6 ldy #$00
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l22c0
|
|
l22be inc $d1
|
|
l22c0 inc l24f6
|
|
l22c3 lda $90
|
|
beq l22ca
|
|
l22c7 jmp l24d2
|
|
l22ca jsr $ffcf
|
|
cmp #$00
|
|
bne l22d9
|
|
l22d1 lda #$01
|
|
sta l2514
|
|
jmp l22e0
|
|
l22d9 ldx l24f6
|
|
cpx #$1b
|
|
bne l2302
|
|
l22e0 ldy #$00
|
|
l22e2 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 l232d
|
|
l22ff jmp l231f
|
|
l2302 cmp #$22
|
|
bne l22b6
|
|
l2306 ldy #$00
|
|
l2308 lda #$20
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l2312
|
|
l2310 inc $d1
|
|
l2312 inc l24f6
|
|
lda l24f6
|
|
cmp #$1b
|
|
bne l2308
|
|
l231c jmp l22e2
|
|
l231f lda $90
|
|
beq l2326
|
|
l2323 jmp l24d2
|
|
l2326 jsr $ffcf
|
|
cmp #$00
|
|
bne l231f
|
|
l232d 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
|
|
l2357 lda $90
|
|
beq l235e
|
|
l235b jmp l24d2
|
|
l235e jsr $ffcf
|
|
ldy #$00
|
|
sta ($d2),y
|
|
inc $d2
|
|
bne l236b
|
|
l2369 inc $d3
|
|
l236b inc l24f6
|
|
lda l24f6
|
|
cmp #$04
|
|
bne l2357
|
|
l2375 lda $90
|
|
beq l237c
|
|
l2379 jmp l24d2
|
|
l237c jsr $ffcf
|
|
cmp #$22
|
|
bne l2375
|
|
l2383 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
|
|
l23d0 ldy #$00
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l23da
|
|
l23d8 inc $d1
|
|
l23da inc l24f6
|
|
lda $90
|
|
beq l23e4
|
|
l23e1 jmp l24d2
|
|
l23e4 jsr $ffcf
|
|
cmp #$22
|
|
bne l240c
|
|
l23eb ldy #$00
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l23f5
|
|
l23f3 inc $d1
|
|
l23f5 lda #$20
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l23ff
|
|
l23fd inc $d1
|
|
l23ff inc l24f6
|
|
lda l24f6
|
|
cmp #$12
|
|
bne l23f5
|
|
l2409 jmp l2439
|
|
l240c ldx l24f6
|
|
cpx #$11
|
|
bne l23d0
|
|
l2413 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
|
|
l242b lda $90
|
|
beq l2432
|
|
l242f jmp l24d2
|
|
l2432 jsr $ffcf
|
|
cmp #$22
|
|
bne l242b
|
|
l2439 lda $90
|
|
beq l2440
|
|
l243d jmp l24d2
|
|
l2440 jsr $ffcf
|
|
cmp #$20
|
|
beq l2439
|
|
l2447 ldx #$00
|
|
stx l24f6
|
|
l244c ldy #$00
|
|
sta ($d0),y
|
|
tax
|
|
lda l24f6
|
|
cmp #$01
|
|
bne l2480
|
|
l2458 cpx #$49
|
|
bne l2461
|
|
l245c lda #$07
|
|
jmp l2467
|
|
l2461 cpx #$42
|
|
bne l2478
|
|
l2465 lda #$0f
|
|
l2467 ldy #$02
|
|
sta ($d4),y
|
|
ldy #$00
|
|
inc l24fb
|
|
bne l2480
|
|
l2472 inc l24fc
|
|
jmp l2480
|
|
l2478 inc l24f9
|
|
bne l2480
|
|
l247d inc l24fa
|
|
l2480 inc $d0
|
|
bne l2486
|
|
l2484 inc $d1
|
|
l2486 inc l24f6
|
|
lda l24f6
|
|
cmp #$03
|
|
beq l249d
|
|
l2490 lda $90
|
|
beq l2497
|
|
l2494 jmp l24d2
|
|
l2497 jsr $ffcf
|
|
jmp l244c
|
|
l249d lda $90
|
|
beq l24a4
|
|
l24a1 jmp l24d2
|
|
l24a4 jsr $ffcf
|
|
cmp #$00
|
|
bne l249d
|
|
l24ab inc l24f7
|
|
bne l24b3
|
|
l24b0 inc l24f8
|
|
l24b3 ldy #$00
|
|
lda #$00
|
|
sta ($d0),y
|
|
inc $d0
|
|
bne l24bf
|
|
l24bd inc $d1
|
|
l24bf lda #$fd
|
|
sta $d2
|
|
lda #$24
|
|
sta $d3
|
|
lda #$00
|
|
sta l24f6
|
|
jsr l2515
|
|
jmp l2357
|
|
l24d2 jsr $ffcc
|
|
lda #$01
|
|
jsr $ffc3
|
|
ldx l24f7
|
|
ldy l24f8
|
|
lda l24f9
|
|
sta $e0
|
|
lda l24fa
|
|
sta $e1
|
|
lda l24fb
|
|
sta $e2
|
|
lda l24fc
|
|
sta $e3
|
|
rts
|
|
l24f6 = * + 1
|
|
l24f7 = * + 2
|
|
.byt $24,$00,$00
|
|
l24f8 l24f9 = * + 1
|
|
l24fa = * + 2
|
|
.byt $00,$00,$00
|
|
l24fb l24fc = * + 1
|
|
.byt $00,$00,$00
|
|
l24ff = * + 1
|
|
l2500 = * + 2
|
|
.byt $00,$00,$00
|
|
.byt $00,$00,$00
|
|
l2504 bmi l2536
|
|
l2506 and ($31),y
|
|
and ($31),y
|
|
and ($31),y
|
|
l250c sec
|
|
and $3130,y
|
|
.byt $32,$33,$34
|
|
l2513 l2514 = * + 1
|
|
; Instruction parameter accessed.
|
|
and $00,x
|
|
l2515 ldx #$00
|
|
l2517 inc l254f,x
|
|
lda l254f,x
|
|
cmp #$3a
|
|
bne l2534
|
|
l2521 lda #$30
|
|
sta l254f,x
|
|
inx
|
|
ldy l254f,x
|
|
cpy #$00
|
|
bne l2517
|
|
l252e sta l254f,x
|
|
jmp l2517
|
|
l2534 ldx #$00
|
|
l2536 lda l254f,x
|
|
beq l253f
|
|
l253b inx
|
|
jmp l2536
|
|
l253f dex
|
|
ldy #$00
|
|
l2542 lda l254f,x
|
|
sta $0ce9,y
|
|
iny
|
|
dex
|
|
cpx #$ff
|
|
bne l2542
|
|
l254e rts
|
|
l254f l2550 = * + 1
|
|
l2551 = * + 2
|
|
.byt $00,$00,$00
|
|
l2552 l2553 = * + 1
|
|
.byt $00,$00
|
|
l2554 sta $d1
|
|
stx $d2
|
|
sty $d3
|
|
sta $ff3e
|
|
cli
|
|
lda #$01
|
|
ldx $d0
|
|
ldy #$0f
|
|
jsr $ffba
|
|
lda $d1
|
|
ldx $d2
|
|
ldy $d3
|
|
jsr $ffbd
|
|
jsr $ffc0
|
|
jsr $ffcc
|
|
lda #$01
|
|
jsr $ffc3
|
|
sei
|
|
sta $ff3f
|
|
rts
|
|
l2580 sta $d1
|
|
stx $d2
|
|
sty $d3
|
|
sta $ff3e
|
|
cli
|
|
lda #$0f
|
|
ldx $d0
|
|
ldy #$0f
|
|
jsr $ffba
|
|
lda #$00
|
|
jsr $ffbd
|
|
jsr $ffc0
|
|
ldx #$0f
|
|
jsr $ffc9
|
|
lda #$00
|
|
sta $d0
|
|
l25a4 ldy $d0
|
|
lda ($d2),y
|
|
jsr $ffd2
|
|
inc $d0
|
|
lda $d0
|
|
cmp $d1
|
|
bne l25a4
|
|
l25b3 jsr $ffcc
|
|
lda #$0f
|
|
jsr $ffc3
|
|
sei
|
|
sta $ff3f
|
|
rts
|
|
l25c0 inx
|
|
iny
|
|
stx l25e5
|
|
sty l25e6
|
|
ldy #$00
|
|
l25ca lda ($d8),y
|
|
sta ($da),y
|
|
inc $d8
|
|
bne l25d4
|
|
l25d2 inc $d9
|
|
l25d4 inc $da
|
|
bne l25da
|
|
l25d8 inc $db
|
|
l25da dec l25e5
|
|
bne l25ca
|
|
l25df dec l25e6
|
|
bne l25ca
|
|
l25e4 rts
|
|
l25e5 l25e6 = * + 1
|
|
.byt $00,$00
|
|
l25e7 lda #$01
|
|
sta $d8
|
|
lda #$26
|
|
sta $d9
|
|
lda #$f5
|
|
sta $da
|
|
lda #$05
|
|
sta $db
|
|
ldx #$73
|
|
ldy #$00
|
|
jsr l25c0
|
|
jmp $05f5
|
|
l2601 sei
|
|
sta $ff3e
|
|
cli
|
|
lda $d5
|
|
cmp #$00
|
|
bne l2613
|
|
l260c ldy #$01
|
|
lda #$00
|
|
jmp $060b
|
|
l2613 ldy #$00
|
|
lda #$01
|
|
sta $da
|
|
lda #$01
|
|
ldx $d0
|
|
jsr $ffba
|
|
lda $d1
|
|
ldx $d2
|
|
ldy $d3
|
|
jsr $ffbd
|
|
lda #$00
|
|
jsr $ff90
|
|
lda #$00
|
|
ldx $2b
|
|
ldy $2c
|
|
jsr $ffd5
|
|
stx $2d
|
|
sty $2e
|
|
jsr $d888
|
|
lda #$ee
|
|
sta $ff19
|
|
lda #$f1
|
|
sta $ff15
|
|
lda #$c4
|
|
sta $ff12
|
|
lda #$d0
|
|
sta $ff13
|
|
lda #$90
|
|
jsr $ffd2
|
|
jsr $d88b
|
|
lda #$00
|
|
sta $ef
|
|
lda $da
|
|
beq l2665
|
|
l2662 jsr $8818
|
|
l2665 jsr $8bbe
|
|
lda $d4
|
|
cmp #$00
|
|
bne l2671
|
|
l266e jmp $8bea
|
|
l2671 jmp $867e
|