// license:BSD-3-Clause
// copyright-holders:Mike Balfour, Patrick Lawrence, Brad Oliver
/*************************************************************************
Atari Football hardware
*************************************************************************/
#include "emu.h"
#include "includes/atarifb.h"
/*************************************
*
* Tilemap callbacks
*
*************************************/
void atarifb_state::get_tile_info_common( tile_data &tileinfo, tilemap_memory_index tile_index, uint8_t *alpha_videoram )
{
int code = alpha_videoram[tile_index] & 0x3f;
int flip = alpha_videoram[tile_index] & 0x40;
int disable = alpha_videoram[tile_index] & 0x80;
if (disable)
code = 0; /* I *know* this is a space */
SET_TILE_INFO_MEMBER(0, code, 0, (flip ? TILE_FLIPX | TILE_FLIPY : 0));
}
TILE_GET_INFO_MEMBER(atarifb_state::alpha1_get_tile_info)
{
get_tile_info_common(tileinfo, tile_index, m_alphap1_videoram);
}
TILE_GET_INFO_MEMBER(atarifb_state::alpha2_get_tile_info)
{
get_tile_info_common(tileinfo, tile_index, m_alphap2_videoram);
}
TILE_GET_INFO_MEMBER(atarifb_state::field_get_tile_info)
{
int code = m_field_videoram[tile_index] & 0x3f;
int flipyx = m_field_videoram[tile_index] >> 6;
SET_TILE_INFO_MEMBER(1, code, 0, TILE_FLIPYX(flipyx));
}
/*************************************
*
* Video RAM writes
*
*************************************/
WRITE8_MEMBER(atarifb_state::atarifb_alpha1_videoram_w)
{
m_alphap1_videoram[offset] = data;
m_alpha1_tilemap->mark_tile_dirty(offset);
}
WRITE8_MEMBER(atarifb_state::atarifb_alpha2_videoram_w)
{
m_alphap2_videoram[offset] = data;
m_alpha2_tilemap->mark_tile_dirty(offset);
}
WRITE8_MEMBER(atarifb_state::atarifb_field_videoram_w)
{
m_field_videoram[offset] = data;
m_field_tilemap->mark_tile_dirty(offset);
}
/*************************************
*
* Video system start
*
*************************************/
void atarifb_state::video_start()
{
m_alpha1_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(atarifb_state::alpha1_get_tile_info)), TILEMAP_SCAN_COLS, 8, 8, 3, 32);
m_alpha2_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(atarifb_state::alpha2_get_tile_info)), TILEMAP_SCAN_COLS, 8, 8, 3, 32);
m_field_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(atarifb_state::field_get_tile_info)), TILEMAP_SCAN_ROWS, 8, 8, 32, 32);
}
void atarifb_state::draw_playfield_and_alpha( bitmap_ind16 &bitmap, const rectangle &cliprect, int playfield_x_offset, int playfield_y_offset )
{
const rectangle bigfield_area(4 * 8, 34 * 8 - 1, 0 * 8, 32 * 8 - 1);
int scroll_x[1];
int scroll_y[1];
scroll_x[0] = - *m_scroll_register + 32 + playfield_x_offset;
scroll_y[0] = 8 + playfield_y_offset;
copybitmap(bitmap, m_alpha1_tilemap->pixmap(), 0, 0, 35*8, 1*8, cliprect);
copybitmap(bitmap, m_alpha2_tilemap->pixmap(), 0, 0, 0*8, 1*8, cliprect);
copyscrollbitmap(bitmap, m_field_tilemap->pixmap(), 1, scroll_x, 1, scroll_y, bigfield_area);
}
void atarifb_state::draw_sprites( bitmap_ind16 &bitmap, const rectangle &cliprect, int gfx, int is_soccer )
{
const rectangle bigfield_area(4 * 8, 34 * 8 - 1, 0 * 8, 32 * 8 - 1);
int obj;
for (obj = 0; obj < 16; obj++)
{
int charcode;
int flipx, flipy;
int sx, sy;
int shade = 0;
sy = 255 - m_spriteram[obj * 2 + 1];
if (sy == 255)
continue;
charcode = m_spriteram[obj * 2] & 0x3f;
flipx = (m_spriteram[obj * 2] & 0x40);
flipy = (m_spriteram[obj * 2] & 0x80);
sx = m_spriteram[obj * 2 + 0x20] + 8 * 3;
/* Note on Atari Soccer: */
/* There are 3 sets of 2 bits each, where the 2 bits represent */
/* black, dk grey, grey and white. I think the 3 sets determine the */
/* color of each bit in the sprite, but I haven't implemented it that way. */
if (is_soccer)
{
shade = ((m_spriteram[obj * 2 + 1 + 0x20]) & 0x07);
m_gfxdecode->gfx(gfx + 1)->transpen(bitmap,bigfield_area,
charcode, shade,
flipx, flipy, sx, sy, 0);
shade = ((m_spriteram[obj * 2 + 1 + 0x20]) & 0x08) >> 3;
}
m_gfxdecode->gfx(gfx)->transpen(bitmap,bigfield_area,
charcode, shade,
flipx, flipy, sx, sy, 0);
/* If this isn't soccer, handle the multiplexed sprites */
if (!is_soccer)
{
/* The down markers are multiplexed by altering the y location during */
/* mid-screen. We'll fake it by essentially doing the same thing here. */
if ((charcode == 0x11) && (sy == 0x07))
{
sy = 0xf1; /* When multiplexed, it's 0x10...why? */
m_gfxdecode->gfx(gfx)->transpen(bitmap,bigfield_area,
charcode, 0,
flipx, flipy, sx, sy, 0);
}
}
}
}
uint32_t atarifb_state::screen_update_atarifb(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
draw_playfield_and_alpha(bitmap, cliprect, 0, 0);
draw_sprites(bitmap, cliprect, 1, 0);
return 0;
}
uint32_t atarifb_state::screen_update_abaseb(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
draw_playfield_and_alpha(bitmap, cliprect, -8, 0);
draw_sprites(bitmap, cliprect, 1, 0);
return 0;
}
uint32_t atarifb_state::screen_update_soccer(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
draw_playfield_and_alpha(bitmap, cliprect, 0, 8);
draw_sprites(bitmap, cliprect, 2, 1);
return 0;
}