// license:GPL-2.0+ // copyright-holders:Dirk Best /*************************************************************************** Regnecentralen RC759 Piccoline Status: Error 32 (cassette data error) ***************************************************************************/ #include "emu.h" #include "cpu/i86/i186.h" #include "imagedev/cassette.h" #include "machine/i8255.h" #include "machine/keyboard.h" #include "machine/mm58167.h" #include "machine/nvram.h" #include "machine/pic8259.h" #include "machine/ram.h" #include "machine/wd_fdc.h" #include "sound/sn76496.h" #include "sound/spkrdev.h" #include "video/i82730.h" #include "bus/centronics/ctronics.h" #include "bus/isbx/isbx.h" #include "screen.h" #include "speaker.h" //************************************************************************** // TYPE DEFINITIONS //************************************************************************** class rc759_state : public driver_device { public: rc759_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag), m_maincpu(*this, "maincpu"), m_pic(*this, "pic"), m_nvram(*this, "nvram"), m_ppi(*this, "ppi"), m_txt(*this, "txt"), m_cas(*this, "cas"), m_isbx(*this, "isbx"), m_speaker(*this, "speaker"), m_snd(*this, "snd"), m_rtc(*this, "rtc"), m_centronics(*this, "centronics"), m_fdc(*this, "fdc"), m_floppy0(*this, "fdc:0"), m_floppy1(*this, "fdc:1"), m_vram(*this, "vram"), m_config(*this, "config"), m_cas_enabled(0), m_cas_data(0), m_drq_source(0), m_nvram_bank(0), m_gfx_mode(0), m_keyboard_enable(0), m_keyboard_key(0x00), m_centronics_strobe(0), m_centronics_init(0), m_centronics_select_in(0), m_centronics_busy(0), m_centronics_ack(0), m_centronics_fault(0), m_centronics_perror(0), m_centronics_select(0), m_centronics_data(0xff) { } void keyb_put(u8 data); DECLARE_READ8_MEMBER(keyboard_r); DECLARE_WRITE8_MEMBER(floppy_control_w); DECLARE_READ8_MEMBER(floppy_ack_r); DECLARE_WRITE8_MEMBER(floppy_reserve_w); DECLARE_WRITE8_MEMBER(floppy_release_w); DECLARE_READ8_MEMBER(ppi_porta_r); DECLARE_READ8_MEMBER(ppi_portb_r); DECLARE_WRITE8_MEMBER(ppi_portc_w); DECLARE_WRITE_LINE_MEMBER(centronics_busy_w); DECLARE_WRITE_LINE_MEMBER(centronics_ack_w); DECLARE_WRITE_LINE_MEMBER(centronics_fault_w); DECLARE_WRITE_LINE_MEMBER(centronics_perror_w); DECLARE_WRITE_LINE_MEMBER(centronics_select_w); DECLARE_READ8_MEMBER(centronics_data_r); DECLARE_WRITE8_MEMBER(centronics_data_w); DECLARE_READ8_MEMBER(centronics_control_r); DECLARE_WRITE8_MEMBER(centronics_control_w); I82730_UPDATE_ROW(txt_update_row); DECLARE_WRITE16_MEMBER(txt_ca_w); DECLARE_WRITE16_MEMBER(txt_irst_w); DECLARE_READ8_MEMBER(palette_r); DECLARE_WRITE8_MEMBER(palette_w); DECLARE_WRITE_LINE_MEMBER(i186_timer0_w); DECLARE_WRITE_LINE_MEMBER(i186_timer1_w); void nvram_init(nvram_device &nvram, void *data, size_t size); DECLARE_READ8_MEMBER(nvram_r); DECLARE_WRITE8_MEMBER(nvram_w); DECLARE_READ8_MEMBER(rtc_r); DECLARE_WRITE8_MEMBER(rtc_w); DECLARE_READ8_MEMBER(irq_callback); void rc759(machine_config &config); void rc759_io(address_map &map); void rc759_map(address_map &map); protected: // driver_device overrides virtual void machine_start() override; virtual void machine_reset() override; private: required_device m_maincpu; required_device m_pic; required_device m_nvram; required_device m_ppi; required_device m_txt; required_device m_cas; required_device m_isbx; required_device m_speaker; required_device m_snd; required_device m_rtc; required_device m_centronics; required_device m_fdc; required_device m_floppy0; required_device m_floppy1; required_shared_ptr m_vram; required_ioport m_config; std::vector m_nvram_mem; int m_cas_enabled; int m_cas_data; int m_drq_source; int m_nvram_bank; int m_gfx_mode; int m_keyboard_enable; uint8_t m_keyboard_key; int m_centronics_strobe; int m_centronics_init; int m_centronics_select_in; int m_centronics_busy; int m_centronics_ack; int m_centronics_fault; int m_centronics_perror; int m_centronics_select; uint8_t m_centronics_data; }; //************************************************************************** // I/O //************************************************************************** void rc759_state::keyb_put(u8 data) { m_keyboard_key = data; m_pic->ir1_w(1); } READ8_MEMBER( rc759_state::keyboard_r ) { logerror("keyboard_r\n"); m_pic->ir1_w(0); if (m_keyboard_enable) return m_keyboard_key; else return 0x00; } READ8_MEMBER( rc759_state::ppi_porta_r ) { uint8_t data = 0; data |= m_cas_enabled ? m_cas_data : (m_cas->input() > 0 ? 1 : 0); data |= m_isbx->mpst_r() << 1; data |= m_isbx->opt0_r() << 2; data |= m_isbx->opt1_r() << 3; data |= 1 << 4; // mem ident0 data |= 1 << 5; // mem ident1 (both 1 = 256k installed) data |= 1 << 6; // dpc connect (0 = external floppy/printer installed) data |= 1 << 7; // not used return data; } READ8_MEMBER( rc759_state::ppi_portb_r ) { uint8_t data = 0; data |= 1 << 0; // 0 = micronet controller installed data |= 1 << 1; // rtc type, mm58167/cdp1879 data |= m_snd->ready_r() << 2; data |= 1 << 3; // not used data |= 1 << 4; // not used data |= m_config->read(); // monitor type and frequency data |= 1 << 7; // 0 = enable remote hardware debug (using an isbx351 module) return data; } WRITE8_MEMBER( rc759_state::ppi_portc_w ) { m_cas_enabled = BIT(data, 0); m_cas->change_state(BIT(data, 1) ? CASSETTE_MOTOR_DISABLED : CASSETTE_MOTOR_ENABLED, CASSETTE_MASK_MOTOR); m_drq_source = (data >> 2) & 0x03; m_nvram_bank = (data >> 4) & 0x03; m_gfx_mode = BIT(data, 6); m_keyboard_enable = BIT(data, 7); logerror("ppi_portc_w: cas_enabled: %d, cas_motor: %d, drq_source: %d, nvram_bank: %d, gfx_mode: %d, keyb_enable: %d\n", m_cas_enabled, BIT(data, 1), m_drq_source, m_nvram_bank, m_gfx_mode, m_keyboard_enable); } WRITE_LINE_MEMBER( rc759_state::centronics_busy_w ) { m_centronics_busy = state; m_pic->ir6_w(state); } WRITE_LINE_MEMBER( rc759_state::centronics_ack_w ) { m_centronics_ack = state; } WRITE_LINE_MEMBER( rc759_state::centronics_fault_w ) { m_centronics_fault = state; } WRITE_LINE_MEMBER( rc759_state::centronics_perror_w ) { m_centronics_perror = state; } WRITE_LINE_MEMBER( rc759_state::centronics_select_w ) { m_centronics_select = state; } READ8_MEMBER( rc759_state::centronics_data_r ) { return m_centronics_data; } WRITE8_MEMBER( rc759_state::centronics_data_w ) { m_centronics_data = data; m_centronics->write_data0(BIT(data, 0)); m_centronics->write_data1(BIT(data, 1)); m_centronics->write_data2(BIT(data, 2)); m_centronics->write_data3(BIT(data, 3)); m_centronics->write_data4(BIT(data, 4)); m_centronics->write_data5(BIT(data, 5)); m_centronics->write_data6(BIT(data, 6)); m_centronics->write_data7(BIT(data, 7)); } READ8_MEMBER( rc759_state::centronics_control_r ) { uint8_t data = 0; data |= m_centronics_busy << 0; data |= m_centronics_ack << 1; data |= m_centronics_fault << 2; data |= m_centronics_perror << 3; data |= m_centronics_select << 4; data |= !m_centronics_strobe << 5; data |= !m_centronics_init << 6; data |= !m_centronics_select_in << 7; return data; } WRITE8_MEMBER( rc759_state::centronics_control_w ) { logerror("centronics_control_w: %02x\n", data); m_centronics_strobe = BIT(data, 0); m_centronics_init = BIT(data, 2); m_centronics_select_in = BIT(data, 4); m_centronics->write_strobe(m_centronics_strobe); m_centronics->write_autofd(BIT(data, 1)); m_centronics->write_init(m_centronics_init); m_centronics->write_select_in(m_centronics_select_in); } WRITE8_MEMBER( rc759_state::floppy_control_w ) { logerror("floppy_control_w: %02x\n", data); switch (BIT(data, 0)) { case 0: m_fdc->set_floppy(m_floppy0->get_device()); break; case 1: m_fdc->set_floppy(m_floppy1->get_device()); break; } if (m_floppy0->get_device()) m_floppy0->get_device()->mon_w(!BIT(data, 1)); if (m_floppy1->get_device()) m_floppy1->get_device()->mon_w(!BIT(data, 2)); // bit 3, enable precomp // bit 4, precomp 125/250 nsec m_fdc->dden_w(BIT(data, 5)); m_fdc->set_unscaled_clock(BIT(data, 6) ? 2000000 : 1000000); m_fdc->set_force_ready(BIT(data, 7)); } READ8_MEMBER( rc759_state::floppy_ack_r ) { logerror("floppy_ack_r\n"); return 0xff; } WRITE8_MEMBER( rc759_state::floppy_reserve_w ) { logerror("floppy_reserve_w: %02x\n", data); } WRITE8_MEMBER( rc759_state::floppy_release_w ) { logerror("floppy_release_w: %02x\n", data); } //************************************************************************** // VIDEO EMULATION //************************************************************************** I82730_UPDATE_ROW( rc759_state::txt_update_row ) { for (int i = 0; i < x_count; i++) { uint16_t gfx = m_vram[(data[i] & 0x3ff) << 4 | lc]; // pretty crude detection if char sizes have been initialized, need something better if ((gfx & 0xff) == 0) continue; // figure out char width int width; for (width = 0; width < 16; width++) if (BIT(gfx, width) == 0) break; width = 15 - width; for (int p = 0; p < width; p++) bitmap.pix32(y, i * width + p) = BIT(gfx, 15 - p) ? rgb_t::white() : rgb_t::black(); } } WRITE16_MEMBER( rc759_state::txt_ca_w ) { m_txt->ca_w(1); m_txt->ca_w(0); } WRITE16_MEMBER( rc759_state::txt_irst_w ) { m_txt->irst_w(1); m_txt->irst_w(0); } READ8_MEMBER( rc759_state::palette_r ) { logerror("palette_r(%02x)\n", offset); return 0xff; } WRITE8_MEMBER( rc759_state::palette_w ) { logerror("palette_w(%02x): %02x\n", offset, data); } //************************************************************************** // SOUND/RTC //************************************************************************** READ8_MEMBER( rc759_state::rtc_r ) { logerror("rtc_r(%02x)\n", offset); return 0xff; } WRITE8_MEMBER( rc759_state::rtc_w ) { logerror("rtc_w(%02x): %02x\n", offset, data); } //************************************************************************** // MACHINE EMULATION //************************************************************************** WRITE_LINE_MEMBER( rc759_state::i186_timer0_w ) { if (m_cas_enabled) { m_cas_data = state; m_cas->output(state ? -1.0 : 1.0); } } WRITE_LINE_MEMBER( rc759_state::i186_timer1_w ) { m_speaker->level_w(state); } // 256x4 nvram is bank-switched using ppi port c, bit 4 and 5 void rc759_state::nvram_init(nvram_device &nvram, void *data, size_t size) { memset(data, 0x00, size); memset(data, 0xaa, 1); } READ8_MEMBER( rc759_state::nvram_r ) { offs_t addr = (m_nvram_bank << 6) | offset; logerror("nvram_r(%02x)\n", addr); if (addr & 1) return (m_nvram_mem[addr >> 1] & 0xf0) >> 4; else return (m_nvram_mem[addr >> 1] & 0x0f) >> 0; } WRITE8_MEMBER( rc759_state::nvram_w ) { offs_t addr = (m_nvram_bank << 6) | offset; logerror("nvram_w(%02x): %02x\n", addr, data); if (addr & 1) m_nvram_mem[addr >> 1] = ((data << 4) & 0xf0) | (m_nvram_mem[addr >> 1] & 0x0f); else m_nvram_mem[addr >> 1] = (m_nvram_mem[addr >> 1] & 0xf0) | (data & 0x0f); } READ8_MEMBER( rc759_state::irq_callback ) { return m_pic->acknowledge(); } void rc759_state::machine_start() { m_nvram_mem.resize(256 / 2); m_nvram->set_base(&m_nvram_mem[0], 256 / 2); } void rc759_state::machine_reset() { } //************************************************************************** // ADDRESS MAPS //************************************************************************** void rc759_state::rc759_map(address_map &map) { map(0x00000, 0x3ffff).ram(); map(0xd0000, 0xd7fff).mirror(0x08000).ram().share("vram"); map(0xe8000, 0xeffff).mirror(0x10000).rom().region("bios", 0); } void rc759_state::rc759_io(address_map &map) { map.unmap_value_high(); map(0x000, 0x003).mirror(0x0c).rw(m_pic, FUNC(pic8259_device::read), FUNC(pic8259_device::write)).umask16(0x00ff); map(0x020, 0x020).r(this, FUNC(rc759_state::keyboard_r)); map(0x056, 0x057).noprw(); // in reality, access to sound and rtc is a bit more involved map(0x05a, 0x05a).w(m_snd, FUNC(sn76489a_device::write)); map(0x05c, 0x05c).rw(this, FUNC(rc759_state::rtc_r), FUNC(rc759_state::rtc_w)); // AM_RANGE(0x060, 0x06f) AM_WRITE8(crt_control_w, 0x00ff) map(0x070, 0x077).mirror(0x08).rw(m_ppi, FUNC(i8255_device::read), FUNC(i8255_device::write)).umask16(0x00ff); map(0x080, 0x0ff).rw(this, FUNC(rc759_state::nvram_r), FUNC(rc759_state::nvram_w)).umask16(0x00ff); // AM_RANGE(0x100, 0x101) net map(0x180, 0x1bf).rw(this, FUNC(rc759_state::palette_r), FUNC(rc759_state::palette_w)).umask16(0x00ff); map(0x230, 0x231).w(this, FUNC(rc759_state::txt_irst_w)); map(0x240, 0x241).w(this, FUNC(rc759_state::txt_ca_w)); map(0x250, 0x250).rw(this, FUNC(rc759_state::centronics_data_r), FUNC(rc759_state::centronics_data_w)); map(0x260, 0x260).rw(this, FUNC(rc759_state::centronics_control_r), FUNC(rc759_state::centronics_control_w)); map(0x280, 0x287).rw(m_fdc, FUNC(wd2797_device::read), FUNC(wd2797_device::write)).umask16(0x00ff); map(0x288, 0x288).w(this, FUNC(rc759_state::floppy_control_w)); // AM_RANGE(0x28a, 0x28b) external printer data // AM_RANGE(0x28d, 0x28d) external printer control map(0x28e, 0x28e).rw(this, FUNC(rc759_state::floppy_ack_r), FUNC(rc759_state::floppy_reserve_w)); map(0x290, 0x290).w(this, FUNC(rc759_state::floppy_release_w)); // AM_RANGE(0x292, 0x293) AM_READWRITE8(printer_ack_r, printer_reserve_w, 0x00ff) // AM_RANGE(0x294, 0x295) AM_WRITE8(printer_release_w, 0x00ff) map(0x300, 0x30f).rw(m_isbx, FUNC(isbx_slot_device::mcs0_r), FUNC(isbx_slot_device::mcs0_w)).umask16(0x00ff); map(0x310, 0x31f).rw(m_isbx, FUNC(isbx_slot_device::mcs1_r), FUNC(isbx_slot_device::mcs1_w)).umask16(0x00ff); // AM_RANGE(0x320, 0x321) isbx dma ack // AM_RANGE(0x330, 0x331) isbx tc } //************************************************************************** // INPUTS //************************************************************************** static INPUT_PORTS_START( rc759 ) PORT_START("config") PORT_CONFNAME(0x20, 0x00, "Monitor Type") PORT_CONFSETTING(0x00, "Color") PORT_CONFSETTING(0x20, "Monochrome") PORT_CONFNAME(0x40, 0x00, "Monitor Frequency") PORT_CONFSETTING(0x00, "15 kHz") PORT_CONFSETTING(0x40, "22 kHz") INPUT_PORTS_END //************************************************************************** // MACHINE DRIVERS //************************************************************************** static void rc759_floppies(device_slot_interface &device) { device.option_add("hd", FLOPPY_525_HD); } MACHINE_CONFIG_START(rc759_state::rc759) MCFG_DEVICE_ADD("maincpu", I80186, 6000000) MCFG_DEVICE_PROGRAM_MAP(rc759_map) MCFG_DEVICE_IO_MAP(rc759_io) MCFG_80186_IRQ_SLAVE_ACK(READ8(*this, rc759_state, irq_callback)) MCFG_80186_TMROUT0_HANDLER(WRITELINE(*this, rc759_state, i186_timer0_w)) MCFG_80186_TMROUT1_HANDLER(WRITELINE(*this, rc759_state, i186_timer1_w)) // interrupt controller MCFG_DEVICE_ADD("pic", PIC8259, 0) MCFG_PIC8259_OUT_INT_CB(WRITELINE("maincpu", i80186_cpu_device, int0_w)) // nvram MCFG_NVRAM_ADD_CUSTOM_DRIVER("nvram", rc759_state, nvram_init) // ppi MCFG_DEVICE_ADD("ppi", I8255, 0) MCFG_I8255_IN_PORTA_CB(READ8(*this, rc759_state, ppi_porta_r)) MCFG_I8255_IN_PORTB_CB(READ8(*this, rc759_state, ppi_portb_r)) MCFG_I8255_OUT_PORTC_CB(WRITE8(*this, rc759_state, ppi_portc_w)) // rtc MCFG_DEVICE_ADD("rtc", MM58167, XTAL(32'768)) MCFG_MM58167_IRQ_CALLBACK(WRITELINE("pic", pic8259_device, ir3_w)) // video MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_RAW_PARAMS(1250000 * 16, 896, 96, 816, 377, 4, 364) // 22 kHz setting MCFG_SCREEN_UPDATE_DEVICE("txt", i82730_device, screen_update) MCFG_I82730_ADD("txt", "maincpu", 1250000) MCFG_VIDEO_SET_SCREEN("screen") MCFG_I82730_UPDATE_ROW_CB(rc759_state, txt_update_row) MCFG_I82730_SINT_HANDLER(WRITELINE("pic", pic8259_device, ir4_w)) // keyboard MCFG_DEVICE_ADD("keyb", GENERIC_KEYBOARD, 0) MCFG_GENERIC_KEYBOARD_CB(PUT(rc759_state, keyb_put)) // cassette MCFG_CASSETTE_ADD("cas") MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_PLAY | CASSETTE_MOTOR_DISABLED | CASSETTE_SPEAKER_MUTED) // sound SPEAKER(config, "mono").front_center(); MCFG_DEVICE_ADD("speaker", SPEAKER_SOUND) MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50) MCFG_DEVICE_ADD("snd", SN76489A, XTAL(20'000'000) / 10) MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) // internal centronics MCFG_CENTRONICS_ADD("centronics", centronics_devices, "printer") MCFG_CENTRONICS_BUSY_HANDLER(WRITELINE(*this, rc759_state, centronics_busy_w)) MCFG_CENTRONICS_ACK_HANDLER(WRITELINE(*this, rc759_state, centronics_ack_w)) MCFG_CENTRONICS_FAULT_HANDLER(WRITELINE(*this, rc759_state, centronics_fault_w)) MCFG_CENTRONICS_PERROR_HANDLER(WRITELINE(*this, rc759_state, centronics_perror_w)) MCFG_CENTRONICS_SELECT_HANDLER(WRITELINE(*this, rc759_state, centronics_select_w)) // isbx slot MCFG_ISBX_SLOT_ADD("isbx", 0, isbx_cards, nullptr) MCFG_ISBX_SLOT_MINTR0_CALLBACK(WRITELINE("maincpu", i80186_cpu_device, int1_w)) MCFG_ISBX_SLOT_MINTR1_CALLBACK(WRITELINE("maincpu", i80186_cpu_device, int3_w)) MCFG_ISBX_SLOT_MDRQT_CALLBACK(WRITELINE("maincpu", i80186_cpu_device, drq0_w)) // floppy disk controller MCFG_WD2797_ADD("fdc", 1000000) // MCFG_WD_FDC_INTRQ_CALLBACK(WRITELINE("pic", pic8259_device, ir0_w)) // MCFG_WD_FDC_DRQ_CALLBACK(WRITELINE("maincpu", i80186_cpu_device, drq1_w)) // floppy drives MCFG_FLOPPY_DRIVE_ADD("fdc:0", rc759_floppies, "hd", floppy_image_device::default_floppy_formats) MCFG_FLOPPY_DRIVE_ADD("fdc:1", rc759_floppies, "hd", floppy_image_device::default_floppy_formats) MACHINE_CONFIG_END //************************************************************************** // ROM DEFINITIONS //************************************************************************** ROM_START( rc759 ) ROM_REGION(0x8000, "bios", 0) ROM_SYSTEM_BIOS(0, "1-21", "1? Version 2.1") ROMX_LOAD("rc759-1-2.1.rom", 0x0000, 0x8000, CRC(3a777d56) SHA1(a8592d61d5e1f92651a6f5e41c4ba14c9b6cc39b), ROM_BIOS(1)) ROM_SYSTEM_BIOS(1, "1-51", "1? Version 5.1") ROMX_LOAD("rc759-1-5.1.rom", 0x0000, 0x8000, CRC(e1d53845) SHA1(902dc5ce28efd26b4f9c631933e197c2c187a7f1), ROM_BIOS(2)) ROM_SYSTEM_BIOS(2, "2-40", "2? Version 4.0") ROMX_LOAD("rc759-2-4.0.rom", 0x0000, 0x8000, CRC(d3cb752a) SHA1(f50afe5dfa1b33a36a665d32d57c8c41d6685005), ROM_BIOS(3)) ROM_SYSTEM_BIOS(3, "2-51", "2? Version 5.1") ROMX_LOAD("rc759-2-5.1.rom", 0x0000, 0x8000, CRC(00a31948) SHA1(23c4473c641606a56473791773270411d1019248), ROM_BIOS(4)) ROM_END //************************************************************************** // SYSTEM DRIVERS //************************************************************************** COMP( 1984, rc759, 0, 0, rc759, rc759, rc759_state, empty_init, "Regnecentralen", "RC759 Piccoline", MACHINE_NOT_WORKING | MACHINE_NO_SOUND )