From 267793075903b58a5029e76820092dea91c08c94 Mon Sep 17 00:00:00 2001
From: Vince Weaver <vince@deater.net>
Date: Sun, 13 Jan 2019 00:30:01 -0500
Subject: [PATCH] raster: slow it down a bit

---
 fire/raster.s | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/fire/raster.s b/fire/raster.s
index ca260c6f..bf3bbff4 100644
--- a/fire/raster.s
+++ b/fire/raster.s
@@ -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