Initialize GCOL action properly in VDU22

2022-12-31 01:03:01 -05:00 · 2022-12-31 01:03:01 -05:00 · 17c11d180d
parent 149c2ba35f
commit 17c11d180d
2 changed files with 2 additions and 1 deletions
--- a/applecorn.po
+++ b/applecorn.po
--- a/auxmem.vdu.s
+++ b/auxmem.vdu.s
@ -939,7 +939,8 @@ VDU20LP       STA   TXTFGD,X               ; Clear all colours
              JSR   HGRSETGCOL             ; Set gfx foreground
              BIT   VDUBANK
              BPL   :S2                    ; Skip if not GS
-              JSR   SHRSETGCOL             ; Set SHR background
+              LDX   #$00                   ; Default GCOL action
+              JSR   SHRSETGCOL             ; Set SHR foreground
 :S2           RTS

 * VDU 17 - COLOUR n - select text or border colour