From d28e93f54e8223860f95828620dad0ac139056e7 Mon Sep 17 00:00:00 2001
From: giomba <giomba@glgprograms.it>
Date: Fri, 22 Dec 2017 16:47:06 +0100
Subject: [PATCH] Added reversed colors in status bar, to improve visual

---
 snake.asm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/snake.asm b/snake.asm
index 3d2b952..3c10a04 100644
--- a/snake.asm
+++ b/snake.asm
@@ -96,9 +96,11 @@ start:
     sta $d020   ; overscan
     lda #9
     sta $d021   ; center
-    ; Upper bar
+    ; Upper bar -- fill with reversed spaces, color yellow
     ldx #39
 upperbarLoop:
+    lda #$a0    ; reversed color space
+    sta $400,x
     lda #7
     sta $d800,x
     dex
@@ -560,12 +562,14 @@ printDigit:
     bcs printDigitL     ; if it is not a decimal digit, then go to printDigitL
     clc                 ; it is a decimal digit! Just add `0` (48)
     adc #48
+    ora #$80            ; reverse color
     rts
 printDigitL:            ; it is not a decimal digit, then...
     sec
     sbc #10             ; take away 10
     clc
     adc #1              ; add 1, so you obtain something in [A-F]
+    ora #$80            ; reverse color
     rts
 
 ; Print null-terminated string on status bar
@@ -581,6 +585,7 @@ printStatusLoop:
 printStatusSkipSpace:
     sec
     sbc #$40    ; convert from standard ASCII to Commodore screen code
+    ora #$80    ; reverse color
     sta $413,y
     iny
     jmp printStatusLoop