mirror of
https://github.com/cc65/cc65.git
synced 2024-07-14 19:29:26 +00:00
18 lines
191 B
ArmAsm
18 lines
191 B
ArmAsm
;* cgetc
|
|
|
|
.export _cgetc
|
|
.include "creativision.inc"
|
|
|
|
_cgetc:
|
|
lda #$80
|
|
|
|
L1:
|
|
bit ZP_KEYBOARD
|
|
bpl L1
|
|
|
|
lda ZP_KEYBOARD
|
|
and #$7f
|
|
rts
|
|
|
|
|