mirror of
https://github.com/cc65/cc65.git
synced 2024-11-18 00:07:21 +00:00
feae688346
Apple machines. git-svn-id: svn://svn.cc65.org/cc65/trunk@3816 b7a2c559-68d2-44c3-8de9-860c34a00d81
21 lines
296 B
ArmAsm
21 lines
296 B
ArmAsm
;
|
|
; Oliver Schmidt, 03.03.2007
|
|
;
|
|
; RDKEY routine
|
|
;
|
|
|
|
.export RDKEY
|
|
|
|
.include "apple2.inc"
|
|
|
|
.segment "LOWCODE"
|
|
|
|
RDKEY:
|
|
; Switch in ROM and call RDKEY
|
|
bit $C082
|
|
jsr $FD0C ; Display prompt and read key from user input routine
|
|
|
|
; Switch in LC bank 2 for R/O and return
|
|
bit $C080
|
|
rts
|