mirror of
https://github.com/cc65/cc65.git
synced 2025-01-14 00:32:08 +00:00
split regular color.s into color.s and bordercolor.s
This commit is contained in:
parent
d4f88c8f71
commit
59dd15aa55
17
libsrc/c64/bordercolor.s
Normal file
17
libsrc/c64/bordercolor.s
Normal file
@ -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
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user