Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-12-28 10:29:49 +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 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
@ -494,9 +491,7 @@ SCROLL.DN ldx SCROLLBOT
bpl .3 bpl .3
cpx SCROLLTOP cpx SCROLLTOP
bne .1 bne .1
clc clc
rts rts