From 3f618d7de96ce32e41544d8a1e7e67f010168cf9 Mon Sep 17 00:00:00 2001 From: Sven Michael Klose Date: Sun, 18 Aug 2024 21:57:06 +0200 Subject: [PATCH 1/2] Add Plus/4 wrapper for KERNAL's GETIN. --- libsrc/plus4/kgetin.s | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 libsrc/plus4/kgetin.s diff --git a/libsrc/plus4/kgetin.s b/libsrc/plus4/kgetin.s new file mode 100644 index 000000000..14919f750 --- /dev/null +++ b/libsrc/plus4/kgetin.s @@ -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 From 0d9ae7cb708d3948ec02a776d28766b542ed0a58 Mon Sep 17 00:00:00 2001 From: Bob Andrews Date: Sun, 25 May 2025 03:44:36 +0200 Subject: [PATCH 2/2] Update kgetin.s use symbol from cbm_kernal.inc --- libsrc/plus4/kgetin.s | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/libsrc/plus4/kgetin.s b/libsrc/plus4/kgetin.s index 14919f750..e77395b9a 100644 --- a/libsrc/plus4/kgetin.s +++ b/libsrc/plus4/kgetin.s @@ -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