1 // license:GPL-2.0+
2 // copyright-holders:Juergen Buchmueller, Dirk Best
3 /******************************************************************************
4 * Sharp MZ700
5 *
6 * Reference: http://sharpmz.computingmuseum.com
7 *
8 * MZ700 memory map
9 *
10 * 0000-0FFF 1Z-013A ROM or RAM
11 * 1000-CFFF RAM
12 * D000-D7FF videoram or RAM
13 * D800-DFFF colorram or RAM
14 * E000-FFFF memory mapped IO or RAM
15 *
16 * xxx0 PPI8255 port A (output)
17 * bit 7 556RST (reset NE556)
18 * bit 6-4 unused
19 * bit 3-0 keyboard row demux (LS145)
20 *
21 * xxx1 PPI8255 port B (input)
22 * bit 7-0 keyboard matrix code
23 *
24 * xxx2 PPI8255 port C (input/output)
25 * bit 7 R -VBLANK input
26 * bit 6 R 556OUT (1.5Hz)
27 * bit 5 R RDATA from cassette
28 * bit 4 R MOTOR from cassette
29 * bit 3 W M-ON control
30 * bit 2 W INTMASK 1=enable 0=disabel clock interrupt
31 * bit 1 W WDATA to cassette
32 * bit 0 W unused
33 *
34 * xxx3 PPI8255 control
35 *
36 * xxx4 PIT8253 timer 0 (clock input 1,108800 MHz)
37 * xxx5 PIT8253 timer 1 (clock input 15,611 kHz)
38 * xxx6 PIT8253 timer 2 (clock input OUT1 1Hz (default))
39 * xxx7 PIT8253 control/status
40 *
41 * xxx8 bit 7 R -HBLANK
42 * bit 6 R unused
43 * bit 5 R unused
44 * bit 4 R joystick JB2
45 * bit 3 R joystick JB1
46 * bit 2 R joystick JA2
47 * bit 1 R joystick JA1
48 * bit 0 R NE556 OUT (32Hz IC BJ)
49 * W gate0 of PIT8253 (sound enable)
50 *
51 * MZ800 memory map
52 *
53 * 0000-0FFF ROM or RAM
54 * 1000-1FFF PCG ROM or RAM
55 * 2000-7FFF RAM
56 * 8000-9FFF videoram or RAM
57 * A000-BFFF videoram or RAM
58 * C000-CFFF PCG RAM or RAM
59 * D000-DFFF videoram or RAM
60 * E000-FFFF memory mapped IO or RAM
61 *
62 * ToDo:
63 - slows down while making sound
64 - MZ800:
65 - Port CF not done.
66 - Dips not connected.
67 - MZ800-mode display not working /Hi-res not coded.
68 - The CRTC is a very complex custom device, mostly unemulated.
69 - MZ1500:
70 - Various ports not done.
71 - Floppy disk and quick disk not done.
72 - F4 display is blank.
73 - Need manuals.
74
75 Note: MZ800 hardware starts in memory map (mode A), but switches to MZ700
76 compatibility mode (mode B) as soon as it starts up. We start in Mode B
77 because it helps MZ1500 get started and it doesn't break anything.
78
79 *
80 *****************************************************************************/
81
82 #include "emu.h"
83 #include "includes/mz700.h"
84
85 #include "cpu/z80/z80.h"
86 #include "sound/sn76496.h"
87
88 #include "softlist.h"
89 #include "speaker.h"
90
91 #include "formats/mz_cas.h"
92
93
94 /***************************************************************************
95 TIMER DEVICE CALLBACKS
96 ***************************************************************************/
97
TIMER_DEVICE_CALLBACK_MEMBER(mz_state::ne556_cursor_callback)98 TIMER_DEVICE_CALLBACK_MEMBER(mz_state::ne556_cursor_callback)
99 {
100 m_cursor_bit ^= 1;
101 }
102
TIMER_DEVICE_CALLBACK_MEMBER(mz_state::ne556_other_callback)103 TIMER_DEVICE_CALLBACK_MEMBER(mz_state::ne556_other_callback)
104 {
105 m_other_timer ^= 1;
106 }
107
108
109 /***************************************************************************
110 ADDRESS MAPS
111 ***************************************************************************/
112
mz700_mem(address_map & map)113 void mz_state::mz700_mem(address_map &map)
114 {
115 map(0x0000, 0x0fff).bankr("bankr0").bankw("bankw0");
116 map(0x1000, 0xcfff).ram();
117 map(0xd000, 0xdfff).bankrw("bankd");
118 map(0xe000, 0xffff).m(m_banke, FUNC(address_map_bank_device::amap8));
119 }
120
mz700_banke(address_map & map)121 void mz_state::mz700_banke(address_map &map)
122 {
123 // bank 0: ram (mz700_bank1)
124 map(0x0000, 0x1fff).ram();
125 // bank 1: devices (mz700_bank3)
126 map(0x2000, 0x2003).mirror(0x1ff0).rw(m_ppi, FUNC(i8255_device::read), FUNC(i8255_device::write));
127 map(0x2004, 0x2007).mirror(0x1ff0).rw(m_pit, FUNC(pit8253_device::read), FUNC(pit8253_device::write));
128 map(0x2008, 0x200b).mirror(0x1ff0).rw(FUNC(mz_state::mz700_e008_r), FUNC(mz_state::mz700_e008_w));
129 map(0x200c, 0x200f).mirror(0x1ff0).noprw();
130 // bank 2: switched out (mz700_bank5)
131 map(0x4000, 0x5fff).noprw();
132 }
133
mz700_io(address_map & map)134 void mz_state::mz700_io(address_map &map)
135 {
136 map.global_mask(0xff);
137 map(0xe0, 0xe0).w(FUNC(mz_state::mz700_bank_0_w));
138 map(0xe1, 0xe1).w(FUNC(mz_state::mz700_bank_1_w));
139 map(0xe2, 0xe2).w(FUNC(mz_state::mz700_bank_2_w));
140 map(0xe3, 0xe3).w(FUNC(mz_state::mz700_bank_3_w));
141 map(0xe4, 0xe4).w(FUNC(mz_state::mz700_bank_4_w));
142 map(0xe5, 0xe5).w(FUNC(mz_state::mz700_bank_5_w));
143 map(0xe6, 0xe6).w(FUNC(mz_state::mz700_bank_6_w));
144 }
145
mz800_mem(address_map & map)146 void mz_state::mz800_mem(address_map &map)
147 {
148 map(0x0000, 0x0fff).bankr("bankr0").bankw("bankw0");
149 map(0x1000, 0x1fff).bankrw("bank1");
150 map(0x2000, 0x7fff).ram();
151 map(0x8000, 0xbfff).bankrw("banka");
152 map(0xc000, 0xcfff).bankrw("bankc");
153 map(0xd000, 0xdfff).bankrw("bankd");
154 map(0xe000, 0xffff).m(m_bankf, FUNC(address_map_bank_device::amap8));
155 }
156
mz800_bankf(address_map & map)157 void mz_state::mz800_bankf(address_map &map)
158 {
159 // bank 0: ram (mz700_bank1)
160 map(0x0000, 0x1fff).ram();
161 // bank 1: devices (mz700_bank3)
162 map(0x2000, 0x2003).rw(m_ppi, FUNC(i8255_device::read), FUNC(i8255_device::write));
163 map(0x2004, 0x2007).rw(m_pit, FUNC(pit8253_device::read), FUNC(pit8253_device::write));
164 map(0x2008, 0x200b).rw(FUNC(mz_state::mz700_e008_r), FUNC(mz_state::mz700_e008_w));
165 map(0x200c, 0x200f).noprw();
166 map(0x2010, 0x3fff).rom().region("monitor", 0x2010);
167 // bank 2: switched out (mz700_bank5)
168 map(0x4000, 0x5fff).noprw();
169 }
170
mz800_io(address_map & map)171 void mz_state::mz800_io(address_map &map)
172 {
173 map.global_mask(0xff);
174 map(0xcc, 0xcc).w(FUNC(mz_state::mz800_write_format_w));
175 map(0xcd, 0xcd).w(FUNC(mz_state::mz800_read_format_w));
176 map(0xce, 0xce).rw(FUNC(mz_state::mz800_crtc_r), FUNC(mz_state::mz800_display_mode_w));
177 map(0xcf, 0xcf).w(FUNC(mz_state::mz800_scroll_border_w));
178 map(0xd0, 0xd3).rw(m_ppi, FUNC(i8255_device::read), FUNC(i8255_device::write));
179 map(0xd4, 0xd7).rw(m_pit, FUNC(pit8253_device::read), FUNC(pit8253_device::write));
180 map(0xe0, 0xe0).rw(FUNC(mz_state::mz800_bank_0_r), FUNC(mz_state::mz800_bank_0_w));
181 map(0xe1, 0xe1).rw(FUNC(mz_state::mz800_bank_1_r), FUNC(mz_state::mz700_bank_1_w));
182 map(0xe2, 0xe2).w(FUNC(mz_state::mz700_bank_2_w));
183 map(0xe3, 0xe3).w(FUNC(mz_state::mz700_bank_3_w));
184 map(0xe4, 0xe4).w(FUNC(mz_state::mz700_bank_4_w));
185 map(0xe5, 0xe5).w(FUNC(mz_state::mz700_bank_5_w));
186 map(0xe6, 0xe6).w(FUNC(mz_state::mz700_bank_6_w));
187 map(0xea, 0xea).rw(FUNC(mz_state::mz800_ramdisk_r), FUNC(mz_state::mz800_ramdisk_w));
188 map(0xeb, 0xeb).w(FUNC(mz_state::mz800_ramaddr_w));
189 map(0xf0, 0xf0).portr("atari_joy1").w(FUNC(mz_state::mz800_palette_w));
190 map(0xf1, 0xf1).portr("atari_joy2");
191 map(0xf2, 0xf2).w("sn76489n", FUNC(sn76489_device::write));
192 map(0xfc, 0xff).rw("z80pio", FUNC(z80pio_device::read), FUNC(z80pio_device::write));
193 }
194
195 /***************************************************************************
196 INPUT PORTS
197 ***************************************************************************/
198
199 /* 2008-05 FP:
200 Notice that there is no Backspace key, only a 'Del' one.
201
202 Small note about natural keyboard support: currently,
203 - "Alpha" is mapped to 'F6'
204 - "Graph" is mapped to 'F7'
205 - "Break" is mapped to 'F8' */
206
207 static INPUT_PORTS_START( mz700 )
208 PORT_START("ROW0")
209 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_NAME("CR") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13)
210 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(':') PORT_CHAR('*')
211 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_COLON) PORT_CHAR(';') PORT_CHAR('+')
212 PORT_BIT(0x08, 0x08, IPT_UNUSED )
213 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_NAME("Alpha") PORT_CODE(KEYCODE_TAB) PORT_CHAR(UCHAR_MAMEKEY(F6))
214 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_NAME("\xE2\x86\x93 \xC2\xA3") PORT_CODE(KEYCODE_TILDE) PORT_CHAR(0xA3) // this one would be 2nd row, 3rd key after 'P'
215 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_NAME("Graph") PORT_CODE(KEYCODE_ESC) PORT_CHAR(UCHAR_MAMEKEY(F7))
216 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_PGUP) PORT_CHAR('_') // this one would be 2nd row, 4th key after 'P'
217
218 PORT_START("ROW1")
219 PORT_BIT(0x07, 0x07, IPT_UNUSED )
220 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR(']') PORT_CHAR('}')
221 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR('[') PORT_CHAR('{')
222 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR('@') PORT_CHAR('`')
223 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_CODE(KEYCODE_Z) PORT_CHAR('Z') PORT_CHAR('z')
224 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_Y) PORT_CHAR('Y') PORT_CHAR('y')
225
226 PORT_START("ROW2")
227 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_CODE(KEYCODE_X) PORT_CHAR('X') PORT_CHAR('x')
228 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_CODE(KEYCODE_W) PORT_CHAR('W') PORT_CHAR('w')
229 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_V) PORT_CHAR('V') PORT_CHAR('v')
230 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_U) PORT_CHAR('U') PORT_CHAR('u')
231 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_T) PORT_CHAR('T') PORT_CHAR('t')
232 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_S) PORT_CHAR('S') PORT_CHAR('s')
233 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_CODE(KEYCODE_R) PORT_CHAR('R') PORT_CHAR('r')
234 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_Q) PORT_CHAR('Q') PORT_CHAR('q')
235
236 PORT_START("ROW3")
237 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_CODE(KEYCODE_P) PORT_CHAR('P') PORT_CHAR('p')
238 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_CODE(KEYCODE_O) PORT_CHAR('O') PORT_CHAR('o')
239 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_N) PORT_CHAR('N') PORT_CHAR('n')
240 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_M) PORT_CHAR('M') PORT_CHAR('m')
241 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_L) PORT_CHAR('L') PORT_CHAR('l')
242 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_K) PORT_CHAR('K') PORT_CHAR('k')
243 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_CODE(KEYCODE_J) PORT_CHAR('J') PORT_CHAR('j')
244 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_I) PORT_CHAR('I') PORT_CHAR('i')
245
246 PORT_START("ROW4")
247 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_CODE(KEYCODE_H) PORT_CHAR('H') PORT_CHAR('h')
248 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_CODE(KEYCODE_G) PORT_CHAR('G') PORT_CHAR('g')
249 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_F) PORT_CHAR('F') PORT_CHAR('f')
250 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_E) PORT_CHAR('E') PORT_CHAR('e')
251 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_D) PORT_CHAR('D') PORT_CHAR('d')
252 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_C) PORT_CHAR('C') PORT_CHAR('c')
253 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_CODE(KEYCODE_B) PORT_CHAR('B') PORT_CHAR('b')
254 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_A) PORT_CHAR('A') PORT_CHAR('a')
255
256 PORT_START("ROW5")
257 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('(')
258 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('\'')
259 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&')
260 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%')
261 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('$')
262 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#')
263 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('"')
264 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!')
265
266 PORT_START("ROW6")
267 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_CHAR('>')
268 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR('<')
269 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')')
270 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_NAME("0 Pi") PORT_CODE(KEYCODE_0) PORT_CHAR('0')
271 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ')
272 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_MINUS) PORT_CHAR('-') PORT_CHAR('=')
273 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_NAME("\xE2\x86\x91 ~") PORT_CODE(KEYCODE_EQUALS) PORT_CHAR('^') PORT_CHAR('~')
274 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_PGDN) PORT_CHAR('\\') PORT_CHAR('|') // this one would be 1st row, 3rd key after '0'
275
276 PORT_START("ROW7")
277 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_NAME("/ \xE2\x86\x90") PORT_CODE(KEYCODE_SLASH) PORT_CHAR('/')
278 PORT_BIT(0x02, 0x02, IPT_KEYBOARD) PORT_NAME("? \xE2\x86\x92") PORT_CODE(KEYCODE_END) PORT_CHAR('?') // this one would be 4th row, 4th key after 'M'
279 PORT_BIT(0x04, 0x04, IPT_KEYBOARD) PORT_CODE(KEYCODE_LEFT) PORT_CHAR(UCHAR_MAMEKEY(LEFT))
280 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_RIGHT) PORT_CHAR(UCHAR_MAMEKEY(RIGHT))
281 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_DOWN) PORT_CHAR(UCHAR_MAMEKEY(DOWN))
282 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_UP) PORT_CHAR(UCHAR_MAMEKEY(UP))
283 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_NAME("DEL HOME") PORT_CODE(KEYCODE_DEL) PORT_CHAR(UCHAR_MAMEKEY(DEL))
284 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_NAME("INST CLR") PORT_CODE(KEYCODE_INSERT) PORT_CHAR(UCHAR_MAMEKEY(INSERT))
285
286 PORT_START("ROW8")
287 PORT_BIT(0x01, 0x01, IPT_KEYBOARD) PORT_NAME("Shift") PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1)
288 PORT_BIT(0x3e, 0x3e, IPT_UNUSED)
289 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_NAME("Ctrl") PORT_CODE(KEYCODE_LCONTROL) PORT_CODE(KEYCODE_RCONTROL) PORT_CHAR(UCHAR_SHIFT_2)
290 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_NAME("Break") PORT_CODE(KEYCODE_HOME) PORT_CHAR(UCHAR_MAMEKEY(F8)) // this one would be at Backspace position
291
292 PORT_START("ROW9")
293 PORT_BIT(0x07, 0x07, IPT_UNUSED)
294 PORT_BIT(0x08, 0x08, IPT_KEYBOARD) PORT_CODE(KEYCODE_F5) PORT_CHAR(UCHAR_MAMEKEY(F5))
295 PORT_BIT(0x10, 0x10, IPT_KEYBOARD) PORT_CODE(KEYCODE_F4) PORT_CHAR(UCHAR_MAMEKEY(F4))
296 PORT_BIT(0x20, 0x20, IPT_KEYBOARD) PORT_CODE(KEYCODE_F3) PORT_CHAR(UCHAR_MAMEKEY(F3))
297 PORT_BIT(0x40, 0x40, IPT_KEYBOARD) PORT_CODE(KEYCODE_F2) PORT_CHAR(UCHAR_MAMEKEY(F2))
298 PORT_BIT(0x80, 0x80, IPT_KEYBOARD) PORT_CODE(KEYCODE_F1) PORT_CHAR(UCHAR_MAMEKEY(F1))
299
300 PORT_START("JOY")
301 PORT_BIT(0x01, 0x00, IPT_UNUSED)
302 PORT_BIT(0x02, 0x00, IPT_JOYSTICK_UP) PORT_8WAY
303 PORT_BIT(0x04, 0x00, IPT_JOYSTICK_DOWN) PORT_8WAY
304 PORT_BIT(0x08, 0x00, IPT_JOYSTICK_LEFT) PORT_8WAY
305 PORT_BIT(0x10, 0x00, IPT_JOYSTICK_RIGHT) PORT_8WAY
306 INPUT_PORTS_END
307
308 static INPUT_PORTS_START( mz800 )
309 PORT_INCLUDE(mz700)
310
311 PORT_MODIFY("JOY")
312 PORT_BIT(0x1f, 0x00, IPT_UNUSED)
313
314 PORT_START("atari_joy1")
315 PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP) PORT_PLAYER(1) PORT_8WAY
316 PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN) PORT_PLAYER(1) PORT_8WAY
317 PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT) PORT_PLAYER(1) PORT_8WAY
318 PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT) PORT_PLAYER(1) PORT_8WAY
319 PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_BUTTON1) PORT_PLAYER(1)
320 PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_BUTTON2) PORT_PLAYER(1)
321
322 PORT_START("atari_joy2")
323 PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP) PORT_PLAYER(2) PORT_8WAY
324 PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN) PORT_PLAYER(2) PORT_8WAY
325 PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT) PORT_PLAYER(2) PORT_8WAY
326 PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT) PORT_PLAYER(2) PORT_8WAY
327 PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_BUTTON1) PORT_PLAYER(2)
328 PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_BUTTON2) PORT_PLAYER(2)
329
330 PORT_START("system_settings")
331 PORT_DIPNAME(0x01, 0x00, "Mode selection")
332 PORT_DIPLOCATION("SW:4")
333 PORT_DIPSETTING(0x01, "MZ-700")
334 PORT_DIPSETTING(0x00, "MZ-800")
335 PORT_DIPNAME(0x06, 0x06, "Printer selection")
336 PORT_DIPLOCATION("SW:3,2")
337 PORT_DIPSETTING(0x06, "MZ printer")
338 PORT_DIPSETTING(0x00, "Centronics printer")
339 PORT_DIPNAME(0x08, 0x08, "Cassette polarity")
340 PORT_DIPLOCATION("SW:1")
341 PORT_DIPSETTING(0x08, DEF_STR(Unknown))
342 PORT_DIPSETTING(0x00, DEF_STR(Unknown))
343 INPUT_PORTS_END
344
345
346 /***************************************************************************
347 GFX LAYOUT
348 ***************************************************************************/
349
350 static const gfx_layout mz700_layout =
351 {
352 8, 8, /* 8 x 8 graphics */
353 512, /* 512 codes */
354 1, /* 1 bit per pixel */
355 { 0 }, /* no bitplanes */
356 { 7, 6, 5, 4, 3, 2, 1, 0 },
357 { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 },
358 8 * 8 /* code takes 8 times 8 bits */
359 };
360
361 static GFXDECODE_START( gfx_mz700 )
362 GFXDECODE_ENTRY("cgrom", 0, mz700_layout, 0, 4)
363 GFXDECODE_END
364
GFXDECODE_START(gfx_mz800)365 static GFXDECODE_START( gfx_mz800 )
366 GFXDECODE_ENTRY("monitor", 0x1000, mz700_layout, 0, 4) // for mz800 viewer only
367 GFXDECODE_END
368
369
370 /***************************************************************************
371 MACHINE DRIVERS
372 ***************************************************************************/
373
374 void mz_state::mz700(machine_config &config)
375 {
376 /* basic machine hardware */
377 Z80(config, m_maincpu, XTAL(17'734'470)/5);
378 m_maincpu->set_addrmap(AS_PROGRAM, &mz_state::mz700_mem);
379 m_maincpu->set_addrmap(AS_IO, &mz_state::mz700_io);
380
381 ADDRESS_MAP_BANK(config, "banke").set_map(&mz_state::mz700_banke).set_options(ENDIANNESS_LITTLE, 8, 16, 0x2000);
382
383 MCFG_MACHINE_RESET_OVERRIDE(mz_state, mz700)
384
385 /* video hardware */
386 SCREEN(config, m_screen, SCREEN_TYPE_RASTER);
387 m_screen->set_raw(XTAL(17'734'470)/2, 568, 0, 40*8, 312, 0, 25*8);
388 m_screen->set_screen_update(FUNC(mz_state::screen_update_mz700));
389 m_screen->set_palette(m_palette);
390
391 PALETTE(config, m_palette, palette_device::RGB_3BIT);
392 GFXDECODE(config, "gfxdecode", m_palette, gfx_mz700);
393
394 /* sound hardware */
395 SPEAKER(config, "mono").front_center();
396 SPEAKER_SOUND(config, "speaker").add_route(ALL_OUTPUTS, "mono", 0.50);
397
398 /* ne556 timers */
399 TIMER(config, "cursor").configure_periodic(FUNC(mz_state::ne556_cursor_callback), attotime::from_hz(1.5));
400 TIMER(config, "other").configure_periodic(FUNC(mz_state::ne556_other_callback), attotime::from_hz(34.5));
401
402 /* devices */
403 PIT8253(config, m_pit, 0);
404 m_pit->set_clk<0>(XTAL(17'734'470)/20);
405 m_pit->out_handler<0>().set(FUNC(mz_state::pit_out0_changed));
406 m_pit->set_clk<1>(15611.0);
407 m_pit->out_handler<1>().set(m_pit, FUNC(pit8253_device::write_clk2));
408 m_pit->set_clk<2>(0);
409 m_pit->out_handler<2>().set(FUNC(mz_state::pit_irq_2));
410
411 I8255(config, m_ppi);
412 m_ppi->out_pa_callback().set(FUNC(mz_state::pio_port_a_w));
413 m_ppi->in_pb_callback().set(FUNC(mz_state::pio_port_b_r));
414 m_ppi->in_pc_callback().set(FUNC(mz_state::pio_port_c_r));
415 m_ppi->out_pc_callback().set(FUNC(mz_state::pio_port_c_w));
416
417 TTL74145(config, m_ls145);
418
419 CASSETTE(config, m_cassette);
420 m_cassette->set_formats(mz700_cassette_formats);
421 m_cassette->set_default_state(CASSETTE_STOPPED | CASSETTE_MOTOR_ENABLED | CASSETTE_SPEAKER_ENABLED);
422 m_cassette->add_route(ALL_OUTPUTS, "mono", 0.05);
423 m_cassette->set_interface("mz_cass");
424
425 SOFTWARE_LIST(config, "cass_list").set_original("mz700_cass");
426
427 /* internal ram */
428 RAM(config, RAM_TAG).set_default_size("64K");
429 }
430
431
mz800(machine_config & config)432 void mz_state::mz800(machine_config &config)
433 {
434 mz700(config);
435 config.device_remove("banke");
436
437 /* basic machine hardware */
438 m_maincpu->set_addrmap(AS_PROGRAM, &mz_state::mz800_mem);
439 m_maincpu->set_addrmap(AS_IO, &mz_state::mz800_io);
440
441 ADDRESS_MAP_BANK(config, "bankf").set_map(&mz_state::mz800_bankf).set_options(ENDIANNESS_LITTLE, 8, 16, 0x2000);
442
443 MCFG_MACHINE_RESET_OVERRIDE(mz_state, mz800)
444 subdevice<gfxdecode_device>("gfxdecode")->set_info(gfx_mz800);
445
446 m_screen->set_screen_update(FUNC(mz_state::screen_update_mz800));
447
448 SN76489(config, "sn76489n", XTAL(17'734'470)/5).add_route(ALL_OUTPUTS, "mono", 1.0);
449
450 config.device_remove("cass_list");
451 SOFTWARE_LIST(config, "cass_list").set_original("mz800_cass");
452
453 /* devices */
454 m_pit->set_clk<0>(XTAL(17'734'470)/16);
455
456 z80pio_device& pio(Z80PIO(config, "z80pio", XTAL(17'734'470)/5));
457 pio.out_int_callback().set(FUNC(mz_state::mz800_z80pio_irq));
458 pio.in_pa_callback().set(FUNC(mz_state::mz800_z80pio_port_a_r));
459 pio.out_pa_callback().set(FUNC(mz_state::mz800_z80pio_port_a_w));
460 pio.out_pb_callback().set("cent_data_out", FUNC(output_latch_device::write));
461
462 CENTRONICS(config, m_centronics, centronics_devices, "printer");
463
464 output_latch_device ¢_data_out(OUTPUT_LATCH(config, "cent_data_out"));
465 m_centronics->set_output_latch(cent_data_out);
466 }
467
468
469 /***************************************************************************
470 ROM DEFINITIONS
471 ***************************************************************************/
472
473 ROM_START( mz700 )
474 ROM_REGION( 0x1000, "monitor", 0 )
475 ROM_LOAD( "1z-013a.rom", 0x0000, 0x1000, CRC(4c6c6b7b) SHA1(ef8f7399e86c1dc638a5cb83efdb73369c2b5735) )
476
477 ROM_REGION( 0x1000, "cgrom", 0 )
478 ROM_LOAD( "mz700fon.int", 0x0000, 0x1000, CRC(42b9e8fb) SHA1(5128ad179a702f8e0bd9910a58bad8fbe4c20167) )
479 ROM_END
480
481 ROM_START( mz700j )
482 ROM_REGION( 0x1000, "monitor", 0 )
483 ROM_LOAD( "1z-009b.rom", 0x0000, 0x1000, CRC(ab1fbe6f) SHA1(7b10d7965c541393e33a265bcf71a00314d2db7a))
484
485 ROM_REGION( 0x1000, "cgrom", 0 )
486 //ROM_LOAD( "mz700fon.jp", 0x0000, 0x1000, CRC(697ec121) SHA1(5eb1d42d273b1fd2cab120486279ab8ff6c85dc7))
487 ROM_LOAD( "mz700fon.jpn", 0x0000, 0x1000, CRC(425eedf5) SHA1(bd2cc750f2d2f63e50a59786668509e81a276e32) )
488 ROM_END
489
490 ROM_START( mz800 )
491 ROM_REGION( 0x4000, "monitor", 0 )
492 ROM_LOAD( "mz800.rom", 0x0000, 0x4000, CRC(600d17e1) SHA1(950ce4b51429916f8036e41ba6130fac149b36e4) )
493
494 ROM_REGION( 0x10000, "user1", ROMREGION_ERASE00 ) // ramdisk
495 ROM_END
496
497 ROM_START( mz1500 )
498 ROM_REGION( 0x4000, "monitor", 0 )
499 ROM_LOAD( "9z-502m.rom", 0x0000, 0x1000, CRC(643db428) SHA1(c2ad8af2ef00db32afde54d5741b07de5d4da16a))
500 ROM_CONTINUE(0x2800, 0x1800)
501
502 ROM_REGION( 0x1000, "cgrom", 0 )
503 //ROM_LOAD( "mz700fon.jp", 0x0000, 0x1000, CRC(697ec121) SHA1(5eb1d42d273b1fd2cab120486279ab8ff6c85dc7))
504 ROM_LOAD( "mz700fon.jpn", 0x0000, 0x1000, CRC(425eedf5) SHA1(bd2cc750f2d2f63e50a59786668509e81a276e32) )
505
506 ROM_REGION( 0x10000, "user1", ROMREGION_ERASE00 ) // ramdisk
507 ROM_END
508
509 /***************************************************************************
510 GAME DRIVERS
511 ***************************************************************************/
512
513 // YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS
514 COMP( 1982, mz700, 0, 0, mz700, mz700, mz_state, init_mz700, "Sharp", "MZ-700", 0 )
515 COMP( 1982, mz700j, mz700, 0, mz700, mz700, mz_state, init_mz700, "Sharp", "MZ-700 (Japan)", 0 )
516 COMP( 1984, mz800, 0, 0, mz800, mz800, mz_state, init_mz800, "Sharp", "MZ-800", MACHINE_NOT_WORKING )
517 COMP( 1984, mz1500, 0, 0, mz800, mz800, mz_state, init_mz800, "Sharp", "MZ-1500", MACHINE_NOT_WORKING ) // Japanese version of the MZ-800
518