Fixed cgetc().
The GETIN function doesn't protect CPU registers.
This commit is contained in:
parent
3cece61525
commit
9dfc8f84bc
1 changed files with 3 additions and 1 deletions
|
@ -1,5 +1,5 @@
|
||||||
;
|
;
|
||||||
; 2019-09-23, Greg King
|
; 2019-10-01, Greg King
|
||||||
;
|
;
|
||||||
; char cgetc (void);
|
; char cgetc (void);
|
||||||
; /* Return a character from the keyboard. */
|
; /* Return a character from the keyboard. */
|
||||||
|
@ -34,7 +34,9 @@ L1: lda KEY_COUNT
|
||||||
|
|
||||||
L3: ldy IN_DEV ; Save current input device
|
L3: ldy IN_DEV ; Save current input device
|
||||||
stz IN_DEV ; Keyboard
|
stz IN_DEV ; Keyboard
|
||||||
|
phy
|
||||||
jsr GETIN ; Read char, and return in .A
|
jsr GETIN ; Read char, and return in .A
|
||||||
|
ply
|
||||||
sty IN_DEV ; Restore input device
|
sty IN_DEV ; Restore input device
|
||||||
ldx #>$0000
|
ldx #>$0000
|
||||||
rts
|
rts
|
||||||
|
|
Loading…
Add table
Reference in a new issue