summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/video/atarivad.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/video/atarivad.cpp')
-rw-r--r--src/mame/video/atarivad.cpp490
1 files changed, 490 insertions, 0 deletions
diff --git a/src/mame/video/atarivad.cpp b/src/mame/video/atarivad.cpp
new file mode 100644
index 00000000000..85a80776954
--- /dev/null
+++ b/src/mame/video/atarivad.cpp
@@ -0,0 +1,490 @@
+// license:BSD-3-Clause
+// copyright-holders:Aaron Giles
+/***************************************************************************
+
+ atarivad.h
+
+ Atari VAD video controller device.
+
+***************************************************************************/
+
+#include "emu.h"
+#include "video/atarivad.h"
+#include "video/atarimo.h"
+#include "screen.h"
+
+
+//**************************************************************************
+// VAD VIDEO CONTROLLER DEVICE
+//**************************************************************************
+
+// device type definition
+DEFINE_DEVICE_TYPE(ATARI_VAD, atari_vad_device, "atarivad", "Atari VAD")
+
+//-------------------------------------------------
+// atari_vad_device - constructor
+//-------------------------------------------------
+
+atari_vad_device::atari_vad_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock)
+ : device_t(mconfig, ATARI_VAD, tag, owner, clock),
+ device_video_interface(mconfig, *this),
+ m_scanline_int_cb(*this),
+ m_alpha_tilemap(*this, "alpha"),
+ m_playfield_tilemap(*this, "playfield"),
+ m_playfield2_tilemap(*this, "playfield2"),
+ m_mob(*this, "mob"),
+ m_eof_data(*this, "eof"),
+ m_scanline_int_timer(nullptr),
+ m_tilerow_update_timer(nullptr),
+ m_eof_timer(nullptr),
+ m_palette_bank(0),
+ m_pf0_xscroll_raw(0),
+ m_pf0_yscroll(0),
+ m_pf1_xscroll_raw(0),
+ m_pf1_yscroll(0),
+ m_mo_xscroll(0),
+ m_mo_yscroll(0)
+{
+}
+
+
+//-------------------------------------------------
+// control_write: Does the bulk of the word for an I/O
+// write.
+//-------------------------------------------------
+
+WRITE16_MEMBER(atari_vad_device::control_write)
+{
+ uint16_t newword = m_control[offset];
+ COMBINE_DATA(&newword);
+ internal_control_write(offset, newword);
+}
+
+
+//-------------------------------------------------
+// control_read: Handles an I/O read from the video controller.
+//-------------------------------------------------
+
+READ16_MEMBER(atari_vad_device::control_read)
+{
+ logerror("vc_r(%02X)\n", offset);
+
+ // a read from offset 0 returns the current scanline
+ // also sets bit 0x4000 if we're in VBLANK
+ if (offset == 0)
+ {
+ int result = screen().vpos();
+ if (result > 255)
+ result = 255;
+ if (result > screen().visible_area().max_y)
+ result |= 0x4000;
+ return result;
+ }
+ else
+ return m_control[offset];
+}
+
+
+//-------------------------------------------------
+// alpha_w: Generic write handler for alpha RAM.
+//-------------------------------------------------
+
+WRITE16_MEMBER(atari_vad_device::alpha_w)
+{
+ m_alpha_tilemap->write16(space, offset, data, mem_mask);
+}
+
+
+//-------------------------------------------------
+// playfield_upper_w: Generic write handler for
+// upper word of split playfield RAM.
+//-------------------------------------------------
+
+WRITE16_MEMBER(atari_vad_device::playfield_upper_w)
+{
+ m_playfield_tilemap->write16_ext(space, offset, data, mem_mask);
+ if (m_playfield2_tilemap != nullptr)
+ m_playfield2_tilemap->write16_ext(space, offset, data, mem_mask);
+}
+
+
+//-------------------------------------------------
+// playfield_latched_lsb_w: Generic write handler for
+// lower word of playfield RAM with a latch in the LSB of the
+// upper word.
+//-------------------------------------------------
+
+WRITE16_MEMBER(atari_vad_device::playfield_latched_lsb_w)
+{
+ m_playfield_tilemap->write16(space, offset, data, mem_mask);
+ if ((m_control[0x0a] & 0x80) != 0)
+ m_playfield_tilemap->write16_ext(space, offset, m_control[0x1d], uint16_t(0x00ff));
+}
+
+
+//-------------------------------------------------
+// playfield_latched_msb_w: Generic write handler for
+// lower word of playfield RAM with a latch in the MSB of the
+// upper word.
+//-------------------------------------------------
+
+WRITE16_MEMBER(atari_vad_device::playfield_latched_msb_w)
+{
+ m_playfield_tilemap->write16(space, offset, data, mem_mask);
+ if ((m_control[0x0a] & 0x80) != 0)
+ m_playfield_tilemap->write16_ext(space, offset, m_control[0x1c], uint16_t(0xff00));
+}
+
+
+//-------------------------------------------------
+// playfield2_latched_msb_w: Generic write handler for
+// lower word of second playfield RAM with a latch in the MSB
+// of the upper word.
+//-------------------------------------------------
+
+WRITE16_MEMBER(atari_vad_device::playfield2_latched_msb_w)
+{
+ m_playfield2_tilemap->write16(space, offset, data, mem_mask);
+ if ((m_control[0x0a] & 0x80) != 0)
+ m_playfield2_tilemap->write16_ext(space, offset, m_control[0x1c], uint16_t(0xff00));
+}
+
+
+//-------------------------------------------------
+// device_start: Start up the device
+//-------------------------------------------------
+
+void atari_vad_device::device_start()
+{
+ // verify configuration
+ if (m_playfield_tilemap == nullptr)
+ throw emu_fatalerror("Playfield tilemap not found!");
+ if (m_eof_data == nullptr)
+ throw emu_fatalerror("EOF data not found!");
+
+ // resolve callbacks
+ m_scanline_int_cb.resolve_safe();
+
+ // allocate timers
+ m_scanline_int_timer = timer_alloc(TID_SCANLINE_INT);
+ m_tilerow_update_timer = timer_alloc(TID_TILEROW_UPDATE);
+ m_eof_timer = timer_alloc(TID_EOF);
+
+ // register for save states
+ save_item(NAME(m_palette_bank)); // which palette bank is enabled
+ save_item(NAME(m_pf0_xscroll_raw)); // playfield 1 xscroll raw value
+ save_item(NAME(m_pf0_yscroll)); // playfield 1 yscroll
+ save_item(NAME(m_pf1_xscroll_raw)); // playfield 2 xscroll raw value
+ save_item(NAME(m_pf1_yscroll)); // playfield 2 yscroll
+ save_item(NAME(m_mo_xscroll)); // sprite xscroll
+ save_item(NAME(m_mo_yscroll)); // sprite xscroll
+}
+
+
+//-------------------------------------------------
+// device_reset: Handle a device reset by
+// clearing the interrupt lines and states
+//-------------------------------------------------
+
+void atari_vad_device::device_reset()
+{
+ // share extended memory between the two tilemaps
+ if (m_playfield2_tilemap != nullptr)
+ m_playfield2_tilemap->extmem().set(m_playfield_tilemap->extmem());
+
+ // reset the state
+ m_palette_bank = 0;
+ m_pf0_xscroll_raw = m_pf1_xscroll_raw = 0;
+ m_pf0_yscroll = m_pf1_yscroll = 0;
+ m_mo_xscroll = m_mo_yscroll = 0;
+ memset(m_control, 0, sizeof(m_control));
+
+ // start the timers
+ m_tilerow_update_timer->adjust(screen().time_until_pos(0));
+ m_eof_timer->adjust(screen().time_until_pos(0));
+}
+
+
+//-------------------------------------------------
+// device_timer: Handle device-specific timer
+// calbacks
+//-------------------------------------------------
+
+void atari_vad_device::device_timer(emu_timer &timer, device_timer_id id, int param, void *ptr)
+{
+ switch (id)
+ {
+ case TID_SCANLINE_INT:
+ m_scanline_int_cb(ASSERT_LINE);
+ break;
+
+ case TID_TILEROW_UPDATE:
+ update_tilerow(timer, param);
+ break;
+
+ case TID_EOF:
+ eof_update(timer);
+ break;
+ }
+}
+
+
+//-------------------------------------------------
+// internal_control_write: Handle writes to the
+// control registers and EOF updates
+//-------------------------------------------------
+
+void atari_vad_device::internal_control_write(offs_t offset, uint16_t newword)
+{
+ // switch off the offset
+ uint16_t oldword = m_control[offset];
+ m_control[offset] = newword;
+ switch (offset)
+ {
+ //
+ // VAD register map:
+ //
+ // 00 = HDW_ENABLE
+ // A000 = enable other VAD params
+ // E000 = enable other VAD params but disable update from ALPHA RAM
+ // 01 = HDW_VSY_LD (standard = 0x795)
+ // 0FF8 = V_SY_S
+ // 0007 = V_SY_E
+ // 02 = HDW_VBL_LD (standard = 0xAEF)
+ // FE00 = VLAST
+ // 01FF = V_BL_S
+ // 03 = HDW_VINT
+ // 04 = HDW_HSY_LD (standard = 0x5EEF)
+ // FC00 = H_SY_E/2
+ // 03FF = H_SY_S
+ // 05 = HDW_HBL_LD (relief = 0x72AC, batman/thunderj = 0xBEB1, shuuz/offtwall = 0xCEB1)
+ // F000 = LB_CLR
+ // 0800 = H_BL_E/16
+ // 0400 = H_BL_E/1
+ // 03FF = H_BL_S
+ // 06 = HDW_SLIP_LD (relief/batman/shuuz = 0x6F05, shuuz/offtwall = 0x0F05)
+ // 7F00 = SLIP_S
+ // 0080 = SLIP_E_SE1
+ // 007F = SLIP_E
+ // 07 = HDW_APDMA_LD (relief/batman/shuuz = 0xBE84, shuuz = 0xB90E, offtwall = 0xB90D)
+ // C000 = OPFPIC
+ // 3800 = PF_HRESET/16
+ // 0780 = PFAT
+ // 0070 = AL_HRESET (depending on ALHSIZ)
+ // 000F = ALPHA_DMA
+ // 08 = HDW_PMBASE_LD (relief/batman/shuuz = 0x0519, shuuz/offtwall = 0x49B4)
+ // E000 = P1BASE/0x2000
+ // 1C00 = P2BASE/0x2000
+ // 0380 = PABASE/0x2000
+ // 0040 = PMASK
+ // 003E = MOBASE/0x800
+ // 0001 = MOMASK
+ // 09 = HDW_ALBASE_LD (relief/batman/shuuz = 0x061F, shuuz/offtwall = 0x017F)
+ // 0400 = OPMINUS1
+ // 03C0 = ALBASE/0x1000
+ // 003F = SLIPBASE/0x80
+ // 0A = HDW_OPT_LD (relief/batman/shuuz = 0x4410, shuuz = 0x0250, offtwall = 0x0A10)
+ // 8000 = OPFHSIZ - subtract 1 from PF2 attribute horizontal stamp address
+ // 4000 = OPIUM - playfield 2 enable
+ // 2000 = OLS_EN - linescroll enable
+ // 1000 = OSLPINK - split links enable
+ // 0800 = OSLORAM - slow MO DMA cycles
+ // 0400 = O_DCDMA - enable double time color RAM DMA cycles
+ // 0200 = O_DVDMA - enable double time video RAM DMA cycles
+ // 0100 = OADROEN - tristate address bus
+ // 0080 = OAS_EN - enable autostore of playfield attributes
+ // 0040 = OCRDWE - enable 8-bit color RAM
+ // 0020 = OVRDTACK - wait for VRAM DMA on writes
+ // 0010 = OCRDTACK - wait for CRAM DMA on writes
+ // 0008 = OALHSIZ - alpha horiz stamp size (0=8)
+ // 0004 = OPFHSIZ - PF horiz stamp size (0=8)
+ // 0002 = OPFVSIZ - PF vertical stamp size (0=8)
+ // 0001 = OMOVSIZ - MO vertical stamp size (0=8)
+ // 10 = HDW_MOCON (MOB chip MOB code)
+ // 11 = HDW_PCON (MOB chip PF code)
+ // 12 = HDW_GRCON (MOB chip GR code)
+ // 13 = MO_hscroll (9)
+ // 14 = PF1_hscroll (A)
+ // 15 = PF2_hscroll (B)
+ // 16 = MO_vscroll (D)
+ // 17 = PF1_vscroll (E)
+ // 18 = PF2_vscroll (F)
+ //
+ // 3efffe = reset to wrong configuration?
+ //
+
+ case 0:
+//if (oldword != newword) printf("Word 0 = %04X\n", newword);
+ break;
+
+ // set the scanline interrupt here
+ case 0x03:
+ if (oldword != newword || !m_scanline_int_timer->enabled())
+ m_scanline_int_timer->adjust(screen().time_until_pos(newword & 0x1ff));
+ break;
+
+ // latch enable
+ case 0x0a:
+ // check for palette banking
+ if (m_palette_bank != (((newword & 0x0400) >> 10) ^ 1))
+ {
+ screen().update_partial(screen().vpos());
+ m_palette_bank = ((newword & 0x0400) >> 10) ^ 1;
+ }
+//if ((oldword & ~0x0080) != (newword & ~0x0080)) printf("Latch control = %04X\n", newword);
+ break;
+
+ // indexed parameters
+ case 0x10: case 0x11: case 0x12: case 0x13:
+ case 0x14: case 0x15: case 0x16: case 0x17:
+ case 0x18: case 0x19: case 0x1a: case 0x1b:
+ update_parameter(newword);
+ break;
+
+ // scanline IRQ ack here
+ case 0x1e:
+ m_scanline_int_cb(CLEAR_LINE);
+ break;
+
+ // log anything else
+ default:
+ if (oldword != newword)
+ logerror("vc_w(%02X, %04X) ** [prev=%04X]\n", offset, newword, oldword);
+ break;
+ }
+}
+
+
+//-------------------------------------------------
+// update_pf_xscrolls: Update the playfield
+// scroll values.
+//-------------------------------------------------
+
+inline void atari_vad_device::update_pf_xscrolls()
+{
+ m_playfield_tilemap->set_scrollx(0, m_pf0_xscroll_raw + ((m_pf1_xscroll_raw) & 7));
+ if (m_playfield2_tilemap != nullptr)
+ m_playfield2_tilemap->set_scrollx(0, m_pf1_xscroll_raw + 4);
+}
+
+
+//-------------------------------------------------
+// update_parameter: Update parameters, shared
+// between end-of-frame, tilerow updates, and
+// direct control writes.
+//-------------------------------------------------
+
+void atari_vad_device::update_parameter(uint16_t newword)
+{
+ switch (newword & 15)
+ {
+ case 9:
+ m_mo_xscroll = (newword >> 7) & 0x1ff;
+ if (m_mob != nullptr)
+ m_mob->set_xscroll(m_mo_xscroll);
+ break;
+
+ case 10:
+ m_pf1_xscroll_raw = (newword >> 7) & 0x1ff;
+ update_pf_xscrolls();
+ break;
+
+ case 11:
+ m_pf0_xscroll_raw = (newword >> 7) & 0x1ff;
+ update_pf_xscrolls();
+ break;
+
+ case 13:
+ m_mo_yscroll = (newword >> 7) & 0x1ff;
+ if (m_mob != nullptr)
+ m_mob->set_yscroll(m_mo_yscroll);
+ break;
+
+ case 14:
+ m_pf1_yscroll = (newword >> 7) & 0x1ff;
+ if (m_playfield2_tilemap != nullptr)
+ m_playfield2_tilemap->set_scrolly(0, m_pf1_yscroll);
+ break;
+
+ case 15:
+ m_pf0_yscroll = (newword >> 7) & 0x1ff;
+ m_playfield_tilemap->set_scrolly(0, m_pf0_yscroll);
+ break;
+ }
+}
+
+
+//-------------------------------------------------
+// update_tilerow: Fetch parameters stored at
+// the end of the current tilerow, which affect
+// rowscrolling.
+//-------------------------------------------------
+
+void atari_vad_device::update_tilerow(emu_timer &timer, int scanline)
+{
+ // skip if out of bounds, or not enabled
+ if (scanline <= screen().visible_area().max_y && (m_control[0x0a] & 0x2000) != 0 && m_alpha_tilemap != nullptr)
+ {
+ // iterate over non-visible alpha tiles in this row
+ int offset = scanline / 8 * 64 + 48 + 2 * (scanline % 8);
+ int data0 = m_alpha_tilemap->basemem_read(offset++);
+ int data1 = m_alpha_tilemap->basemem_read(offset++);
+
+ // force an update if we have data
+ if (scanline > 0 && ((data0 | data1) & 15) != 0)
+ screen().update_partial(scanline - 1);
+
+ // write the data
+ if ((data0 & 15) != 0)
+ update_parameter(data0);
+ if ((data1 & 15) != 0)
+ update_parameter(data1);
+ }
+
+ // update the timer to go off at the start of the next row
+ scanline += ((m_control[0x0a] & 0x2000) != 0) ? 1 : 8;
+ if (scanline >= screen().height())
+ scanline = 0;
+ timer.adjust(screen().time_until_pos(scanline), scanline);
+}
+
+
+//-------------------------------------------------
+// eof_update: Callback that slurps up data and
+// feeds it into the video controller registers
+// every refresh.
+//-------------------------------------------------
+
+void atari_vad_device::eof_update(emu_timer &timer)
+{
+ // echo all the commands to the video controller
+ for (int i = 0; i < 0x1c; i++)
+ if (m_eof_data[i] != 0)
+ internal_control_write(i, m_eof_data[i]);
+
+ // update the scroll positions
+/* atarimo_set_xscroll(0, m_mo_xscroll);
+ atarimo_set_yscroll(0, m_mo_yscroll);
+
+ update_pf_xscrolls();
+
+ m_playfield_tilemap->set_scrolly(0, m_pf0_yscroll);
+ if (m_playfield2_tilemap != nullptr)
+ m_playfield2_tilemap->set_scrolly(0, m_pf1_yscroll);*/
+ timer.adjust(screen().time_until_pos(0));
+
+ // use this for debugging the video controller values
+#if 0
+ if (machine().input().code_pressed(KEYCODE_8))
+ {
+ static FILE *out;
+ if (!out) out = fopen("scroll.log", "w");
+ if (out)
+ {
+ for (i = 0; i < 64; i++)
+ fprintf(out, "%04X ", data[i]);
+ fprintf(out, "\n");
+ }
+ }
+#endif
+}