# HG changeset patch # User Michael Pavone # Date 1459142066 25200 # Node ID cc885122e9e3545ced2c78c5a59774f667318cc6 # Parent 41ec033ef8c3f0ff6058f57c8116c61e21c0e97a More colors in the bgcolor sample diff -r 41ec033ef8c3 -r cc885122e9e3 bgcolor.s16 --- a/bgcolor.s16 Sun Mar 27 21:54:13 2016 -0700 +++ b/bgcolor.s16 Sun Mar 27 22:14:26 2016 -0700 @@ -7,6 +7,7 @@ ;r5 = scratch ;r6 = right edge ;r7 = counter + ;r8 = secondary counter ldim 248, r4 ldimh 0, r4 ;320 == $140 @@ -19,6 +20,7 @@ ldim 1, r2 ldim 8, r3 ldim 16, r7 + ldim 0, r8 linestart outi 14, r0 @@ -34,21 +36,42 @@ outi 15, r1 add r2, r1, r1 - addi 4, r3 + addi 2, r3 addi -1, r7 bne normal ldim 16, r7 + ldim 0, r1 + + addi 1, r8 + cmpi 3, r8 + beq cyan + cmpi 5, r8 + beq magenta + cmpi 6, r8 + beq grey ;TODO: replace with lsli once it works in the assembler add r2, r2, r2 add r2, r2, r2 add r2, r2, r2 add r2, r2, r2 - ldim 0, r1 + normal + cmp r3, r4 + bcs top + bra linestart - cmp r3, r4 - beq top - bra linestart +cyan + ldim $11, r2 + bra normal +magenta + ldim $01, r2 + ldimh $01, r2 + bra normal +grey + ldim $11, r2 + ldimh $01, r2 + bra normal +