Update kgetin.s
use symbol from cbm_kernal.inc
This commit is contained in:
@@ -1,14 +1,17 @@
|
||||
.export GETIN
|
||||
|
||||
.include "plus4.inc"
|
||||
.export GETIN
|
||||
|
||||
KERNAL_GETIN := $FFE4
|
||||
.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
|
||||
jsr KERNAL::GETIN
|
||||
sta ENABLE_RAM
|
||||
rts
|
||||
.endproc
|
||||
|
||||
Reference in New Issue
Block a user