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 e84d88b17e8e6d82d0b8584035c361c13150ed8c..c1a8b41878d7b5644e3447e4c00db72ab64c45b8 100644 (file)
--- 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 (file)
index 0000000..d6c6dc8
--- /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
+