Working on the TGI library

git-svn-id: svn://svn.cc65.org/cc65/trunk@1325 b7a2c559-68d2-44c3-8de9-860c34a00d81
2002-06-22 21:53:58 +00:00
parent fb4bb7b383
commit 207c4a9e56
6 changed files with 32 additions and 13 deletions
--- a/libsrc/tgi/Makefile
+++ b/libsrc/tgi/Makefile
@@ -29,6 +29,7 @@ S_OBJS =       	tgi-kernel.o   	        \
                tgi_getset.o            \
                tgi_getxres.o           \
                tgi_getyres.o           \
+                tgi_gotoxy.o            \
                tgi_init.o              \
                tgi_line.o              \
                tgi_linepop.o           \
--- a/libsrc/tgi/tgi-kernel.s
+++ b/libsrc/tgi/tgi-kernel.s
@@ -22,7 +22,6 @@ _tgi_mode:      .res    1               ; Graphics mode or zero
 _tgi_curx:      .res    2               ; Current drawing cursor X
 _tgi_cury:      .res    2               ; Current drawing cursor Y
 _tgi_color:     .res    1               ; Current drawing color
-_tgi_bgcolor:   .res    1               ; Current background color
 _tgi_xres:      .res    2               ; X resolution of the current mode
 _tgi_yres:      .res    2               ; Y resolution of the current mode
 _tgi_colorcount:.res    1               ; Number of available colors
--- a/libsrc/tgi/tgi_gotoxy.s
+++ b/libsrc/tgi/tgi_gotoxy.s
@@ -0,0 +1,22 @@
+;
+; Ullrich von Bassewitz, 22.06.2002
+;
+; void __fastcall__ tgi_gotoxy (int x, int y);
+; /* Set the current drawing pointer to the given position. */
+;
+
+        .include        "tgi-kernel.inc"
+
+        .import         popax
+        .export         _tgi_gotoxy
+
+_tgi_gotoxy:
+        sta     _tgi_cury               ; Y
+        stx     _tgi_cury+1
+        jsr     popax
+        sta     _tgi_curx               ; X
+        stx     _tgi_curx+1
+        rts
+
+
+