Merge pull request #2485 from SvenMichaelKlose/add_plus4_getin_wrapper
Add Plus/4 wrapper for KERNAL's GETIN.
This commit is contained in:
17
libsrc/plus4/kgetin.s
Normal file
17
libsrc/plus4/kgetin.s
Normal file
@@ -0,0 +1,17 @@
|
||||
|
||||
.export GETIN
|
||||
|
||||
.scope KERNAL
|
||||
.include "cbm_kernal.inc"
|
||||
.endscope
|
||||
|
||||
.include "plus4.inc"
|
||||
|
||||
.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