/*************************************************************************** video.c Functions to emulate the video hardware of the machine. ***************************************************************************/ #include "emu.h" #include "includes/lastduel.h" /*************************************************************************** Callbacks for the TileMap code ***************************************************************************/ static TILE_GET_INFO( ld_get_bg_tile_info ) { lastduel_state *state = machine.driver_data(); int tile = state->m_scroll2[2 * tile_index] & 0x1fff; int color = state->m_scroll2[2 * tile_index + 1]; SET_TILE_INFO( 2, tile,color & 0xf, TILE_FLIPYX((color & 0x60) >> 5)); } static TILE_GET_INFO( ld_get_fg_tile_info ) { lastduel_state *state = machine.driver_data(); int tile = state->m_scroll1[2 * tile_index] & 0x1fff; int color = state->m_scroll1[2 * tile_index + 1]; SET_TILE_INFO( 3, tile, color & 0xf, TILE_FLIPYX((color & 0x60) >> 5)); tileinfo->group = (color & 0x80) >> 7; } static TILE_GET_INFO( get_bg_tile_info ) { lastduel_state *state = machine.driver_data(); int tile = state->m_scroll2[tile_index] & 0x1fff; int color = state->m_scroll2[tile_index + 0x0800]; SET_TILE_INFO( 2, tile, color & 0xf, TILE_FLIPYX((color & 0x60) >> 5)); } static TILE_GET_INFO( get_fg_tile_info ) { lastduel_state *state = machine.driver_data(); int tile = state->m_scroll1[tile_index] & 0x1fff; int color = state->m_scroll1[tile_index + 0x0800]; SET_TILE_INFO( 3, tile, color & 0xf, TILE_FLIPYX((color & 0x60) >> 5)); tileinfo->group = (color & 0x10) >> 4; } static TILE_GET_INFO( get_fix_info ) { lastduel_state *state = machine.driver_data(); int tile = state->m_vram[tile_index]; SET_TILE_INFO( 1, tile & 0x7ff, tile>>12, (tile & 0x800) ? TILE_FLIPY : 0); } /*************************************************************************** Start the video hardware emulation. ***************************************************************************/ VIDEO_START( lastduel ) { lastduel_state *state = machine.driver_data(); state->m_bg_tilemap = tilemap_create(machine, ld_get_bg_tile_info, tilemap_scan_rows, 16, 16, 64, 64); state->m_fg_tilemap = tilemap_create(machine, ld_get_fg_tile_info, tilemap_scan_rows, 16, 16, 64, 64); state->m_tx_tilemap = tilemap_create(machine, get_fix_info, tilemap_scan_rows, 8, 8, 64, 32); tilemap_set_transmask(state->m_fg_tilemap, 0, 0xffff, 0x0001); tilemap_set_transmask(state->m_fg_tilemap, 1, 0xf07f, 0x0f81); tilemap_set_transparent_pen(state->m_tx_tilemap, 3); state->m_sprite_flipy_mask = 0x40; state->m_sprite_pri_mask = 0x00; state->m_tilemap_priority = 0; } VIDEO_START( madgear ) { lastduel_state *state = machine.driver_data(); state->m_bg_tilemap = tilemap_create(machine, get_bg_tile_info,tilemap_scan_cols,16,16,64,32); state->m_fg_tilemap = tilemap_create(machine, get_fg_tile_info,tilemap_scan_cols,16,16,64,32); state->m_tx_tilemap = tilemap_create(machine, get_fix_info,tilemap_scan_rows,8,8,64,32); tilemap_set_transmask(state->m_fg_tilemap, 0, 0xffff, 0x8000); tilemap_set_transmask(state->m_fg_tilemap, 1, 0x80ff, 0xff00); tilemap_set_transparent_pen(state->m_tx_tilemap, 3); tilemap_set_transparent_pen(state->m_bg_tilemap, 15); state->m_sprite_flipy_mask = 0x80; state->m_sprite_pri_mask = 0x10; } /*************************************************************************** Memory handlers ***************************************************************************/ WRITE16_HANDLER( lastduel_flip_w ) { if (ACCESSING_BITS_0_7) { flip_screen_set(space->machine(), data & 0x01); coin_lockout_w(space->machine(), 0, ~data & 0x10); coin_lockout_w(space->machine(), 1, ~data & 0x20); coin_counter_w(space->machine(), 0, data & 0x40); coin_counter_w(space->machine(), 1, data & 0x80); } } WRITE16_HANDLER( lastduel_scroll_w ) { lastduel_state *state = space->machine().driver_data(); data = COMBINE_DATA(&state->m_scroll[offset]); switch (offset) { case 0: tilemap_set_scrolly(state->m_fg_tilemap, 0, data); break; case 1: tilemap_set_scrollx(state->m_fg_tilemap, 0, data); break; case 2: tilemap_set_scrolly(state->m_bg_tilemap, 0, data); break; case 3: tilemap_set_scrollx(state->m_bg_tilemap, 0, data); break; case 7: state->m_tilemap_priority = data; break; default: logerror("Unmapped video write %d %04x\n", offset, data); break; } } WRITE16_HANDLER( lastduel_scroll1_w ) { lastduel_state *state = space->machine().driver_data(); COMBINE_DATA(&state->m_scroll1[offset]); tilemap_mark_tile_dirty(state->m_fg_tilemap, offset / 2); } WRITE16_HANDLER( lastduel_scroll2_w ) { lastduel_state *state = space->machine().driver_data(); COMBINE_DATA(&state->m_scroll2[offset]); tilemap_mark_tile_dirty(state->m_bg_tilemap, offset / 2); } WRITE16_HANDLER( lastduel_vram_w ) { lastduel_state *state = space->machine().driver_data(); COMBINE_DATA(&state->m_vram[offset]); tilemap_mark_tile_dirty(state->m_tx_tilemap, offset); } WRITE16_HANDLER( madgear_scroll1_w ) { lastduel_state *state = space->machine().driver_data(); COMBINE_DATA(&state->m_scroll1[offset]); tilemap_mark_tile_dirty(state->m_fg_tilemap, offset & 0x7ff); } WRITE16_HANDLER( madgear_scroll2_w ) { lastduel_state *state = space->machine().driver_data(); COMBINE_DATA(&state->m_scroll2[offset]); tilemap_mark_tile_dirty(state->m_bg_tilemap, offset & 0x7ff); } WRITE16_HANDLER( lastduel_palette_word_w ) { lastduel_state *state = space->machine().driver_data(); int red, green, blue, bright; data = COMBINE_DATA(&state->m_paletteram[offset]); // Brightness parameter interpreted same way as CPS1 bright = 0x10 + (data & 0x0f); red = ((data >> 12) & 0x0f) * bright * 0x11 / 0x1f; green = ((data >> 8) & 0x0f) * bright * 0x11 / 0x1f; blue = ((data >> 4) & 0x0f) * bright * 0x11 / 0x1f; palette_set_color (space->machine(), offset, MAKE_RGB(red, green, blue)); } /*************************************************************************** Display refresh ***************************************************************************/ static void draw_sprites( running_machine &machine, bitmap_t *bitmap, const rectangle *cliprect, int pri ) { lastduel_state *state = machine.driver_data(); UINT16 *buffered_spriteram16 = machine.generic.buffered_spriteram.u16; int offs; if (!state->m_sprite_pri_mask) if (pri == 1) return; /* only low priority sprites in lastduel */ for (offs = 0x400 - 4; offs >= 0; offs -= 4) { int attr, sy, sx, flipx, flipy, code, color; attr = buffered_spriteram16[offs + 1]; if (state->m_sprite_pri_mask) /* only madgear seems to have this */ { if (pri == 1 && (attr & state->m_sprite_pri_mask)) continue; if (pri == 0 && !(attr & state->m_sprite_pri_mask)) continue; } code = buffered_spriteram16[offs]; sx = buffered_spriteram16[offs + 3] & 0x1ff; sy = buffered_spriteram16[offs + 2] & 0x1ff; if (sy > 0x100) sy -= 0x200; flipx = attr & 0x20; flipy = attr & state->m_sprite_flipy_mask; /* 0x40 for lastduel, 0x80 for madgear */ color = attr & 0x0f; if (flip_screen_get(machine)) { sx = 496 - sx; sy = 240 - sy; flipx = !flipx; flipy = !flipy; } drawgfx_transpen(bitmap,cliprect, machine.gfx[0], code, color, flipx,flipy, sx,sy,15); } } SCREEN_UPDATE( lastduel ) { lastduel_state *state = screen->machine().driver_data(); tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, 0, 0); tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER1, 0); draw_sprites(screen->machine(), bitmap, cliprect, 0); tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER0, 0); draw_sprites(screen->machine(), bitmap, cliprect, 1); tilemap_draw(bitmap, cliprect, state->m_tx_tilemap, 0, 0); return 0; } SCREEN_UPDATE( madgear ) { lastduel_state *state = screen->machine().driver_data(); if (state->m_tilemap_priority) { tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER1 | TILEMAP_DRAW_OPAQUE, 0); draw_sprites(screen->machine(), bitmap, cliprect, 0); tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER0, 0); tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, 0, 0); draw_sprites(screen->machine(), bitmap, cliprect, 1); } else { tilemap_draw(bitmap, cliprect, state->m_bg_tilemap, TILEMAP_DRAW_OPAQUE, 0); tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER1, 0); draw_sprites(screen->machine(), bitmap, cliprect, 0); tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, TILEMAP_DRAW_LAYER0, 0); draw_sprites(screen->machine(), bitmap, cliprect, 1); } tilemap_draw(bitmap, cliprect, state->m_tx_tilemap, 0, 0); return 0; } SCREEN_EOF( lastduel ) { address_space *space = machine.device("maincpu")->memory().space(AS_PROGRAM); /* Spriteram is always 1 frame ahead, suggesting buffering. I can't find a register to control this so I assume it happens automatically every frame at the end of vblank */ buffer_spriteram16_w(space, 0, 0, 0xffff); }