Removed an unused .import

[cc65] / libsrc / atari / color.s

diff --git a/libsrc/atari/color.s b/libsrc/atari/color.s
index ea398edb24f586cefd445d781f34acb1716e31d8..52432499dc4b625f279a4983d9d5dacda05adbdf 100644 (file)
--- a/libsrc/atari/color.s
+++ b/libsrc/atari/color.s
@@ -1,27 +1,27 @@
 ;
-; Ullrich von Bassewitz, 06.08.1998
+; Christian Groessler, 27-Dec-2002
 ;
-; unsigned char __fastcall__ textcolor (unsigned char color);
-; unsigned char __fastcall__ bgcolor (unsigned char color);
-; unsigned char __fastcall__ bordercolor (unsigned char color);
-;
-
 
        .export         _textcolor, _bgcolor, _bordercolor
+       .import         return1
 
        .include        "atari.inc"
 
-_textcolor:
-       ldx     COLOR1  ; get old value
-       sta     COLOR1  ; set new value
-       txa
-       rts
 
+_textcolor     =       return1
 
 _bgcolor:
        ldx     COLOR2  ; get old value
        sta     COLOR2  ; set new value
+       and     #$0e
+       cmp     #8
+       bcs     bright
+       lda     #$0e
+       .byte   $2c     ; bit opcode, eats the next 2 bytes
+bright:        lda     #0
+       sta     COLOR1
        txa
+       ldx     #0      ; fix X
        rts
 
 
@@ -29,5 +29,6 @@ _bordercolor:
        ldx     COLOR4  ; get old value
        sta     COLOR4  ; set new value
        txa
+       ldx     #0      ; fix X
        rts