Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-26 00:29:29 +00:00
Code Issues Projects Releases Wiki Activity

slightly faster key handling

Browse Source
This commit is contained in:
Peter Ferrie 2019-06-03 11:58:29 -07:00
parent 1496e2cc5d
commit 6afee2f6ea
2 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pt3_player/interrupt_handler.s
View File

@ -178,7 +178,7 @@ done_time:
check_keyboard:
jsr get_key
lda LASTKEY
cmp #0
beq exit_interrupt
;====================

11
pt3_player/keypress_minimal.s
View File

@ -11,7 +11,7 @@ get_key:
figure_out_key:
cmp #' '+128 ; the mask destroys space ; 2
beq save_key ; so handle it specially ; 2nt/3
beq return_key ; so handle it specially ; 2nt/3
check_right_arrow:
cmp #$95 ; 2
@ -32,15 +32,14 @@ check_down_arrow:
check_escape:
and #$5f ; mask, to make upper-case ; 2
cmp #$1B ; 2
bne save_key ; 2nt/3
bne return_key ; 2nt/3
lda #'Q' ; 2
bne save_key ; branch always ; 3
bne return_key ; branch always ; 3
no_key:
lda #0 ; no key, so save a zero ; 2
lda #0 ; no key, so return a zero ; 2
save_key:
sta LASTKEY ; save the key to our buffer ; 2
return_key:
rts ; 6
;============