bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

old color.s implementation for convenience

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@1751 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cpg
2002-12-12 23:52:48 +00:00
parent f0caac24e1
commit 844f5a1a86
1 changed files with 33 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
libsrc/atari/atari_color.s Normal file
View File

@@ -0,0 +1,33 @@
;
; Christian Groessler, 13-Dec-2002
;
; unsigned char __fastcall__ _atari_textcolor (unsigned char color);
; unsigned char __fastcall__ _atari_bgcolor (unsigned char color);
; unsigned char __fastcall__ _atari_bordercolor (unsigned char color);
;
.export __atari_textcolor, __atari_bgcolor, __atari_bordercolor
.include "atari.inc"
__atari_textcolor:
ldx COLOR1 ; get old value
sta COLOR1 ; set new value
txa
rts
__atari_bgcolor:
ldx COLOR2 ; get old value
sta COLOR2 ; set new value
txa
rts
__atari_bordercolor:
ldx COLOR4 ; get old value
sta COLOR4 ; set new value
txa
rts