screen editor color handling fix
This commit is contained in:
1 parent
76ed769d7b
commit
5f9426e005
1 file changed
+16
-2
@@ -96,10 +96,17 @@ m65_chrout_esc_P: ; erase everything from start of the line to cursor XXX u
|
|||||||
|
|
||||||
phz
|
phz
|
||||||
ldz #$FF
|
ldz #$FF
|
||||||
lda #$20
|
|
||||||
@1:
|
@1:
|
||||||
inz
|
inz
|
||||||
|
; XXX common part - deduplicate, find other places
|
||||||
|
lda #$20
|
||||||
sta [M65_LPNT_SCR], z
|
sta [M65_LPNT_SCR], z
|
||||||
|
jsr m65_helper_scrlpnt_color
|
||||||
|
lda COLOR
|
||||||
|
and #$0F
|
||||||
|
sta [M65_LPNT_SCR], z
|
||||||
|
jsr m65_helper_scrlpnt_to_screen
|
||||||
|
; XXX end common part
|
||||||
cpz M65__TXTCOL
|
cpz M65__TXTCOL
|
||||||
bne @1
|
bne @1
|
||||||
|
|
||||||
@@ -112,10 +119,17 @@ m65_chrout_esc_Q: ; erase everything from cursor till the end of line XXX u
|
|||||||
ldx M65_SCRMODE
|
ldx M65_SCRMODE
|
||||||
lda m65_scrtab_txtwidth,x
|
lda m65_scrtab_txtwidth,x
|
||||||
taz
|
taz
|
||||||
lda #$20
|
|
||||||
@1:
|
@1:
|
||||||
dez
|
dez
|
||||||
|
; XXX common part - deduplicate, find other places
|
||||||
|
lda #$20
|
||||||
sta [M65_LPNT_SCR], z
|
sta [M65_LPNT_SCR], z
|
||||||
|
jsr m65_helper_scrlpnt_color
|
||||||
|
lda COLOR
|
||||||
|
and #$0F
|
||||||
|
sta [M65_LPNT_SCR], z
|
||||||
|
jsr m65_helper_scrlpnt_to_screen
|
||||||
|
; XXX end common part
|
||||||
cpz M65__TXTCOL
|
cpz M65__TXTCOL
|
||||||
bne @1
|
bne @1
|
||||||
|
|
||||||
|
|||||||
Reference in new issue
Block a user