6502/CLK
1
0
Fork 0
mirror of https://github.com/TomHarte/CLK.git synced 2024-06-25 18:30:07 +00:00
Code Issues Projects Releases Wiki Activity

This register appears to be read/write.

Browse Source
This commit is contained in:
Thomas Harte 2020-12-11 21:43:34 -05:00
parent 6e9d517c26
commit 114d48b076
3 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Machines/Apple/AppleIIgs/AppleIIgs.cpp
View File

@ -313,6 +313,9 @@ class ConcreteMachine:
case Write(0xc022):
video_->set_text_colour(*value);
break;
case Read(0xc022):
*value = video_.last_valid()->get_text_colour();
break;
// Speed register.
case Read(0xc036):

5
Machines/Apple/AppleIIgs/Video.cpp
View File

@ -541,10 +541,15 @@ uint8_t Video::get_border_colour() {
}
void Video::set_text_colour(uint8_t colour) {
text_colour_entry_ = colour;
text_colour_ = appleii_palette[colour >> 4];
background_colour_ = appleii_palette[colour & 0xf];
}
uint8_t Video::get_text_colour() {
return text_colour_entry_;
}
void Video::set_composite_is_colour(bool) {
// TODO.
}

2
Machines/Apple/AppleIIgs/Video.hpp
View File

@ -43,6 +43,7 @@ class Video: public Apple::II::VideoSwitches<Cycles> {
void set_border_colour(uint8_t);
void set_text_colour(uint8_t);
uint8_t get_text_colour();
uint8_t get_border_colour();
void set_composite_is_colour(bool);
@ -133,6 +134,7 @@ class Video: public Apple::II::VideoSwitches<Cycles> {
// The modal colours.
uint16_t border_colour_ = 0;
uint8_t border_colour_entry_ = 0;
uint8_t text_colour_entry_ = 0xf0;
uint16_t text_colour_ = 0xffff;
uint16_t background_colour_ = 0;