6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-01 03:30:20 +00:00
Code Issues Projects Releases Wiki Activity

Cleaning

Browse Source
This commit is contained in:
jede 2019-07-26 23:11:34 +02:00 committed by Oliver Schmidt
parent 3b07b8b8e3
commit 3d63a8bb62
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
libsrc/telestrat/cclear.s
View File

@ -22,14 +22,14 @@ _cclearxy:
pla ; Restore the length and run into _cclear pla ; Restore the length and run into _cclear
_cclear: _cclear:
tax ; Is the length zero? tax ; Is the length equal to zero?
beq @L9 ; Jump if done beq @L2 ; Yes we skip
@L1: @L1:
stx tmp1 stx tmp1 ; Save X
lda #' ' lda #' ' ; Erase current char
BRK_TELEMON XFWR BRK_TELEMON XFWR
ldx tmp1 ldx tmp1
dex dex
bne @L1 bne @L1
@L9: @L2:
rts rts