// license:BSD-3-Clause // copyright-holders:AJR /**************************************************************************** Skeleton driver for Ampro Little Board/PC. This is unusual among PC/XT-compatible machines in that many standard peripheral functions, including the interrupt and refresh controllers, are integrated into the V40 CPU itself, with some software assistance to compensate for DMAC incompatibilities. Two Vadem SDIP64 ASICs and a standard FDC and UART provide most other PC-like hardware features. The BIOS also supports the onboard SCSI controller. ****************************************************************************/ #include "emu.h" #include "bus/isa/isa.h" #include "bus/isa/isa_cards.h" #include "bus/nscsi/devices.h" #include "bus/rs232/rs232.h" #include "cpu/nec/v5x.h" #include "machine/ins8250.h" #include "machine/ncr5380n.h" #include "machine/upd765.h" #include "sound/spkrdev.h" #include "speaker.h" class lbpc_state : public driver_device { public: lbpc_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) , m_maincpu(*this, "maincpu") , m_expbus(*this, "expbus") , m_speaker(*this, "speaker") , m_port61(0xff) , m_speaker_data(false) { } void lbpc(machine_config &config); protected: virtual void machine_start() override; virtual void machine_reset() override; private: u8 exp_dack1_r(); void exp_dack1_w(u8 data); DECLARE_WRITE_LINE_MEMBER(iochck_w); u8 port61_r(); void port61_w(u8 data); DECLARE_WRITE_LINE_MEMBER(out2_w); void mem_map(address_map &map); void io_map(address_map &map); required_device m_maincpu; required_device m_expbus; required_device m_speaker; u8 m_port61; bool m_speaker_data; }; void lbpc_state::machine_start() { save_item(NAME(m_port61)); save_item(NAME(m_speaker_data)); } void lbpc_state::machine_reset() { port61_w(0); } u8 lbpc_state::exp_dack1_r() { return m_expbus->dack_r(0); } void lbpc_state::exp_dack1_w(u8 data) { m_expbus->dack_w(0, data); } WRITE_LINE_MEMBER(lbpc_state::iochck_w) { // TODO } u8 lbpc_state::port61_r() { return m_port61; } void lbpc_state::port61_w(u8 data) { if (BIT(m_port61, 1) && !BIT(data, 1)) m_speaker->level_w(0); else if (!BIT(m_port61, 1) && BIT(data, 1)) m_speaker->level_w(m_speaker_data); m_maincpu->tctl2_w(BIT(data, 0)); m_port61 = data; } WRITE_LINE_MEMBER(lbpc_state::out2_w) { m_speaker_data = state; if (BIT(m_port61, 1)) m_speaker->level_w(state); } void lbpc_state::mem_map(address_map &map) { map(0x00000, 0x9ffff).ram(); // 256K, 512K or 768K DRAM // 0xE0000–0xEFFFF: empty socket // 0xF0000-0xF7FFF: empty socket map(0xf8000, 0xfffff).rom().region("bios", 0); } void lbpc_state::io_map(address_map &map) { map(0x0061, 0x0061).rw(FUNC(lbpc_state::port61_r), FUNC(lbpc_state::port61_w)); map(0x0330, 0x0337).rw("scsi:7:ncr", FUNC(ncr53c80_device::read), FUNC(ncr53c80_device::write)); map(0x0370, 0x0377).m("fdc", FUNC(wd37c65c_device::map)); map(0x03f8, 0x03ff).rw("com", FUNC(ins8250_device::ins8250_r), FUNC(ins8250_device::ins8250_w)); } static INPUT_PORTS_START(lbpc) INPUT_PORTS_END void lbpc_state::lbpc(machine_config &config) { V40(config, m_maincpu, 14.318181_MHz_XTAL); // 7.16 MHz operating frequency m_maincpu->set_addrmap(AS_PROGRAM, &lbpc_state::mem_map); m_maincpu->set_addrmap(AS_IO, &lbpc_state::io_map); m_maincpu->set_tclk(14.318181_MHz_XTAL / 12); // generated by ASIC1 m_maincpu->out_handler<2>().set(FUNC(lbpc_state::out2_w)); m_maincpu->out_hreq_cb().set_inputline(m_maincpu, INPUT_LINE_HALT); m_maincpu->out_hreq_cb().append(m_maincpu, FUNC(v40_device::hack_w)); m_maincpu->in_memr_cb().set([this] (offs_t offset) { return m_maincpu->space(AS_PROGRAM).read_byte(offset); }); m_maincpu->out_memw_cb().set([this] (offs_t offset, u8 data) { m_maincpu->space(AS_PROGRAM).write_byte(offset, data); }); m_maincpu->in_ior_cb<0>().set(FUNC(lbpc_state::exp_dack1_r)); m_maincpu->out_iow_cb<0>().set(FUNC(lbpc_state::exp_dack1_w)); m_maincpu->in_ior_cb<1>().set("fdc", FUNC(wd37c65c_device::dma_r)); m_maincpu->out_iow_cb<1>().set("fdc", FUNC(wd37c65c_device::dma_w)); m_maincpu->in_ior_cb<2>().set("scsi:7:ncr", FUNC(ncr53c80_device::dma_r)); m_maincpu->out_iow_cb<2>().set("scsi:7:ncr", FUNC(ncr53c80_device::dma_w)); SPEAKER(config, "mono").front_center(); SPEAKER_SOUND(config, m_speaker).add_route(ALL_OUTPUTS, "mono", 0.5); ins8250_device &com(INS8250(config, "com", 1.8432_MHz_XTAL)); // NS8250AV com.out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ4); com.out_rts_callback().set("serial", FUNC(rs232_port_device::write_rts)); // J3 pin 4 com.out_tx_callback().set("serial", FUNC(rs232_port_device::write_txd)); // J3 pin 5 com.out_dtr_callback().set("serial", FUNC(rs232_port_device::write_dtr)); // J3 pin 7 wd37c65c_device &fdc(WD37C65C(config, "fdc", 16_MHz_XTAL, 9.6_MHz_XTAL)); // WD37C65BJM fdc.intrq_wr_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ6); fdc.drq_wr_callback().set(m_maincpu, FUNC(v40_device::dreq_w<1>)); NSCSI_BUS(config, "scsi"); NSCSI_CONNECTOR(config, "scsi:0", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:1", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:2", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:3", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:4", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:5", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:6", default_scsi_devices, nullptr); NSCSI_CONNECTOR(config, "scsi:7").option_set("ncr", NCR53C80).machine_config([this] (device_t *device) { downcast(*device).drq_handler().set(m_maincpu, FUNC(v40_device::dreq_w<2>)); }); rs232_port_device &serial(RS232_PORT(config, "serial", default_rs232_devices, nullptr)); serial.dcd_handler().set("com", FUNC(ins8250_device::dcd_w)); // J3 pin 1 serial.dsr_handler().set("com", FUNC(ins8250_device::dsr_w)); // J3 pin 2 serial.rxd_handler().set("com", FUNC(ins8250_device::rx_w)); // J3 pin 3 serial.cts_handler().set("com", FUNC(ins8250_device::cts_w)); // J3 pin 6 serial.ri_handler().set("com", FUNC(ins8250_device::ri_w)); // J3 pin 8 ISA8(config, m_expbus, 14.318181_MHz_XTAL / 2); m_expbus->set_memspace(m_maincpu, AS_PROGRAM); m_expbus->set_iospace(m_maincpu, AS_IO); m_expbus->drq1_callback().set(m_maincpu, FUNC(v40_device::dreq_w<0>)); m_expbus->irq2_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ2); m_expbus->irq3_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ3); m_expbus->irq5_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ5); m_expbus->iochck_callback().set(FUNC(lbpc_state::iochck_w)); ISA8_SLOT(config, "exp", 0, m_expbus, pc_isa8_cards, "ega", false); } ROM_START(lbpc) ROM_REGION(0x8000, "bios", 0) // "Firmware Version 1.0H 03/08/89" ROM_LOAD("lbpc-bio.rom", 0x0000, 0x8000, CRC(47bddf8b) SHA1(8a04fe34502f9f3bfe1e233762bbd5bbdd1c455d)) ROM_END COMP(1989, lbpc, 0, 0, lbpc, lbpc, lbpc_state, empty_init, "Ampro Computers", "Little Board/PC", MACHINE_NOT_WORKING)