// license:BSD-3-Clause
// copyright-holders:smf
/*
* Beatmania DJ Main Board (GX753)
* emulate video hardware
*/
#include "emu.h"
#include "includes/djmain.h"
#define NUM_SPRITES (0x800 / 16)
#define NUM_LAYERS 2
void djmain_state::draw_sprites( bitmap_rgb32 &bitmap, const rectangle &cliprect)
{
int offs, pri_code;
int sortedlist[NUM_SPRITES];
m_gfxdecode->gfx(0)->set_colorbase(m_k055555->K055555_read_register(K55_PALBASE_SUB2) * 0x400);
for (offs = 0; offs < NUM_SPRITES; offs++)
sortedlist[offs] = -1;
/* prebuild a sorted table */
for (offs = 0; offs < NUM_SPRITES * 4; offs += 4)
{
if (m_obj_ram[offs] & 0x00008000)
{
if (m_obj_ram[offs] & 0x80000000)
continue;
pri_code = m_obj_ram[offs] & (NUM_SPRITES - 1);
sortedlist[pri_code] = offs;
}
}
for (pri_code = NUM_SPRITES - 1; pri_code >= 0; pri_code--)
{
static const int xoffset[8] = { 0, 1, 4, 5, 16, 17, 20, 21 };
static const int yoffset[8] = { 0, 2, 8, 10, 32, 34, 40, 42 };
static const int sizetab[4] = { 1, 2, 4, 8 };
int x, y;
int ox, oy;
int flipx, flipy;
int xscale, yscale;
int code;
int color;
int size;
offs = sortedlist[pri_code];
if (offs == -1) continue;
code = m_obj_ram[offs] >> 16;
flipx = (m_obj_ram[offs] >> 10) & 1;
flipy = (m_obj_ram[offs] >> 11) & 1;
size = sizetab[(m_obj_ram[offs] >> 8) & 3];
ox = (int16_t)(m_obj_ram[offs + 1] & 0xffff);
oy = (int16_t)(m_obj_ram[offs + 1] >> 16);
xscale = m_obj_ram[offs + 2] >> 16;
yscale = m_obj_ram[offs + 2] & 0xffff;
if (!xscale || !yscale)
continue;
xscale = (0x40 << 16) / xscale;
yscale = (0x40 << 16) / yscale;
ox -= (size * xscale) >> 13;
oy -= (size * yscale) >> 13;
color = (m_obj_ram[offs + 3] >> 16) & 15;
for (x = 0; x < size; x++)
for (y = 0; y < size; y++)
{
int c = code;
if (flipx)
c += xoffset[size - x - 1];
else
c += xoffset[x];
if (flipy)
c += yoffset[size - y - 1];
else
c += yoffset[y];
if (xscale != 0x10000 || yscale != 0x10000)
{
int sx = ox + ((x * xscale + (1 << 11)) >> 12);
int sy = oy + ((y * yscale + (1 << 11)) >> 12);
int zw = ox + (((x + 1) * xscale + (1 << 11)) >> 12) - sx;
int zh = oy + (((y + 1) * yscale + (1 << 11)) >> 12) - sy;
m_gfxdecode->gfx(0)->zoom_transpen(bitmap,
cliprect,
c,
color,
flipx,
flipy,
sx,
sy,
(zw << 16) / 16,
(zh << 16) / 16,
0);
}
else
{
int sx = ox + (x << 4);
int sy = oy + (y << 4);
m_gfxdecode->gfx(0)->transpen(bitmap,
cliprect,
c,
color,
flipx,
flipy,
sx,
sy,
0);
}
}
}
}
K056832_CB_MEMBER(djmain_state::tile_callback)
{
}
void djmain_state::video_start()
{
m_k056832->set_layer_offs(0, -92, -27);
// m_k056832->set_layer_offs(1, -87, -27);
m_k056832->set_layer_offs(1, -88, -27);
}
uint32_t djmain_state::screen_update_djmain(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect)
{
int enables = m_k055555->K055555_read_register(K55_INPUT_ENABLES);
int pri[NUM_LAYERS + 1];
int order[NUM_LAYERS + 1];
int i, j;
for (i = 0; i < NUM_LAYERS; i++)
pri[i] = m_k055555->K055555_read_register(K55_PRIINP_0 + i * 3);
pri[i] = m_k055555->K055555_read_register(K55_PRIINP_10);
for (i = 0; i < NUM_LAYERS + 1; i++)
order[i] = i;
for (i = 0; i < NUM_LAYERS; i++)
for (j = i + 1; j < NUM_LAYERS + 1; j++)
if (pri[order[i]] > pri[order[j]])
{
int temp = order[i];
order[i] = order[j];
order[j] = temp;
}
bitmap.fill(m_palette->pen(0), cliprect);
for (i = 0; i < NUM_LAYERS + 1; i++)
{
int layer = order[i];
if (layer == NUM_LAYERS)
{
if (enables & K55_INP_SUB2)
draw_sprites(bitmap, cliprect);
}
else
{
if (enables & (K55_INP_VRAM_A << layer))
m_k056832->tilemap_draw_dj(screen, bitmap, cliprect, layer, 0, 1 << i);
}
}
return 0;
}