void clshroad_state::firebatl_palette(palette_device &palette) const
{
const uint8_t *color_prom = memregion("proms")->base();
// create a lookup table for the palette
for (int i = 0; i < 0x100; i++)
{
int const r = pal4bit(color_prom[i | 0x000]);
int const g = pal4bit(color_prom[i | 0x100]);
int const b = pal4bit(color_prom[i | 0x200]);
palette.set_indirect_color(i, rgb_t(r, g, b));
}
// color_prom now points to the beginning of the lookup table
color_prom += 0x300;
for (int i = 0; i < 0x200; i++)
palette.set_pen_indirect(i, i & 0xff);
for (int i = 0; i < 0x100; i++)
{
uint8_t const ctabentry = ((color_prom[i | 0x000] & 0x0f) << 4) | (color_prom[i | 0x100] & 0x0f);
palette.set_pen_indirect(i | 0x200, ctabentry);
}
}
void kncljoe_state::kncljoe_palette(palette_device &palette) const
{
uint8_t const *color_prom = memregion("proms")->base();
// create a lookup table for the palette
for (int i = 0; i < 0x80; i++)
{
int const r = pal4bit(color_prom[i + 0x000]);
int const g = pal4bit(color_prom[i + 0x100]);
int const b = pal4bit(color_prom[i + 0x200]);
palette.set_indirect_color(i, rgb_t(r, g, b));
}
for (int i = 0; i < 0x10; i++)
{
int bit0, bit1, bit2;
// red component
bit0 = 0;
bit1 = BIT(color_prom[i + 0x300], 6);
bit2 = BIT(color_prom[i + 0x300], 7);
int const r = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2;
// green component
bit0 = BIT(color_prom[i + 0x300], 3);
bit1 = BIT(color_prom[i + 0x300], 4);
bit2 = BIT(color_prom[i + 0x300], 5);
int const g = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2;
// blue component
bit0 = BIT(color_prom[i + 0x300], 0);
bit1 = BIT(color_prom[i + 0x300], 1);
bit2 = BIT(color_prom[i + 0x300], 2);
int const b = 0x21 * bit0 + 0x47 * bit1 + 0x97 * bit2;
palette.set_indirect_color(i + 0x80, rgb_t(r, g, b));
}
// color_prom now points to the beginning of the lookup table
color_prom += 0x320;
// chars
for (int i = 0; i < 0x80; i++)
palette.set_pen_indirect(i, i);
// sprite lookup table
for (int i = 0; i < 0x80; i++)
{
uint8_t const ctabentry = (color_prom[i] & 0x0f) | 0x80;
palette.set_pen_indirect(i + 0x80, ctabentry);
}
}
void mermaid_state::rougien_palette(palette_device &palette) const
{
common_palette(palette);
// black background
palette.set_indirect_color(0x40, rgb_t(0, 0, 0));
// char/sprite palette
for (int i = 0; i < 0x40; i++)
palette.set_pen_indirect(i, i);
// background palette
palette.set_pen_indirect(0x40, 0x40);
palette.set_pen_indirect(0x41, 0x00);
palette.set_pen_indirect(0x42, 0x00);
palette.set_pen_indirect(0x43, 0x02);
}
void fastlane_state::fastlane_palette(palette_device &palette) const
{
uint8_t const *const color_prom = memregion("proms")->base();
for (int pal = 0; pal < 0x10; pal++)
{
for (int i = 0; i < 0x400; i++)
{
uint8_t const ctabentry = (i & 0x3f0) | color_prom[(pal << 4) | (i & 0x0f)];
palette.set_pen_indirect((pal << 10) | i, ctabentry);
}
}
}
// copied from elsewhere. surely incorrect
void dmndrby_state::dmndrby_palette(palette_device &palette) const
{
const uint8_t *color_prom = memregion("proms")->base();
static constexpr int resistances_rg[3] = { 1000, 470, 220 };
static constexpr int resistances_b [2] = { 470, 220 };
// compute the color output resistor weights
double rweights[3], gweights[3], bweights[2];
compute_resistor_weights(0, 255, -1.0,
3, &resistances_rg[0], rweights, 470, 0,
3, &resistances_rg[0], gweights, 470, 0,
2, &resistances_b[0], bweights, 470, 0);
// create a lookup table for the palette
for (int i = 0; i < 0x20; i++)
{
int bit0, bit1, bit2;
// red component */
bit0 = BIT(color_prom[i], 0);
bit1 = BIT(color_prom[i], 1);
bit2 = BIT(color_prom[i], 2);
int const r = combine_3_weights(rweights, bit0, bit1, bit2);
// green component
bit0 = BIT(color_prom[i], 3);
bit1 = BIT(color_prom[i], 4);
bit2 = BIT(color_prom[i], 5);
int const g = combine_3_weights(gweights, bit0, bit1, bit2);
// blue component
bit0 = BIT(color_prom[i], 6);
bit1 = BIT(color_prom[i], 7);
int const b = combine_2_weights(bweights, bit0, bit1);
palette.set_indirect_color(i, rgb_t(r, g, b));
}
// color_prom now points to the beginning of the lookup table
color_prom = memregion("proms2")->base();
// normal tiles use colors 0-15
for (int i = 0x000; i < 0x300; i++)
{
uint8_t ctabentry = color_prom[i];
palette.set_pen_indirect(i, ctabentry);
}
}