Add kernal replacement function

git-svn-id: svn://svn.cc65.org/cc65/trunk@3549 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/libsrc/cbm510/Makefile b/libsrc/cbm510/Makefile
index 74d560ebd79ebbcce2f897b4c4497d3f66b9c69b..cd25dbc75aa8b65cd4fd1c3dce553f01a3a3404b 100644 (file)
--- a/libsrc/cbm510/Makefile
+++ b/libsrc/cbm510/Makefile
@@ -64,6 +64,7 @@ OBJS =        _scrsize.o      \
        kopen.o         \
         kreadst.o       \
        kscnkey.o       \
+       kscreen.o       \
         ksetnam.o       \
        kudtim.o        \
         mainargs.o      \

diff --git a/libsrc/cbm510/kscreen.s b/libsrc/cbm510/kscreen.s
new file mode 100644 (file)
index 0000000..87b91c1
--- /dev/null
+++ b/libsrc/cbm510/kscreen.s
@@ -0,0 +1,16 @@
+;
+; Ullrich von Bassewitz, 2003-12-19
+;
+; SCREEN kernal call
+;
+
+        .export         SCREEN
+
+
+.proc   SCREEN
+
+               ldx     #40             ; Columns
+       ldy     #25             ; Lines
+       rts
+
+.endproc