// license:BSD-3-Clause // copyright-holders:Roberto Fresca /********************************************************************************** SNOOKER 10 / SANDII' Video Hardware. Written by Roberto Fresca. *********************************************************************************** Resistor Network for all PCBs: 74LS373 .-------. | 02|--> 1 KOhms resistor --> \ | 05|--> 470 Ohms resistor --> > 100 Ohms pull-down resistor --> RED | 06|--> 220 Ohms resistor --> / | | | 09|--> 1 KOhms resistor --> \ | 12|--> 470 Ohms resistor --> > 100 Ohms pull-down resistor --> BLUE | 15|--> 220 Ohms resistor --> / | | | 16|--> 470 Ohms resistor --> \ 100 Ohms pull-down resistor --> GREEN | 19|--> 220 Ohms resistor --> / '-------' **********************************************************************************/ #include "emu.h" #include "video/resnet.h" #include "includes/snookr10.h" WRITE8_MEMBER(snookr10_state::snookr10_videoram_w) { m_videoram[offset] = data; m_bg_tilemap->mark_tile_dirty(offset); } WRITE8_MEMBER(snookr10_state::snookr10_colorram_w) { m_colorram[offset] = data; m_bg_tilemap->mark_tile_dirty(offset); } void snookr10_state::snookr10_palette(palette_device &palette) const { uint8_t const *const color_prom = memregion("proms")->base(); /* GGBBBRRR */ static constexpr int resistances_rb[3] = { 1000, 470, 220 }; static constexpr int resistances_g [2] = { 470, 220 }; double weights_r[3], weights_b[3], weights_g[2]; compute_resistor_weights(0, 255, -1.0, 3, resistances_rb, weights_r, 100, 0, 3, resistances_rb, weights_b, 100, 0, 2, resistances_g, weights_g, 100, 0); for (int i = 0; i < palette.entries(); 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_weights(weights_r, bit0, bit1, bit2); // blue component bit0 = BIT(color_prom[i], 3); bit1 = BIT(color_prom[i], 4); bit2 = BIT(color_prom[i], 5); int const b = combine_weights(weights_b, bit0, bit1, bit2); // green component bit0 = BIT(color_prom[i], 6); bit1 = BIT(color_prom[i], 7); int const g = combine_weights(weights_g, bit0, bit1); palette.set_pen_color(i, rgb_t(r, g, b)); } } TILE_GET_INFO_MEMBER(snookr10_state::get_bg_tile_info) { /* - bits - 7654 3210 xxxx ---- tiles color. ---- xxxx seems unused. */ int offs = tile_index; int attr = m_videoram[offs] + (m_colorram[offs] << 8); int code = attr & 0xfff; int color = m_colorram[offs] >> 4; SET_TILE_INFO_MEMBER(0, code, color, 0); } /********************************************************** Apple 10 palette and tile matrix / video RAM are encrypted/scrambled. For more information, see the driver notes. **********************************************************/ void snookr10_state::apple10_palette(palette_device &palette) const { uint8_t const *const color_prom = memregion("proms")->base(); /* GGBBBRRR */ static constexpr int resistances_rb[3] = { 1000, 470, 220 }; static constexpr int resistances_g [2] = { 470, 220 }; double weights_r[3], weights_b[3], weights_g[2]; compute_resistor_weights(0, 255, -1.0, 3, resistances_rb, weights_r, 100, 0, 3, resistances_rb, weights_b, 100, 0, 2, resistances_g, weights_g, 100, 0); for (int i = 0; i < palette.entries(); 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_weights(weights_r, bit0, bit1, bit2); /* blue component */ bit0 = BIT(color_prom[i], 3); bit1 = BIT(color_prom[i], 4); bit2 = BIT(color_prom[i], 5); int const b = combine_weights(weights_b, bit0, bit1, bit2); /* green component */ bit0 = BIT(color_prom[i], 6); bit1 = BIT(color_prom[i], 7); int const g = combine_weights(weights_g, bit0, bit1); /* encrypted color matrix */ int const cn = bitswap<8>(i, 4, 5, 6, 7, 2, 3, 0, 1); palette.set_pen_color(cn, rgb_t(r, g, b)); } } TILE_GET_INFO_MEMBER(snookr10_state::apple10_get_bg_tile_info) { /* - bits - 7654 3210 xxxx ---- tiles color. ---- xxxx seems unused. */ int offs = tile_index; int attr = m_videoram[offs] + (m_colorram[offs] << 8); int code = bitswap<16>((attr & 0xfff),15,14,13,12,8,9,10,11,0,1,2,3,4,5,6,7); /* encrypted tile matrix */ int color = m_colorram[offs] >> 4; SET_TILE_INFO_MEMBER(0, code, color, 0); } /********************************************************** Crystals Colours palette and tile matrix / video RAM are encrypted/scrambled. For more information, see the driver notes. **********************************************************/ void snookr10_state::crystalc_palette(palette_device &palette) const { uint8_t const *const color_prom = memregion("proms")->base(); /* GGBBBRRR */ static constexpr int resistances_rb[3] = { 1000, 470, 220 }; static constexpr int resistances_g [2] = { 470, 220 }; double weights_r[3], weights_b[3], weights_g[2]; compute_resistor_weights(0, 255, -1.0, 3, resistances_rb, weights_r, 100, 0, 3, resistances_rb, weights_b, 100, 0, 2, resistances_g, weights_g, 100, 0); for (int i = 0; i < palette.entries(); 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_weights(weights_r, bit0, bit1, bit2); // blue component bit0 = BIT(color_prom[i], 3); bit1 = BIT(color_prom[i], 4); bit2 = BIT(color_prom[i], 5); int const b = combine_weights(weights_b, bit0, bit1, bit2); // green component bit0 = BIT(color_prom[i], 6); bit1 = BIT(color_prom[i], 7); int const g = combine_weights(weights_g, bit0, bit1); // encrypted color matrix int const cn = bitswap<8>(i, 7, 5, 6, 4, 3, 2, 1, 0); palette.set_pen_color(cn, rgb_t(r, g, b)); } } TILE_GET_INFO_MEMBER(snookr10_state::crystalc_get_bg_tile_info) { /* - bits - 7654 3210 xxxx ---- tiles color. ---- xxxx seems unused. */ int offs = tile_index; int attr = m_videoram[offs] + (m_colorram[offs] << 8); int code = bitswap<16>((attr & 0xfff),15,14,13,12,0,10,5,1,7,6,9,4,3,2,8,11); /* encrypted tile matrix */ int color = m_colorram[offs] >> 4; SET_TILE_INFO_MEMBER(0, code, color, 0); } void snookr10_state::video_start() { m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(snookr10_state::get_bg_tile_info)), TILEMAP_SCAN_ROWS, 4, 8, 128, 30); } VIDEO_START_MEMBER(snookr10_state, apple10) { m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(snookr10_state::apple10_get_bg_tile_info)), TILEMAP_SCAN_ROWS, 4, 8, 128, 30); } VIDEO_START_MEMBER(snookr10_state, crystalc) { m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(snookr10_state::crystalc_get_bg_tile_info)), TILEMAP_SCAN_ROWS, 4, 8, 128, 30); } uint32_t snookr10_state::screen_update_snookr10(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0); return 0; }