cc65/libsrc/tgi/tgi_circle.s

;
; Ullrich von Bassewitz, 21.06.2002
;
; void __fastcall__ tgi_circle (int x, int y, unsigned char radius);
; /* Draw a circle in the current drawing color */

        .include        "tgi-kernel.inc"

        .import         popax
        .importzp       tmp1
        .export         _tgi_circle

_tgi_circle:
        sta     tmp1            ; Get the coordinates
        jsr     popax
        jsr     tgi_popxy       ; Pop X/Y into ptr1/ptr2
        jmp     tgi_circle      ; Call the driver
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1313 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 13:39:32 +00:00			`;`
			`; Ullrich von Bassewitz, 21.06.2002`
			`;`
			`; void __fastcall__ tgi_circle (int x, int y, unsigned char radius);`
			`; /* Draw a circle in the current drawing color */`

			`.include "tgi-kernel.inc"`

			`.import popax`
Started to add text output functions git-svn-id: svn://svn.cc65.org/cc65/trunk@1427 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-10-03 11:18:23 +00:00			`.importzp tmp1`
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1313 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 13:39:32 +00:00			`.export _tgi_circle`

			`_tgi_circle:`
			`sta tmp1 ; Get the coordinates`
			`jsr popax`
Started to add text output functions git-svn-id: svn://svn.cc65.org/cc65/trunk@1427 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-10-03 11:18:23 +00:00			`jsr tgi_popxy ; Pop X/Y into ptr1/ptr2`
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1313 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 13:39:32 +00:00			`jmp tgi_circle ; Call the driver`