summaryrefslogtreecommitdiffstatshomepage
path: root/src/devices/bus/tanbus/mpvdu.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/devices/bus/tanbus/mpvdu.cpp')
-rw-r--r--src/devices/bus/tanbus/mpvdu.cpp182
1 files changed, 182 insertions, 0 deletions
diff --git a/src/devices/bus/tanbus/mpvdu.cpp b/src/devices/bus/tanbus/mpvdu.cpp
new file mode 100644
index 00000000000..8463d90b6c5
--- /dev/null
+++ b/src/devices/bus/tanbus/mpvdu.cpp
@@ -0,0 +1,182 @@
+// license:BSD-3-Clause
+// copyright-holders:Nigel Barnes
+/**********************************************************************
+
+ Microtan Mousepacket Designs Colour VDU Card
+
+ http://www.microtan.ukpc.net/pageProducts.html#VIDEO
+
+ TODO:
+ - use MC6845 screen_update to implement cursor, requires interlace
+
+**********************************************************************/
+
+
+#include "emu.h"
+#include "mpvdu.h"
+
+
+//**************************************************************************
+// DEVICE DEFINITIONS
+//**************************************************************************
+
+DEFINE_DEVICE_TYPE(TANBUS_MPVDU, tanbus_mpvdu_device, "tanbus_mpvdu", "Mousepacket Designs Colour VDU Card")
+
+
+//-------------------------------------------------
+// device_add_mconfig - add device configuration
+//-------------------------------------------------
+
+void tanbus_mpvdu_device::device_add_mconfig(machine_config &config)
+{
+ SCREEN(config, m_screen, SCREEN_TYPE_RASTER);
+ m_screen->set_refresh_hz(50);
+ m_screen->set_vblank_time(ATTOSECONDS_IN_USEC(2500));
+ m_screen->set_size(1152, 625);
+ m_screen->set_visarea(0, 768 - 1, 0, 500 - 1);
+ //m_screen->set_screen_update("mc6845", FUNC(mc6845_device::screen_update)); // TODO: implement interlace in mc6845
+ m_screen->set_screen_update("saa5050", FUNC(saa5050_device::screen_update));
+
+ MC6845(config, m_crtc, DERIVED_CLOCK(1, 3));
+ m_crtc->set_screen(nullptr);
+ m_crtc->set_show_border_area(false);
+ m_crtc->set_char_width(12);
+ m_crtc->out_vsync_callback().set(FUNC(tanbus_mpvdu_device::vsync_changed));
+ m_crtc->set_update_row_callback(FUNC(tanbus_mpvdu_device::crtc_update_row), this);
+
+ SAA5050(config, m_trom, DERIVED_CLOCK(1, 1));
+ m_trom->d_cb().set(FUNC(tanbus_mpvdu_device::videoram_r));
+ m_trom->set_screen_size(64, 25, 64);
+}
+
+//**************************************************************************
+// LIVE DEVICE
+//**************************************************************************
+
+//-------------------------------------------------
+// tanbus_mpvdu_device - constructor
+//-------------------------------------------------
+
+tanbus_mpvdu_device::tanbus_mpvdu_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock)
+ : device_t(mconfig, TANBUS_MPVDU, tag, owner, clock)
+ , device_tanbus_interface(mconfig, *this)
+ , m_screen(*this, "screen")
+ , m_crtc(*this, "mc6845")
+ , m_trom(*this, "saa5050")
+{
+}
+
+
+//-------------------------------------------------
+// device_start - device-specific startup
+//-------------------------------------------------
+
+void tanbus_mpvdu_device::device_start()
+{
+ m_videoram = std::make_unique<uint8_t[]>(0x800);
+
+ save_pointer(NAME(m_videoram), 0x800);
+}
+
+//-------------------------------------------------
+// read - card read
+//-------------------------------------------------
+
+uint8_t tanbus_mpvdu_device::read(offs_t offset, int inhrom, int inhram, int be)
+{
+ uint8_t data = 0xff;
+
+ if ((offset & 0xf800) == 0xa000)
+ {
+ data = m_videoram[offset & 0x7ff];
+ }
+
+ switch (offset & 0xfff1)
+ {
+ case 0xa7f0:
+ data = m_crtc->status_r();
+ break;
+ case 0xa7f1:
+ data = m_crtc->register_r();
+ break;
+ }
+
+ return data;
+}
+
+//-------------------------------------------------
+// write - card write
+//-------------------------------------------------
+
+void tanbus_mpvdu_device::write(offs_t offset, uint8_t data, int inhrom, int inhram, int be)
+{
+ if ((offset & 0xf800) == 0xa000)
+ {
+ m_videoram[offset & 0x7ff] = data;
+ }
+
+ switch (offset & 0xfff1)
+ {
+ case 0xa7f0:
+ m_crtc->address_w(data);
+ break;
+ case 0xa7f1:
+ m_crtc->register_w(data);
+ break;
+ }
+}
+
+//-------------------------------------------------
+// set_inhibit_lines
+//-------------------------------------------------
+
+void tanbus_mpvdu_device::set_inhibit_lines(offs_t offset, int &inhram, int &inhrom)
+{
+ if ((offset & 0xf800) == 0xa000)
+ {
+ inhram = 1;
+ }
+};
+
+//**************************************************************************
+// IMPLEMENTATION
+//**************************************************************************
+
+READ8_MEMBER(tanbus_mpvdu_device::videoram_r)
+{
+ return m_videoram[offset];
+}
+
+MC6845_UPDATE_ROW(tanbus_mpvdu_device::crtc_update_row)
+{
+ uint32_t *p = &bitmap.pix32(y);
+
+ m_trom->lose_w(1);
+ m_trom->lose_w(0);
+ for (int column = 0; column < x_count; column++)
+ {
+ m_trom->write(m_videoram[(ma + column) & 0x7ff]);
+
+ m_trom->f1_w(1);
+ m_trom->f1_w(0);
+
+ for (int bit = 0; bit < 12; bit++)
+ {
+ m_trom->tr6_w(1);
+ m_trom->tr6_w(0);
+
+ int col = m_trom->get_rgb() ^ ((column == cursor_x) ? 7 : 0);
+
+ int r = BIT(col, 0) * 0xff;
+ int g = BIT(col, 1) * 0xff;
+ int b = BIT(col, 2) * 0xff;
+
+ *p++ = rgb_t(r, g, b);
+ }
+ }
+}
+
+WRITE_LINE_MEMBER(tanbus_mpvdu_device::vsync_changed)
+{
+ m_trom->dew_w(state);
+}