From 50a06bb5de8389b860d3a81e3eefded0ee02cfe1 Mon Sep 17 00:00:00 2001
From: "B. Watson" <urchlay@slackware.uk>
Date: Sat, 14 Mar 2026 17:08:36 -0400
Subject: Fix "space-puncher" bug in screen 7. cc65 cgetc() was the culprit.

---
 src/cgetc.s | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 src/cgetc.s

(limited to 'src')

diff --git a/src/cgetc.s b/src/cgetc.s
new file mode 100644
index 0000000..dd9fe26
--- /dev/null
+++ b/src/cgetc.s
@@ -0,0 +1,24 @@
+;
+; Christian Groessler, November-2002
+;
+; get a char from the keyboard
+; char cgetc(void)
+;
+
+; Modified version for FujiNetChat.
+        .include "atari.inc"
+        .export _cgetc
+
+_cgetc:
+;;;     jsr     setcursor  ; this is unneeded and causes a hole in screen 7
+        lda     #12
+        sta     ICAX1Z          ; fix problems with direct call to KEYBDV
+        jsr     @1
+        ldx     #0
+        rts
+
+@1:     lda     KEYBDV+5
+        pha
+        lda     KEYBDV+4
+        pha
+        rts
-- 
cgit v1.2.3