prepare osic1p cpeekc/cpeekcolor/cpeekrevers, replaces #532

2025-05-25 01:38:32 +02:00
parent 8d42c4a8c5
commit 5c72deb0b9
5 changed files with 47 additions and 3 deletions
--- a/libsrc/osic1p/cpeekc.s
+++ b/libsrc/osic1p/cpeekc.s
@@ -0,0 +1,17 @@
+;
+; 2017-06-21, Greg King
+;
+; char cpeekc (void);
+;
+; Get a character from OSI C1P screen RAM.
+;
+        .export         _cpeekc
+
+        .include        "extzp.inc"
+
+
+_cpeekc:
+        ldy     CURS_X
+        lda     (SCREEN_PTR),y
+        ldx     #>$0000
+        rts