Apple-2-SW/emailler
1
0
Fork 0
mirror of https://github.com/bobbimanners/emailler.git synced 2024-06-24 11:29:30 +00:00
Code Issues Projects Releases Wiki Activity

Merge pull request #4 from groessler/something_to_pull

Browse Source 
c64: fix latency
This commit is contained in:
Oliver Schmidt 2017-10-01 20:12:52 +02:00 committed by GitHub
commit 6ae6037549
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
drivers/c64input.s
View File

@ -25,8 +25,18 @@ get_key:
@loop:
jsr get_key_if_available
bcc @loop
@wait_no_cursor:
sei
ldy $cf ; cursor currently displayed?
beq @done ; no
ldy #1 ; yes, wait longer
sty $cd ; set cursor "countdown" counter to low value, fixes typing latency
cli
bne @wait_no_cursor ; jump always
@done:
ldy #1
sty $cc ; cursor off
cli
rts
; use C64 Kernel ROM function to read a key