kiec.s

git-svn-id: svn://svn.cc65.org/cc65/trunk@2781 b7a2c559-68d2-44c3-8de9-860c34a00d81
2003-12-19 00:12:08 +00:00
parent c92b4ac06c
commit cbc53423c5
11 changed files with 203 additions and 131 deletions
--- a/libsrc/cbm610/kreadst.s
+++ b/libsrc/cbm610/kreadst.s
@@ -0,0 +1,19 @@
+;
+; Ullrich von Bassewitz, 2003-12-19
+;
+; READST kernal call
+;
+
+        .export         READST
+
+        .include        "cbm610.inc"
+
+
+.proc   READST
+
+        lda     ST                      ; Load status
+        rts                             ; Return to caller
+
+.endproc
+
+