Added kernal replacement routines

[cc65] / libsrc / pet / kbsout.s

diff --git a/libsrc/pet/kbsout.s b/libsrc/pet/kbsout.s
new file mode 100644 (file)
index 0000000..1e89123
--- /dev/null
+++ b/libsrc/pet/kbsout.s
@@ -0,0 +1,19 @@
+;
+; Ullrich von Bassewitz, 19.11.2002
+;
+; BSOUT replacement function for the PETs
+;
+
+        .export         BSOUT
+        .import         checkst
+
+
+.proc   BSOUT
+
+        jsr     $FFD2           ; Call kernal function
+        jmp     checkst         ; Check status, return carry on error
+
+.endproc
+
+
+