Add Plus/4 wrapper for KERNAL's GETIN.
This commit is contained in:
14
libsrc/plus4/kgetin.s
Normal file
14
libsrc/plus4/kgetin.s
Normal file
@@ -0,0 +1,14 @@
|
|||||||
|
.export GETIN
|
||||||
|
|
||||||
|
.include "plus4.inc"
|
||||||
|
|
||||||
|
KERNAL_GETIN := $FFE4
|
||||||
|
|
||||||
|
.segment "LOWCODE" ; Stay out of ROM area.
|
||||||
|
|
||||||
|
.proc GETIN
|
||||||
|
sta ENABLE_ROM
|
||||||
|
jsr KERNAL_GETIN
|
||||||
|
sta ENABLE_RAM
|
||||||
|
rts
|
||||||
|
.endproc
|
||||||
Reference in New Issue
Block a user