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
|
#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 */
|
/* End of atari.h */
|
||||||
#endif
|
#endif
|
||||||
|
@ -1,15 +1,12 @@
|
|||||||
;
|
;
|
||||||
; Christian Groessler, 27-Dec-2002
|
; Christian Groessler, 02-Apr-2019
|
||||||
;
|
;
|
||||||
|
|
||||||
.export _textcolor, _bgcolor, _bordercolor
|
.export _bgcolor
|
||||||
.import return1
|
|
||||||
|
|
||||||
.include "atari.inc"
|
.include "atari.inc"
|
||||||
|
|
||||||
|
|
||||||
_textcolor = return1
|
|
||||||
|
|
||||||
_bgcolor:
|
_bgcolor:
|
||||||
ldx COLOR2 ; get old value
|
ldx COLOR2 ; get old value
|
||||||
sta COLOR2 ; set new value
|
sta COLOR2 ; set new value
|
||||||
@ -23,12 +20,3 @@ bright: lda #0
|
|||||||
txa
|
txa
|
||||||
ldx #0 ; fix X
|
ldx #0 ; fix X
|
||||||
rts
|
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