mirror of
https://github.com/A2osX/A2osX.git
synced 2024-09-10 22:54:59 +00:00
Kernel version 0.8 : CONSOLE.DRV.S.txt, few bytes saved
This commit is contained in:
parent
0048e92a4a
commit
a05dc2324f
@ -17,7 +17,6 @@ ESCSEQ.MAXLEN .EQ 16
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
ZPBaseL1 .EQ ZPDRV
|
ZPBaseL1 .EQ ZPDRV
|
||||||
ZPBaseL2 .EQ ZPDRV+2
|
ZPBaseL2 .EQ ZPDRV+2
|
||||||
ZPTmpByte .EQ ZPDRV+4
|
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
* File Header (16 Bytes)
|
* File Header (16 Bytes)
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
@ -450,15 +449,13 @@ CLRLINE ldx #0
|
|||||||
CLRSOL ldx #0
|
CLRSOL ldx #0
|
||||||
ldy CH
|
ldy CH
|
||||||
|
|
||||||
CLR sty ZPTmpByte
|
CLR sty .2+1
|
||||||
.1 phx
|
.1 lda #$20
|
||||||
lda #$20
|
|
||||||
ora INVFLG
|
ora INVFLG
|
||||||
ldy CV
|
ldy CV
|
||||||
jsr SetCharAtXY
|
jsr SetCharAtXY X,Y unmodified
|
||||||
plx
|
|
||||||
inx
|
inx
|
||||||
cpx ZPTmpByte
|
.2 cpx #$ff Self Modified
|
||||||
bne .1
|
bne .1
|
||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
@ -496,8 +493,6 @@ SCROLL.DN ldx SCROLLBOT
|
|||||||
cpx SCROLLTOP
|
cpx SCROLLTOP
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user