2002-06-22 21:53:58 +00:00
|
|
|
;
|
|
|
|
|
; 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
|
|
|
|
|
|
2003-02-11 12:37:46 +00:00
|
|
|
.proc _tgi_gotoxy
|
|
|
|
|
|
2002-06-22 21:53:58 +00:00
|
|
|
sta _tgi_cury ; Y
|
|
|
|
|
stx _tgi_cury+1
|
|
|
|
|
jsr popax
|
|
|
|
|
sta _tgi_curx ; X
|
|
|
|
|
stx _tgi_curx+1
|
|
|
|
|
rts
|
|
|
|
|
|
2003-02-11 12:37:46 +00:00
|
|
|
.endproc
|
2002-06-22 21:53:58 +00:00
|
|
|
|
