split regular color.s into color.s and bordercolor.s

2026-04-24 14:17:23 +00:00 · 2015-10-14 17:25:35 +02:00
parent d4f88c8f71
commit 59dd15aa55
2 changed files with 18 additions and 9 deletions
@@ -0,0 +1,17 @@
+;
+; Ullrich von Bassewitz, 06.08.1998
+;
+; unsigned char __fastcall__ bordercolor (unsigned char color);
+;
+
+
+        .export         _bordercolor
+
+        .include        "c64.inc"
+
+_bordercolor:
+        ldx     VIC_BORDERCOLOR ; get old value
+        sta     VIC_BORDERCOLOR ; set new value
+        txa
+        rts
+
@@ -7,7 +7,7 @@
 ;


-        .export         _textcolor, _bgcolor, _bordercolor
+        .export         _textcolor, _bgcolor

        .include        "c64.inc"

@@ -23,11 +23,3 @@ _bgcolor:
        sta     VIC_BG_COLOR0   ; set new value
        txa
        rts
-
-
-_bordercolor:
-        ldx     VIC_BORDERCOLOR ; get old value
-        sta     VIC_BORDERCOLOR ; set new value
-        txa
-        rts
-