raster: slow it down a bit

This commit is contained in:
Vince Weaver 2019-01-13 00:30:01 -05:00
parent 230333cd78
commit 2677930759

View File

@ -24,6 +24,8 @@ SCROLL = $FC70
VTAB = $FC22 ; takes row in CV, Result is in BASL:BASH ($28/$29)
VTABZ = $FC24 ; VTABZ variant takes row in Accumulator
WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us
raster_demo:
; Set lores graphics
@ -46,11 +48,16 @@ raster_demo:
reset_scroll:
jsr random8
sta CV
scroll_loop:
lda #$80
jsr WAIT
jsr SCROLL ; scrolls screen up one row ; 3