bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

Optimizations

Browse Source
This commit is contained in:
Fabrizio Caruso
2019-10-30 18:32:35 +01:00
committed by greg-king5
parent 78d660da55
commit 2bd798fa13
2 changed files with 3 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
libsrc/lynx/cgetc.s
View File

@@ -20,13 +20,9 @@
; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'. ; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'.
_cgetc: _cgetc:
lda KBEDG
bne _start
jsr _kbhit ; Check for char available jsr _kbhit ; Check for char available
beq _cgetc beq _cgetc
_start: ora KBSTL
lda KBSTL
ora KBEDG
ldx #0 ldx #0
and #1 and #1
beq @L5 beq @L5
@@ -55,7 +51,6 @@ _start:
bra reset_and_exit bra reset_and_exit
@L5: @L5:
lda KBEDG ; No Pause pressed lda KBEDG ; No Pause pressed
stz KBEDG
ora KBSTL ora KBSTL
bit #$08 bit #$08
beq @L7 beq @L7

2
libsrc/lynx/kbhit.s
View File

@@ -51,6 +51,6 @@ _kbhit:
sta KBNPR ; inverted previous ones pressed sta KBNPR ; inverted previous ones pressed
stx KBPRV stx KBPRV
lda KBEDG lda KBEDG
L1: ldx #$00 L1: tax
rts rts