bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Fix typo and optimize

Browse Source
This commit is contained in:
jede
2019-07-07 22:02:48 +02:00
committed by greg-king5
parent 28eba8bff9
commit a0a6537bda
5 changed files with 21 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
libsrc/telestrat/textcolor.s
View File

@@ -7,22 +7,21 @@
.include "telestrat.inc"
.proc _textcolor
cmp CHARCOLOR ; Do we set the same color? if we don't detect it, we loose one char on the screen for each textcolor call with the same color
cmp CHARCOLOR ; Do we set the same color? If we don't detect it, we loose one char on the screen for each textcolor call with the same color
bne out ; yes
lda #$00
sta CHARCOLOR_CHANGE
lda CHARCOLOR ; return last color
ldy #$00
sty CHARCOLOR_CHANGE
lda CHARCOLOR ; Return last color
rts
out:
ldx CHARCOLOR ; get last color in order to return it
ldx CHARCOLOR ; Get last color in order to return it
sta CHARCOLOR
lda #$01
sta CHARCOLOR_CHANGE
txa ; return previous color
txa ; Return previous color
rts
.endproc