Started to add text output functions

git-svn-id: svn://svn.cc65.org/cc65/trunk@1427 b7a2c559-68d2-44c3-8de9-860c34a00d81
2002-10-03 11:18:23 +00:00
parent 4389b0c438
commit 2f44fb05a4
14 changed files with 256 additions and 40 deletions
--- a/libsrc/tgi/tgi_popxy.s
+++ b/libsrc/tgi/tgi_popxy.s
@@ -0,0 +1,20 @@
+;
+; Ullrich von Bassewitz, 02.10.2002
+;
+; Helper function for tgi functions. Pops X/Y from stack into ptr1/ptr2
+;
+
+        .include        "tgi-kernel.inc"
+
+        .import         popax
+        .importzp       ptr1, ptr2
+
+tgi_popxy:
+        sta     ptr2            ; Y
+        stx     ptr2+1
+        jsr     popax
+        sta     ptr1            ; X
+        stx     ptr1+1
+        rts
+
+