summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/hh_pic16.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/hh_pic16.c')
-rw-r--r--src/mame/drivers/hh_pic16.c302
1 files changed, 302 insertions, 0 deletions
diff --git a/src/mame/drivers/hh_pic16.c b/src/mame/drivers/hh_pic16.c
new file mode 100644
index 00000000000..4a6e6088450
--- /dev/null
+++ b/src/mame/drivers/hh_pic16.c
@@ -0,0 +1,302 @@
+// license:BSD-3-Clause
+// copyright-holders:hap
+/***************************************************************************
+
+ GI PIC16xx-driven dedicated handhelds or other simple devices.
+
+ known chips:
+
+ serial device etc.
+-----------------------------------------------------------
+ @036 1655A 1979, Ideal Maniac
+ *061 1655A 1980, Lakeside Le Boom (have dump)
+ *094 1655A 1980, GAF Melody Madness (have dump)
+ *110 1650A 1979, Tiger Rocket Pinball
+ *192 1650 19??, (a phone dialer, have dump)
+ *255 1655 19??, (a talking clock, have dump)
+
+ (* denotes not yet emulated by MAME, @ denotes it's in this driver)
+
+
+ TODO:
+ - it doesn't work, emu/cpu/pic16c5x needs some love (dev note: hack to make it
+ playable: remove the TRIS masks)
+
+***************************************************************************/
+
+#include "emu.h"
+#include "cpu/pic16c5x/pic16c5x.h"
+#include "sound/speaker.h"
+
+#include "maniac.lh"
+
+
+class hh_pic16_state : public driver_device
+{
+public:
+ hh_pic16_state(const machine_config &mconfig, device_type type, const char *tag)
+ : driver_device(mconfig, type, tag),
+ m_maincpu(*this, "maincpu"),
+ m_inp_matrix(*this, "IN"),
+ m_speaker(*this, "speaker"),
+ m_display_wait(33),
+ m_display_maxy(1),
+ m_display_maxx(0)
+ { }
+
+ // devices
+ required_device<cpu_device> m_maincpu;
+ optional_ioport_array<2> m_inp_matrix; // max 2
+ optional_device<speaker_sound_device> m_speaker;
+
+ // misc common
+ UINT8 m_b; // MCU port B data
+ UINT8 m_c; // MCU port C data
+
+ // display common
+ int m_display_wait; // led/lamp off-delay in microseconds (default 33ms)
+ int m_display_maxy; // display matrix number of rows
+ int m_display_maxx; // display matrix number of columns (max 31 for now)
+
+ UINT32 m_display_state[0x20]; // display matrix rows data (last bit is used for always-on)
+ UINT16 m_display_segmask[0x20]; // if not 0, display matrix row is a digit, mask indicates connected segments
+ UINT32 m_display_cache[0x20]; // (internal use)
+ UINT8 m_display_decay[0x20][0x20]; // (internal use)
+
+ TIMER_DEVICE_CALLBACK_MEMBER(display_decay_tick);
+ void display_update();
+ void set_display_size(int maxx, int maxy);
+ void display_matrix(int maxx, int maxy, UINT32 setx, UINT32 sety);
+
+protected:
+ virtual void machine_start();
+ virtual void machine_reset();
+};
+
+
+// machine start/reset
+
+void hh_pic16_state::machine_start()
+{
+ // zerofill
+ memset(m_display_state, 0, sizeof(m_display_state));
+ memset(m_display_cache, ~0, sizeof(m_display_cache));
+ memset(m_display_decay, 0, sizeof(m_display_decay));
+ memset(m_display_segmask, 0, sizeof(m_display_segmask));
+
+ m_b = 0;
+ m_c = 0;
+
+ // register for savestates
+ save_item(NAME(m_display_maxy));
+ save_item(NAME(m_display_maxx));
+ save_item(NAME(m_display_wait));
+
+ save_item(NAME(m_display_state));
+ /* save_item(NAME(m_display_cache)); */ // don't save!
+ save_item(NAME(m_display_decay));
+ save_item(NAME(m_display_segmask));
+
+ save_item(NAME(m_b));
+ save_item(NAME(m_c));
+}
+
+void hh_pic16_state::machine_reset()
+{
+}
+
+
+
+/***************************************************************************
+
+ Helper Functions
+
+***************************************************************************/
+
+// The device may strobe the outputs very fast, it is unnoticeable to the user.
+// To prevent flickering here, we need to simulate a decay.
+
+void hh_pic16_state::display_update()
+{
+ UINT32 active_state[0x20];
+
+ for (int y = 0; y < m_display_maxy; y++)
+ {
+ active_state[y] = 0;
+
+ for (int x = 0; x <= m_display_maxx; x++)
+ {
+ // turn on powered segments
+ if (m_display_state[y] >> x & 1)
+ m_display_decay[y][x] = m_display_wait;
+
+ // determine active state
+ UINT32 ds = (m_display_decay[y][x] != 0) ? 1 : 0;
+ active_state[y] |= (ds << x);
+ }
+ }
+
+ // on difference, send to output
+ for (int y = 0; y < m_display_maxy; y++)
+ if (m_display_cache[y] != active_state[y])
+ {
+ if (m_display_segmask[y] != 0)
+ output_set_digit_value(y, active_state[y] & m_display_segmask[y]);
+
+ const int mul = (m_display_maxx <= 10) ? 10 : 100;
+ for (int x = 0; x <= m_display_maxx; x++)
+ {
+ int state = active_state[y] >> x & 1;
+ char buf1[0x10]; // lampyx
+ char buf2[0x10]; // y.x
+
+ if (x == m_display_maxx)
+ {
+ // always-on if selected
+ sprintf(buf1, "lamp%da", y);
+ sprintf(buf2, "%d.a", y);
+ }
+ else
+ {
+ sprintf(buf1, "lamp%d", y * mul + x);
+ sprintf(buf2, "%d.%d", y, x);
+ }
+ output_set_value(buf1, state);
+ output_set_value(buf2, state);
+ }
+ }
+
+ memcpy(m_display_cache, active_state, sizeof(m_display_cache));
+}
+
+TIMER_DEVICE_CALLBACK_MEMBER(hh_pic16_state::display_decay_tick)
+{
+ // slowly turn off unpowered segments
+ for (int y = 0; y < m_display_maxy; y++)
+ for (int x = 0; x <= m_display_maxx; x++)
+ if (m_display_decay[y][x] != 0)
+ m_display_decay[y][x]--;
+
+ display_update();
+}
+
+void hh_pic16_state::set_display_size(int maxx, int maxy)
+{
+ m_display_maxx = maxx;
+ m_display_maxy = maxy;
+}
+
+void hh_pic16_state::display_matrix(int maxx, int maxy, UINT32 setx, UINT32 sety)
+{
+ set_display_size(maxx, maxy);
+
+ // update current state
+ UINT32 mask = (1 << maxx) - 1;
+ for (int y = 0; y < maxy; y++)
+ m_display_state[y] = (sety >> y & 1) ? ((setx & mask) | (1 << maxx)) : 0;
+
+ display_update();
+}
+
+
+
+/***************************************************************************
+
+ Minidrivers (subclass, I/O, Inputs, Machine Config)
+
+***************************************************************************/
+
+/***************************************************************************
+
+ Ideal Maniac, by Ralph Baer
+ * PIC1655A-036
+
+
+***************************************************************************/
+
+class maniac_state : public hh_pic16_state
+{
+public:
+ maniac_state(const machine_config &mconfig, device_type type, const char *tag)
+ : hh_pic16_state(mconfig, type, tag)
+ { }
+
+ DECLARE_WRITE8_MEMBER(output_w);
+};
+
+// handlers
+
+WRITE8_MEMBER(maniac_state::output_w)
+{
+ // B,C: outputs
+ offset -= PIC16C5x_PORTB;
+ if (offset)
+ m_c = data;
+ else
+ m_b = data;
+
+ // d7: speaker out
+ m_speaker->level_w((m_b >> 7 & 1) | (m_c >> 6 & 2));
+
+ // d0-d6: 7seg
+ m_display_segmask[offset] = 0x7f;
+ m_display_state[offset] = ~data & 0x7f;
+
+ set_display_size(7, 2);
+ display_update();
+}
+
+
+// config
+
+static INPUT_PORTS_START( maniac )
+ PORT_START("IN.0") // port A
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_BUTTON1 ) // bottom-right
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_BUTTON2 ) // upper-right
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_BUTTON3 ) // bottom-left
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_BUTTON4 ) // upper-left
+INPUT_PORTS_END
+
+
+static const INT16 maniac_speaker_levels[] = { 0, 32767, -32768, 0 };
+
+static MACHINE_CONFIG_START( maniac, maniac_state )
+
+ /* basic machine hardware */
+ MCFG_CPU_ADD("maincpu", PIC16C55, 850000) // RC osc. R=13.4K, C=470pf, but unknown RC curve - measured 800-890kHz
+ MCFG_PIC16C5x_READ_A_CB(IOPORT("IN.0"))
+ MCFG_PIC16C5x_WRITE_B_CB(WRITE8(maniac_state, output_w))
+ MCFG_PIC16C5x_WRITE_C_CB(WRITE8(maniac_state, output_w))
+ MCFG_PIC16C5x_SET_CONFIG(0) // ?
+
+ MCFG_TIMER_DRIVER_ADD_PERIODIC("display_decay", hh_pic16_state, display_decay_tick, attotime::from_msec(1))
+ MCFG_DEFAULT_LAYOUT(layout_maniac)
+
+ /* no video! */
+
+ /* sound hardware */
+ MCFG_SPEAKER_STANDARD_MONO("mono")
+ MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0)
+ MCFG_SPEAKER_LEVELS(4, maniac_speaker_levels)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
+MACHINE_CONFIG_END
+
+
+
+
+
+/***************************************************************************
+
+ Game driver(s)
+
+***************************************************************************/
+
+ROM_START( maniac )
+ ROM_REGION( 0x0800, "maincpu", 0 )
+ ROM_LOAD( "pic1655a-036", 0x0000, 0x0400, CRC(a96f7011) SHA1(e97ae44d3c1e74c7e1024bb0bdab03eecdc9f827) )
+ROM_END
+
+
+
+/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY, FULLNAME, FLAGS */
+CONS( 1979, maniac, 0, 0, maniac, maniac, driver_device, 0, "Ideal", "Maniac", MACHINE_SUPPORTS_SAVE | MACHINE_NOT_WORKING )