Mercurial > repos > simple16

diff bgcolor.s16 @ 43:6e7bfe83d2b0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Changed the design to vastly simplify the video hardware and support a 23-bit address space on the CPU
author Michael Pavone <pavone@retrodev.com>
date Sat, 27 Aug 2016 22:38:31 -0700
parents cc885122e9e3
children 8e39a877c651
line wrap: on
line diff
--- a/bgcolor.s16	Mon Apr 11 23:35:51 2016 -0700
+++ b/bgcolor.s16	Sat Aug 27 22:38:31 2016 -0700
@@ -8,22 +8,28 @@
 	;r6 = right edge
 	;r7 = counter
 	;r8 = secondary counter
-	ldim 248, r4
+	ldim 1, r0
+	ldim 240, r4
 	ldimh 0, r4
 	;320 == $140
 	ldim $40, r6
 	ldimh 1, r6
 top
-	ldim 0, r0
-	ldimh $FF, r0
 	ldim 0, r1
 	ldim 1, r2
-	ldim 8, r3
+	ldim 5, r3
+	ldimh 1, r3
 	ldim 16, r7
 	ldim 0, r8
 	
+waitfirst
+	ini $C, r5
+	cmp r5, r3
+	bne waitfirst
+	ldim -1, r3
+	bra waithblank
+	
 linestart
-	outi 14, r0
 waitline
 	ini $C, r5
 	cmp r5, r3
@@ -34,7 +40,8 @@
 	cmp r5, r6
 	bgr waithblank
 	
-	outi 15, r1
+	outi 14, r0
+	outi 14, r1
 	add r2, r1, r1
 	addi 2, r3