diff options
Diffstat (limited to 'src/mame/drivers/mz2000.c')
-rw-r--r-- | src/mame/drivers/mz2000.c | 908 |
1 files changed, 908 insertions, 0 deletions
diff --git a/src/mame/drivers/mz2000.c b/src/mame/drivers/mz2000.c new file mode 100644 index 00000000000..1fa43c6fcd6 --- /dev/null +++ b/src/mame/drivers/mz2000.c @@ -0,0 +1,908 @@ +// 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" + +#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(NULL), + 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<cassette_image_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(); + virtual void video_start(); + 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<cpu_device> m_maincpu; + required_device<mb8877_t> m_mb8877a; + required_device<floppy_connector> m_floppy0; + required_device<floppy_connector> m_floppy1; + required_device<floppy_connector> m_floppy2; + required_device<floppy_connector> m_floppy3; + required_device<pit8253_device> m_pit8253; + required_device<beep_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<palette_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<x_size;x++) + { + UINT8 tile = tvram[y*x_size+x]; + UINT8 color = m_tvram_attr & 7; + + for(yi=0;yi<8*(m_hi_mode+1);yi++) + { + for(xi=0;xi<8;xi++) + { + int pen; + int res_x,res_y; + UINT16 tile_offset; + + res_x = x * 8 + xi; + res_y = y * (8 *(m_hi_mode+1)) + yi; + + if(res_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_frequency(4096); + 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() != NULL) + { + 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, 0) + 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 ) |