mirror of
https://github.com/A2osX/A2osX.git
synced 2025-02-21 21:29:05 +00:00
ANSI bug fix
This commit is contained in:
parent
27c265a290
commit
21d9a26c51
@ -455,6 +455,7 @@ ExecEscSeq stz EscSeqParamCnt
|
|||||||
asl
|
asl
|
||||||
clc
|
clc
|
||||||
adc EscSeqParam,y
|
adc EscSeqParam,y
|
||||||
|
asl
|
||||||
sta EscSeqParam,y
|
sta EscSeqParam,y
|
||||||
pla
|
pla
|
||||||
clc
|
clc
|
||||||
@ -563,16 +564,16 @@ Esc.Home ldx EscSeqParamCnt
|
|||||||
.1 lda EscSeqParam
|
.1 lda EscSeqParam
|
||||||
dec
|
dec
|
||||||
bmi .9
|
bmi .9
|
||||||
cmp #80
|
cmp #24
|
||||||
bcs .9
|
bcs .9
|
||||||
sta CH
|
sta CV
|
||||||
|
|
||||||
lda EscSeqParam+1
|
lda EscSeqParam+1
|
||||||
dec
|
dec
|
||||||
bmi .9
|
bmi .9
|
||||||
cmp #24
|
cmp #80
|
||||||
bcs .9
|
bcs .9
|
||||||
sta CV
|
sta CH
|
||||||
|
|
||||||
.9 clc
|
.9 clc
|
||||||
rts
|
rts
|
||||||
|
Loading…
x
Reference in New Issue
Block a user