mirror of
https://github.com/mi57730/a2d.git
synced 2024-06-25 21:29:30 +00:00
849 lines
22 KiB
ArmAsm
849 lines
22 KiB
ArmAsm
.org $800
|
|
; da65 V2.16 - Git f5e9b401
|
|
; Created: 2017-09-10 19:55:15
|
|
; Input file: puzzle.bin
|
|
; Page: 1
|
|
|
|
|
|
.setcpu "65C02"
|
|
|
|
L0000 := $0000
|
|
L0020 := $0020
|
|
A2D := $4000
|
|
L4015 := $4015
|
|
UNKNOWN_CALL := $8E00
|
|
MLI := $BF00
|
|
RAMRDOFF := $C002
|
|
RAMRDON := $C003
|
|
RAMWRTOFF := $C004
|
|
RAMWRTON := $C005
|
|
ALTZPOFF := $C008
|
|
ALTZPON := $C009
|
|
LCBANK1 := $C08B
|
|
AUXMOVE := $C311
|
|
XFER := $C314
|
|
FSUB := $E7A7
|
|
FADD := $E7BE
|
|
FMULT := $E97F
|
|
FDIV := $EA66
|
|
ROUND := $EB2B
|
|
FLOAT := $EB93
|
|
FIN := $EC4A
|
|
FOUT := $ED34
|
|
jmp L0828
|
|
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00
|
|
L0827: .byte $00
|
|
L0828: tsx
|
|
stx L0827
|
|
sta ALTZPOFF
|
|
lda $C082
|
|
lda #$70
|
|
sta $3C
|
|
lda #$08
|
|
sta $3D
|
|
lda #$F6
|
|
sta $3E
|
|
lda #$12
|
|
sta $3F
|
|
lda #$70
|
|
sta $42
|
|
lda #$08
|
|
sta $43
|
|
sec
|
|
jsr AUXMOVE
|
|
lda #$70
|
|
sta $03ED
|
|
lda #$08
|
|
sta $03EE
|
|
php
|
|
pla
|
|
ora #$40
|
|
pha
|
|
plp
|
|
sec
|
|
jmp XFER
|
|
|
|
L0862: sta ALTZPON
|
|
lda LCBANK1
|
|
lda LCBANK1
|
|
ldx L0827
|
|
txs
|
|
rts
|
|
|
|
sta ALTZPON
|
|
lda LCBANK1
|
|
lda LCBANK1
|
|
lda #$00
|
|
sta $08
|
|
jmp L0E53
|
|
|
|
L0880: ldx #$10
|
|
L0882: lda L08A3,x
|
|
sta L0020,x
|
|
dex
|
|
bpl L0882
|
|
jsr L0020
|
|
lda #$33
|
|
jsr L08B4
|
|
bit L08B3
|
|
bmi L089D
|
|
jsr UNKNOWN_CALL
|
|
.byte $0C
|
|
.addr L0000
|
|
L089D: lda #$00
|
|
sta L08B3
|
|
rts
|
|
|
|
L08A3: sta RAMRDOFF
|
|
sta RAMWRTOFF
|
|
jsr L4015
|
|
sta RAMRDON
|
|
sta RAMWRTON
|
|
rts
|
|
|
|
L08B3: brk
|
|
L08B4: sta L08E7
|
|
lda L0E02
|
|
cmp #$BF
|
|
bcc L08C4
|
|
lda #$80
|
|
sta L08B3
|
|
rts
|
|
|
|
L08C4: jsr A2D
|
|
.byte $3C
|
|
.addr L08E7
|
|
jsr A2D
|
|
.byte $04
|
|
.addr L0DB3
|
|
lda L08E7
|
|
cmp #$33
|
|
bne L08DA
|
|
jmp L1072
|
|
|
|
L08DA: rts
|
|
|
|
L08DB: .byte $00
|
|
L08DC: .byte $00
|
|
L08DD: .byte $00,$00,$00
|
|
L08E0: .byte $00
|
|
L08E1: .byte $00
|
|
L08E2: .byte $00
|
|
L08E3: .byte $00,$00,$00
|
|
L08E6: .byte $00
|
|
L08E7: .byte $00,$B3,$0D
|
|
L08EA: .byte $05
|
|
L08EB: .byte $00
|
|
L08EC: .byte $03
|
|
L08ED: .byte $00,$21,$00,$03,$00,$3D,$00,$03
|
|
.byte $00,$59,$00,$03,$00,$05,$00,$13
|
|
.byte $00,$21,$00,$13,$00,$3D,$00,$13
|
|
.byte $00,$59,$00,$13,$00,$05,$00,$23
|
|
.byte $00,$21,$00,$23,$00,$3D,$00,$23
|
|
.byte $00,$59,$00,$23,$00,$05,$00,$33
|
|
.byte $00,$21,$00,$33,$00,$3D,$00,$33
|
|
.byte $00,$59,$00,$33,$00
|
|
L092A: .byte $6A
|
|
L092B: .byte $09,$AA,$09,$EA,$09,$2A,$0A,$6A
|
|
.byte $0A,$AA,$0A,$EA,$0A,$2A,$0B,$6A
|
|
.byte $0B,$AA,$0B,$EA,$0B,$2A,$0C,$6A
|
|
.byte $0C,$AA,$0C
|
|
L0946: .byte $EA,$0C,$2A
|
|
L0949: .byte $0D
|
|
L094A: .byte $00
|
|
L094B: .byte $00,$00,$00
|
|
L094E: .byte $00
|
|
L094F: .byte $00
|
|
L0950: .byte $00
|
|
L0951: .byte $00
|
|
L0952: .byte $00
|
|
L0953: .byte $00
|
|
L0954: .byte $00
|
|
L0955: .byte $00
|
|
L0956: .byte $00,$00,$00
|
|
L0959: .byte $00
|
|
L095A: .byte $00
|
|
L095B: .byte $00
|
|
L095C: .byte $00
|
|
L095D: .byte $00
|
|
L095E: .byte $00
|
|
L095F: .byte $00,$04,$00,$00,$00,$00,$00,$1B
|
|
.byte $00,$0F,$00,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$00
|
|
.byte $00,$00,$00,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $00,$7C,$3F,$0E,$55,$42,$3F,$00
|
|
.byte $00,$00,$00,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$47,$3F,$7E
|
|
.byte $7F,$54,$3E,$7E,$5F,$2A,$3D,$7E
|
|
.byte $27,$55,$3E,$7E,$53,$2A,$3E,$7E
|
|
.byte $28,$15,$3F,$3E,$55,$4A,$3F,$5E
|
|
.byte $2A,$71,$3F,$2E,$55,$7C,$3F,$56
|
|
.byte $0A,$7E,$3F,$26,$65,$7F,$3F,$56
|
|
.byte $78,$1F,$00,$06,$7F,$21,$15,$00
|
|
.byte $00,$00,$00,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$70
|
|
.byte $7F,$7F,$3F,$0A,$7E,$7F,$3F,$00
|
|
.byte $00,$00,$00,$7E,$7F,$7F,$1F,$7E
|
|
.byte $7F,$7F,$1F,$7E,$7F,$7F,$17,$7E
|
|
.byte $7F,$7F,$2B,$7E,$7F,$7F,$3D,$7E
|
|
.byte $7F,$7F,$3E,$7E,$7F,$3F,$3F,$7E
|
|
.byte $7F,$5F,$3F,$7E,$7F,$5F,$3F,$7E
|
|
.byte $7F,$6F,$3F,$7E,$7F,$77,$3F,$7E
|
|
.byte $7F,$77,$3F,$7E,$7F,$37,$1B,$7E
|
|
.byte $7F,$5B,$2D,$7E,$7F,$6B,$36,$00
|
|
.byte $00,$00,$00,$2A,$55,$2A,$15,$54
|
|
.byte $2A,$55,$2A,$2A,$55,$2A,$15,$54
|
|
.byte $2A,$55,$2A,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$6C,$36,$5B,$2D,$36
|
|
.byte $5B,$6D,$36,$5A,$6D,$36,$1B,$00
|
|
.byte $00,$00,$00,$2A,$55,$2A,$15,$54
|
|
.byte $2A,$55,$2A,$2A,$55,$2A,$15,$54
|
|
.byte $2A,$55,$2A,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$36,$5B,$6D,$36,$5A
|
|
.byte $6D,$36,$1B,$6C,$36,$5B,$2D,$00
|
|
.byte $00,$00,$00,$2A,$45,$7F,$3F,$54
|
|
.byte $2A,$7E,$3F,$2A,$55,$78,$3F,$54
|
|
.byte $2A,$71,$3F,$7E,$7F,$7C,$3F,$7E
|
|
.byte $3F,$7F,$3F,$7E,$5F,$7F,$3F,$7E
|
|
.byte $6F,$7F,$3F,$7E,$77,$7F,$3F,$7E
|
|
.byte $77,$7F,$3F,$7E,$7B,$7F,$3F,$7E
|
|
.byte $7B,$7F,$3F,$5A,$79,$7F,$3F,$6C
|
|
.byte $7C,$7F,$3F,$36,$7D,$7F,$3F,$00
|
|
.byte $00,$00,$00,$7E,$7F,$67,$36,$7E
|
|
.byte $7F,$37,$1B,$7E,$7F,$57,$2D,$7E
|
|
.byte $7F,$67,$36,$7E,$7F,$2F,$15,$7E
|
|
.byte $7F,$2F,$15,$7E,$7F,$1F,$15,$7E
|
|
.byte $7F,$3F,$15,$7E,$7F,$3F,$15,$7E
|
|
.byte $7F,$3F,$15,$7E,$7F,$7F,$14,$7E
|
|
.byte $7F,$7F,$19,$7E,$7F,$7F,$33,$7E
|
|
.byte $7F,$7F,$17,$7E,$7F,$7F,$2F,$00
|
|
.byte $00,$00,$00,$5A,$6D,$36,$1B,$6C
|
|
.byte $36,$5B,$2D,$36,$5B,$6D,$36,$5A
|
|
.byte $6D,$36,$1B,$2A,$55,$2A,$15,$2A
|
|
.byte $55,$2A,$15,$2A,$55,$2A,$15,$2A
|
|
.byte $55,$2A,$15,$2A,$55,$2A,$15,$2A
|
|
.byte $55,$2A,$15,$2A,$55,$2A,$15,$32
|
|
.byte $66,$4C,$19,$66,$4C,$19,$33,$32
|
|
.byte $66,$4C,$19,$66,$4C,$19,$33,$00
|
|
.byte $00,$00,$00,$6C,$36,$5B,$2D,$36
|
|
.byte $5B,$6D,$36,$5A,$6D,$36,$1B,$6C
|
|
.byte $36,$5B,$2D,$2A,$55,$2A,$15,$2A
|
|
.byte $55,$2A,$15,$2A,$55,$2A,$15,$2A
|
|
.byte $55,$2A,$15,$2A,$55,$2A,$15,$2A
|
|
.byte $55,$2A,$15,$2A,$55,$2A,$15,$32
|
|
.byte $66,$4C,$19,$66,$4C,$19,$33,$32
|
|
.byte $66,$4C,$19,$66,$4C,$19,$33,$00
|
|
.byte $00,$00,$00,$36,$7D,$7F,$3F,$5A
|
|
.byte $7D,$7F,$3F,$6C,$7A,$7F,$3F,$36
|
|
.byte $7B,$7F,$3F,$2A,$75,$7F,$3F,$2A
|
|
.byte $65,$7F,$3F,$2A,$65,$7F,$3F,$2A
|
|
.byte $55,$7F,$3F,$2A,$15,$7F,$3F,$2A
|
|
.byte $55,$7C,$3F,$2A,$55,$72,$3F,$32
|
|
.byte $66,$74,$3F,$66,$4C,$79,$3F,$32
|
|
.byte $66,$78,$3F,$66,$4C,$7D,$3F,$00
|
|
.byte $00,$00,$00,$7E,$7F,$7F,$3F,$6E
|
|
.byte $5D,$3B,$37,$7E,$7F,$7F,$3F,$3A
|
|
.byte $77,$6E,$1D,$7E,$7F,$7F,$3F,$6E
|
|
.byte $5D,$3B,$37,$7E,$7F,$7F,$3F,$3A
|
|
.byte $77,$6E,$1D,$7E,$7F,$7F,$3F,$6E
|
|
.byte $5D,$3B,$37,$7E,$7F,$7F,$3F,$3A
|
|
.byte $77,$6E,$1D,$7E,$7F,$7F,$3F,$6E
|
|
.byte $5D,$3B,$37,$7E,$7F,$7F,$3F,$00
|
|
.byte $00,$00,$00,$18,$33,$66,$0C,$32
|
|
.byte $66,$4C,$19,$66,$4C,$19,$33,$6C
|
|
.byte $36,$5B,$2D,$52,$6D,$36,$1B,$26
|
|
.byte $5B,$6D,$36,$4E,$36,$5B,$2D,$3E
|
|
.byte $6E,$36,$1B,$7E,$51,$0D,$00,$7E
|
|
.byte $0F,$40,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$00
|
|
.byte $00,$00,$00,$18,$33,$66,$0C,$32
|
|
.byte $66,$4C,$19,$66,$4C,$19,$33,$36
|
|
.byte $5B,$6D,$36,$6C,$36,$5B,$2D,$5A
|
|
.byte $6D,$36,$1B,$36,$5B,$6D,$36,$6C
|
|
.byte $36,$5B,$2D,$00,$00,$30,$1B,$7E
|
|
.byte $7F,$03,$20,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$00
|
|
.byte $00,$00,$00,$18,$33,$7C,$3F,$32
|
|
.byte $66,$7E,$3F,$66,$0C,$7F,$3F,$5A
|
|
.byte $4D,$7F,$3F,$36,$73,$7F,$3F,$6C
|
|
.byte $7C,$7F,$3F,$3A,$7E,$7F,$3F,$72
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$7E
|
|
.byte $7F,$7F,$3F,$7E,$7F,$7F,$3F,$00
|
|
.byte $00,$00,$00
|
|
L0D6A: .byte $01,$00,$00,$00,$79,$00,$44,$00
|
|
L0D72: .byte $77,$DD,$77,$DD,$77,$DD,$77,$DD
|
|
.byte $00
|
|
L0D7B: .byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$FF,$FF,$FF,$FF,$FF,$FF,$FF
|
|
.byte $FF,$00
|
|
L0D8D: .byte $05,$00,$02,$00
|
|
L0D91: .byte $70,$00,$00,$00
|
|
L0D95: .byte $00
|
|
L0D96: .byte $00
|
|
L0D97: .byte $00
|
|
L0D98: .byte $00
|
|
L0D99: .byte $00
|
|
L0D9A: .byte $00
|
|
L0D9B: .byte $00
|
|
L0D9C: .byte $33,$73,$00,$F7,$FF,$AD,$0D,$01
|
|
.byte $00,$00,$00,$00,$00,$06,$00,$05
|
|
.byte $00,$41,$35,$47,$37,$36,$49
|
|
L0DB3: .byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$0D
|
|
.byte $00,$00,$20,$80,$00,$00,$00,$00
|
|
.byte $00,$2F,$02,$B1,$00,$00,$01,$02
|
|
.byte $06
|
|
L0DEC: .byte $33,$02,$4C,$0E,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$79,$00,$44,$00
|
|
.byte $79,$00,$44,$00,$DC,$00
|
|
L0E02: .byte $50,$00,$00,$20,$80,$00,$00,$00
|
|
.byte $00,$00,$79,$00,$44,$00,$FF,$FF
|
|
.byte $FF,$FF,$FF,$FF,$FF,$FF,$FF,$00
|
|
.byte $00,$00,$00,$00,$01,$01,$00,$7F
|
|
.byte $00,$88,$00,$00,$DC,$00,$50,$00
|
|
.byte $00,$20,$80,$00,$00,$00,$00,$00
|
|
.byte $79,$00,$44,$00,$FF,$FF,$FF,$FF
|
|
.byte $FF,$FF,$FF,$FF,$FF,$00,$00,$00
|
|
.byte $00,$00,$01,$01,$00,$7F,$00,$88
|
|
.byte $00,$00,$06,$50,$75,$7A,$7A,$6C
|
|
.byte $65
|
|
L0E53: jsr L10A5
|
|
jsr A2D
|
|
.byte $38
|
|
.addr L0DEC
|
|
ldy #$0F
|
|
L0E5E: tya
|
|
sta L094A,y
|
|
dey
|
|
bpl L0E5E
|
|
lda #$33
|
|
jsr L08B4
|
|
jsr A2D
|
|
.byte $2B
|
|
.addr L0000
|
|
L0E70: ldy #$03
|
|
L0E72: tya
|
|
pha
|
|
ldx L094A
|
|
ldy #$00
|
|
L0E79: lda L094B,y
|
|
sta L094A,y
|
|
iny
|
|
cpy #$0F
|
|
bcc L0E79
|
|
stx L0959
|
|
pla
|
|
tay
|
|
dey
|
|
bne L0E72
|
|
ldx L094A
|
|
lda L094B
|
|
sta L094A
|
|
stx L094B
|
|
jsr A2D
|
|
.byte $2A
|
|
.addr L08DB
|
|
lda L08DB
|
|
beq L0E70
|
|
jsr L1262
|
|
bcs L0E70
|
|
jsr L11BB
|
|
jsr L12D2
|
|
L0EAE: jsr A2D
|
|
.byte $2A
|
|
.addr L08DB
|
|
lda L08DB
|
|
cmp #$01
|
|
bne L0EC1
|
|
jsr L0ECB
|
|
jmp L0EAE
|
|
|
|
L0EC1: cmp #$03
|
|
bne L0EAE
|
|
jsr L0F30
|
|
jmp L0EAE
|
|
|
|
L0ECB: jsr A2D
|
|
.byte $40
|
|
.addr L08DC
|
|
lda L08E1
|
|
cmp #$33
|
|
bne L0EDD
|
|
lda L08E0
|
|
bne L0EDE
|
|
L0EDD: rts
|
|
|
|
L0EDE: cmp #$02
|
|
bne L0EEA
|
|
jsr L0F3D
|
|
bcc L0EDD
|
|
jmp L0FBC
|
|
|
|
L0EEA: cmp #$05
|
|
bne L0F1B
|
|
jsr A2D
|
|
.byte $43
|
|
.addr L08E6
|
|
lda L08E6
|
|
beq L0EDD
|
|
L0EF9: jsr A2D
|
|
.byte $39
|
|
.addr L0D9C
|
|
jsr UNKNOWN_CALL
|
|
.byte $0C
|
|
.addr L0000
|
|
ldx #$09
|
|
L0F07: lda L0F12,x
|
|
sta L0020,x
|
|
dex
|
|
bpl L0F07
|
|
jmp L0020
|
|
|
|
L0F12: sta RAMRDOFF
|
|
sta RAMWRTOFF
|
|
jmp L0862
|
|
|
|
L0F1B: cmp #$03
|
|
bne L0EDD
|
|
lda #$33
|
|
sta L08DB
|
|
jsr A2D
|
|
.byte $44
|
|
.addr L08DB
|
|
ldx #$23
|
|
jsr L0880
|
|
rts
|
|
|
|
L0F30: lda L08DD
|
|
bne L0F3C
|
|
lda L08DC
|
|
cmp #$1B
|
|
beq L0EF9
|
|
L0F3C: rts
|
|
|
|
L0F3D: lda #$33
|
|
sta L08DB
|
|
jsr A2D
|
|
.byte $46
|
|
.addr L08DB
|
|
lda L08E1
|
|
ora L08E3
|
|
bne L0F91
|
|
lda L08E2
|
|
ldx L08E0
|
|
cmp #$03
|
|
bcc L0F91
|
|
cmp #$14
|
|
bcs L0F67
|
|
jsr L0F93
|
|
bcc L0F91
|
|
lda #$00
|
|
beq L0F8C
|
|
L0F67: cmp #$24
|
|
bcs L0F74
|
|
jsr L0F93
|
|
bcc L0F91
|
|
lda #$01
|
|
bne L0F8C
|
|
L0F74: cmp #$34
|
|
bcs L0F81
|
|
jsr L0F93
|
|
bcc L0F91
|
|
lda #$02
|
|
bne L0F8C
|
|
L0F81: cmp #$44
|
|
bcs L0F91
|
|
jsr L0F93
|
|
bcc L0F91
|
|
lda #$03
|
|
L0F8C: sta L0D98
|
|
sec
|
|
rts
|
|
|
|
L0F91: clc
|
|
rts
|
|
|
|
L0F93: cpx #$05
|
|
bcc L0FBA
|
|
cpx #$21
|
|
bcs L0F9F
|
|
lda #$00
|
|
beq L0FB5
|
|
L0F9F: cpx #$3E
|
|
bcs L0FA7
|
|
lda #$01
|
|
bne L0FB5
|
|
L0FA7: cpx #$5A
|
|
bcs L0FAF
|
|
lda #$02
|
|
bne L0FB5
|
|
L0FAF: cpx #$75
|
|
bcs L0FBA
|
|
lda #$03
|
|
L0FB5: sta L0D97
|
|
sec
|
|
rts
|
|
|
|
L0FBA: clc
|
|
rts
|
|
|
|
L0FBC: lda #$00
|
|
ldy L0D96
|
|
beq L0FC9
|
|
L0FC3: clc
|
|
adc #$04
|
|
dey
|
|
bne L0FC3
|
|
L0FC9: sta L0D99
|
|
clc
|
|
adc L0D95
|
|
tay
|
|
lda L0D97
|
|
cmp L0D95
|
|
beq L1014
|
|
lda L0D98
|
|
cmp L0D96
|
|
beq L0FE2
|
|
L0FE1: rts
|
|
|
|
L0FE2: lda L0D97
|
|
cmp L0D95
|
|
beq L0FE1
|
|
bcs L1000
|
|
lda L0D95
|
|
sec
|
|
sbc L0D97
|
|
tax
|
|
L0FF4: lda L0949,y
|
|
sta L094A,y
|
|
dey
|
|
dex
|
|
bne L0FF4
|
|
beq L1055
|
|
L1000: lda L0D97
|
|
sec
|
|
sbc L0D95
|
|
tax
|
|
L1008: lda L094B,y
|
|
sta L094A,y
|
|
iny
|
|
dex
|
|
bne L1008
|
|
beq L1055
|
|
L1014: lda L0D98
|
|
cmp L0D96
|
|
beq L0FE1
|
|
bcs L1035
|
|
lda L0D96
|
|
sec
|
|
sbc L0D98
|
|
tax
|
|
L1026: lda L0946,y
|
|
sta L094A,y
|
|
dey
|
|
dey
|
|
dey
|
|
dey
|
|
dex
|
|
bne L1026
|
|
beq L104A
|
|
L1035: lda L0D98
|
|
sec
|
|
sbc L0D96
|
|
tax
|
|
L103D: lda L094E,y
|
|
sta L094A,y
|
|
iny
|
|
iny
|
|
iny
|
|
iny
|
|
dex
|
|
bne L103D
|
|
L104A: lda #$0C
|
|
sta L094A,y
|
|
jsr L11D9
|
|
jmp L105D
|
|
|
|
L1055: lda #$0C
|
|
sta L094A,y
|
|
jsr L11C8
|
|
L105D: jsr L1262
|
|
bcc L106E
|
|
ldx #$04
|
|
L1064: txa
|
|
pha
|
|
jsr L1247
|
|
pla
|
|
tax
|
|
dex
|
|
bne L1064
|
|
L106E: jmp L12D2
|
|
|
|
rts
|
|
|
|
L1072: jsr A2D
|
|
.byte $08
|
|
.addr L0D72
|
|
jsr A2D
|
|
.byte $11
|
|
.addr L0D6A
|
|
jsr A2D
|
|
.byte $08
|
|
.addr L0D7B
|
|
jsr A2D
|
|
.byte $0E
|
|
.addr L0D8D
|
|
jsr A2D
|
|
.byte $0F
|
|
.addr L0D91
|
|
jsr L11BB
|
|
lda #$33
|
|
sta L08E7
|
|
jsr A2D
|
|
.byte $3C
|
|
.addr L08E7
|
|
jsr A2D
|
|
.byte $04
|
|
.addr L0DB3
|
|
rts
|
|
|
|
L10A5: ldx #$00
|
|
L10A7: lda L0000,x
|
|
sta L10BB,x
|
|
dex
|
|
bne L10A7
|
|
rts
|
|
|
|
ldx #$00
|
|
L10B2: lda L10BB,x
|
|
sta L0000,x
|
|
dex
|
|
bne L10B2
|
|
rts
|
|
|
|
L10BB: .byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
.byte $00,$00,$00,$00,$00,$00,$00,$00
|
|
L11BB: ldy #$01
|
|
sty L0D9B
|
|
dey
|
|
lda #$10
|
|
sta L0D9A
|
|
bne L11E6
|
|
L11C8: lda #$01
|
|
sta L0D9B
|
|
lda L0D99
|
|
tay
|
|
clc
|
|
adc #$04
|
|
sta L0D9A
|
|
bne L11E6
|
|
L11D9: lda #$04
|
|
sta L0D9B
|
|
ldy L0D95
|
|
lda #$10
|
|
sta L0D9A
|
|
L11E6: tya
|
|
pha
|
|
jsr A2D
|
|
.byte $26
|
|
.addr L0000
|
|
lda #$33
|
|
sta L08E7
|
|
jsr A2D
|
|
.byte $3C
|
|
.addr L08E7
|
|
jsr A2D
|
|
.byte $04
|
|
.addr L0DB3
|
|
pla
|
|
tay
|
|
L1201: tya
|
|
pha
|
|
asl a
|
|
asl a
|
|
tax
|
|
lda L08EA,x
|
|
sta L095A
|
|
lda L08EB,x
|
|
sta L095B
|
|
lda L08EC,x
|
|
sta L095C
|
|
lda L08ED,x
|
|
sta L095D
|
|
lda L094A,y
|
|
asl a
|
|
tax
|
|
lda L092A,x
|
|
sta L095E
|
|
lda L092B,x
|
|
sta L095F
|
|
jsr A2D
|
|
.byte $14
|
|
.addr L095A
|
|
pla
|
|
clc
|
|
adc L0D9B
|
|
tay
|
|
cpy L0D9A
|
|
bcc L1201
|
|
jsr A2D
|
|
.byte $25
|
|
.addr L0000
|
|
rts
|
|
|
|
L1247: ldx #$80
|
|
L1249: lda #$58
|
|
L124B: ldy #$1B
|
|
L124D: dey
|
|
bne L124D
|
|
bit $C030
|
|
tay
|
|
L1254: dey
|
|
bne L1254
|
|
sbc #$01
|
|
beq L1249
|
|
bit $C030
|
|
dex
|
|
bne L124B
|
|
rts
|
|
|
|
L1262: lda L094A
|
|
beq L126B
|
|
cmp #$0C
|
|
bne L12D0
|
|
L126B: ldy #$01
|
|
L126D: tya
|
|
cmp L094A,y
|
|
bne L12D0
|
|
iny
|
|
cpy #$05
|
|
bcc L126D
|
|
lda L094F
|
|
cmp #$05
|
|
beq L1283
|
|
cmp #$06
|
|
bne L12D0
|
|
L1283: lda L0950
|
|
cmp #$05
|
|
beq L128E
|
|
cmp #$06
|
|
bne L12D0
|
|
L128E: lda L0951
|
|
cmp #$07
|
|
bne L12D0
|
|
lda L0952
|
|
cmp #$08
|
|
bne L12D0
|
|
lda L0953
|
|
cmp #$09
|
|
beq L12A7
|
|
cmp #$0A
|
|
bne L12D0
|
|
L12A7: lda L0954
|
|
cmp #$09
|
|
beq L12B2
|
|
cmp #$0A
|
|
bne L12D0
|
|
L12B2: lda L0955
|
|
cmp #$0B
|
|
bne L12D0
|
|
lda L0956
|
|
beq L12C2
|
|
cmp #$0C
|
|
bne L12D0
|
|
L12C2: ldy #$0D
|
|
L12C4: tya
|
|
cmp L094A,y
|
|
bne L12D0
|
|
iny
|
|
cpy #$10
|
|
bcc L12C4
|
|
rts
|
|
|
|
L12D0: clc
|
|
rts
|
|
|
|
L12D2: ldy #$0F
|
|
L12D4: lda L094A,y
|
|
cmp #$0C
|
|
beq L12DE
|
|
dey
|
|
bpl L12D4
|
|
L12DE: lda #$00
|
|
sta L0D95
|
|
sta L0D96
|
|
tya
|
|
L12E7: cmp #$04
|
|
bcc L12F2
|
|
sbc #$04
|
|
inc L0D96
|
|
bne L12E7
|
|
L12F2: sta L0D95
|
|
rts
|
|
|