Changed the order in which lo/hi bytes of vdc addr are set according to willimanilys ((z64k) suggestions. Changed offset for vdc ramsize detection from 000 to 000.
This commit is contained in:
@@ -114,21 +114,24 @@ INSTALL:
|
|||||||
sta pagecount
|
sta pagecount
|
||||||
stx pagecount+1
|
stx pagecount+1
|
||||||
|
|
||||||
|
txa
|
||||||
|
bne @keep64kBit
|
||||||
|
|
||||||
ldx #VDC_CSET ; restore 16/64k flag
|
ldx #VDC_CSET ; restore 16/64k flag
|
||||||
lda vdc_cset_save
|
lda vdc_cset_save
|
||||||
jsr vdcputreg
|
jsr vdcputreg
|
||||||
|
@keep64kBit:
|
||||||
lda #<EM_ERR_OK
|
lda #<EM_ERR_OK
|
||||||
ldx #>EM_ERR_OK
|
ldx #>EM_ERR_OK
|
||||||
rts
|
rts
|
||||||
|
|
||||||
test64k:
|
test64k:
|
||||||
sta tmp3
|
sta tmp1
|
||||||
sty ptr3
|
sty ptr3
|
||||||
lda #0
|
lda #0
|
||||||
sta ptr3+1
|
sta ptr3+1
|
||||||
jsr settestadr1
|
jsr settestadr1
|
||||||
lda tmp3
|
lda tmp1
|
||||||
jsr vdcputbyte ; write $55
|
jsr vdcputbyte ; write $55
|
||||||
jsr settestadr1
|
jsr settestadr1
|
||||||
jsr vdcgetbyte ; read here
|
jsr vdcgetbyte ; read here
|
||||||
@@ -146,7 +149,7 @@ settestadr1:
|
|||||||
ldy #$02 ; test page 2 (here)
|
ldy #$02 ; test page 2 (here)
|
||||||
.byte $2c
|
.byte $2c
|
||||||
settestadr2:
|
settestadr2:
|
||||||
ldy #$42 ; or page 64+2 (there)
|
ldy #$82 ; or page 64+2 (there)
|
||||||
lda #0
|
lda #0
|
||||||
jmp vdcsetsrcaddr
|
jmp vdcsetsrcaddr
|
||||||
|
|
||||||
@@ -334,17 +337,16 @@ COPYTO:
|
|||||||
;
|
;
|
||||||
|
|
||||||
vdcsetsrcaddr:
|
vdcsetsrcaddr:
|
||||||
ldx #VDC_DATA_LO
|
ldx #VDC_DATA_HI
|
||||||
stx VDC_ADDR_REG
|
stx VDC_ADDR_REG
|
||||||
@L0: bit VDC_ADDR_REG
|
@L0: bit VDC_ADDR_REG
|
||||||
bpl @L0
|
bpl @L0
|
||||||
sta VDC_DATA_REG
|
sta VDC_DATA_REG
|
||||||
dex
|
inx
|
||||||
tya
|
|
||||||
stx VDC_ADDR_REG
|
stx VDC_ADDR_REG
|
||||||
@L1: bit VDC_ADDR_REG ; XXX: Test waiting for register 18
|
@L1: bit VDC_ADDR_REG ; XXX: Test waiting for register 18
|
||||||
bpl @L1
|
bpl @L1
|
||||||
sta VDC_DATA_REG
|
sty VDC_DATA_REG
|
||||||
rts
|
rts
|
||||||
|
|
||||||
vdcgetbyte:
|
vdcgetbyte:
|
||||||
|
|||||||
Reference in New Issue
Block a user