// license:BSD-3-Clause // copyright-holders:Ryan Holtz, David Haywood /***************************************************************************** SunPlus GCM394-series SoC peripheral emulation (Video) **********************************************************************/ #include "emu.h" #include "sunplus_gcm394_video.h" DEFINE_DEVICE_TYPE(GCM394_VIDEO, gcm394_video_device, "gcm394_video", "SunPlus GCM394 System-on-a-Chip (Video)") #define LOG_GCM394_VIDEO_DMA (1U << 3) #define LOG_GCM394_TMAP (1U << 2) #define LOG_GCM394_VIDEO (1U << 1) #define VERBOSE (LOG_GCM394_VIDEO_DMA | LOG_GCM394_VIDEO) #include "logmacro.h" gcm394_base_video_device::gcm394_base_video_device(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, uint32_t clock) : device_t(mconfig, type, tag, owner, clock) //, device_gfx_interface(mconfig, *this, nullptr) , device_video_interface(mconfig, *this) , m_cpu(*this, finder_base::DUMMY_TAG) , m_screen(*this, finder_base::DUMMY_TAG) // , m_scrollram(*this, "scrollram") , m_spriteram(*this, "^spriteram") , m_video_irq_cb(*this) , m_palette(*this, "palette") , m_gfxdecode(*this, "gfxdecode") , m_space_read_cb(*this) { } gcm394_video_device::gcm394_video_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) : gcm394_base_video_device(mconfig, GCM394_VIDEO, tag, owner, clock) { } void gcm394_base_video_device::device_start() { for (uint8_t i = 0; i < 32; i++) { m_rgb5_to_rgb8[i] = (i << 3) | (i >> 2); } for (uint16_t i = 0; i < 0x8000; i++) { m_rgb555_to_rgb888[i] = (m_rgb5_to_rgb8[(i >> 10) & 0x1f] << 16) | (m_rgb5_to_rgb8[(i >> 5) & 0x1f] << 8) | (m_rgb5_to_rgb8[(i >> 0) & 0x1f] << 0); } m_video_irq_cb.resolve(); m_gfxregion = memregion(":maincpu")->base(); m_gfxregionsize = memregion(":maincpu")->bytes(); int gfxelement = 0; if (1) { gfx_layout obj_layout = { 16,16, 0, 4, { STEP4(0,1) }, { STEP16(0,4) }, { STEP16(0,4 * 16) }, 16 * 16 * 4 }; obj_layout.total = m_gfxregionsize / (16 * 16 * 4 / 8); m_gfxdecode->set_gfx(gfxelement, std::make_unique(m_palette, obj_layout, m_gfxregion, 0, 0x10 * 0x10, 0)); gfxelement++; } if (1) { gfx_layout obj_layout = { 32,16, 0, 4, { STEP4(0,1) }, { STEP32(0,4) }, { STEP16(0,4 * 32) }, 16 * 32 * 4 }; obj_layout.total = m_gfxregionsize / (16 * 32 * 4 / 8); m_gfxdecode->set_gfx(gfxelement, std::make_unique(m_palette, obj_layout, m_gfxregion, 0, 0x10 * 0x10, 0)); gfxelement++; } if (1) { gfx_layout obj_layout = { 16,32, 0, 4, { STEP4(0,1) }, { STEP16(0,4) }, { STEP32(0,4 * 16) }, 32 * 16 * 4 }; obj_layout.total = m_gfxregionsize / (32 * 16 * 4 / 8); m_gfxdecode->set_gfx(gfxelement, std::make_unique(m_palette, obj_layout, m_gfxregion, 0, 0x10 * 0x10, 0)); gfxelement++; } if (1) { gfx_layout obj_layout = { 32,32, 0, 4, { STEP4(0,1) }, { STEP32(0,4) }, { STEP32(0,4 * 32) }, 32 * 32 * 4 }; obj_layout.total = m_gfxregionsize / (32 * 32 * 4 / 8); m_gfxdecode->set_gfx(gfxelement, std::make_unique(m_palette, obj_layout, m_gfxregion, 0, 0x10 * 0x10, 0)); gfxelement++; } if (1) { gfx_layout obj_layout = { 8,16, 0, 2, { 0,1 }, { STEP8(0,2) }, { STEP16(0,2 * 8) }, 8 * 16 * 2 }; obj_layout.total = m_gfxregionsize / (8 * 16 * 2 / 8); m_gfxdecode->set_gfx(gfxelement, std::make_unique(m_palette, obj_layout, m_gfxregion, 0, 0x40 * 0x10, 0)); gfxelement++; } if (1) { const uint32_t texlayout_xoffset[64] = { STEP64(0,2) }; const uint32_t texlayout_yoffset[32] = { STEP32(0,2 * 64) }; gfx_layout obj_layout = { 64,32, 0, 2, { 0,1 }, EXTENDED_XOFFS, EXTENDED_YOFFS, 32 * 64 * 2, texlayout_xoffset, texlayout_yoffset }; obj_layout.total = m_gfxregionsize / (16 * 32 * 2 / 8); m_gfxdecode->set_gfx(gfxelement, std::make_unique(m_palette, obj_layout, m_gfxregion, 0, 0x40 * 0x10, 0)); gfxelement++; } save_item(NAME(m_spriteextra)); m_space_read_cb.resolve_safe(0); } void gcm394_base_video_device::device_reset() { for (int i = 0; i < 6; i++) { m_tmap0_regs[i] = 0x0000; m_tmap1_regs[i] = 0x0000; } for (int i=0;i<0x100;i++) m_spriteextra[i] = 0x0000; for (int i=0;i<0x100;i++) m_paletteram[i] = machine().rand()&0x7fff; m_707f = 0x0000; m_703a = 0x0000; m_7062 = 0x0000; m_7063 = 0x0000; m_702a = 0x0000; m_7030 = 0x0000; m_703c = 0x0000; m_7080 = 0x0000; m_7081 = 0x0000; m_7082 = 0x0000; m_7083 = 0x0000; m_7084 = 0x0000; m_7085 = 0x0000; m_7086 = 0x0000; m_7087 = 0x0000; m_7088 = 0x0000; m_videodma_bank = 0x0000; m_videodma_size = 0x0000; m_videodma_dest = 0x0000; m_videodma_source = 0x0000; m_video_irq_status = 0x0000; } /************************* * Video Hardware * *************************/ template void gcm394_base_video_device::draw(const rectangle &cliprect, uint32_t line, uint32_t xoff, uint32_t yoff, uint32_t bitmap_addr, uint32_t tile, int32_t h, int32_t w, uint8_t bpp, uint32_t yflipmask, uint32_t palette_offset) { uint32_t nc_bpp = ((bpp) + 1) << 1; // probably don't do this here as this SoC has extended palette for higher bpp modes //palette_offset >>= nc_bpp; //palette_offset <<= nc_bpp; uint32_t bits_per_row = nc_bpp * w / 16; //uint32_t words_per_tile = bits_per_row * h; uint32_t words_per_tile = 8; // seems to be correct for sprites regardless of size / bpp uint32_t m = bitmap_addr + words_per_tile * tile + bits_per_row * (line ^ yflipmask); m += (0x300000 / 2); uint32_t bits = 0; uint32_t nbits = 0; uint32_t y = line; int yy = (yoff + y) & 0x1ff; if (yy >= 0x01c0) yy -= 0x0200; if (yy > 240 || yy < 0) return; int y_index = yy * 320; for (int32_t x = FlipX ? (w - 1) : 0; FlipX ? x >= 0 : x < w; FlipX ? x-- : x++) { int xx = xoff + x; bits <<= nc_bpp; if (nbits < nc_bpp) { uint16_t b = m_space_read_cb((m++ & 0x3fffff)); b = (b << 8) | (b >> 8); bits |= b << (nc_bpp - nbits); nbits += 16; } nbits -= nc_bpp; int pen = bits >> 16; int current_palette_offset = palette_offset; // for planes above 4bpp palette ends up being pulled from different places? if (nc_bpp < 6) { // 2bpp // 4bpp current_palette_offset |= 0x0800; } else if (nc_bpp < 8) { // 6bpp } else { pen = machine().rand() & 0x1f; // 8bpp } uint32_t pal = current_palette_offset + pen; bits &= 0xffff; if (RowScroll) xx -= 0;// (int16_t)m_scrollram[yy & 0x1ff]; xx &= 0x01ff; if (xx >= 0x01c0) xx -= 0x0200; if (xx >= 0 && xx < 320) { int pix_index = xx + y_index; uint16_t rgb = m_paletteram[pal]; if (!(rgb & 0x8000)) { if (Blend) { /* m_screenbuf[pix_index] = (mix_channel((uint8_t)(m_screenbuf[pix_index] >> 16), m_rgb5_to_rgb8[(rgb >> 10) & 0x1f]) << 16) | (mix_channel((uint8_t)(m_screenbuf[pix_index] >> 8), m_rgb5_to_rgb8[(rgb >> 5) & 0x1f]) << 8) | (mix_channel((uint8_t)(m_screenbuf[pix_index] >> 0), m_rgb5_to_rgb8[rgb & 0x1f])); */ m_screenbuf[pix_index] = m_rgb555_to_rgb888[rgb]; } else { m_screenbuf[pix_index] = m_rgb555_to_rgb888[rgb]; } } } } } void gcm394_base_video_device::draw_page(const rectangle &cliprect, uint32_t scanline, int priority, uint32_t bitmap_addr, uint16_t *regs) { uint32_t xscroll = regs[0]; uint32_t yscroll = regs[1]; uint32_t attr = regs[2]; uint32_t ctrl = regs[3]; uint32_t tilemap = regs[4]; uint32_t palette_map = regs[5]; address_space &space = m_cpu->space(AS_PROGRAM); if (!(ctrl & PAGE_ENABLE_MASK)) { return; } if (((attr & PAGE_PRIORITY_FLAG_MASK) >> PAGE_PRIORITY_FLAG_SHIFT) != priority) { return; } uint32_t tile_h = 8 << ((attr & PAGE_TILE_HEIGHT_MASK) >> PAGE_TILE_HEIGHT_SHIFT); uint32_t tile_w = 8 << ((attr & PAGE_TILE_WIDTH_MASK) >> PAGE_TILE_WIDTH_SHIFT); uint32_t tile_count_x = 512 / tile_w; uint32_t bitmap_y = (scanline + yscroll) & 0xff; uint32_t y0 = bitmap_y / tile_h; uint32_t tile_scanline = bitmap_y % tile_h; uint32_t tile_address = tile_count_x * y0; for (uint32_t x0 = 0; x0 < tile_count_x; x0++, tile_address++) { uint32_t yy = ((tile_h * y0 - yscroll + 0x10) & 0xff) - 0x10; uint32_t xx = (tile_w * x0 - xscroll) & 0x1ff; uint32_t tile = (ctrl & PAGE_WALLPAPER_MASK) ? space.read_word(tilemap) : space.read_word(tilemap + tile_address); uint16_t palette = (ctrl & PAGE_WALLPAPER_MASK) ? space.read_word(palette_map) : space.read_word(palette_map + tile_address / 2); if (x0 & 1) palette >>= 8; tile |= (palette & 0x0007) << 16; if (!tile) continue; uint32_t tileattr = attr; uint32_t tilectrl = ctrl; #if 0 if ((ctrl & 2) == 0) { // -(1) bld(1) flip(2) pal(4) tileattr &= ~0x000c; tileattr |= (palette >> 2) & 0x000c; // flip tileattr &= ~0x0f00; tileattr |= (palette << 8) & 0x0f00; // palette tilectrl &= ~0x0100; tilectrl |= (palette << 2) & 0x0100; // blend } #endif const bool blend = (tileattr & 0x4000 || tilectrl & 0x0100); const bool row_scroll = (tilectrl & 0x0010); const bool flip_x = (tileattr & TILE_X_FLIP); const uint32_t yflipmask = tileattr & TILE_Y_FLIP ? tile_h - 1 : 0; uint32_t palette_offset = (tileattr & 0x0f00) >> 4; //palette_offset |= 0x0900; palette_offset |= 0x0100; const uint8_t bpp = tileattr & 0x0003; if (blend) { if (row_scroll) { if (flip_x) draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); else draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); } else { if (flip_x) draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); else draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); } } else { if (row_scroll) { if (flip_x) draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); else draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); } else { if (flip_x) draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); else draw(cliprect, tile_scanline, xx, yy, bitmap_addr, tile, tile_h, tile_w, bpp, yflipmask, palette_offset); } } } } void gcm394_base_video_device::draw_sprite(const rectangle &cliprect, uint32_t scanline, int priority, uint32_t base_addr) { uint32_t bitmap_addr = 0;// 0x40 * m_video_regs[0x22]; uint32_t tile = m_spriteram[base_addr + 0]; int16_t x = m_spriteram[base_addr + 1]; int16_t y = m_spriteram[base_addr + 2]; uint16_t attr = m_spriteram[base_addr + 3]; if (!tile) // this check needs to come before the additional attribute bits are added in? (smartfp title) { return; } tile |= m_spriteextra[base_addr / 4] << 16; if (((attr & PAGE_PRIORITY_FLAG_MASK) >> PAGE_PRIORITY_FLAG_SHIFT) != priority) { return; } const uint32_t h = 8 << ((attr & PAGE_TILE_HEIGHT_MASK) >> PAGE_TILE_HEIGHT_SHIFT); const uint32_t w = 8 << ((attr & PAGE_TILE_WIDTH_MASK) >> PAGE_TILE_WIDTH_SHIFT); /* if (!(m_video_regs[0x42] & SPRITE_COORD_TL_MASK)) { x = (160 + x) - w / 2; y = (120 - y) - (h / 2) + 8; } */ x &= 0x01ff; y &= 0x01ff; uint32_t tile_line = ((scanline - y) + 0x200) % h; int16_t test_y = (y + tile_line) & 0x1ff; if (test_y >= 0x01c0) test_y -= 0x0200; if (test_y != scanline) { return; } bool blend = (attr & 0x4000); bool flip_x = (attr & TILE_X_FLIP); const uint8_t bpp = attr & 0x0003; const uint32_t yflipmask = attr & TILE_Y_FLIP ? h - 1 : 0; uint32_t palette_offset = (attr & 0x0f00) >> 4; //palette_offset |= 0x0d00; palette_offset |= 0x0500; if (blend) { if (flip_x) draw(cliprect, tile_line, x, y, bitmap_addr, tile, h, w, bpp, yflipmask, palette_offset); else draw(cliprect, tile_line, x, y, bitmap_addr, tile, h, w, bpp, yflipmask, palette_offset); } else { if (flip_x) draw(cliprect, tile_line, x, y, bitmap_addr, tile, h, w, bpp, yflipmask, palette_offset); else draw(cliprect, tile_line, x, y, bitmap_addr, tile, h, w, bpp, yflipmask, palette_offset); } } void gcm394_base_video_device::draw_sprites(const rectangle &cliprect, uint32_t scanline, int priority) { for (uint32_t n = 0; n < 0x100; n++) { draw_sprite(cliprect, scanline, priority, 4 * n); } } uint32_t gcm394_base_video_device::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect) { memset(&m_screenbuf[320 * cliprect.min_y], 0, 4 * 320 * ((cliprect.max_y - cliprect.min_y) + 1)); const uint32_t page1_addr = 0x40 * m_page1_addr; const uint32_t page2_addr = 0x40 * m_page2_addr; uint16_t* page1_regs = m_tmap0_regs; uint16_t* page2_regs = m_tmap1_regs; for (uint32_t scanline = (uint32_t)cliprect.min_y; scanline <= (uint32_t)cliprect.max_y; scanline++) { for (int i = 0; i < 4; i++) { if (1) { draw_page(cliprect, scanline, i, page1_addr, page1_regs); draw_page(cliprect, scanline, i, page2_addr, page2_regs); } draw_sprites(cliprect, scanline, i); } } for (int y = cliprect.min_y; y <= cliprect.max_y; y++) { uint32_t *dest = &bitmap.pix32(y, cliprect.min_x); uint32_t *src = &m_screenbuf[cliprect.min_x + 320 * y]; memcpy(dest, src, sizeof(uint32_t) * ((cliprect.max_x - cliprect.min_x) + 1)); } return 0; } void gcm394_base_video_device::write_tmap_regs(int tmap, uint16_t* regs, int offset, uint16_t data) { switch (offset) { case 0x0: // Page X scroll LOGMASKED(LOG_GCM394_TMAP, "write_tmap_regs: Page %d X Scroll = %04x\n", tmap, data & 0x01ff); regs[offset] = data & 0x01ff; break; case 0x1: // Page Y scroll LOGMASKED(LOG_GCM394_TMAP, "write_tmap_regs: Page %d Y Scroll = %04x\n", tmap, data & 0x00ff); regs[offset] = data & 0x00ff; break; case 0x2: // Page Attributes LOGMASKED(LOG_GCM394_TMAP, "write_tmap_regs: Page %d Attributes = %04x (Depth:%d, Palette:%d, VSize:%d, HSize:%d, FlipY:%d, FlipX:%d, BPP:%d)\n", tmap, data , (data >> 12) & 3, (data >> 8) & 15, 8 << ((data >> 6) & 3), 8 << ((data >> 4) & 3), BIT(data, 3), BIT(data, 2), 2 * ((data & 3) + 1)); regs[offset] = data; break; case 0x3: // Page Control LOGMASKED(LOG_GCM394_TMAP, "write_tmap_regs: Page %d Control = %04x (Blend:%d, HiColor:%d, RowScroll:%d, Enable:%d, Wallpaper:%d, RegSet:%d, Bitmap:%d)\n", tmap, data , BIT(data, 8), BIT(data, 7), BIT(data, 4), BIT(data, 3), BIT(data, 2), BIT(data, 1), BIT(data, 0)); regs[offset] = data; break; case 0x4: // Page Tile Address LOGMASKED(LOG_GCM394_TMAP, "write_tmap_regs: Page %d Tile Address = %04x\n", tmap, data & 0x1fff); regs[offset] = data; break; case 0x5: // Page Attribute write_tmap_regs LOGMASKED(LOG_GCM394_TMAP, "write_tmap_regs: Page %d Attribute Address = %04x\n", tmap, data & 0x1fff); regs[offset] = data; break; } } // **************************************** TILEMAP 0 ************************************************* READ16_MEMBER(gcm394_base_video_device::tmap0_regs_r) { return m_tmap0_regs[offset]; } WRITE16_MEMBER(gcm394_base_video_device::tmap0_regs_w) { LOGMASKED(LOG_GCM394_TMAP, "%s:gcm394_base_video_device::tmap0_regs_w %01x %04x\n", machine().describe_context(), offset, data); write_tmap_regs(0, m_tmap0_regs, offset, data); } WRITE16_MEMBER(gcm394_base_video_device::tmap0_unk0_w) { LOGMASKED(LOG_GCM394_TMAP, "%s:gcm394_base_video_device::tmap0_unk0_w %04x\n", machine().describe_context(), data); m_page1_addr = data; } WRITE16_MEMBER(gcm394_base_video_device::tmap0_unk1_w) { LOGMASKED(LOG_GCM394_TMAP, "%s:gcm394_base_video_device::tmap0_unk1_w %04x\n", machine().describe_context(), data); } // **************************************** TILEMAP 1 ************************************************* READ16_MEMBER(gcm394_base_video_device::tmap1_regs_r) { return m_tmap1_regs[offset]; } WRITE16_MEMBER(gcm394_base_video_device::tmap1_regs_w) { LOGMASKED(LOG_GCM394_TMAP, "%s:gcm394_base_video_device::tmap1_regs_w %01x %04x\n", machine().describe_context(), offset, data); write_tmap_regs(1, m_tmap1_regs, offset, data); } WRITE16_MEMBER(gcm394_base_video_device::tmap1_unk0_w) { LOGMASKED(LOG_GCM394_TMAP, "%s:gcm394_base_video_device::tmap1_unk0_w %04x\n", machine().describe_context(), data); m_page2_addr = data; } WRITE16_MEMBER(gcm394_base_video_device::tmap1_unk1_w) { LOGMASKED(LOG_GCM394_TMAP, "%s:gcm394_base_video_device::tmap1_unk1_w %04x\n", machine().describe_context(), data); } // **************************************** unknown video device 0 (another tilemap? sprite layer?) ************************************************* WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device0_regs_w) { // offsets 0,1,4,5,6,7 used in main IRQ code // offsets 2,3 only cleared on startup LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device0_regs_w %01x %04x\n", machine().describe_context(), offset, data); } WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device0_unk0_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device0_unk0_w %04x\n", machine().describe_context(), data); } WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device0_unk1_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device0_unk1_w %04x\n", machine().describe_context(), data); } // **************************************** unknown video device 1 (another tilemap? sprite layer?) ************************************************* WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device1_regs_w) { // offsets 0,1,4,5,6,7 used in main IRQ code // offsets 2,3 only cleared on startup LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device1_regs_w %01x %04x\n", machine().describe_context(), offset, data); } WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device1_unk0_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device1_unk0_w %04x\n", machine().describe_context(), data); } WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device1_unk1_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device1_unk1_w %04x\n", machine().describe_context(), data); } // **************************************** unknown video device 2 (sprite control?) ************************************************* WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device2_unk0_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device2_unk0_w %04x\n", machine().describe_context(), data); } WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device2_unk1_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device2_unk1_w %04x\n", machine().describe_context(), data); } WRITE16_MEMBER(gcm394_base_video_device::unknown_video_device2_unk2_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::unknown_video_device2_unk2_w %04x\n", machine().describe_context(), data); } // **************************************** video DMA device ************************************************* WRITE16_MEMBER(gcm394_base_video_device::video_dma_source_w) { LOGMASKED(LOG_GCM394_VIDEO_DMA, "%s:gcm394_base_video_device::video_dma_source_w %04x\n", machine().describe_context(), data); m_videodma_source = data; } WRITE16_MEMBER(gcm394_base_video_device::video_dma_dest_w) { LOGMASKED(LOG_GCM394_VIDEO_DMA, "%s:gcm394_base_video_device::video_dma_dest_w %04x\n", machine().describe_context(), data); m_videodma_dest = data; } READ16_MEMBER(gcm394_base_video_device::video_dma_size_r) { LOGMASKED(LOG_GCM394_VIDEO_DMA, "%s:gcm394_base_video_device::video_dma_size_r\n", machine().describe_context()); return 0x0000; } WRITE16_MEMBER(gcm394_base_video_device::video_dma_size_w) { LOGMASKED(LOG_GCM394_VIDEO_DMA, "%s:gcm394_base_video_device::video_dma_size_w %04x\n", machine().describe_context(), data); m_videodma_size = data; LOGMASKED(LOG_GCM394_VIDEO_DMA, "%s: doing sprite / video DMA source %04x dest %04x size %04x bank %04x\n", machine().describe_context(), m_videodma_source, m_videodma_dest, m_videodma_size, m_videodma_bank ); if (m_videodma_dest == 0x7400) { if (m_videodma_bank == 0x0001) // transfers an additional word for each sprite with this bit set { m_videodma_size &= 0xff; for (int i = 0; i <= m_videodma_size; i++) { uint16_t dat = space.read_word(m_videodma_source+i); m_spriteextra[i] = dat; } } else if (m_videodma_bank == 0x0000) { m_videodma_size &= 0x3ff; for (int i = 0; i <= m_videodma_size; i++) { uint16_t dat = space.read_word(m_videodma_source+i); m_spriteram[i] = dat; } } else { logerror("unhandled: m_videodma_bank is %04x\n", m_videodma_bank); } } else { logerror("unhandled: m_videodma_dest is %04x\n", m_videodma_dest); } m_videodma_size = 0x0000; } WRITE16_MEMBER(gcm394_base_video_device::video_dma_unk_w) { LOGMASKED(LOG_GCM394_VIDEO_DMA, "%s:gcm394_base_video_device::video_dma_unk_w %04x\n", machine().describe_context(), data); m_videodma_bank = data; } READ16_MEMBER(gcm394_base_video_device::video_707f_r) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_707f_r\n", machine().describe_context()); return m_707f; } WRITE16_MEMBER(gcm394_base_video_device::video_707f_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_707f_w %04x\n", machine().describe_context(), data); m_707f = data; } READ16_MEMBER(gcm394_base_video_device::video_703a_r) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_703a_r\n", machine().describe_context()); return m_703a; } // something to do with palette access, maybe bank? WRITE16_MEMBER(gcm394_base_video_device::video_703a_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_703a_w %04x\n", machine().describe_context(), data); m_703a = data; } READ16_MEMBER(gcm394_base_video_device::video_7062_r) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7062_r\n", machine().describe_context()); return m_7062; } WRITE16_MEMBER(gcm394_base_video_device::video_7062_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7062_w %04x\n", machine().describe_context(), data); m_7062 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7063_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7063_w %04x\n", machine().describe_context(), data); m_7063 = data; // ack or enable? happens near start of the IRQ if (data & 0x01) { m_video_irq_status &= ~1; check_video_irq(); } } WRITE16_MEMBER(gcm394_base_video_device::video_702a_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_702a_w %04x\n", machine().describe_context(), data); m_702a = data; } // read in IRQ READ16_MEMBER(gcm394_base_video_device::video_7030_r) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7030_r\n", machine().describe_context()); return m_7030; } WRITE16_MEMBER(gcm394_base_video_device::video_7030_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7030_w %04x\n", machine().describe_context(), data); m_7030 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_703c_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_703c_w %04x\n", machine().describe_context(), data); m_703c = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7080_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7080_w %04x\n", machine().describe_context(), data); m_7080 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7081_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7081_w %04x\n", machine().describe_context(), data); m_7081 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7082_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7082_w %04x\n", machine().describe_context(), data); m_7082 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7083_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7083_w %04x\n", machine().describe_context(), data); m_7083 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7084_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7084_w %04x\n", machine().describe_context(), data); m_7084 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7085_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7085_w %04x\n", machine().describe_context(), data); m_7085 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7086_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7086_w %04x\n", machine().describe_context(), data); m_7086 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7087_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7087_w %04x\n", machine().describe_context(), data); m_7087 = data; } WRITE16_MEMBER(gcm394_base_video_device::video_7088_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7088_w %04x\n", machine().describe_context(), data); m_7088 = data; } READ16_MEMBER(gcm394_base_video_device::video_7083_r) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::video_7083_r\n", machine().describe_context()); return m_7083; } WRITE16_MEMBER(gcm394_base_video_device::palette_w) { LOGMASKED(LOG_GCM394_VIDEO, "%s:gcm394_base_video_device::palette_w %04x : %04x (value of 0x703a is %04x)\n", machine().describe_context().c_str(), offset, data, m_703a); if (m_703a & 0xfff0) { fatalerror("palette writes with m_703a %04x\n", m_703a); } else { offset |= (m_703a & 0x000f) << 8; m_paletteram[offset] = data; uint32_t pal = m_rgb555_to_rgb888[data & 0x7fff]; int r = (pal >> 16) & 0xff; int g = (pal >> 8) & 0xff; int b = (pal >> 0) & 0xff; m_palette->set_pen_color(offset, rgb_t(r, g, b)); } } READ16_MEMBER(gcm394_base_video_device::palette_r) { if (m_703a & 0xfff0) { fatalerror("palette read with m_703a %04x\n", m_703a); } else { offset |= (m_703a & 0x000f) << 8; return m_paletteram[offset]; } } void gcm394_base_video_device::check_video_irq() { m_video_irq_cb((m_video_irq_status & 1) ? ASSERT_LINE : CLEAR_LINE); } WRITE_LINE_MEMBER(gcm394_base_video_device::vblank) { int i = 0x0001; if (!state) { m_video_irq_status &= ~i; check_video_irq(); return; } //if (m_video_irq_enable & 1) { m_video_irq_status |= i; check_video_irq(); } } static GFXDECODE_START( gfx ) GFXDECODE_END void gcm394_base_video_device::device_add_mconfig(machine_config &config) { PALETTE(config, m_palette).set_format(palette_device::xRGB_555, 256*0x10); GFXDECODE(config, m_gfxdecode, m_palette, gfx); }