Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2025-03-04 18:31:26 +00:00
Code Issues Projects Releases Wiki Activity

make IIc VBL consistent with IIe

Browse Source
This commit is contained in:
Peter Ferrie 2020-06-18 09:47:13 -07:00
parent 2272f77789
commit ba033a5ea8
2 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/hw.vbl.a
View File

@ -13,21 +13,22 @@ WaitForVBL_iie ; IIe/IIgs have a relatively sane VBL
; but it's reversed between the two ; but it's reversed between the two
; so we default to IIe, and patch in ; so we default to IIe, and patch in
; the reverse case if it's a IIGS. ; the reverse case if it's a IIGS.
- bit $C019
patch_VBL_iigs1
bpl -
patch_VBL_iic1 patch_VBL_iic1
- lda $C019 ; $c019 bit 7 is sticky, reset it (SMC->#$70 for IIc) - lda $C019 ; $c019 bit 7 is sticky, reset it (SMC->#$70 for IIc)
patch_VBL_iigs1
patch_VBL_iic2 patch_VBL_iic2
bpl -
- bit $C019
patch_VBL_iic3
patch_VBL_iigs2 patch_VBL_iigs2
bmi - bmi -
WaitForVBL_nop ; II/II+ have no easy VBL WaitForVBL_nop ; II/II+ have no easy VBL
rts rts
iUnwaitForVBL iUnwaitForVBL
lda $C070 ; $c019 bit 7 is sticky, reset it
- bit $C019 - bit $C019
bpl - bpl -
lda $C070 ; $c019 bit 7 is sticky, reset it
sta $C07F ; enable access to VBL register sta $C07F ; enable access to VBL register
sta $C05A ; disable VBL polling sta $C05A ; disable VBL polling
sta $C07E ; disable access to VBL register sta $C07E ; disable access to VBL register

5
src/hw.vbl.init.a
View File

@ -28,10 +28,11 @@ BuildVBLFunction
@NotGS @NotGS
rts rts
@build_iic @build_iic
sta patch_VBL_iic2+1
lda #$70 lda #$70
sta patch_VBL_iic1+1 sta patch_VBL_iic1+1
lda #$60 lda #$10
sta patch_VBL_iic2 sta patch_VBL_iic3
lda #<iWaitForVBL lda #<iWaitForVBL
sta WaitForVBL+1 sta WaitForVBL+1
lda #>iWaitForVBL lda #>iWaitForVBL