Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-08 08:33:37 +00:00
Code Issues Projects Releases Wiki Activity

Kernel version 0.8 : CONSOLE.DRV.S.txt, few bytes saved

Browse Source
This commit is contained in:
Rémy GIBERT 2016-11-04 16:11:37 +01:00
parent 0048e92a4a
commit a05dc2324f
1 changed files with 5 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
DRV/CONSOLE.DRV.S.txt
View File

@ -17,7 +17,6 @@ ESCSEQ.MAXLEN .EQ 16
*--------------------------------------
ZPBaseL1 .EQ ZPDRV
ZPBaseL2 .EQ ZPDRV+2
ZPTmpByte .EQ ZPDRV+4
*--------------------------------------
* File Header (16 Bytes)
*--------------------------------------
@ -450,15 +449,13 @@ CLRLINE ldx #0
CLRSOL ldx #0
ldy CH
CLR sty ZPTmpByte
.1 phx
lda #$20
CLR sty .2+1
.1 lda #$20
ora INVFLG
ldy CV
jsr SetCharAtXY
plx
jsr SetCharAtXY X,Y unmodified
inx
cpx ZPTmpByte
.2 cpx #$ff Self Modified
bne .1
clc
rts
@ -494,9 +491,7 @@ SCROLL.DN ldx SCROLLBOT
bpl .3
cpx SCROLLTOP
bne .1
bne .1
clc
rts