mirror of
https://github.com/cc65/cc65.git
synced 2025-03-03 09:32:33 +00:00
used version from pet -- Atari is now a monochrome target
git-svn-id: svn://svn.cc65.org/cc65/trunk@1749 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
cff1f462fb
commit
f0caac24e1
@ -6,28 +6,13 @@
|
||||
; unsigned char __fastcall__ bordercolor (unsigned char color);
|
||||
;
|
||||
|
||||
|
||||
.export _textcolor, _bgcolor, _bordercolor
|
||||
.import return0, return1
|
||||
|
||||
.include "atari.inc"
|
||||
_textcolor = return1
|
||||
|
||||
_textcolor:
|
||||
ldx COLOR1 ; get old value
|
||||
sta COLOR1 ; set new value
|
||||
txa
|
||||
rts
|
||||
_bgcolor = return0
|
||||
|
||||
_bordercolor = return0
|
||||
|
||||
|
||||
_bgcolor:
|
||||
ldx COLOR2 ; get old value
|
||||
sta COLOR2 ; set new value
|
||||
txa
|
||||
rts
|
||||
|
||||
|
||||
_bordercolor:
|
||||
ldx COLOR4 ; get old value
|
||||
sta COLOR4 ; set new value
|
||||
txa
|
||||
rts
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user