misc disasm

This commit is contained in:
Joshua Bell 2021-11-13 09:26:02 -08:00
parent f241df2ac3
commit 3031b1cc61

View File

@ -314,6 +314,7 @@ LC1D6: php
brk brk
brk brk
brk brk
LC1F2: plx LC1F2: plx
bit CLRROM bit CLRROM
rti rti
@ -334,7 +335,9 @@ LC1FD: jmp LC1A9
bra LC211 bra LC211
sec ; $Cn05 = $38 Pascal 1.1 sig sec ; $Cn05 = $38 Pascal 1.1 sig
bcc LC220 ; $Cn07 = $18 Pascal 1.1 sig .byte OPC_BCC ; never taken
clc ; $Cn07 = $18 Pascal 1.1 sig
clv clv
bra LC211 bra LC211
@ -358,96 +361,99 @@ LC21A: jmp $C530
LC21D: jmp $C538 LC21D: jmp $C538
;; ???
LC220: lda $077C LC220: lda $077C
and #$F1 and #$F1
sta $077C sta $077C
sec sec
lda RDVBL lda RDVBL
bmi LC258 bmi @l2
sta PTRIG sta PTRIG
lda #$08 lda #$08
tsb $077C tsb $077C
clc clc
bit $067C bit $067C
bpl LC24E bpl @l1
lda #$20 lda #$20
tsb $077C tsb $077C
lda $07FC lda $07FC
and #$02 and #$02
beq LC24E beq @l1
tsb $077C tsb $077C
stz $067C stz $067C
LC24E: bit RD63 @l1: bit RD63
bmi LC258 bmi @l2
lda #$04 lda #$04
tsb $077C tsb $077C
LC258: lda RDCXROM @l2: lda RDCXROM
ora RDC3ROM ora RDC3ROM
bmi LC263 bmi @l3
jmp LC2ED jmp @l12
LC263: sta $067C @l3: sta $067C
lda RDCXROM lda RDCXROM
sta $C048 ; ??? sta $C048 ; ???
bpl LC2AE bpl @l7
txa txa
bpl LC28B bpl @l5
lda $067D lda $067D
cmp $047C cmp $047C
bne LC281 bne @l4
lda $077D lda $077D
cmp $057C cmp $057C
beq LC2EC beq @l11
LC281: inc $047C @l4: inc $047C
bne LC2EC bne @l11
inc $057C inc $057C
bra LC2EC bra @l11
LC28B: lda $047D @l5: lda $047D
cmp $047C cmp $047C
bne LC29B bne @l6
lda $057D lda $057D
cmp $057C cmp $057C
beq LC2EC beq @l11
LC29B: sec @l6: sec
lda $047C lda $047C
sbc #$01 sbc #$01
sta $047C sta $047C
lda $057C lda $057C
sbc #$00 sbc #$00
sta $057C sta $057C
bra LC2EC bra @l11
LC2AE: tya @l7: tya
bmi LC2CB bmi @l9
lda $06FD lda $06FD
cmp $04FC cmp $04FC
bne LC2C1 bne @l8
lda $07FD lda $07FD
cmp $05FC cmp $05FC
beq LC2EC beq @l11
LC2C1: inc $04FC @l8: inc $04FC
bne LC2EC bne @l11
inc $05FC inc $05FC
bra LC2EC bra @l11
LC2CB: lda $04FD @l9: lda $04FD
cmp $04FC cmp $04FC
bne LC2DB bne @l10
lda $05FD lda $05FD
cmp $05FC cmp $05FC
beq LC2EC beq @l11
LC2DB: sec @l10: sec
lda $04FC lda $04FC
sbc #$01 sbc #$01
sta $04FC sta $04FC
lda $05FC lda $05FC
sbc #$00 sbc #$00
sta $05FC sta $05FC
LC2EC: clc @l11: clc
LC2ED: bcs LC2F8 @l12: bcs @l13
lda $077C lda $077C
and $07FC and $07FC
beq LC2F8 beq @l13
sec sec
LC2F8: rts @l13: rts
;; ???
ldx $EB ldx $EB
lda $0342,x lda $0342,x
@ -729,6 +735,7 @@ LC468: jsr pageC5_DoBankC5
.res $C4A0 - *, 0 .res $C4A0 - *, 0
;; ???
LC4A0: cld LC4A0: cld
phx phx
phy phy
@ -740,6 +747,7 @@ LC4A0: cld
sta $C0B9 sta $C0B9
jmp LC700 jmp LC700
;; ???
pla pla
bpl LC4BE bpl LC4BE
sta ALTZPON sta ALTZPON
@ -782,9 +790,13 @@ LC4EA: jmp pageC5_LC5F5
brk brk
brk brk
brk brk
LC4F8: jmp LC468 LC4F8: jmp LC468
dec $00,x
.byte $D6 ; $CnFB = $D6 mouse signature
.byte $00
jmp InitMouse jmp InitMouse
.endscope .endscope