/*******************************************************************************
Karnov - Bryan McPhail, mish@tendril.co.uk
*******************************************************************************/
#include "emu.h"
#include "includes/karnov.h"
#include "video/deckarn.h"
/***************************************************************************
Convert the color PROMs into a more useable format.
Karnov has two 1024x8 palette PROM.
I don't know the exact values of the resistors between the RAM and the
RGB output. I assumed these values (the same as Commando)
bit 7 -- 220 ohm resistor -- GREEN
-- 470 ohm resistor -- GREEN
-- 1 kohm resistor -- GREEN
-- 2.2kohm resistor -- GREEN
-- 220 ohm resistor -- RED
-- 470 ohm resistor -- RED
-- 1 kohm resistor -- RED
bit 0 -- 2.2kohm resistor -- RED
bit 7 -- unused
-- unused
-- unused
-- unused
-- 220 ohm resistor -- BLUE
-- 470 ohm resistor -- BLUE
-- 1 kohm resistor -- BLUE
bit 0 -- 2.2kohm resistor -- BLUE
***************************************************************************/
PALETTE_INIT( karnov )
{
int i;
for (i = 0; i < machine.total_colors(); i++)
{
int bit0, bit1, bit2, bit3, r, g, b;
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[machine.total_colors()] >> 0) & 0x01;
bit1 = (color_prom[machine.total_colors()] >> 1) & 0x01;
bit2 = (color_prom[machine.total_colors()] >> 2) & 0x01;
bit3 = (color_prom[machine.total_colors()] >> 3) & 0x01;
b = 0x0e * bit0 + 0x1f * bit1 + 0x43 * bit2 + 0x8f * bit3;
palette_set_color(machine, i, MAKE_RGB(r, g, b));
color_prom++;
}
}
void karnov_flipscreen_w( running_machine &machine, int data )
{
karnov_state *state = machine.driver_data<karnov_state>();
state->m_flipscreen = data;
tilemap_set_flip_all(machine, state->m_flipscreen ? (TILEMAP_FLIPY | TILEMAP_FLIPX) : 0);
}
static void draw_background( running_machine &machine, bitmap_t *bitmap, const rectangle *cliprect )
{
karnov_state *state = machine.driver_data<karnov_state>();
int my, mx, offs, color, tile, fx, fy;
int scrollx = state->m_scroll[0];
int scrolly = state->m_scroll[1];
if (state->m_flipscreen)
fx = fy = 1;
else
fx = fy = 0;
mx = -1;
my = 0;
for (offs = 0; offs < 0x400; offs ++)
{
mx++;
if (mx == 32)
{
mx=0;
my++;
}
tile = state->m_pf_data[offs];
color = tile >> 12;
tile = tile & 0x7ff;
if (state->m_flipscreen)
drawgfx_opaque(state->m_bitmap_f, 0, machine.gfx[1],tile,
color, fx, fy, 496-16*mx,496-16*my);
else
drawgfx_opaque(state->m_bitmap_f, 0, machine.gfx[1],tile,
color, fx, fy, 16*mx,16*my);
}
if (!state->m_flipscreen)
{
scrolly = -scrolly;
scrollx = -scrollx;
}
else
{
scrolly = scrolly + 256;
scrollx = scrollx + 256;
}
copyscrollbitmap(bitmap, state->m_bitmap_f, 1, &scrollx, 1, &scrolly, cliprect);
}
/******************************************************************************/
SCREEN_UPDATE( karnov )
{
karnov_state *state = screen->machine().driver_data<karnov_state>();
draw_background(screen->machine(), bitmap, cliprect);
screen->machine().device<deco_karnovsprites_device>("spritegen")->draw_sprites(screen->machine(), bitmap, cliprect, screen->machine().generic.buffered_spriteram.u16, 0x800, 0);
tilemap_draw(bitmap, cliprect, state->m_fix_tilemap, 0, 0);
return 0;
}
/******************************************************************************/
static TILE_GET_INFO( get_fix_tile_info )
{
karnov_state *state = machine.driver_data<karnov_state>();
int tile = state->m_videoram[tile_index];
SET_TILE_INFO(
0,
tile&0xfff,
tile>>14,
0);
}
WRITE16_HANDLER( karnov_videoram_w )
{
karnov_state *state = space->machine().driver_data<karnov_state>();
COMBINE_DATA(&state->m_videoram[offset]);
tilemap_mark_tile_dirty(state->m_fix_tilemap, offset);
}
WRITE16_HANDLER( karnov_playfield_swap_w )
{
karnov_state *state = space->machine().driver_data<karnov_state>();
offset = ((offset & 0x1f) << 5) | ((offset & 0x3e0) >> 5);
COMBINE_DATA(&state->m_pf_data[offset]);
}
/******************************************************************************/
VIDEO_START( karnov )
{
karnov_state *state = machine.driver_data<karnov_state>();
/* Allocate bitmap & tilemap */
state->m_bitmap_f = auto_bitmap_alloc(machine, 512, 512, machine.primary_screen->format());
state->m_fix_tilemap = tilemap_create(machine, get_fix_tile_info, tilemap_scan_rows, 8, 8, 32, 32);
state->save_item(NAME(*state->m_bitmap_f));
tilemap_set_transparent_pen(state->m_fix_tilemap, 0);
}
VIDEO_START( wndrplnt )
{
karnov_state *state = machine.driver_data<karnov_state>();
/* Allocate bitmap & tilemap */
state->m_bitmap_f = auto_bitmap_alloc(machine, 512, 512, machine.primary_screen->format());
state->m_fix_tilemap = tilemap_create(machine, get_fix_tile_info, tilemap_scan_cols, 8, 8, 32, 32);
state->save_item(NAME(*state->m_bitmap_f));
tilemap_set_transparent_pen(state->m_fix_tilemap, 0);
}
/******************************************************************************/