// license:BSD-3-Clause // copyright-holders:Phill Harvey-Smith /* drivers/mbc55x.cpp Machine driver for the Sanyo MBC-550 and MBC-555. Phill Harvey-Smith 2011-01-29. */ #include "emu.h" #include "includes/mbc55x.h" #include "bus/isa/isa.h" #include "bus/isa/isa_cards.h" #include "bus/rs232/rs232.h" #include "machine/clock.h" #include "machine/i8087.h" #include "machine/input_merger.h" #include "machine/mbc55x_kbd.h" #include "screen.h" #include "softlist.h" #include "speaker.h" void mbc55x_state::mbc55x_mem(address_map &map) { map(0x00000, 0x0FFFF).bankrw(RAM_BANK00_TAG); map(0x10000, 0x1FFFF).bankrw(RAM_BANK01_TAG); map(0x20000, 0x2FFFF).bankrw(RAM_BANK02_TAG); map(0x30000, 0x3FFFF).bankrw(RAM_BANK03_TAG); map(0x40000, 0x4FFFF).bankrw(RAM_BANK04_TAG); map(0x50000, 0x5FFFF).bankrw(RAM_BANK05_TAG); map(0x60000, 0x6FFFF).bankrw(RAM_BANK06_TAG); map(0x70000, 0x7FFFF).bankrw(RAM_BANK07_TAG); map(0x80000, 0x8FFFF).bankrw(RAM_BANK08_TAG); map(0x90000, 0x9FFFF).bankrw(RAM_BANK09_TAG); map(0xA0000, 0xAFFFF).bankrw(RAM_BANK0A_TAG); map(0xB0000, 0xBFFFF).bankrw(RAM_BANK0B_TAG); map(0xC0000, 0xCFFFF).bankrw(RAM_BANK0C_TAG); map(0xD0000, 0xDFFFF).bankrw(RAM_BANK0D_TAG); map(0xE0000, 0xEFFFF).bankrw(RAM_BANK0E_TAG); map(0xF0000, 0xF3FFF).bankrw(RED_PLANE_TAG); map(0xF4000, 0xF7FFF).bankrw(BLUE_PLANE_TAG); map(0xF8000, 0xFBFFF).noprw(); map(0xFC000, 0xFDFFF).rom().nopw().region(MAINCPU_TAG, 0x0000).mirror(0x002000); } void mbc55x_state::mbc55x_io(address_map &map) { map(0x0000, 0x0000).select(0x003e).rw(FUNC(mbc55x_state::iodecode_r), FUNC(mbc55x_state::iodecode_w)); } void mbc55x_state::mbc55x_iodecode(address_map &map) { map(0x00, 0x01).mirror(0x02).rw(m_pic, FUNC(pic8259_device::read), FUNC(pic8259_device::write)); map(0x04, 0x07).rw(m_fdc, FUNC(fd1793_device::read), FUNC(fd1793_device::write)); map(0x08, 0x08).mirror(0x03).rw(FUNC(mbc55x_state::vram_page_r), FUNC(mbc55x_state::vram_page_w)); map(0x0c, 0x0f).rw(m_ppi, FUNC(i8255_device::read), FUNC(i8255_device::write)); map(0x10, 0x13).rw(m_pit, FUNC(pit8253_device::read), FUNC(pit8253_device::write)); map(0x14, 0x15).mirror(0x02).rw("sio", FUNC(i8251_device::read), FUNC(i8251_device::write)); map(0x18, 0x18).mirror(0x02).rw(m_crtc, FUNC(mc6845_device::status_r), FUNC(mc6845_device::address_w)); map(0x19, 0x19).mirror(0x02).rw(m_crtc, FUNC(mc6845_device::register_r), FUNC(mc6845_device::register_w)); map(0x1c, 0x1d).mirror(0x02).rw(m_kb_uart, FUNC(i8251_device::read), FUNC(i8251_device::write)); } uint8_t mbc55x_state::iodecode_r(offs_t offset) { return m_iodecode->read8(offset >> 1); } void mbc55x_state::iodecode_w(offs_t offset, uint8_t data) { m_iodecode->write8(offset >> 1, data); } /* 8255 Configuration */ uint8_t mbc55x_state::game_io_r() { u8 result = m_gameio->sw3_r(); result |= m_gameio->sw2_r() << 1; result |= m_gameio->sw1_r() << 2; result |= m_gameio->sw0_r() << 3; for (int i = 0; i < 4; i++) if (machine().time().as_double() < m_ls123_clear_time[i]) result |= 1 << (4 + i); return result; } uint8_t mbc55x_state::printer_status_r() { return m_printer_status; } void mbc55x_state::printer_data_w(uint8_t data) { m_printer->write_data7(!BIT(data, 7)); m_printer->write_data6(!BIT(data, 6)); m_printer->write_data5(!BIT(data, 5)); m_printer->write_data4(!BIT(data, 4)); m_printer->write_data3(!BIT(data, 3)); m_printer->write_data2(!BIT(data, 2)); m_printer->write_data1(!BIT(data, 1)); m_printer->write_data0(!BIT(data, 0)); m_gameio->an0_w(!BIT(data, 0)); m_gameio->an1_w(!BIT(data, 1)); m_gameio->an2_w(!BIT(data, 2)); m_gameio->an3_w(!BIT(data, 3)); m_gameio->an4_w(!BIT(data, 4)); m_gameio->strobe_w(!BIT(data, 5)); if (m_ls123_strobe != BIT(data, 7)) { if (BIT(data, 7)) { m_ls123_clear_time[0] = machine().time().as_double() + m_x_calibration * m_gameio->pdl0_r(); m_ls123_clear_time[1] = machine().time().as_double() + m_y_calibration * m_gameio->pdl1_r(); m_ls123_clear_time[2] = machine().time().as_double() + m_x_calibration * m_gameio->pdl2_r(); m_ls123_clear_time[3] = machine().time().as_double() + m_y_calibration * m_gameio->pdl3_r(); } m_ls123_strobe = BIT(data, 7); } } void mbc55x_state::disk_select_w(uint8_t data) { floppy_image_device *floppy = nullptr; switch (data & 0x03) { case 0: floppy = m_floppy[0]->get_device(); break; case 1: floppy = m_floppy[1]->get_device(); break; case 2: floppy = m_floppy[2]->get_device(); break; case 3: floppy = m_floppy[3]->get_device(); break; } m_fdc->set_floppy(floppy); if (floppy) { floppy->mon_w(0); floppy->ss_w(BIT(data, 2)); } m_printer->write_strobe(!BIT(data, 3)); } WRITE_LINE_MEMBER(mbc55x_state::printer_busy_w) { m_printer_status = (m_printer_status & 0xef) | (state ? 0x10 : 0x00); } WRITE_LINE_MEMBER(mbc55x_state::printer_paper_end_w) { m_printer_status = (m_printer_status & 0xdf) | (state ? 0x20 : 0x00); } WRITE_LINE_MEMBER(mbc55x_state::printer_select_w) { m_printer_status = (m_printer_status & 0xbf) | (state ? 0x40 : 0x00); } void mbc55x_state::set_ram_size() { address_space &space = m_maincpu->space( AS_PROGRAM ); int ramsize = m_ram->size(); int nobanks = ramsize / RAM_BANK_SIZE; char bank[10]; int bankno; uint8_t *ram = &m_ram->pointer()[0]; uint8_t *map_base; int bank_base; logerror("Ramsize is %d bytes\n",ramsize); logerror("RAM_BANK_SIZE=%d, nobanks=%d\n",RAM_BANK_SIZE,nobanks); // Main memory mapping for(bankno=0; banknoset_base(map_base); space.install_readwrite_bank(bank_base, bank_base+(RAM_BANK_SIZE-1), bank); logerror("Mapping bank %d at %05X to RAM\n",bankno,bank_base); } else { space.nop_readwrite(bank_base, bank_base+(RAM_BANK_SIZE-1)); logerror("Mapping bank %d at %05X to NOP\n",bankno,bank_base); } } // Graphics red and blue plane memory mapping, green is in main memory membank(RED_PLANE_TAG)->set_base(&m_video_mem[RED_PLANE_OFFSET]); space.install_readwrite_bank(RED_PLANE_MEMBASE, RED_PLANE_MEMBASE+(COLOUR_PLANE_SIZE-1), RED_PLANE_TAG); membank(BLUE_PLANE_TAG)->set_base(&m_video_mem[BLUE_PLANE_OFFSET]); space.install_readwrite_bank(BLUE_PLANE_MEMBASE, BLUE_PLANE_MEMBASE+(COLOUR_PLANE_SIZE-1), BLUE_PLANE_TAG); } void mbc55x_state::machine_reset() { set_ram_size(); } void mbc55x_state::machine_start() { // FIXME: values copied from apple2.cpp m_x_calibration = attotime::from_nsec(10800).as_double(); m_y_calibration = attotime::from_nsec(10800).as_double(); m_printer_status = 0xff; m_ls123_strobe = true; std::fill(std::begin(m_ls123_clear_time), std::end(m_ls123_clear_time), 0.0); m_kb_uart->write_cts(0); } static INPUT_PORTS_START( mbc55x ) INPUT_PORTS_END FLOPPY_FORMATS_MEMBER( mbc55x_state::floppy_formats ) FLOPPY_PC_FORMAT FLOPPY_FORMATS_END // MBC-550 : 1 x 5.25" disk-drive (160 KB) // MBC-555 : 2 x 5.25" disk-drive (160 KB) // MBC-555-2 : 2 x 5.25" disk-drive (360 KB) // MBC-555-3 : 2 x 5.25" disk-drive (720 KB) static void mbc55x_floppies(device_slot_interface &device) { device.option_add("ssdd", FLOPPY_525_SSDD); device.option_add("dd", FLOPPY_525_DD); device.option_add("qd", FLOPPY_525_QD); } void mbc55x_state::mbc55x(machine_config &config) { /* basic machine hardware */ I8088(config, m_maincpu, 14.318181_MHz_XTAL / 4); m_maincpu->set_addrmap(AS_PROGRAM, &mbc55x_state::mbc55x_mem); m_maincpu->set_addrmap(AS_IO, &mbc55x_state::mbc55x_io); m_maincpu->set_irq_acknowledge_callback(PIC8259_TAG, FUNC(pic8259_device::inta_cb)); m_maincpu->esc_opcode_handler().set("coproc", FUNC(i8087_device::insn_w)); m_maincpu->esc_data_handler().set("coproc", FUNC(i8087_device::addr_w)); i8087_device &i8087(I8087(config, "coproc", 14.318181_MHz_XTAL / 4)); i8087.set_space_88(m_maincpu, AS_PROGRAM); i8087.irq().set(m_pic, FUNC(pic8259_device::ir6_w)); i8087.busy().set_inputline("maincpu", INPUT_LINE_TEST); ADDRESS_MAP_BANK(config, m_iodecode); m_iodecode->endianness(ENDIANNESS_LITTLE); m_iodecode->data_width(8); m_iodecode->addr_width(5); m_iodecode->set_addrmap(0, &mbc55x_state::mbc55x_iodecode); mbc55x_keyboard_device &keyboard(MBC55X_KEYBOARD(config, "keyboard")); keyboard.txd_callback().set(m_kb_uart, FUNC(i8251_device::write_rxd)); /* video hardware */ screen_device &screen(SCREEN(config, SCREEN_TAG, SCREEN_TYPE_RASTER)); screen.set_raw(14.318181_MHz_XTAL, 896, 0, 640, 262, 0, 200); screen.set_screen_update(VID_MC6845_NAME, FUNC(mc6845_device::screen_update)); PALETTE(config, m_palette, FUNC(mbc55x_state::mbc55x_palette), SCREEN_NO_COLOURS * 3); RAM(config, RAM_TAG).set_default_size("128K").set_extra_options("128K,192K,256K,320K,384K,448K,512K,576K,640K"); /* sound hardware */ SPEAKER(config, MONO_TAG).front_center(); SPEAKER_SOUND(config, "speaker").add_route(ALL_OUTPUTS, MONO_TAG, 0.75); /* Devices */ I8251(config, m_kb_uart, 14.318181_MHz_XTAL / 8); m_kb_uart->txd_handler().set("speaker", FUNC(speaker_sound_device::level_w)).invert(); m_kb_uart->rts_handler().set(m_printer, FUNC(centronics_device::write_init)).invert(); m_kb_uart->rxrdy_handler().set(m_pic, FUNC(pic8259_device::ir3_w)); PIT8253(config, m_pit); m_pit->out_handler<0>().set(m_pic, FUNC(pic8259_device::ir0_w)); m_pit->out_handler<0>().append(m_pit, FUNC(pit8253_device::write_clk1)); m_pit->out_handler<1>().set(m_pic, FUNC(pic8259_device::ir1_w)); m_pit->set_clk<2>(14.318181_MHz_XTAL / 8); m_pit->out_handler<2>().set("sio", FUNC(i8251_device::write_txc)); m_pit->out_handler<2>().append("sio", FUNC(i8251_device::write_rxc)); m_pit->out_handler<2>().append("line", FUNC(rs232_port_device::write_etc)); clock_device &clk_78_6khz(CLOCK(config, "clk_78.6khz", 14.318181_MHz_XTAL / 14 / 13)); clk_78_6khz.signal_handler().set(m_pit, FUNC(pit8253_device::write_clk0)); clk_78_6khz.signal_handler().append(m_kb_uart, FUNC(i8251_device::write_txc)); clk_78_6khz.signal_handler().append(m_kb_uart, FUNC(i8251_device::write_rxc)); PIC8259(config, m_pic); m_pic->out_int_callback().set_inputline(m_maincpu, INPUT_LINE_IRQ0); I8255(config, m_ppi); m_ppi->in_pa_callback().set(FUNC(mbc55x_state::game_io_r)); m_ppi->out_pb_callback().set(FUNC(mbc55x_state::printer_data_w)); m_ppi->in_pc_callback().set(FUNC(mbc55x_state::printer_status_r)); m_ppi->out_pc_callback().set(FUNC(mbc55x_state::disk_select_w)); HD6845S(config, m_crtc, 14.318181_MHz_XTAL / 8); // HD46505SP-1 m_crtc->set_screen(SCREEN_TAG); m_crtc->set_show_border_area(false); m_crtc->set_char_width(8); m_crtc->set_update_row_callback(FUNC(mbc55x_state::crtc_update_row)); m_crtc->out_vsync_callback().set(FUNC(mbc55x_state::vid_vsync_changed)); m_crtc->out_hsync_callback().set(FUNC(mbc55x_state::vid_hsync_changed)); /* Backing storage */ FD1793(config, m_fdc, 14.318181_MHz_XTAL / 14); // M5W1793-02P (clock is nominally 1 MHz) m_fdc->intrq_wr_callback().set(m_pic, FUNC(pic8259_device::ir5_w)); FLOPPY_CONNECTOR(config, m_floppy[0], mbc55x_floppies, "qd", mbc55x_state::floppy_formats); FLOPPY_CONNECTOR(config, m_floppy[1], mbc55x_floppies, "qd", mbc55x_state::floppy_formats); FLOPPY_CONNECTOR(config, m_floppy[2], mbc55x_floppies, nullptr, mbc55x_state::floppy_formats); FLOPPY_CONNECTOR(config, m_floppy[3], mbc55x_floppies, nullptr, mbc55x_state::floppy_formats); /* Software list */ SOFTWARE_LIST(config, "disk_list").set_original("mbc55x"); isa8_device &isa(ISA8(config, "isa", 14.318181_MHz_XTAL / 4)); isa.set_memspace(m_maincpu, AS_PROGRAM); isa.set_iospace(m_maincpu, AS_IO); isa.irq7_callback().set(m_pic, FUNC(pic8259_device::ir7_w)); // all other IRQ and DRQ lines are NC isa.iochck_callback().set_inputline(m_maincpu, INPUT_LINE_NMI).invert(); ISA8_SLOT(config, "external", 0, "isa", pc_isa8_cards, nullptr, false); i8251_device &sio(I8251(config, "sio", 14.318181_MHz_XTAL / 8)); // on separate board, through 20-pin header sio.dtr_handler().set("line", FUNC(rs232_port_device::write_dtr)); sio.txd_handler().set("line", FUNC(rs232_port_device::write_txd)); sio.rts_handler().set("line", FUNC(rs232_port_device::write_rts)); sio.rxrdy_handler().set("sioint", FUNC(input_merger_device::in_w<0>)); sio.txrdy_handler().set("sioint", FUNC(input_merger_device::in_w<1>)); rs232_port_device &serial(RS232_PORT(config, "line", default_rs232_devices, nullptr)); serial.rxd_handler().set("sio", FUNC(i8251_device::write_rxd)); serial.dsr_handler().set("sio", FUNC(i8251_device::write_dsr)); serial.cts_handler().set("sio", FUNC(i8251_device::write_cts)); INPUT_MERGER_ANY_HIGH(config, "sioint").output_handler().set(m_pic, FUNC(pic8259_device::ir2_w)); APPLE2_GAMEIO(config, m_gameio, apple2_gameio_device::default_options, nullptr); m_gameio->set_sw_pullups(true); // 3300 ohm pullups to 5.0V on pins 2-4 and 16 CENTRONICS(config, m_printer, centronics_devices, nullptr); m_printer->busy_handler().set(FUNC(mbc55x_state::printer_busy_w)).invert(); // LS14 Schmitt trigger m_printer->busy_handler().append(m_pic, FUNC(pic8259_device::ir4_w)).invert(); m_printer->perror_handler().set(FUNC(mbc55x_state::printer_paper_end_w)); m_printer->select_handler().set(FUNC(mbc55x_state::printer_select_w)); } ROM_START( mbc55x ) ROM_REGION(0x4000, MAINCPU_TAG, 0) ROM_SYSTEM_BIOS(0, "v120", "mbc55x BIOS v1.20 (1983)") ROMX_LOAD("mbc55x-v120.rom", 0x0000, 0x2000, CRC(b439b4b8) SHA1(6e8df0f3868e3fd0229a5c2720d6c01e46815cab), ROM_BIOS(0)) ROM_END // YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS COMP( 1983, mbc55x, 0, 0, mbc55x, mbc55x, mbc55x_state, empty_init, "Sanyo", "MBC-55x", 0 )