diff --git a/scripts/target/mame/mess.lua b/scripts/target/mame/mess.lua index 8e4ba283ab3..5c93852f9ff 100644 --- a/scripts/target/mame/mess.lua +++ b/scripts/target/mame/mess.lua @@ -3736,6 +3736,7 @@ files { MAME_DIR .. "src/mame/drivers/eacc.cpp", MAME_DIR .. "src/mame/drivers/elwro800.cpp", MAME_DIR .. "src/mame/drivers/emate.cpp", + MAME_DIR .. "src/mame/drivers/epic14e.cpp", MAME_DIR .. "src/mame/drivers/esprit.cpp", MAME_DIR .. "src/mame/drivers/eti660.cpp", MAME_DIR .. "src/mame/includes/eti660.h", diff --git a/src/emu/xtal.cpp b/src/emu/xtal.cpp index 0297ecb60e5..cc7dc8bd282 100644 --- a/src/emu/xtal.cpp +++ b/src/emu/xtal.cpp @@ -223,6 +223,7 @@ const double XTAL::known_xtals[] = { 16'670'000, /* 16.67_MHz_XTAL - */ 16'777'216, /* 16.777216_MHz_XTAL Nintendo Game Boy Advance */ 16'934'400, /* 16.9344_MHz_XTAL Usually used to drive 90's Yamaha OPL/FM chips (44100 * 384) */ + 17'010'000, /* 17.01_MHz_XTAL Epic 14E */ 17'064'000, /* 17.064_MHz_XTAL Memorex 1377 */ 17'350'000, /* 17.35_MHz_XTAL ITT Courier 1700 */ 17'360'000, /* 17.36_MHz_XTAL OMTI Series 10 SCSI controller */ diff --git a/src/mame/drivers/epic14e.cpp b/src/mame/drivers/epic14e.cpp new file mode 100644 index 00000000000..49266cf35a7 --- /dev/null +++ b/src/mame/drivers/epic14e.cpp @@ -0,0 +1,246 @@ +// license:BSD-3-Clause +// copyright-holders:AJR +/*************************************************************************** + + Skeleton driver for Epic 14E video display terminal. + + This green-screen terminal emulates the TeleVideo 925. It was later + acquired by ADDS and rereleased as the Viewpoint/925+. + +***************************************************************************/ + +#include "emu.h" +//#include "bus/rs232/rs232.h" +#include "cpu/m6502/m6502.h" +#include "machine/input_merger.h" +#include "machine/6522via.h" +#include "machine/mos6551.h" +#include "video/scn2674.h" +#include "screen.h" + +class epic14e_state : public driver_device +{ +public: + epic14e_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag) + , m_maincpu(*this, "maincpu") + , m_via(*this, "via") + , m_charram(*this, "charram") + , m_attrram(*this, "attrram") + , m_chargen(*this, "chargen") + , m_dsw(*this, "DSW%u", 1U) + { + } + + void epic14e(machine_config &config); + +private: + SCN2672_DRAW_CHARACTER_MEMBER(draw_character); + + u8 vram_r(offs_t offset); + void vram_w(offs_t offset, u8 data); + + void cpu_map(address_map &map); + void char_map(address_map &map); + void attr_map(address_map &map); + + required_device m_maincpu; + required_device m_via; + required_shared_ptr m_charram; + required_shared_ptr m_attrram; + required_region_ptr m_chargen; + required_ioport_array<3> m_dsw; +}; + + +SCN2672_DRAW_CHARACTER_MEMBER(epic14e_state::draw_character) +{ + const u8 chardata = m_chargen[charcode << 4 | linecount]; + u16 dots = ((chardata & 0x7f) << 2) | (BIT(chardata, 7) ? 3 : 0); + + for (int i = 0; i < 9; i++) + { + bitmap.pix32(y, x++) = BIT(dots, 8) ? rgb_t::white() : rgb_t::black(); + dots <<= 1; + } +} + + +u8 epic14e_state::vram_r(offs_t offset) +{ + return (BIT(offset, 0) ? m_charram : m_attrram)[offset >> 1]; +} + +void epic14e_state::vram_w(offs_t offset, u8 data) +{ + (BIT(offset, 0) ? m_charram : m_attrram)[offset >> 1] = data; +} + +void epic14e_state::cpu_map(address_map &map) +{ + map(0x0000, 0x07ff).ram(); + map(0x2000, 0x3fff).rw(FUNC(epic14e_state::vram_r), FUNC(epic14e_state::vram_w)); + map(0x6000, 0x6007).rw("pvtc", FUNC(scn2672_device::read), FUNC(scn2672_device::write)); + map(0x8000, 0x8003).rw("acia1", FUNC(mos6551_device::read), FUNC(mos6551_device::write)); + map(0x9000, 0x9003).rw("acia2", FUNC(mos6551_device::read), FUNC(mos6551_device::write)); + map(0xa010, 0xa01f).rw(m_via, FUNC(via6522_device::read), FUNC(via6522_device::write)); + map(0xe000, 0xffff).rom().region("program", 0); +} + +void epic14e_state::char_map(address_map &map) +{ + map(0x0000, 0x0fff).ram().share("charram"); +} + +void epic14e_state::attr_map(address_map &map) +{ + map(0x0000, 0x0fff).ram().share("attrram"); +} + + +static INPUT_PORTS_START(epic14e) + PORT_START("DSW1") + PORT_DIPNAME(0x001, 0x001, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:1") + PORT_DIPSETTING(0x001, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x002, 0x002, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:2") + PORT_DIPSETTING(0x002, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x004, 0x004, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:3") + PORT_DIPSETTING(0x004, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x008, 0x008, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:4") + PORT_DIPSETTING(0x008, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x010, 0x010, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:5") + PORT_DIPSETTING(0x010, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x020, 0x020, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:6") + PORT_DIPSETTING(0x020, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x040, 0x040, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:7") + PORT_DIPSETTING(0x040, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x080, 0x080, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:8") + PORT_DIPSETTING(0x080, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x100, 0x100, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:9") + PORT_DIPSETTING(0x100, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x200, 0x200, DEF_STR(Unknown)) PORT_DIPLOCATION("SW1:10") + PORT_DIPSETTING(0x200, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + + PORT_START("DSW2") + PORT_DIPNAME(0x001, 0x001, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:1") + PORT_DIPSETTING(0x001, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x002, 0x002, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:2") + PORT_DIPSETTING(0x002, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x004, 0x004, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:3") + PORT_DIPSETTING(0x004, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x008, 0x008, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:4") + PORT_DIPSETTING(0x008, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x010, 0x010, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:5") + PORT_DIPSETTING(0x010, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x020, 0x020, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:6") + PORT_DIPSETTING(0x020, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x040, 0x040, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:7") + PORT_DIPSETTING(0x040, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x080, 0x080, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:8") + PORT_DIPSETTING(0x080, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x100, 0x100, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:9") + PORT_DIPSETTING(0x100, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x200, 0x200, DEF_STR(Unknown)) PORT_DIPLOCATION("SW2:10") + PORT_DIPSETTING(0x200, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + + PORT_START("DSW3") + PORT_DIPNAME(0x001, 0x001, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:1") + PORT_DIPSETTING(0x001, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x002, 0x002, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:2") + PORT_DIPSETTING(0x002, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x004, 0x004, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:3") + PORT_DIPSETTING(0x004, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x008, 0x008, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:4") + PORT_DIPSETTING(0x008, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x010, 0x010, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:5") + PORT_DIPSETTING(0x010, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x020, 0x020, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:6") + PORT_DIPSETTING(0x020, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x040, 0x040, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:7") + PORT_DIPSETTING(0x040, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x080, 0x080, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:8") + PORT_DIPSETTING(0x080, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x100, 0x100, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:9") + PORT_DIPSETTING(0x100, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) + PORT_DIPNAME(0x200, 0x200, DEF_STR(Unknown)) PORT_DIPLOCATION("SW3:10") + PORT_DIPSETTING(0x200, DEF_STR(Off)) + PORT_DIPSETTING(0x000, DEF_STR(On)) +INPUT_PORTS_END + + +void epic14e_state::epic14e(machine_config &config) +{ + M6502(config, m_maincpu, 17.01_MHz_XTAL / 9); // SY6502A (1.89 MHz confirmed) + m_maincpu->set_addrmap(AS_PROGRAM, &epic14e_state::cpu_map); + + INPUT_MERGER_ANY_HIGH(config, "mainirq").output_handler().set_inputline(m_maincpu, m6502_device::IRQ_LINE); + + VIA6522(config, m_via, 17.01_MHz_XTAL / 9); // SY6522A + m_via->irq_handler().set("mainirq", FUNC(input_merger_device::in_w<0>)); + + screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER)); + screen.set_raw(17.01_MHz_XTAL, 900, 0, 720, 315, 0, 300); + screen.set_screen_update("pvtc", FUNC(scn2672_device::screen_update)); + + scn2672_device &pvtc(SCN2672(config, "pvtc", 17.01_MHz_XTAL / 9)); + pvtc.intr_callback().set_inputline(m_maincpu, m6502_device::NMI_LINE); + pvtc.set_character_width(9); + pvtc.set_display_callback(FUNC(epic14e_state::draw_character)); + pvtc.set_addrmap(0, &epic14e_state::char_map); + pvtc.set_addrmap(1, &epic14e_state::attr_map); + pvtc.set_screen("screen"); + // TODO: Serial keyboard clocked at 60 Hz frame rate + + mos6551_device &acia1(MOS6551(config, "acia1", 17.01_MHz_XTAL / 9)); // SY6551A + acia1.set_xtal(1.8432_MHz_XTAL); + acia1.irq_handler().set("mainirq", FUNC(input_merger_device::in_w<1>)); + + mos6551_device &acia2(MOS6551(config, "acia2", 17.01_MHz_XTAL / 9)); // SY6551A + acia2.set_xtal(1.8432_MHz_XTAL); // each ACIA has its own XTAL + acia2.irq_handler().set("mainirq", FUNC(input_merger_device::in_w<2>)); + + //RS232_PORT(config, "modem", default_rs232_devices, nullptr); + //RS232_PORT(config, "aux", default_rs232_devices, nullptr); +} + + +ROM_START(epic14e) + ROM_REGION(0x2000, "program", 0) + ROM_LOAD("u6.bin", 0x0000, 0x1000, CRC(014b5da0) SHA1(190c2d48c6928d143458ba094f785d40ac29f2c0)) + ROM_LOAD("u13.bin", 0x1000, 0x1000, CRC(2b406a88) SHA1(e619cc020ab5eabad99967b27cb969ceb191f5ee)) + + ROM_REGION(0x1000, "chargen", 0) + ROM_LOAD("u24.bin", 0x0000, 0x1000, CRC(da409f03) SHA1(5a90a6b865dad20dc3f455448670b4f5baa55028)) +ROM_END + + +COMP(1982, epic14e, 0, 0, epic14e, epic14e, epic14e_state, empty_init, "Epic Computer Systems", "Epic 14E (v1.0)", MACHINE_IS_SKELETON) diff --git a/src/mame/mame.lst b/src/mame/mame.lst index 531ef3ecbed..eb4c0120998 100644 --- a/src/mame/mame.lst +++ b/src/mame/mame.lst @@ -12394,6 +12394,9 @@ ep128 // Enterprise 128 ep64 // Enterprise 64 phc64 // Hegener & Glaser Mephisto PHC 64 +@source:epic14e.cpp +epic14e // + @source:epos.cpp catapult // (c) 1982 dealer // (c) 198? diff --git a/src/mame/mess.flt b/src/mame/mess.flt index 792046cf049..ef530f82549 100644 --- a/src/mame/mess.flt +++ b/src/mame/mess.flt @@ -208,6 +208,7 @@ emate.cpp emma2.cpp enmirage.cpp ep64.cpp +epic14e.cpp esprit.cpp esq1.cpp esq5505.cpp