summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/ymvl70.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/ymvl70.cpp')
-rw-r--r--src/mame/drivers/ymvl70.cpp268
1 files changed, 268 insertions, 0 deletions
diff --git a/src/mame/drivers/ymvl70.cpp b/src/mame/drivers/ymvl70.cpp
new file mode 100644
index 00000000000..973bb9e5931
--- /dev/null
+++ b/src/mame/drivers/ymvl70.cpp
@@ -0,0 +1,268 @@
+// license:BSD-3-Clause
+// copyright-holders:R. Belmont, Olivier Galibert
+
+#include "emu.h"
+
+#include "bus/midi/midiinport.h"
+#include "bus/midi/midioutport.h"
+#include "cpu/h8/h83003.h"
+#include "machine/mulcd.h"
+#include "sound/meg.h"
+#include "sound/dspv.h"
+
+#include "debugger.h"
+#include "speaker.h"
+
+
+static INPUT_PORTS_START( vl70 )
+ PORT_START("B0")
+ PORT_BIT(0x83, IP_ACTIVE_LOW, IPT_UNUSED)
+ PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Play") PORT_CODE(KEYCODE_A)
+ PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Effect") PORT_CODE(KEYCODE_F)
+ PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Midi/WX") PORT_CODE(KEYCODE_X)
+ PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Enter") PORT_CODE(KEYCODE_ENTER)
+ PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Exit") PORT_CODE(KEYCODE_BACKSPACE)
+
+ PORT_START("B1")
+ PORT_BIT(0x83, IP_ACTIVE_LOW, IPT_UNUSED)
+ PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Edit") PORT_CODE(KEYCODE_E)
+ PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Mode") PORT_CODE(KEYCODE_M)
+ PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Part -") PORT_CODE(KEYCODE_OPENBRACE)
+ PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Select <") PORT_CODE(KEYCODE_COMMA)
+ PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Part +") PORT_CODE(KEYCODE_CLOSEBRACE)
+
+ PORT_START("B2")
+ PORT_BIT(0x83, IP_ACTIVE_LOW, IPT_UNUSED)
+ PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Util") PORT_CODE(KEYCODE_U)
+ PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Breath") PORT_CODE(KEYCODE_B)
+ PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Value -") PORT_CODE(KEYCODE_MINUS)
+ PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Select >") PORT_CODE(KEYCODE_STOP)
+ PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_OTHER) PORT_NAME("Value +") PORT_CODE(KEYCODE_EQUALS)
+INPUT_PORTS_END
+
+class vl70_state : public driver_device
+{
+public:
+ vl70_state(const machine_config &mconfig, device_type type, const char *tag)
+ : driver_device(mconfig, type, tag)
+ , m_vl70cpu(*this, "vl70cpu")
+ , m_dspv(*this, "dspv")
+ , m_meg(*this, "meg")
+ , m_lcd(*this, "lcd")
+ , m_ioport_b0(*this, "B0")
+ , m_ioport_b1(*this, "B1")
+ , m_ioport_b2(*this, "B2")
+ { }
+
+ void vl70(machine_config &config);
+
+private:
+ enum {
+ P2_LCD_RS = 0x01,
+ P2_LCD_RW = 0x02,
+ P2_LCD_ENABLE = 0x04
+ };
+
+ enum {
+ P6_LCD_RS = 0x04,
+ P6_LCD_RW = 0x02,
+ P6_LCD_ENABLE = 0x01
+ };
+
+ enum {
+ PA_LCD_RS = 0x02,
+ PA_LCD_ENABLE = 0x20,
+ PA_LCD_RW = 0x40
+ };
+
+ required_device<h83003_device> m_vl70cpu;
+ required_device<dspv_device> m_dspv;
+ required_device<meg_device> m_meg;
+ required_device<mulcd_device> m_lcd;
+ required_ioport m_ioport_b0;
+ required_ioport m_ioport_b1;
+ required_ioport m_ioport_b2;
+
+ u8 cur_p1, cur_p2, cur_p3, cur_p5, cur_p6, cur_pa, cur_pb, cur_pc, cur_pf, cur_pg;
+ u8 cur_ic32;
+
+ u16 adc_zero_r();
+ u16 adc_ar_r();
+ u16 adc_al_r();
+ u16 adc_midisw_r();
+ u16 adc_battery_r();
+ u16 adc_breath_r();
+
+ void p6_w(u16 data);
+ u16 p6_r();
+ void pa_w(u16 data);
+ u16 pa_r();
+ void pb_w(u16 data);
+ void pc_w(u16 data);
+ u16 pc_r();
+
+ virtual void machine_start() override;
+ void vl70_iomap(address_map &map);
+ void vl70_map(address_map &map);
+};
+
+void vl70_state::machine_start()
+{
+ cur_p1 = cur_p2 = cur_p3 = cur_p5 = cur_p6 = cur_pa = cur_pc = cur_pf = cur_pg = cur_ic32 = 0xff;
+}
+
+void vl70_state::vl70_map(address_map &map)
+{
+ map(0x000000, 0x1fffff).rom().region("vl70cpu", 0);
+ map(0x200000, 0x20ffff).ram(); // 64K work RAM
+ map(0x400000, 0x40007f).m(m_dspv, FUNC(dspv_device::map));
+ map(0x600000, 0x60001f).m(m_meg, FUNC(meg_device::map));
+}
+
+// Grounded adc input
+u16 vl70_state::adc_zero_r()
+{
+ return 0;
+}
+
+// Analog input right (also sent to the swp)
+u16 vl70_state::adc_ar_r()
+{
+ return 0;
+}
+
+// Analog input left (also sent to the swp)
+u16 vl70_state::adc_al_r()
+{
+ return 0;
+}
+
+// Put the host switch to pure midi
+u16 vl70_state::adc_midisw_r()
+{
+ return 0;
+}
+
+// Battery level
+u16 vl70_state::adc_battery_r()
+{
+ return 0x200;
+}
+
+// Breath controller
+u16 vl70_state::adc_breath_r()
+{
+ return 0x000;
+}
+
+void vl70_state::p6_w(u16 data)
+{
+ if(!(cur_p6 & P6_LCD_ENABLE) && (data & P6_LCD_ENABLE)) {
+ if(!(cur_p6 & P6_LCD_RW)) {
+ if(cur_p6 & P6_LCD_RS)
+ m_lcd->data_write(cur_pa);
+ else
+ m_lcd->control_write(cur_pa);
+ }
+ }
+
+ cur_p6 = data;
+}
+
+void vl70_state::pb_w(u16 data)
+{
+ m_lcd->set_leds(bitswap<6>((data >> 2) ^ 0x3f, 5, 3, 1, 4, 2, 0));
+}
+
+void vl70_state::pc_w(u16 data)
+{
+ cur_pc = data;
+}
+
+u16 vl70_state::pc_r()
+{
+ u8 r = 0xff;
+ if(!(cur_pc & 0x01))
+ r &= m_ioport_b0->read();
+ if(!(cur_pc & 0x02))
+ r &= m_ioport_b1->read();
+ if(!(cur_pc & 0x80))
+ r &= m_ioport_b2->read();
+ return r;
+}
+
+u16 vl70_state::p6_r()
+{
+ return cur_p6;
+}
+
+void vl70_state::pa_w(u16 data)
+{
+ cur_pa = data;
+}
+
+u16 vl70_state::pa_r()
+{
+ if((cur_p6 & P6_LCD_ENABLE)) {
+ if(cur_p6 & P6_LCD_RW)
+ {
+ if(cur_p6 & P6_LCD_RS)
+ return m_lcd->data_read();
+ else
+ return m_lcd->control_read();
+ } else
+ return 0x00;
+ }
+
+ return cur_pa;
+}
+
+void vl70_state::vl70_iomap(address_map &map)
+{
+ map(h8_device::PORT_6, h8_device::PORT_6).rw(FUNC(vl70_state::p6_r), FUNC(vl70_state::p6_w));
+ map(h8_device::PORT_A, h8_device::PORT_A).rw(FUNC(vl70_state::pa_r), FUNC(vl70_state::pa_w));
+ map(h8_device::PORT_B, h8_device::PORT_B).w(FUNC(vl70_state::pb_w));
+ map(h8_device::PORT_C, h8_device::PORT_C).rw(FUNC(vl70_state::pc_r), FUNC(vl70_state::pc_w));
+ map(h8_device::ADC_0, h8_device::ADC_0).r(FUNC(vl70_state::adc_breath_r));
+ map(h8_device::ADC_1, h8_device::ADC_6).r(FUNC(vl70_state::adc_zero_r));
+ map(h8_device::ADC_2, h8_device::ADC_2).r(FUNC(vl70_state::adc_midisw_r));
+ map(h8_device::ADC_3, h8_device::ADC_6).r(FUNC(vl70_state::adc_zero_r));
+ map(h8_device::ADC_4, h8_device::ADC_4).r(FUNC(vl70_state::adc_battery_r));
+ map(h8_device::ADC_5, h8_device::ADC_6).r(FUNC(vl70_state::adc_zero_r));
+ map(h8_device::ADC_6, h8_device::ADC_6).r(FUNC(vl70_state::adc_zero_r));
+ map(h8_device::ADC_7, h8_device::ADC_7).r(FUNC(vl70_state::adc_zero_r));
+}
+
+void vl70_state::vl70(machine_config &config)
+{
+ H83003(config, m_vl70cpu, 10_MHz_XTAL);
+ m_vl70cpu->set_addrmap(AS_PROGRAM, &vl70_state::vl70_map);
+ m_vl70cpu->set_addrmap(AS_IO, &vl70_state::vl70_iomap);
+
+ MULCD(config, m_lcd);
+
+ SPEAKER(config, "lspeaker").front_left();
+ SPEAKER(config, "rspeaker").front_right();
+
+ DSPV(config, m_dspv);
+ MEG(config, m_meg);
+
+ auto &mdin_a(MIDI_PORT(config, "mdin_a"));
+ midiin_slot(mdin_a);
+ mdin_a.rxd_handler().set("vl70cpu:sci1", FUNC(h8_sci_device::rx_w));
+
+ auto &mdin_b(MIDI_PORT(config, "mdin_b"));
+ midiin_slot(mdin_b);
+ mdin_b.rxd_handler().set("vl70cpu:sci0", FUNC(h8_sci_device::rx_w));
+
+ auto &mdout(MIDI_PORT(config, "mdout"));
+ midiout_slot(mdout);
+ m_vl70cpu->subdevice<h8_sci_device>("sci0")->tx_handler().set(mdout, FUNC(midi_port_device::write_txd));
+}
+
+ROM_START( vl70 )
+ ROM_REGION( 0x200000, "vl70cpu", 0 )
+ ROM_LOAD16_WORD_SWAP( "vl70m_v111_27c160.bin", 0x000000, 0x200000, CRC(efdba9f0) SHA1(cfa9fb7d2a991e4752393c9677e4ddcbe10866c7) )
+ROM_END
+
+CONS( 1996, vl70, 0, 0, vl70, vl70, vl70_state, empty_init, "Yamaha", "VL70-m", MACHINE_NOT_WORKING )