cc65/libsrc/tgi/tgi_getpixel.s

;
; Ullrich von Bassewitz, 21.06.2002
;
; unsigned char __fastcall__ tgi_getpixel (int x, int y);
; /* Get the color value of a pixel */


        .include        "tgi-kernel.inc"
                       
        .import         return0
        .export         _tgi_getpixel

_tgi_getpixel:
        jsr     tgi_getset      ; Pop args, check range
        bcs     @L9
        jmp     tgi_getpixel    ; Call the driver
@L9:    jmp     return0         ; Assume bg color
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1314 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 14:16:32 +00:00			`;`
			`; Ullrich von Bassewitz, 21.06.2002`
			`;`
			`; unsigned char __fastcall__ tgi_getpixel (int x, int y);`
			`; /* Get the color value of a pixel */`


			`.include "tgi-kernel.inc"`
Return bg color if coords out of range git-svn-id: svn://svn.cc65.org/cc65/trunk@1326 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-22 22:01:14 +00:00
			`.import return0`
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1314 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 14:16:32 +00:00			`.export _tgi_getpixel`

			`_tgi_getpixel:`
Working on the TGI library git-svn-id: svn://svn.cc65.org/cc65/trunk@1323 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-22 21:40:24 +00:00			`jsr tgi_getset ; Pop args, check range`
			`bcs @L9`
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1314 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 14:16:32 +00:00			`jmp tgi_getpixel ; Call the driver`
Return bg color if coords out of range git-svn-id: svn://svn.cc65.org/cc65/trunk@1326 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-22 22:01:14 +00:00			`@L9: jmp return0 ; Assume bg color`
TGI Implementation git-svn-id: svn://svn.cc65.org/cc65/trunk@1314 b7a2c559-68d2-44c3-8de9-860c34a00d81 2002-06-21 14:16:32 +00:00