6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 06:31:31 +00:00
Code Issues Projects Releases Wiki Activity

Optimizing (from Polluks tip)

Browse Source
This commit is contained in:
jede 2017-10-16 18:15:53 +02:00
parent 18c94e123f
commit 195b5f0a07
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
libsrc/telestrat/cgetc.s
View File

@ -10,7 +10,7 @@
.proc _cgetc .proc _cgetc
; this routine could be quicker if we wrote in page 2 variables, ; this routine could be quicker if we wrote in page 2 variables,
; but it's better to use telemon routine in that case, because telemon can manage 4 I/O ; but it's better to use telemon routine in that case, because telemon can manage 4 I/O
lda cursor ; if cursor equal to 0, then switch off cursor ldx cursor ; if cursor equal to 0, then switch off cursor
beq switchoff_cursor beq switchoff_cursor
ldx #$00 ; x is the first screen ldx #$00 ; x is the first screen
@ -18,7 +18,7 @@
jmp loop ; could be replaced by a bne/beq but 'jmp' is cleaner than a bne/beq which could expect some matters jmp loop ; could be replaced by a bne/beq but 'jmp' is cleaner than a bne/beq which could expect some matters
switchoff_cursor: switchoff_cursor:
ldx #$00 ; x is the first screen ; at this step X is equal to $00, X must be set, because it's the id of the screen (telestrat can handle 4 virtuals screen)
BRK_TELEMON(XCOSCR) ; switch off cursor BRK_TELEMON(XCOSCR) ; switch off cursor
loop: loop: