Second tentative fix
This commit is contained in:
parent
1d39863a60
commit
609f63ac74
2 changed files with 5 additions and 3 deletions
|
@ -20,8 +20,10 @@
|
|||
; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'.
|
||||
|
||||
_cgetc:
|
||||
bne _start
|
||||
jsr _kbhit ; Check for char available
|
||||
beq _cgetc
|
||||
_start:
|
||||
lda KBSTL
|
||||
ora KBEDG
|
||||
ldx #0
|
||||
|
@ -52,6 +54,8 @@ _cgetc:
|
|||
rts
|
||||
@L5:
|
||||
lda KBEDG ; No Pause pressed
|
||||
ldx #$00
|
||||
stx KBEDG
|
||||
ora KBSTL
|
||||
bit #$08
|
||||
beq @L7
|
||||
|
|
|
@ -49,8 +49,6 @@ _kbhit:
|
|||
sta KBNPR ; inverted previous ones pressed
|
||||
stx KBPRV
|
||||
lda KBEDG
|
||||
beq @L1
|
||||
jmp return1 ; Key hit
|
||||
|
||||
@L1: tax ; No new keys hit
|
||||
rts
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue