From 844f5a1a865402f59f37a9a194ca1f7bba1a2a97 Mon Sep 17 00:00:00 2001
From: cpg <cpg@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Thu, 12 Dec 2002 23:52:48 +0000
Subject: [PATCH] old color.s implementation for convenience

git-svn-id: svn://svn.cc65.org/cc65/trunk@1751 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/atari/atari_color.s | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 libsrc/atari/atari_color.s

diff --git a/libsrc/atari/atari_color.s b/libsrc/atari/atari_color.s
new file mode 100644
index 000000000..388669224
--- /dev/null
+++ b/libsrc/atari/atari_color.s
@@ -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
+
-- 
2.39.5