mirror of
https://github.com/holub/mame
synced 2025-04-24 09:20:02 +03:00
New machines marked as NOT_WORKING
---------------------------------- ADM 36 Video Display Terminal [Al Kossow, Bitsavers]
This commit is contained in:
AJR
parent
abcdcb58e4
commit
506eb2e0e4
@ -202,6 +202,7 @@ const double XTAL::known_xtals[] = {
|
||||
14'318'181, /* 14.318181_MHz_XTAL Extremely common, used on 100's of PCBs (4x NTSC subcarrier) */
|
||||
14'580'000, /* 14.58_MHz_XTAL Fortune 32:16 Video Controller */
|
||||
14'705'882, /* 14.705882_MHz_XTAL Aleck64 */
|
||||
14'728'000, /* 14.728_MHz_XTAL ADM 36 */
|
||||
14'742'800, /* 14.7428_MHz_XTAL ADM 23 */
|
||||
14'745'600, /* 14.7456_MHz_XTAL Namco System 12 & System Super 22/23 for JVS */
|
||||
14'784'000, /* 14.784_MHz_XTAL Zenith Z-29 */
|
||||
@ -283,6 +284,7 @@ const double XTAL::known_xtals[] = {
|
||||
23'961'600, /* 23.9616_MHz_XTAL Osborne 4 (Vixen) */
|
||||
24'000'000, /* 24_MHz_XTAL Mario, 80's Data East games, 80's Konami games */
|
||||
24'073'400, /* 24.0734_MHz_XTAL DEC Rainbow 100 */
|
||||
24'300'000, /* 24.3_MHz_XTAL ADM 36 132-column display clock */
|
||||
24'576'000, /* 24.576_MHz_XTAL Pole Position h/w, Model 3 CPU board */
|
||||
24'883'200, /* 24.8832_MHz_XTAL DEC VT100 */
|
||||
25'000'000, /* 25_MHz_XTAL Namco System 22, Taito GNET, Dogyuun h/w */
|
||||
|
||||
202
src/mame/drivers/adm36.cpp
Normal file
202
src/mame/drivers/adm36.cpp
Normal file
@ -0,0 +1,202 @@
|
||||
// license:BSD-3-Clause
|
||||
// copyright-holders:Robbbert,AJR
|
||||
/************************************************************************************************************
|
||||
|
||||
Skeleton driver for ADM 36 Video Display Terminal.
|
||||
|
||||
The detachable keyboard has not been dumped. It is controlled serially through the PIO.
|
||||
|
||||
************************************************************************************************************/
|
||||
|
||||
#include "emu.h"
|
||||
#include "bus/rs232/rs232.h"
|
||||
#include "cpu/z80/z80.h"
|
||||
#include "machine/er1400.h"
|
||||
#include "machine/z80ctc.h"
|
||||
#include "machine/z80pio.h"
|
||||
#include "machine/z80sio.h"
|
||||
#include "video/tms9927.h"
|
||||
#include "screen.h"
|
||||
|
||||
|
||||
class adm36_state : public driver_device
|
||||
{
|
||||
public:
|
||||
adm36_state(const machine_config &mconfig, device_type type, const char *tag)
|
||||
: driver_device(mconfig, type, tag)
|
||||
, m_maincpu(*this, "maincpu")
|
||||
, m_earom(*this, "earom")
|
||||
, m_vtac(*this, "vtac")
|
||||
, m_chargen(*this, "chargen")
|
||||
, m_vram(*this, "vram%u", 0U)
|
||||
{
|
||||
}
|
||||
|
||||
void adm36(machine_config &config);
|
||||
|
||||
protected:
|
||||
virtual void machine_start() override;
|
||||
virtual void machine_reset() override;
|
||||
|
||||
private:
|
||||
u32 screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect);
|
||||
|
||||
void pio_pa_w(u8 data);
|
||||
u8 pio_pb_r();
|
||||
void pio_pb_w(u8 data);
|
||||
DECLARE_WRITE_LINE_MEMBER(vsyn_w);
|
||||
|
||||
void mem_map(address_map &map);
|
||||
void io_map(address_map &map);
|
||||
|
||||
required_device<z80_device> m_maincpu;
|
||||
required_device<er1400_device> m_earom;
|
||||
required_device<crt5037_device> m_vtac;
|
||||
required_region_ptr<u8> m_chargen;
|
||||
required_shared_ptr_array<u8, 2> m_vram;
|
||||
|
||||
bool m_vsyn;
|
||||
};
|
||||
|
||||
|
||||
u32 adm36_state::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect)
|
||||
{
|
||||
return 0;
|
||||
}
|
||||
|
||||
void adm36_state::machine_start()
|
||||
{
|
||||
m_vsyn = false;
|
||||
|
||||
save_item(NAME(m_vsyn));
|
||||
}
|
||||
|
||||
void adm36_state::machine_reset()
|
||||
{
|
||||
}
|
||||
|
||||
void adm36_state::pio_pa_w(u8 data)
|
||||
{
|
||||
m_earom->data_w(BIT(data, 0));
|
||||
}
|
||||
|
||||
u8 adm36_state::pio_pb_r()
|
||||
{
|
||||
return (m_earom->data_r() ? 0 : 1) | (m_vsyn ? 0x20 : 0);
|
||||
}
|
||||
|
||||
void adm36_state::pio_pb_w(u8 data)
|
||||
{
|
||||
m_earom->clock_w(!BIT(data, 4));
|
||||
m_earom->c3_w(BIT(data, 3));
|
||||
m_earom->c2_w(BIT(data, 2));
|
||||
m_earom->c1_w(BIT(data, 1));
|
||||
}
|
||||
|
||||
WRITE_LINE_MEMBER(adm36_state::vsyn_w)
|
||||
{
|
||||
m_vsyn = bool(state);
|
||||
}
|
||||
|
||||
void adm36_state::mem_map(address_map &map)
|
||||
{
|
||||
map(0x0000, 0x2fff).rom().region("maincpu", 0);
|
||||
map(0x6000, 0x67ff).ram(); // MK4802J-3 (U76)
|
||||
map(0xe000, 0xefff).ram().share("vram0"); // 4x MK4118AN-1 (U66-U69)
|
||||
map(0xf000, 0xffff).ram().share("vram1"); // 4x MK4118AN-1 (U81-U84)
|
||||
}
|
||||
|
||||
void adm36_state::io_map(address_map &map)
|
||||
{
|
||||
map.global_mask(0xff);
|
||||
map(0x00, 0x03).mirror(0x0c).rw("ctc", FUNC(z80ctc_device::read), FUNC(z80ctc_device::write));
|
||||
map(0x10, 0x13).mirror(0x0c).rw("sio", FUNC(z80sio_device::cd_ba_r), FUNC(z80sio_device::cd_ba_w));
|
||||
map(0x20, 0x23).mirror(0x0c).rw("pio", FUNC(z80pio_device::read), FUNC(z80pio_device::write));
|
||||
map(0x40, 0x4f).rw(m_vtac, FUNC(crt5037_device::read), FUNC(crt5037_device::write));
|
||||
}
|
||||
|
||||
|
||||
static INPUT_PORTS_START(adm36)
|
||||
INPUT_PORTS_END
|
||||
|
||||
|
||||
static const z80_daisy_config daisy_chain[] =
|
||||
{
|
||||
{ "ctc" },
|
||||
{ "sio" },
|
||||
{ "pio" },
|
||||
{ nullptr }
|
||||
};
|
||||
|
||||
void adm36_state::adm36(machine_config &config)
|
||||
{
|
||||
// basic machine hardware
|
||||
Z80(config, m_maincpu, 14.728_MHz_XTAL / 6);
|
||||
m_maincpu->set_addrmap(AS_PROGRAM, &adm36_state::mem_map);
|
||||
m_maincpu->set_addrmap(AS_IO, &adm36_state::io_map);
|
||||
m_maincpu->set_daisy_config(daisy_chain);
|
||||
|
||||
z80pio_device &pio(Z80PIO(config, "pio", 14.728_MHz_XTAL / 6));
|
||||
pio.out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0);
|
||||
pio.out_pa_callback().set(FUNC(adm36_state::pio_pa_w));
|
||||
pio.in_pb_callback().set(FUNC(adm36_state::pio_pb_r));
|
||||
pio.out_pb_callback().set(FUNC(adm36_state::pio_pb_w));
|
||||
|
||||
ER1400(config, m_earom);
|
||||
|
||||
//F3870(config, "keybcpu", 3.579545_MHz_XTAL);
|
||||
|
||||
z80ctc_device &ctc(Z80CTC(config, "ctc", 14.728_MHz_XTAL / 6));
|
||||
ctc.intr_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0);
|
||||
ctc.set_clk<0>(14.728_MHz_XTAL / 12);
|
||||
ctc.set_clk<1>(14.728_MHz_XTAL / 12);
|
||||
ctc.set_clk<2>(14.728_MHz_XTAL / 12);
|
||||
ctc.set_clk<3>(14.728_MHz_XTAL / 12);
|
||||
ctc.zc_callback<0>().set("sio", FUNC(z80sio_device::txca_w));
|
||||
ctc.zc_callback<1>().set("sio", FUNC(z80sio_device::rxca_w));
|
||||
ctc.zc_callback<2>().set("sio", FUNC(z80sio_device::txcb_w));
|
||||
ctc.zc_callback<2>().append("sio", FUNC(z80sio_device::rxcb_w));
|
||||
|
||||
z80sio_device &sio(Z80SIO(config, "sio", 14.728_MHz_XTAL / 6)); // MK3887N
|
||||
sio.out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0);
|
||||
sio.out_txda_callback().set("modem", FUNC(rs232_port_device::write_txd));
|
||||
sio.out_rtsa_callback().set("modem", FUNC(rs232_port_device::write_rts));
|
||||
sio.out_dtra_callback().set("modem", FUNC(rs232_port_device::write_dtr));
|
||||
sio.out_txdb_callback().set("printer", FUNC(rs232_port_device::write_txd));
|
||||
sio.out_dtrb_callback().set("printer", FUNC(rs232_port_device::write_rts));
|
||||
|
||||
screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
|
||||
screen.set_raw(14.728_MHz_XTAL, 936, 0, 720, 262, 0, 240);
|
||||
//screen.set_raw(24.3_MHz_XTAL, 1548, 0, 1188, 262, 0, 240);
|
||||
screen.set_screen_update(FUNC(adm36_state::screen_update));
|
||||
|
||||
CRT5037(config, m_vtac, 14.728_MHz_XTAL / 9);
|
||||
m_vtac->set_char_width(9);
|
||||
m_vtac->set_screen("screen");
|
||||
m_vtac->vsyn_callback().set(FUNC(adm36_state::vsyn_w));
|
||||
|
||||
rs232_port_device &modem(RS232_PORT(config, "modem", default_rs232_devices, nullptr)); // RS-232C, RS-422A or 20mA current loop
|
||||
modem.rxd_handler().set("sio", FUNC(z80sio_device::rxa_w));
|
||||
modem.cts_handler().set("sio", FUNC(z80sio_device::ctsa_w));
|
||||
modem.dcd_handler().set("sio", FUNC(z80sio_device::dcda_w));
|
||||
modem.dsr_handler().set("pio", FUNC(z80pio_device::pb6_w));
|
||||
|
||||
rs232_port_device &printer(RS232_PORT(config, "printer", default_rs232_devices, nullptr));
|
||||
printer.rxd_handler().set("sio", FUNC(z80sio_device::rxb_w));
|
||||
printer.cts_handler().set("sio", FUNC(z80sio_device::ctsa_w));
|
||||
printer.dcd_handler().set("sio", FUNC(z80sio_device::dcda_w));
|
||||
}
|
||||
|
||||
|
||||
ROM_START(adm36)
|
||||
ROM_REGION(0x3000, "maincpu", 0)
|
||||
ROM_LOAD("u71_136261-012.bin", 0x0000, 0x2000, CRC(f08315c7) SHA1(3943a5fc587e690df81aa9694e6e452673ec5513))
|
||||
ROM_LOAD("u72_131671-015.bin", 0x2000, 0x1000, CRC(c397f4e2) SHA1(21513472fe4237bda8448a2ad85496757d4ece12))
|
||||
// U73-U75 are empty sockets
|
||||
|
||||
ROM_REGION(0x1000, "chargen", 0)
|
||||
ROM_LOAD("u56.bin", 0x0000, 0x1000, CRC(70e46897) SHA1(85b4360912fc05243b3b2df29bde5a3def94086b))
|
||||
ROM_END
|
||||
|
||||
|
||||
COMP(1981, adm36, 0, 0, adm36, adm36, adm36_state, empty_init, "Lear Siegler", "ADM 36 Video Display Terminal", MACHINE_IS_SKELETON)
|
||||
@ -916,6 +916,9 @@ adm23 //
|
||||
@source:adm31.cpp
|
||||
adm31 //
|
||||
|
||||
@source:adm36.cpp
|
||||
adm36 //
|
||||
|
||||
@source:adp.cpp
|
||||
fashiong // (c) 1997
|
||||
fashiong2 // (c) 1997
|
||||
|
||||
@ -24,6 +24,7 @@ acvirus.cpp
|
||||
adam.cpp
|
||||
adm23.cpp
|
||||
adm31.cpp
|
||||
adm36.cpp
|
||||
advision.cpp
|
||||
agat.cpp
|
||||
aim65.cpp
|
||||
|
||||
Loading…
Reference in New Issue
Block a user