// license:BSD-3-Clause // copyright-holders:Angelo Salese /*************************************************************************** Sharp MZ-2000 driver by Angelo Salese font conversion by Tomasz Slanina Basically a simpler version of Sharp MZ-2500 TODO: - cassette interface, basically any program that's bigger than 8kb fails to load; - implement remaining video capabilities - add 80b compatibility support; - Vosque (color): keyboard doesn't work properly; ****************************************************************************/ #include "emu.h" #include "cpu/z80/z80.h" #include "machine/z80pio.h" #include "machine/i8255.h" #include "machine/wd_fdc.h" #include "machine/pit8253.h" #include "sound/beep.h" #include "sound/wave.h" #include "machine/rp5c15.h" #include "imagedev/cassette.h" #include "imagedev/flopdrv.h" #include "formats/2d_dsk.h" #include "formats/mz_cas.h" #include "softlist.h" #define MASTER_CLOCK XTAL_17_73447MHz/5 /* TODO: was 4 MHz, but otherwise cassette won't work due of a bug with MZF support ... */ class mz2000_state : public driver_device { public: mz2000_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag), m_cass(*this, "cassette"), m_floppy(nullptr), m_maincpu(*this, "maincpu"), m_mb8877a(*this, "mb8877a"), m_floppy0(*this, "mb8877a:0"), m_floppy1(*this, "mb8877a:1"), m_floppy2(*this, "mb8877a:2"), m_floppy3(*this, "mb8877a:3"), m_pit8253(*this, "pit"), m_beeper(*this, "beeper"), m_region_tvram(*this, "tvram"), m_region_gvram(*this, "gvram"), m_region_chargen(*this, "chargen"), m_region_ipl(*this, "ipl"), m_region_wram(*this, "wram"), m_io_key0(*this, "KEY0"), m_io_key1(*this, "KEY1"), m_io_key2(*this, "KEY2"), m_io_key3(*this, "KEY3"), m_io_key4(*this, "KEY4"), m_io_key5(*this, "KEY5"), m_io_key6(*this, "KEY6"), m_io_key7(*this, "KEY7"), m_io_key8(*this, "KEY8"), m_io_key9(*this, "KEY9"), m_io_keya(*this, "KEYA"), m_io_keyb(*this, "KEYB"), m_io_keyc(*this, "KEYC"), m_io_keyd(*this, "KEYD"), m_io_unused(*this, "UNUSED"), m_io_config(*this, "CONFIG"), m_palette(*this, "palette") { } DECLARE_FLOPPY_FORMATS(floppy_formats); required_device m_cass; floppy_image_device *m_floppy; UINT8 m_ipl_enable; UINT8 m_tvram_enable; UINT8 m_gvram_enable; UINT8 m_gvram_bank; UINT8 m_key_mux; UINT8 m_old_portc; UINT8 m_width80; UINT8 m_tvram_attr; UINT8 m_gvram_mask; UINT8 m_color_mode; UINT8 m_has_fdc; UINT8 m_hi_mode; UINT8 m_porta_latch; UINT8 m_tape_ctrl; DECLARE_READ8_MEMBER(mz2000_ipl_r); DECLARE_READ8_MEMBER(mz2000_wram_r); DECLARE_WRITE8_MEMBER(mz2000_wram_w); DECLARE_READ8_MEMBER(mz2000_tvram_r); DECLARE_WRITE8_MEMBER(mz2000_tvram_w); DECLARE_READ8_MEMBER(mz2000_gvram_r); DECLARE_WRITE8_MEMBER(mz2000_gvram_w); DECLARE_READ8_MEMBER(mz2000_mem_r); DECLARE_WRITE8_MEMBER(mz2000_mem_w); DECLARE_WRITE8_MEMBER(mz2000_gvram_bank_w); DECLARE_WRITE8_MEMBER(floppy_select_w); DECLARE_WRITE8_MEMBER(floppy_side_w); DECLARE_WRITE8_MEMBER(timer_w); DECLARE_WRITE8_MEMBER(mz2000_tvram_attr_w); DECLARE_WRITE8_MEMBER(mz2000_gvram_mask_w); virtual void machine_reset() override; virtual void video_start() override; UINT32 screen_update_mz2000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); DECLARE_READ8_MEMBER(fdc_r); DECLARE_WRITE8_MEMBER(fdc_w); DECLARE_READ8_MEMBER(mz2000_porta_r); DECLARE_READ8_MEMBER(mz2000_portb_r); DECLARE_READ8_MEMBER(mz2000_portc_r); DECLARE_WRITE8_MEMBER(mz2000_porta_w); DECLARE_WRITE8_MEMBER(mz2000_portb_w); DECLARE_WRITE8_MEMBER(mz2000_portc_w); DECLARE_WRITE8_MEMBER(mz2000_pio1_porta_w); DECLARE_READ8_MEMBER(mz2000_pio1_portb_r); DECLARE_READ8_MEMBER(mz2000_pio1_porta_r); protected: required_device m_maincpu; required_device m_mb8877a; required_device m_floppy0; required_device m_floppy1; required_device m_floppy2; required_device m_floppy3; required_device m_pit8253; required_device m_beeper; required_memory_region m_region_tvram; required_memory_region m_region_gvram; required_memory_region m_region_chargen; required_memory_region m_region_ipl; required_memory_region m_region_wram; required_ioport m_io_key0; required_ioport m_io_key1; required_ioport m_io_key2; required_ioport m_io_key3; required_ioport m_io_key4; required_ioport m_io_key5; required_ioport m_io_key6; required_ioport m_io_key7; required_ioport m_io_key8; required_ioport m_io_key9; required_ioport m_io_keya; required_ioport m_io_keyb; required_ioport m_io_keyc; required_ioport m_io_keyd; required_ioport m_io_unused; required_ioport m_io_config; required_device m_palette; }; void mz2000_state::video_start() { } UINT32 mz2000_state::screen_update_mz2000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { UINT8 *tvram = m_region_tvram->base(); UINT8 *gvram = m_region_gvram->base(); UINT8 *gfx_data = m_region_chargen->base(); int x,y,xi,yi; UINT8 x_size; UINT32 count; count = 0; for(y=0;y<200;y++) { for(x=0;x<640;x+=8) { for(xi=0;xi<8;xi++) { int pen; pen = ((gvram[count+0x4000] >> (xi)) & 1) ? 1 : 0; //B pen |= ((gvram[count+0x8000] >> (xi)) & 1) ? 2 : 0; //R pen |= ((gvram[count+0xc000] >> (xi)) & 1) ? 4 : 0; //G pen &= m_gvram_mask; bitmap.pix16(y*2+0, x+xi) = m_palette->pen(pen); bitmap.pix16(y*2+1, x+xi) = m_palette->pen(pen); } count++; } } x_size = (m_width80+1)*40; for(y=0;y<25;y++) { for(x=0;x 640-1 || res_y > (200*(m_hi_mode+1))-1) continue; tile_offset = tile*(8*(m_hi_mode+1))+yi + (m_hi_mode * 0x800); pen = ((gfx_data[tile_offset] >> (7-xi)) & 1) ? color : -1; /* TODO: clean this up */ if(pen != -1) { if(m_hi_mode) { if(m_width80 == 0) { bitmap.pix16(res_y, res_x*2+0) = m_palette->pen(pen); bitmap.pix16(res_y, res_x*2+1) = m_palette->pen(pen); } else { bitmap.pix16(res_y, res_x) = m_palette->pen(pen); } } else { if(m_width80 == 0) { bitmap.pix16(res_y*2+0, res_x*2+0) = m_palette->pen(pen); bitmap.pix16(res_y*2+0, res_x*2+1) = m_palette->pen(pen); bitmap.pix16(res_y*2+1, res_x*2+0) = m_palette->pen(pen); bitmap.pix16(res_y*2+1, res_x*2+1) = m_palette->pen(pen); } else { bitmap.pix16(res_y*2+0, res_x) = m_palette->pen(pen); bitmap.pix16(res_y*2+1, res_x) = m_palette->pen(pen); } } } } } } } return 0; } READ8_MEMBER(mz2000_state::mz2000_ipl_r) { return m_region_ipl->base()[offset]; } READ8_MEMBER(mz2000_state::mz2000_wram_r) { return m_region_wram->base()[offset]; } WRITE8_MEMBER(mz2000_state::mz2000_wram_w) { m_region_wram->base()[offset] = data; } READ8_MEMBER(mz2000_state::mz2000_tvram_r) { return m_region_tvram->base()[offset]; } WRITE8_MEMBER(mz2000_state::mz2000_tvram_w) { m_region_tvram->base()[offset] = data; } READ8_MEMBER(mz2000_state::mz2000_gvram_r) { return m_region_gvram->base()[offset+m_gvram_bank*0x4000]; } WRITE8_MEMBER(mz2000_state::mz2000_gvram_w) { m_region_gvram->base()[offset+m_gvram_bank*0x4000] = data; } READ8_MEMBER(mz2000_state::mz2000_mem_r) { UINT8 page_mem; page_mem = (offset & 0xf000) >> 12; if(page_mem == 0 && m_ipl_enable) return mz2000_ipl_r(space,offset & 0xfff); if(((page_mem & 8) == 0) && m_ipl_enable == 0) // if ipl is enabled, 0x1000 - 0x7fff accesses to dummy region return mz2000_wram_r(space,offset); if(page_mem & 8) { if(page_mem == 0xd && m_tvram_enable) return mz2000_tvram_r(space,offset & 0xfff); else if(page_mem >= 0xc && m_gvram_enable) return mz2000_gvram_r(space,offset & 0x3fff); else { UINT16 wram_mask = (m_ipl_enable) ? 0x7fff : 0xffff; return mz2000_wram_r(space,offset & wram_mask); } } return 0xff; } WRITE8_MEMBER(mz2000_state::mz2000_mem_w) { UINT8 page_mem; page_mem = (offset & 0xf000) >> 12; if((page_mem & 8) == 0 && m_ipl_enable == 0) mz2000_wram_w(space,offset,data); if(page_mem & 8) { if(page_mem == 0xd && m_tvram_enable) mz2000_tvram_w(space,offset & 0xfff,data); else if(page_mem >= 0xc && m_gvram_enable) mz2000_gvram_w(space,offset & 0x3fff,data); else { UINT16 wram_mask = (m_ipl_enable) ? 0x7fff : 0xffff; mz2000_wram_w(space,offset & wram_mask,data); } } } WRITE8_MEMBER(mz2000_state::mz2000_gvram_bank_w) { m_gvram_bank = data & 3; } READ8_MEMBER(mz2000_state::fdc_r) { if(m_has_fdc) return m_mb8877a->read(space, offset) ^ 0xff; return 0xff; } WRITE8_MEMBER(mz2000_state::fdc_w) { if(m_has_fdc) m_mb8877a->write(space, offset, data ^ 0xff); } WRITE8_MEMBER(mz2000_state::floppy_select_w) { switch (data & 0x03) { case 0: m_floppy = m_floppy0->get_device(); break; case 1: m_floppy = m_floppy1->get_device(); break; case 2: m_floppy = m_floppy2->get_device(); break; case 3: m_floppy = m_floppy3->get_device(); break; } m_mb8877a->set_floppy(m_floppy); // todo: bit 2 is connected to something too... if (m_floppy) m_floppy->mon_w(!BIT(data, 7)); } WRITE8_MEMBER(mz2000_state::floppy_side_w) { if (m_floppy) m_floppy->ss_w(BIT(data, 0)); } WRITE8_MEMBER(mz2000_state::timer_w) { m_pit8253->write_gate0(1); m_pit8253->write_gate1(1); m_pit8253->write_gate0(0); m_pit8253->write_gate1(0); m_pit8253->write_gate0(1); m_pit8253->write_gate1(1); } WRITE8_MEMBER(mz2000_state::mz2000_tvram_attr_w) { m_tvram_attr = data; } WRITE8_MEMBER(mz2000_state::mz2000_gvram_mask_w) { m_gvram_mask = data; } static ADDRESS_MAP_START(mz2000_map, AS_PROGRAM, 8, mz2000_state ) ADDRESS_MAP_UNMAP_HIGH AM_RANGE( 0x0000, 0xffff ) AM_READWRITE(mz2000_mem_r,mz2000_mem_w) ADDRESS_MAP_END static ADDRESS_MAP_START(mz2000_io, AS_IO, 8, mz2000_state ) ADDRESS_MAP_UNMAP_HIGH ADDRESS_MAP_GLOBAL_MASK(0xff) AM_RANGE(0xd8, 0xdb) AM_READWRITE(fdc_r, fdc_w) AM_RANGE(0xdc, 0xdc) AM_WRITE(floppy_select_w) AM_RANGE(0xdd, 0xdd) AM_WRITE(floppy_side_w) AM_RANGE(0xe0, 0xe3) AM_DEVREADWRITE("i8255_0", i8255_device, read, write) AM_RANGE(0xe4, 0xe7) AM_DEVREADWRITE("pit", pit8253_device, read, write) AM_RANGE(0xe8, 0xeb) AM_DEVREADWRITE("z80pio_1", z80pio_device, read_alt, write_alt) AM_RANGE(0xf0, 0xf3) AM_WRITE(timer_w) // AM_RANGE(0xf4, 0xf7) CRTC AM_RANGE(0xf5, 0xf5) AM_WRITE(mz2000_tvram_attr_w) AM_RANGE(0xf6, 0xf6) AM_WRITE(mz2000_gvram_mask_w) AM_RANGE(0xf7, 0xf7) AM_WRITE(mz2000_gvram_bank_w) ADDRESS_MAP_END /* Input ports */ static INPUT_PORTS_START( mz2000 ) PORT_START("KEY0") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F1") PORT_CODE(KEYCODE_F1) PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F2") PORT_CODE(KEYCODE_F2) PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F3") PORT_CODE(KEYCODE_F3) PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F4") PORT_CODE(KEYCODE_F4) PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F5") PORT_CODE(KEYCODE_F5) PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F6") PORT_CODE(KEYCODE_F6) PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F7") PORT_CODE(KEYCODE_F7) PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F8") PORT_CODE(KEYCODE_F8) PORT_START("KEY1") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F9") PORT_CODE(KEYCODE_F9) PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F10") PORT_CODE(KEYCODE_F10) PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("8 (PAD)") PORT_CODE(KEYCODE_8_PAD) PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("9 (PAD)") PORT_CODE(KEYCODE_9_PAD) PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("00 (PAD)") //PORT_CODE(KEYCODE_SLASH_PAD) PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME(". (PAD)") PORT_CODE(KEYCODE_DEL_PAD) PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("+ (PAD)") PORT_CODE(KEYCODE_PLUS_PAD) PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("- (PAD)") PORT_CODE(KEYCODE_MINUS_PAD) PORT_START("KEY2") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("0 (PAD)") PORT_CODE(KEYCODE_0_PAD) PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("1 (PAD)") PORT_CODE(KEYCODE_1_PAD) PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("2 (PAD)") PORT_CODE(KEYCODE_2_PAD) PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("3 (PAD)") PORT_CODE(KEYCODE_3_PAD) PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("4 (PAD)") PORT_CODE(KEYCODE_4_PAD) PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("5 (PAD)") PORT_CODE(KEYCODE_5_PAD) PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("6 (PAD)") PORT_CODE(KEYCODE_6_PAD) PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("7 (PAD)") PORT_CODE(KEYCODE_7_PAD) PORT_START("KEY3") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("TAB") PORT_CODE(KEYCODE_TAB) PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Space") PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("RETURN") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(27) PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Up") PORT_CODE(KEYCODE_UP) PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Down") PORT_CODE(KEYCODE_DOWN) PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Left") PORT_CODE(KEYCODE_LEFT) PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Right") PORT_CODE(KEYCODE_RIGHT) PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("BREAK") //PORT_CODE(KEYCODE_ESC) PORT_START("KEY4") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("/") //PORT_CODE(KEYCODE_SLASH) PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("A") PORT_CODE(KEYCODE_A) PORT_CHAR('A') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("B") PORT_CODE(KEYCODE_B) PORT_CHAR('B') PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("C") PORT_CODE(KEYCODE_C) PORT_CHAR('C') PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("D") PORT_CODE(KEYCODE_D) PORT_CHAR('D') PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("E") PORT_CODE(KEYCODE_E) PORT_CHAR('E') PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("F") PORT_CODE(KEYCODE_F) PORT_CHAR('F') PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("G") PORT_CODE(KEYCODE_G) PORT_CHAR('G') PORT_START("KEY5") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("H") PORT_CODE(KEYCODE_H) PORT_CHAR('H') PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("I") PORT_CODE(KEYCODE_I) PORT_CHAR('I') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("J") PORT_CODE(KEYCODE_J) PORT_CHAR('J') PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("K") PORT_CODE(KEYCODE_K) PORT_CHAR('K') PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("L") PORT_CODE(KEYCODE_L) PORT_CHAR('L') PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("M") PORT_CODE(KEYCODE_M) PORT_CHAR('M') PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("N") PORT_CODE(KEYCODE_N) PORT_CHAR('N') PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("O") PORT_CODE(KEYCODE_O) PORT_CHAR('O') PORT_START("KEY6") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("P") PORT_CODE(KEYCODE_P) PORT_CHAR('P') PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Q") PORT_CODE(KEYCODE_Q) PORT_CHAR('Q') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("R") PORT_CODE(KEYCODE_R) PORT_CHAR('R') PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("S") PORT_CODE(KEYCODE_S) PORT_CHAR('S') PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("T") PORT_CODE(KEYCODE_T) PORT_CHAR('T') PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("U") PORT_CODE(KEYCODE_U) PORT_CHAR('U') PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("V") PORT_CODE(KEYCODE_V) PORT_CHAR('V') PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("W") PORT_CODE(KEYCODE_W) PORT_CHAR('W') PORT_START("KEY7") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("X") PORT_CODE(KEYCODE_X) PORT_CHAR('X') PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Y") PORT_CODE(KEYCODE_Y) PORT_CHAR('Y') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("Z") PORT_CODE(KEYCODE_Z) PORT_CHAR('Z') PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("^") PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("\\") PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("_") PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME(".") PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME(",") PORT_START("KEY8") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("0") PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("1") PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("2") PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("3") PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("4") PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("5") PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("6") PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("7") PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_START("KEY9") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("8") PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("9") PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME(":") PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME(";") PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("-") PORT_CODE(KEYCODE_MINUS) PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("@") PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("[") PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_UNUSED) PORT_START("KEYA") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("]") PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_UNUSED) PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("HOME") PORT_CODE(KEYCODE_HOME) PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("DEL") PORT_CODE(KEYCODE_BACKSPACE) PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_UNUSED) PORT_BIT(0x20,IP_ACTIVE_LOW,IPT_UNUSED) PORT_BIT(0x40,IP_ACTIVE_LOW,IPT_UNUSED) PORT_BIT(0x80,IP_ACTIVE_LOW,IPT_UNUSED) PORT_START("KEYB") PORT_BIT(0x01,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("GRPH") PORT_BIT(0x02,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("SLOCK") PORT_BIT(0x04,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("SHIFT") PORT_CODE(KEYCODE_LSHIFT) PORT_BIT(0x08,IP_ACTIVE_LOW,IPT_KEYBOARD) PORT_NAME("RVS") PORT_BIT(0x10,IP_ACTIVE_LOW,IPT_UNUSED) PORT_BIT(0xe0,IP_ACTIVE_LOW,IPT_UNUSED) PORT_START("KEYC") PORT_BIT(0xff,IP_ACTIVE_LOW,IPT_UNUSED) PORT_START("KEYD") PORT_BIT(0xff,IP_ACTIVE_LOW,IPT_UNUSED) PORT_START("UNUSED") PORT_BIT(0xff,IP_ACTIVE_LOW,IPT_UNUSED ) PORT_START("CONFIG") PORT_CONFNAME( 0x01, 0x01, "Video Board" ) PORT_CONFSETTING( 0x00, "Monochrome" ) PORT_CONFSETTING( 0x01, "Color" ) PORT_CONFNAME( 0x02, 0x02, "Floppy Device" ) PORT_CONFSETTING( 0x00, DEF_STR( No ) ) PORT_CONFSETTING( 0x02, DEF_STR( Yes ) ) PORT_CONFNAME( 0x04, 0x04, "High Resolution" ) PORT_CONFSETTING( 0x00, DEF_STR( No ) ) PORT_CONFSETTING( 0x04, DEF_STR( Yes ) ) INPUT_PORTS_END void mz2000_state::machine_reset() { m_ipl_enable = 1; m_tvram_enable = 0; m_gvram_enable = 0; m_beeper->set_state(0); m_color_mode = m_io_config->read() & 1; m_has_fdc = (m_io_config->read() & 2) >> 1; m_hi_mode = (m_io_config->read() & 4) >> 2; } static const gfx_layout mz2000_charlayout_8 = { 8, 8, 256, 1, { 0 }, { 0, 1, 2, 3, 4, 5, 6, 7 }, { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 }, 8*8 }; static const gfx_layout mz2000_charlayout_16 = { 8, 16, 256, 1, { 0 }, { STEP8(0,1) }, { STEP16(0,8) }, 8*16 }; static GFXDECODE_START( mz2000 ) GFXDECODE_ENTRY( "chargen", 0x0000, mz2000_charlayout_8, 0, 1 ) GFXDECODE_ENTRY( "chargen", 0x0800, mz2000_charlayout_16, 0, 1 ) GFXDECODE_END READ8_MEMBER(mz2000_state::mz2000_porta_r) { printf("A R\n"); return 0xff; } READ8_MEMBER(mz2000_state::mz2000_portb_r) { /* x--- ---- break key -x-- ---- read tape data --x- ---- no tape signal ---x ---- no tape write signal ---- x--- end of tape reached ---- ---x "blank" control */ UINT8 res = 0x80; if(m_cass->get_image() != nullptr) { res |= (m_cass->input() > 0.0038) ? 0x40 : 0x00; res |= ((m_cass->get_state() & CASSETTE_MASK_UISTATE) == CASSETTE_PLAY) ? 0x00 : 0x20; res |= (m_cass->get_position() >= m_cass->get_length()) ? 0x08 : 0x00; } else res |= 0x20; res |= (machine().first_screen()->vblank()) ? 0x00 : 0x01; return res; } READ8_MEMBER(mz2000_state::mz2000_portc_r) { printf("C R\n"); return 0xff; } WRITE8_MEMBER(mz2000_state::mz2000_porta_w) { /* These are enabled thru a 0->1 transition x--- ---- tape "APSS" -x-- ---- tape "APLAY" --x- ---- tape "AREW" ---x ---- reverse video ---- x--- tape stop ---- -x-- tape play ---- --x- tape ff ---- ---x tape rewind */ if((m_tape_ctrl & 0x80) == 0 && data & 0x80) { //printf("Tape APSS control\n"); } if((m_tape_ctrl & 0x40) == 0 && data & 0x40) { //printf("Tape APLAY control\n"); } if((m_tape_ctrl & 0x20) == 0 && data & 0x20) { //printf("Tape AREW control\n"); } if((m_tape_ctrl & 0x10) == 0 && data & 0x10) { //printf("reverse video control\n"); } if((m_tape_ctrl & 0x08) == 0 && data & 0x08) // stop { m_cass->change_state(CASSETTE_MOTOR_DISABLED,CASSETTE_MASK_MOTOR); m_cass->change_state(CASSETTE_STOPPED,CASSETTE_MASK_UISTATE); } if((m_tape_ctrl & 0x04) == 0 && data & 0x04) // play { m_cass->change_state(CASSETTE_MOTOR_ENABLED,CASSETTE_MASK_MOTOR); m_cass->change_state(CASSETTE_PLAY,CASSETTE_MASK_UISTATE); } if((m_tape_ctrl & 0x02) == 0 && data & 0x02) { //printf("Tape FF control\n"); } if((m_tape_ctrl & 0x01) == 0 && data & 0x01) { //printf("Tape Rewind control\n"); } m_tape_ctrl = data; } WRITE8_MEMBER(mz2000_state::mz2000_portb_w) { //printf("B W %02x\n",data); // ... } WRITE8_MEMBER(mz2000_state::mz2000_portc_w) { /* x--- ---- tape data write -x-- ---- tape rec --x- ---- tape ? ---x ---- tape open ---- x--- 0->1 transition = IPL reset ---- -x-- beeper state ---- --x- 0->1 transition = Work RAM reset */ //printf("C W %02x\n",data); if(((m_old_portc & 8) == 0) && data & 8) m_ipl_enable = 1; if(((m_old_portc & 2) == 0) && data & 2) { m_ipl_enable = 0; /* correct? */ m_maincpu->set_input_line(INPUT_LINE_RESET, PULSE_LINE); } m_beeper->set_state(data & 0x04); m_old_portc = data; } WRITE8_MEMBER(mz2000_state::mz2000_pio1_porta_w) { m_tvram_enable = ((data & 0xc0) == 0xc0); m_gvram_enable = ((data & 0xc0) == 0x80); m_width80 = ((data & 0x20) >> 5); m_key_mux = data & 0x1f; m_porta_latch = data; } READ8_MEMBER(mz2000_state::mz2000_pio1_portb_r) { ioport_port* keynames[] = { m_io_key0, m_io_key1, m_io_key2, m_io_key3, m_io_key4, m_io_key5, m_io_key6, m_io_key7, m_io_key8, m_io_key9, m_io_keya, m_io_keyb, m_io_keyc, m_io_keyd, m_io_unused, m_io_unused }; if(((m_key_mux & 0x10) == 0x00) || ((m_key_mux & 0x0f) == 0x0f)) //status read { int res,i; res = 0xff; for(i=0;i<0xe;i++) res &= keynames[i]->read(); return res; } return keynames[m_key_mux & 0xf]->read(); } READ8_MEMBER(mz2000_state::mz2000_pio1_porta_r) { return m_porta_latch; } FLOPPY_FORMATS_MEMBER( mz2000_state::floppy_formats ) FLOPPY_2D_FORMAT FLOPPY_FORMATS_END static SLOT_INTERFACE_START( mz2000_floppies ) SLOT_INTERFACE("dd", FLOPPY_525_DD) SLOT_INTERFACE_END static MACHINE_CONFIG_START( mz2000, mz2000_state ) /* basic machine hardware */ MCFG_CPU_ADD("maincpu",Z80, MASTER_CLOCK) MCFG_CPU_PROGRAM_MAP(mz2000_map) MCFG_CPU_IO_MAP(mz2000_io) MCFG_DEVICE_ADD("i8255_0", I8255, 0) MCFG_I8255_IN_PORTA_CB(READ8(mz2000_state, mz2000_porta_r)) MCFG_I8255_OUT_PORTA_CB(WRITE8(mz2000_state, mz2000_porta_w)) MCFG_I8255_IN_PORTB_CB(READ8(mz2000_state, mz2000_portb_r)) MCFG_I8255_OUT_PORTB_CB(WRITE8(mz2000_state, mz2000_portb_w)) MCFG_I8255_IN_PORTC_CB(READ8(mz2000_state, mz2000_portc_r)) MCFG_I8255_OUT_PORTC_CB(WRITE8(mz2000_state, mz2000_portc_w)) MCFG_DEVICE_ADD("z80pio_1", Z80PIO, MASTER_CLOCK) MCFG_Z80PIO_IN_PA_CB(READ8(mz2000_state, mz2000_pio1_porta_r)) MCFG_Z80PIO_OUT_PA_CB(WRITE8(mz2000_state, mz2000_pio1_porta_w)) MCFG_Z80PIO_IN_PB_CB(READ8(mz2000_state, mz2000_pio1_portb_r)) /* TODO: clocks aren't known */ MCFG_DEVICE_ADD("pit", PIT8253, 0) MCFG_PIT8253_CLK0(31250) MCFG_PIT8253_CLK1(31250) /* needed by "Art Magic" to boot */ MCFG_PIT8253_CLK2(31250) MCFG_MB8877_ADD("mb8877a", XTAL_1MHz) MCFG_FLOPPY_DRIVE_ADD("mb8877a:0", mz2000_floppies, "dd", mz2000_state::floppy_formats) MCFG_FLOPPY_DRIVE_ADD("mb8877a:1", mz2000_floppies, "dd", mz2000_state::floppy_formats) MCFG_FLOPPY_DRIVE_ADD("mb8877a:2", mz2000_floppies, "dd", mz2000_state::floppy_formats) MCFG_FLOPPY_DRIVE_ADD("mb8877a:3", mz2000_floppies, "dd", mz2000_state::floppy_formats) MCFG_SOFTWARE_LIST_ADD("flop_list", "mz2000_flop") MCFG_CASSETTE_ADD( "cassette" ) MCFG_CASSETTE_FORMATS(mz700_cassette_formats) MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_STOPPED | CASSETTE_MOTOR_ENABLED | CASSETTE_SPEAKER_ENABLED) MCFG_CASSETTE_INTERFACE("mz_cass") MCFG_SOFTWARE_LIST_ADD("cass_list","mz2000_cass") /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(60) MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */ MCFG_SCREEN_SIZE(640, 480) MCFG_SCREEN_VISIBLE_AREA(0, 640-1, 0, 400-1) MCFG_SCREEN_UPDATE_DRIVER(mz2000_state, screen_update_mz2000) MCFG_SCREEN_PALETTE("palette") MCFG_GFXDECODE_ADD("gfxdecode", "palette", mz2000) MCFG_PALETTE_ADD_3BIT_BRG("palette") MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_SOUND_WAVE_ADD(WAVE_TAG, "cassette") MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25) MCFG_SOUND_ADD("beeper", BEEP, 4096) MCFG_SOUND_ROUTE(ALL_OUTPUTS,"mono",0.15) MACHINE_CONFIG_END ROM_START( mz2000 ) ROM_REGION( 0x1000, "ipl", ROMREGION_ERASEFF ) ROM_LOAD( "mz20ipl.bin",0x0000, 0x0800, CRC(d7ccf37f) SHA1(692814ffc2cf50fa8bf9e30c96ebe4a9ee536a86)) ROM_REGION( 0x10000, "maincpu", ROMREGION_ERASEFF ) ROM_REGION( 0x10000, "wram", ROMREGION_ERASE00 ) //ROM_LOAD( "vosque2000.mzt",0x0000, 0x80, CRC(1) SHA1(1)) //ROM_CONTINUE( 0x0000, 0x7f80 ) ROM_REGION( 0x1000, "tvram", ROMREGION_ERASE00 ) ROM_REGION( 0x10000, "gvram", ROMREGION_ERASE00 ) ROM_REGION( 0x1800, "chargen", 0 ) // ROM_LOAD( "mzfont.rom", 0x0000, 0x0800, BAD_DUMP CRC(0631efc3) SHA1(99b206af5c9845995733d877e9e93e9681b982a8) ) //original has JP characters /* these are hand-crafted roms, converted from bmps floating around the net */ ROM_LOAD( "font.bin", 0x0000, 0x0800, BAD_DUMP CRC(6ae6ce8e) SHA1(6adcdab9e4647429dd8deb73146264746b5eccda) ) ROM_LOAD( "font400.bin", 0x0800, 0x1000, BAD_DUMP CRC(56c5d2bc) SHA1(fea655ff5eedacf8978fa3c185485db44376e24d) ) ROM_END ROM_START( mz2200 ) ROM_REGION( 0x10000, "ipl", 0 ) ROM_LOAD( "mz2200ipl.bin", 0x0000, 0x0800, CRC(476801e8) SHA1(6b1f0620945c5492475ea1694bd09a3fcf88549d) ) ROM_REGION( 0x10000, "maincpu", ROMREGION_ERASEFF ) ROM_REGION( 0x10000, "wram", ROMREGION_ERASE00 ) //ROM_LOAD( "vosque2000.mzt",0x0000, 0x80, CRC(1) SHA1(1)) //ROM_CONTINUE( 0x0000, 0x7f80 ) ROM_REGION( 0x1000, "tvram", ROMREGION_ERASE00 ) ROM_REGION( 0x10000, "gvram", ROMREGION_ERASE00 ) ROM_REGION( 0x1800, "chargen", 0 ) // ROM_LOAD( "mzfont.rom", 0x0000, 0x0800, BAD_DUMP CRC(0631efc3) SHA1(99b206af5c9845995733d877e9e93e9681b982a8) ) //original has JP characters /* these are hand-crafted roms, converted from bmps floating around the net */ ROM_LOAD( "font.bin", 0x0000, 0x0800, BAD_DUMP CRC(6ae6ce8e) SHA1(6adcdab9e4647429dd8deb73146264746b5eccda) ) ROM_LOAD( "font400.bin", 0x0800, 0x1000, BAD_DUMP CRC(56c5d2bc) SHA1(fea655ff5eedacf8978fa3c185485db44376e24d) ) ROM_END /* Driver */ /* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ COMP( 1982, mz2000, mz80b, 0, mz2000, mz2000, driver_device, 0, "Sharp", "MZ-2000", MACHINE_NOT_WORKING ) COMP( 1982, mz2200, mz80b, 0, mz2000, mz2000, driver_device, 0, "Sharp", "MZ-2200", MACHINE_NOT_WORKING )