]> git.sur5r.net Git - cc65/blob - libsrc/tgi/tgi_outtextxy.s
Two fixes from Stefan Haubenthal
[cc65] / libsrc / tgi / tgi_outtextxy.s
1 ;
2 ; Ullrich von Bassewitz, 21.06.2002
3 ;
4 ; void __fastcall__ tgi_outtextxy (int x, int y, const char* s);
5 ; /* Output text at the given position. */
6
7
8         .include        "tgi-kernel.inc"
9
10         .import         popax
11         .importzp       ptr3
12
13 .proc   _tgi_outtextxy
14
15         sta     ptr3
16         stx     ptr3+1          ; Save s
17         jsr     popax           ; get y from stack
18         jsr     tgi_popxy       ; Pop x/y into ptr1/ptr2
19         jmp     tgi_outtext     ; Call the driver
20
21 .endproc
22