Fix bgcolor and textcolor must return last color, jmp remove.

2019-07-18 20:48:10 +02:00
parent f9e13abc11
commit 0fe98a7ca8
4 changed files with 9 additions and 9 deletions
--- a/libsrc/telestrat/textcolor.s
+++ b/libsrc/telestrat/textcolor.s
@@ -6,6 +6,8 @@
        .include        "telestrat.inc"

 .proc _textcolor
+    ldx     CHARCOLOR     ; Get previous color
    sta     CHARCOLOR
+    txa                   ; Return previous color
    rts
 .endproc