mirror of
https://github.com/cc65/cc65.git
synced 2024-07-07 04:29:01 +00:00
19 lines
324 B
ArmAsm
19 lines
324 B
ArmAsm
|
;
|
||
|
|
; int __fastcall__ getkey();
|
||
|
|
;
|
||
|
|
|
||
|
|
.include "kim1.inc"
|
||
|
|
|
||
|
|
.import popa
|
||
|
|
|
||
|
|
.export _getkey
|
||
|
|
|
||
|
|
.proc _getkey
|
||
|
|
|
||
|
|
jsr KEYIN ; Open up keyboard channel
|
||
|
|
jsr GETKEY ; Get key code
|
||
|
|
ldx #0 ; MSB of return value is zero
|
||
|
|
rts
|
||
|
|
|
||
|
|
.endproc
|