mirror of
https://github.com/cc65/cc65.git
synced 2024-11-18 00:07:21 +00:00
15 lines
224 B
ArmAsm
15 lines
224 B
ArmAsm
;* cgetc
|
|
|
|
.export _cgetc
|
|
.include "creativision.inc"
|
|
|
|
_cgetc:
|
|
lda #$80
|
|
|
|
L1: bit ZP_KEYBOARD
|
|
bpl L1
|
|
|
|
lda ZP_KEYBOARD
|
|
and #$7F
|
|
rts
|