/*
Dragonball Z
(c) 1993 Banpresto
Dragonball Z 2 Super Battle
(c) 1994 Banpresto
Video hardware emulation.
*/
#include "driver.h"
#include "video/konamiic.h"
static tilemap *dbz_bg1_tilemap, *dbz_bg2_tilemap;
UINT16 *dbz_bg1_videoram, *dbz_bg2_videoram;
static int sprite_colorbase, layer_colorbase[6], layer[5], layerpri[5];
static void dbz_tile_callback(int layer, int *code, int *color, int *flags)
{
*color = (layer_colorbase[layer] << 1) + ((*color & 0x3c) >> 2);
}
static void dbz_sprite_callback(int *code, int *color, int *priority_mask)
{
int pri = (*color & 0x3c0) >> 5;
if(pri <= layerpri[3]) *priority_mask = 0xff00;
else if (pri > layerpri[3] && pri <= layerpri[2]) *priority_mask = 0xfff0;
else if (pri > layerpri[2] && pri <= layerpri[1]) *priority_mask = 0xfffc;
else *priority_mask = 0xfffe;
*color = (sprite_colorbase << 1) + (*color & 0x1f);
}
/* Background Tilemaps */
WRITE16_HANDLER( dbz_bg2_videoram_w )
{
COMBINE_DATA(&dbz_bg2_videoram[offset]);
tilemap_mark_tile_dirty(dbz_bg2_tilemap,offset/2);
}
static TILE_GET_INFO( get_dbz_bg2_tile_info )
{
int tileno, colour, flag;
tileno = dbz_bg2_videoram[tile_index*2+1] & 0x7fff;
colour = (dbz_bg2_videoram[tile_index*2] & 0x000f);
flag = (dbz_bg2_videoram[tile_index*2] & 0x0080) ? TILE_FLIPX : 0;
SET_TILE_INFO(0,tileno,colour + (layer_colorbase[5] << 1),flag);
}
WRITE16_HANDLER( dbz_bg1_videoram_w )
{
COMBINE_DATA(&dbz_bg1_videoram[offset]);
tilemap_mark_tile_dirty(dbz_bg1_tilemap,offset/2);
}
static TILE_GET_INFO( get_dbz_bg1_tile_info )
{
int tileno, colour, flag;
tileno = dbz_bg1_videoram[tile_index*2+1] & 0x7fff;
colour = (dbz_bg1_videoram[tile_index*2] & 0x000f);
flag = (dbz_bg1_videoram[tile_index*2] & 0x0080) ? TILE_FLIPX : 0;
SET_TILE_INFO(1,tileno,colour + (layer_colorbase[4] << 1),flag);
}
/* useful function to sort the four tile layers by priority order */
static void sortlayers(int *layer, int *pri)
{
#define SWAP(a,b) \
if (pri[a] <= pri[b]) \
{ \
int t; \
t = pri[a]; pri[a] = pri[b]; pri[b] = t; \
t = layer[a]; layer[a] = layer[b]; layer[b] = t; \
}
SWAP(0, 1)
SWAP(0, 2)
SWAP(0, 3)
SWAP(0, 4)
SWAP(1, 2)
SWAP(1, 3)
SWAP(1, 4)
SWAP(2, 3)
SWAP(2, 4)
SWAP(3, 4)
}
VIDEO_START( dbz )
{
K053251_vh_start();
K056832_vh_start(machine, REGION_GFX1, K056832_BPP_4, 1, NULL, dbz_tile_callback, 1);
K053247_vh_start(machine, REGION_GFX2, -52, 16, NORMAL_PLANE_ORDER, dbz_sprite_callback);
dbz_bg1_tilemap = tilemap_create(get_dbz_bg1_tile_info,tilemap_scan_rows,TILEMAP_TYPE_PEN, 16, 16,64,32);
dbz_bg2_tilemap = tilemap_create(get_dbz_bg2_tile_info,tilemap_scan_rows,TILEMAP_TYPE_PEN, 16, 16,64,32);
tilemap_set_transparent_pen(dbz_bg1_tilemap,0);
tilemap_set_transparent_pen(dbz_bg2_tilemap,0);
K053936_wraparound_enable(0, 1);
K053936_set_offset(0, -46, -16);
K053936_wraparound_enable(1, 1);
K053936_set_offset(1, -46, -16);
if (!strcmp(machine->gamedrv->name, "dbz"))
K056832_set_LayerOffset(0, -34, -16);
else
K056832_set_LayerOffset(0, -35, -16);
K056832_set_LayerOffset(1, -31, -16);
K056832_set_LayerOffset(3, -31, -16); //?
K053247_set_SpriteOffset(-87,32);
}
VIDEO_UPDATE( dbz )
{
static const int K053251_CI[6] = { K053251_CI3, K053251_CI4, K053251_CI4, K053251_CI4, K053251_CI2, K053251_CI1 };
int plane, new_colorbase;
sprite_colorbase = K053251_get_palette_index(K053251_CI0);
for (plane=0; plane<6; plane++)
{
new_colorbase = K053251_get_palette_index(K053251_CI[plane]);
if (layer_colorbase[plane] != new_colorbase)
{
layer_colorbase[plane] = new_colorbase;
if(plane <= 3)
K056832_mark_plane_dirty(plane);
else if(plane == 4)
tilemap_mark_all_tiles_dirty(dbz_bg1_tilemap);
else if(plane == 5)
tilemap_mark_all_tiles_dirty(dbz_bg2_tilemap);
}
}
//layers priority
layer[0] = 0;
layerpri[0] = K053251_get_priority(K053251_CI3);
layer[1] = 1;
layerpri[1] = K053251_get_priority(K053251_CI4);
layer[2] = 3;
layerpri[2] = K053251_get_priority(K053251_CI0);
layer[3] = 4;
layerpri[3] = K053251_get_priority(K053251_CI2);
layer[4] = 5;
layerpri[4] = K053251_get_priority(K053251_CI1);
sortlayers(layer, layerpri);
fillbitmap(priority_bitmap, 0, cliprect);
for(plane = 0; plane < 5; plane++)
{
int flag, pri;
if(plane == 0)
{
flag = TILEMAP_DRAW_OPAQUE;
pri = 0;
}
else
{
flag = 0;
pri = 1 << (plane - 1);
}
if(layer[plane] == 4)
{
K053936_1_zoom_draw(bitmap,cliprect,dbz_bg1_tilemap,flag,pri);
}
else if(layer[plane] == 5)
{
K053936_0_zoom_draw(bitmap,cliprect,dbz_bg2_tilemap,flag,pri);
}
else
{
K056832_tilemap_draw(machine, bitmap,cliprect,layer[plane],flag,pri);
}
}
K053247_sprites_draw(machine, bitmap, cliprect);
return 0;
}