/***************************************************************************
Syusse Oozumou
(c) 1984 Technos Japan (Licensed by Data East)
Driver by Takahiro Nogi (nogi@kt.rim.or.jp) 1999/10/04
***************************************************************************/
#include "driver.h"
UINT8 *ssozumo_videoram2;
UINT8 *ssozumo_colorram2;
static tilemap *bg_tilemap, *fg_tilemap;
/**************************************************************************/
PALETTE_INIT( ssozumo )
{
int bit0, bit1, bit2, bit3, r, g, b;
int i;
for (i = 0 ; i < 64 ; i++)
{
bit0 = (color_prom[0] >> 0) & 0x01;
bit1 = (color_prom[0] >> 1) & 0x01;
bit2 = (color_prom[0] >> 2) & 0x01;
bit3 = (color_prom[0] >> 3) & 0x01;
r = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
bit0 = (color_prom[0] >> 4) & 0x01;
bit1 = (color_prom[0] >> 5) & 0x01;
bit2 = (color_prom[0] >> 6) & 0x01;
bit3 = (color_prom[0] >> 7) & 0x01;
g = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
bit0 = (color_prom[64] >> 0) & 0x01;
bit1 = (color_prom[64] >> 1) & 0x01;
bit2 = (color_prom[64] >> 2) & 0x01;
bit3 = (color_prom[64] >> 3) & 0x01;
b = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
palette_set_color(machine,i,MAKE_RGB(r,g,b));
color_prom++;
}
}
WRITE8_HANDLER( ssozumo_videoram_w )
{
videoram[offset] = data;
tilemap_mark_tile_dirty(bg_tilemap, offset);
}
WRITE8_HANDLER( ssozumo_colorram_w )
{
colorram[offset] = data;
tilemap_mark_tile_dirty(bg_tilemap, offset);
}
WRITE8_HANDLER( ssozumo_videoram2_w )
{
ssozumo_videoram2[offset] = data;
tilemap_mark_tile_dirty(fg_tilemap, offset);
}
WRITE8_HANDLER( ssozumo_colorram2_w )
{
ssozumo_colorram2[offset] = data;
tilemap_mark_tile_dirty(fg_tilemap, offset);
}
WRITE8_HANDLER( ssozumo_paletteram_w )
{
int bit0, bit1, bit2, bit3, val;
int r, g, b;
int offs2;
paletteram[offset] = data;
offs2 = offset & 0x0f;
val = paletteram[offs2];
bit0 = (val >> 0) & 0x01;
bit1 = (val >> 1) & 0x01;
bit2 = (val >> 2) & 0x01;
bit3 = (val >> 3) & 0x01;
r = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
val = paletteram[offs2 | 0x10];
bit0 = (val >> 0) & 0x01;
bit1 = (val >> 1) & 0x01;
bit2 = (val >> 2) & 0x01;
bit3 = (val >> 3) & 0x01;
g = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
val = paletteram[offs2 | 0x20];
bit0 = (val >> 0) & 0x01;
bit1 = (val >> 1) & 0x01;
bit2 = (val >> 2) & 0x01;
bit3 = (val >> 3) & 0x01;
b = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
palette_set_color(Machine, offs2 + 64, MAKE_RGB(r, g, b));
}
WRITE8_HANDLER( ssozumo_scroll_w )
{
tilemap_set_scrolly(bg_tilemap, 0, data);
}
WRITE8_HANDLER( ssozumo_flipscreen_w )
{
flip_screen_set(data & 0x80);
}
static TILE_GET_INFO( get_bg_tile_info )
{
int code = videoram[tile_index] + ((colorram[tile_index] & 0x08) << 5);
int color = (colorram[tile_index] & 0x30) >> 4;
int flags = ((tile_index % 32) >= 16) ? TILE_FLIPY : 0;
SET_TILE_INFO(1, code, color, flags);
}
static TILE_GET_INFO( get_fg_tile_info )
{
int code = ssozumo_videoram2[tile_index] + 256 * (ssozumo_colorram2[tile_index] & 0x07);
int color = (ssozumo_colorram2[tile_index] & 0x30) >> 4;
SET_TILE_INFO(0, code, color, 0);
}
VIDEO_START( ssozumo )
{
bg_tilemap = tilemap_create(get_bg_tile_info, tilemap_scan_cols_flip_x,
TILEMAP_TYPE_PEN, 16, 16, 16, 32);
fg_tilemap = tilemap_create(get_fg_tile_info, tilemap_scan_cols_flip_x,
TILEMAP_TYPE_PEN, 8, 8, 32, 32);
tilemap_set_transparent_pen(fg_tilemap, 0);
}
static void draw_sprites(running_machine *machine, mame_bitmap *bitmap, const rectangle *cliprect)
{
int offs;
for (offs = 0; offs < spriteram_size; offs += 4)
{
if (spriteram[offs] & 0x01)
{
int code = spriteram[offs + 1] + ((spriteram[offs] & 0xf0) << 4);
int color = (spriteram[offs] & 0x08) >> 3;
int flipx = spriteram[offs] & 0x04;
int flipy = spriteram[offs] & 0x02;
int sx = 239 - spriteram[offs + 3];
int sy = (240 - spriteram[offs + 2]) & 0xff;
if (flip_screen)
{
sx = 240 - sx;
sy = 240 - sy;
flipx = !flipx;
flipy = !flipy;
}
drawgfx(bitmap, machine->gfx[2],
code, color,
flipx, flipy,
sx, sy,
cliprect,
TRANSPARENCY_PEN, 0);
}
}
}
VIDEO_UPDATE( ssozumo )
{
tilemap_draw(bitmap, cliprect, bg_tilemap, 0, 0);
tilemap_draw(bitmap, cliprect, fg_tilemap, 0, 0);
draw_sprites(machine, bitmap, cliprect);
return 0;
}