mirror of
https://github.com/cc65/cc65.git
synced 2024-07-05 21:29:03 +00:00
16 lines
355 B
ArmAsm
16 lines
355 B
ArmAsm
|
;
|
||
|
|
; Ullrich von Bassewitz, 22.06.2002
|
||
|
|
;
|
||
|
|
; unsigned char __fastcall__ tgi_getcolor (void);
|
||
|
|
; /* Return the current drawing color */
|
||
|
|
|
||
|
|
|
||
|
|
.include "tgi-kernel.inc"
|
||
|
|
.export _tgi_getcolor
|
||
|
|
|
||
|
|
_tgi_getcolor:
|
||
|
|
lda _tgi_color ; Get the current drawing color
|
||
|
|
ldx #0 ; Clear high byte
|
||
|
|
rts
|
||
|
|
|