mirror of
https://github.com/a2-4am/4cade.git
synced 2024-11-27 08:50:01 +00:00
fix Pipe Dream VBL on IIc/IIc+
This commit is contained in:
parent
ae4cbb07c7
commit
32a5a2cd21
38
src/prelaunch/pipe.dream.a
Normal file
38
src/prelaunch/pipe.dream.a
Normal file
@ -0,0 +1,38 @@
|
|||||||
|
;license:MIT
|
||||||
|
;(c) 2020 by qkumba
|
||||||
|
|
||||||
|
!cpu 6502
|
||||||
|
!to "build/PRELAUNCH/PIPE.DREAM",plain
|
||||||
|
*=$106
|
||||||
|
|
||||||
|
my_vbl
|
||||||
|
|
||||||
|
!source "src/prelaunch/common.a"
|
||||||
|
|
||||||
|
+READ_RAM1_NO_WRITE
|
||||||
|
lda WaitForVBL+1
|
||||||
|
sta @copy_vbl+1
|
||||||
|
lda WaitForVBL+2
|
||||||
|
sta @copy_vbl+2
|
||||||
|
ldy #0
|
||||||
|
|
||||||
|
@copy_vbl
|
||||||
|
lda $d1d1,y ; SMC
|
||||||
|
sta my_vbl,y
|
||||||
|
iny
|
||||||
|
cmp #$60
|
||||||
|
bne @copy_vbl
|
||||||
|
sta $207E
|
||||||
|
jsr $2000
|
||||||
|
jsr $939
|
||||||
|
lda #$4C
|
||||||
|
sta $9D52
|
||||||
|
lda #<my_vbl
|
||||||
|
sta $9D53
|
||||||
|
lda #>my_vbl
|
||||||
|
sta $9D54
|
||||||
|
jmp $881
|
||||||
|
|
||||||
|
!if * > $1C0 {
|
||||||
|
!error "code is too large, ends at ", *
|
||||||
|
}
|
Loading…
Reference in New Issue
Block a user