6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-10-01 15:54:59 +00:00
Code Issues Projects Releases Wiki Activity

size optimization

Browse Source
This commit is contained in:
mrdudz 2015-10-12 17:12:44 +02:00
parent bc85d90468
commit cf8b21b27e
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
libsrc/c64/soft80_cgetc.s
View File

@ -16,13 +16,13 @@ soft80_cgetc:
lda KEY_COUNT ; Get number of characters
bne L3 ; Jump if there are already chars waiting
ldx #1
sec
jsr invertcursor ; set cursor on or off accordingly
L1: lda KEY_COUNT ; wait for key
beq L1
ldx #0
clc
jsr invertcursor ; set cursor on or off accordingly
L3: jsr KBDREAD ; Read char and return in A
@ -59,7 +59,7 @@ invertcursor:
bne @lp1
pla
sta $01
sta $01 ; enable I/O
cli
rts
@ -68,8 +68,7 @@ invertcursor:
; in soft80_cputc
setcolor:
;ldy #0 ; is 0
txa
bne @set
bcs @set
; restore old value
lda tmp1
sta (CRAM_PTR),y ; vram