mirror of
https://github.com/cc65/cc65.git
synced 2025-01-14 16:33:00 +00:00
atari: split color.s into bordercolor.s and bgcolor.s
This commit is contained in:
parent
0576fe51e7
commit
edd596b2a4
@ -491,5 +491,11 @@ extern void atrx15p2_tgi[];
|
||||
#define PxCTL_IRQ_STATUS 0x80
|
||||
|
||||
|
||||
/* The following #defines will cause the matching functions calls in conio.h
|
||||
** to be overlaid by macros with the same names, saving the function call
|
||||
** overhead.
|
||||
*/
|
||||
#define _textcolor(color) 1
|
||||
|
||||
/* End of atari.h */
|
||||
#endif
|
||||
|
@ -1,15 +1,12 @@
|
||||
;
|
||||
; Christian Groessler, 27-Dec-2002
|
||||
; Christian Groessler, 02-Apr-2019
|
||||
;
|
||||
|
||||
.export _textcolor, _bgcolor, _bordercolor
|
||||
.import return1
|
||||
.export _bgcolor
|
||||
|
||||
.include "atari.inc"
|
||||
|
||||
|
||||
_textcolor = return1
|
||||
|
||||
_bgcolor:
|
||||
ldx COLOR2 ; get old value
|
||||
sta COLOR2 ; set new value
|
||||
@ -23,12 +20,3 @@ bright: lda #0
|
||||
txa
|
||||
ldx #0 ; fix X
|
||||
rts
|
||||
|
||||
|
||||
_bordercolor:
|
||||
ldx COLOR4 ; get old value
|
||||
sta COLOR4 ; set new value
|
||||
txa
|
||||
ldx #0 ; fix X
|
||||
rts
|
||||
|
15
libsrc/atari/bordercolor.s
Normal file
15
libsrc/atari/bordercolor.s
Normal file
@ -0,0 +1,15 @@
|
||||
;
|
||||
; Christian Groessler, 02-Apr-2019
|
||||
;
|
||||
|
||||
.export _bordercolor
|
||||
|
||||
.include "atari.inc"
|
||||
|
||||
|
||||
_bordercolor:
|
||||
ldx COLOR4 ; get old value
|
||||
sta COLOR4 ; set new value
|
||||
txa
|
||||
ldx #0 ; fix X
|
||||
rts
|
Loading…
x
Reference in New Issue
Block a user