// license:BSD-3-Clause
// copyright-holders:Curt Coder
// thanks-to:Kenneth Lin (original driver author)
/***************************************************************************
video.c
Functions to emulate the video hardware of the machine.
***************************************************************************/
#include "emu.h"
#include "includes/jackal.h"
void jackal_state::jackal_palette(palette_device &palette) const
{
uint8_t const *const color_prom = memregion("proms")->base();
for (int i = 0; i < 0x100; i++)
{
uint16_t const ctabentry = i | 0x100;
palette.set_pen_indirect(i, ctabentry);
}
for (int i = 0x100; i < 0x200; i++)
{
uint16_t const ctabentry = color_prom[i - 0x100] & 0x0f;
palette.set_pen_indirect(i, ctabentry);
}
for (int i = 0x200; i < 0x300; i++)
{
uint16_t const ctabentry = (color_prom[i - 0x100] & 0x0f) | 0x10;
palette.set_pen_indirect(i, ctabentry);
}
}
void jackal_state::jackal_mark_tile_dirty( int offset )
{
m_bg_tilemap->mark_tile_dirty(offset);
}
TILE_GET_INFO_MEMBER(jackal_state::get_bg_tile_info)
{
uint8_t *RAM = memregion("master")->base();
int attr = RAM[0x2000 + tile_index];
int code = RAM[0x2400 + tile_index] + ((attr & 0xc0) << 2) + ((attr & 0x30) << 6);
int color = 0;//attr & 0x0f;
int flags = ((attr & 0x10) ? TILE_FLIPX : 0) | ((attr & 0x20) ? TILE_FLIPY : 0);
SET_TILE_INFO_MEMBER(0, code, color, flags);
}
void jackal_state::video_start()
{
m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(jackal_state::get_bg_tile_info)), TILEMAP_SCAN_ROWS, 8, 8, 32, 32);
}
void jackal_state::draw_background( screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect )
{
uint8_t *RAM = memregion("master")->base();
int i;
m_scrollram = &RAM[0x0020];
m_bg_tilemap->set_scroll_rows(1);
m_bg_tilemap->set_scroll_cols(1);
m_bg_tilemap->set_scrolly(0, m_videoctrl[0]);
m_bg_tilemap->set_scrollx(0, m_videoctrl[1]);
if (m_videoctrl[2] & 0x02)
{
if (m_videoctrl[2] & 0x08)
{
m_bg_tilemap->set_scroll_rows(32);
for (i = 0; i < 32; i++)
m_bg_tilemap->set_scrollx(i, m_scrollram[i]);
}
if (m_videoctrl[2] & 0x04)
{
m_bg_tilemap->set_scroll_cols(32);
for (i = 0; i < 32; i++)
m_bg_tilemap->set_scrolly(i, m_scrollram[i]);
}
}
m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0);
}
#define DRAW_SPRITE(bank, code, sx, sy) m_gfxdecode->gfx(bank)->transpen(bitmap,cliprect, code, color, flipx, flipy, sx, sy, 0);
void jackal_state::draw_sprites_region( bitmap_ind16 &bitmap, const rectangle &cliprect, const uint8_t *sram, int length, int bank )
{
int offs;
for (offs = 0; offs < length; offs += 5)
{
int sn1 = sram[offs];
int sn2 = sram[offs + 1];
int sy = sram[offs + 2];
int sx = sram[offs + 3];
int attr = sram[offs + 4];
int flipx = attr & 0x20;
int flipy = attr & 0x40;
int color = ((sn2 & 0xf0) >> 4);
if (attr & 0x01)
sx = sx - 256;
if (sy > 0xf0)
sy = sy - 256;
if (flip_screen())
{
sx = 240 - sx;
sy = 240 - sy;
flipx = !flipx;
flipy = !flipy;
}
if (attr & 0xC) // half-size sprite
{
int spritenum = sn1 * 4 + ((sn2 & (8 + 4)) >> 2) + ((sn2 & (2 + 1)) << 10);
int mod = -8;
if (flip_screen())
{
sx += 8;
sy -= 8;
mod = 8;
}
if ((attr & 0x0C) == 0x0C)
{
if (flip_screen()) sy += 16;
DRAW_SPRITE(bank + 1, spritenum, sx, sy)
}
if ((attr & 0x0C) == 0x08)
{
sy += 8;
DRAW_SPRITE(bank + 1, spritenum, sx, sy)
DRAW_SPRITE(bank + 1, spritenum - 2, sx, sy + mod)
}
if ((attr & 0x0C) == 0x04)
{
DRAW_SPRITE(bank + 1, spritenum, sx, sy)
DRAW_SPRITE(bank + 1, spritenum + 1, sx + mod, sy)
}
}
else
{
int spritenum = sn1 + ((sn2 & 0x03) << 8);
if (attr & 0x10)
{
if (flip_screen())
{
sx -= 16;
sy -= 16;
}
DRAW_SPRITE(bank, spritenum, flipx ? sx+16 : sx, flipy ? sy+16 : sy)
DRAW_SPRITE(bank, spritenum + 1, flipx ? sx : sx+16, flipy ? sy+16 : sy)
DRAW_SPRITE(bank, spritenum + 2, flipx ? sx+16 : sx, flipy ? sy : sy+16)
DRAW_SPRITE(bank, spritenum + 3, flipx ? sx : sx+16, flipy ? sy : sy+16)
}
else
{
DRAW_SPRITE(bank, spritenum, sx, sy)
}
}
}
}
void jackal_state::draw_sprites( bitmap_ind16 &bitmap, const rectangle &cliprect )
{
uint8_t *RAM = memregion("master")->base();
uint8_t *sr, *ss;
if (m_videoctrl[0x03] & 0x08)
{
sr = &RAM[0x03800]; // Sprite 2
ss = &RAM[0x13800]; // Additional Sprite 2
}
else
{
sr = &RAM[0x03000]; // Sprite 1
ss = &RAM[0x13000]; // Additional Sprite 1
}
draw_sprites_region(bitmap, cliprect, ss, 0x0f5, 3);
draw_sprites_region(bitmap, cliprect, sr, 0x500, 1);
}
uint32_t jackal_state::screen_update_jackal(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
draw_background(screen, bitmap, cliprect);
draw_sprites(bitmap, cliprect);
return 0;
}