From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Mon, 1 Aug 2011 21:00:51 +0000 (+0000)
Subject: New tgi_settextdir() function.
X-Git-Tag: V2.13.3~357
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=417a57fabd69e5ab2a94651c12220ca54c4f8ed2;p=cc65

New tgi_settextdir() function.


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

diff --git a/libsrc/tgi/Makefile b/libsrc/tgi/Makefile
index e84d88b17..c1a8b4187 100644
--- a/libsrc/tgi/Makefile
+++ b/libsrc/tgi/Makefile
@@ -78,6 +78,7 @@ S_OBJS =       	tgi-kernel.o   	        \
                 tgi_setdrawpage.o       \
                 tgi_setpalette.o        \
                 tgi_setpixel.o          \
+                tgi_settextdir.o        \
                 tgi_settextstyle.o      \
                 tgi_setviewpage.o       \
                 tgi_unload.o            \
diff --git a/libsrc/tgi/tgi_settextdir.s b/libsrc/tgi/tgi_settextdir.s
new file mode 100644
index 000000000..d6c6dc838
--- /dev/null
+++ b/libsrc/tgi/tgi_settextdir.s
@@ -0,0 +1,21 @@
+;
+; Ullrich von Bassewitz, 2011-07-17
+;
+
+        .include        "tgi-kernel.inc"
+
+
+;-----------------------------------------------------------------------------
+; void __fastcall__ tgi_settextdir (unsigned char dir);
+; /* Set the direction for text output. dir is one of the TGI_TEXT_XXX
+;  * constants.
+;  */
+;
+
+.proc   _tgi_settextdir
+
+        sta     _tgi_textdir            ; Remember the direction
+        rts
+
+.endproc
+