Previous

199869 Revisions

Next

r21073 Thursday 14th February, 2013 at 19:57:26 UTC by Wilbert Pol
(MESS) radio86.c orion.c: Reduce tagmap lookups (nw)

[src/mess/drivers]	orion.c
[src/mess/includes]	orion.h radio86.h
[src/mess/machine]	orion.c radio86.c
[src/mess/video]	orion.c

trunk/src/mess/machine/orion.c

r21072	r21073
11	11	#include "emu.h"
12	12	#include "cpu/i8085/i8085.h"
13	13	#include "imagedev/cassette.h"
14		#include "machine/mc146818.h"
15	14	#include "sound/speaker.h"
16	15	#include "sound/ay8910.h"
17	16	#include "includes/orion.h"
18		#include "includes/radio86.h"
19		#include "machine/ram.h"
20	17
21	18	#define SCREEN_WIDTH_384 48
22	19	#define SCREEN_WIDTH_480 60
r21072	r21073
24	21
25	22
26	23
27
28
29	24	READ8_MEMBER(orion_state::orion_romdisk_porta_r)
30	25	{
31		UINT8 *romdisk = memregion("maincpu")->base() + 0x10000;
	26	UINT8 *romdisk = m_region_maincpu->base() + 0x10000;
32	27	return romdisk[m_romdisk_msb*256+m_romdisk_lsb];
33	28	}
34	29
r21072	r21073
60	55
61	56	READ8_MEMBER(orion_state::orion128_system_r)
62	57	{
63		return machine().device<i8255_device>("ppi8255_2")->read(space, offset & 3);
	58	return m_ppi8255_2->read(space, offset & 3);
64	59	}
65	60
66	61	WRITE8_MEMBER(orion_state::orion128_system_w)
67	62	{
68		machine().device<i8255_device>("ppi8255_2")->write(space, offset & 3, data);
	63	m_ppi8255_2->write(space, offset & 3, data);
69	64	}
70	65
71	66	READ8_MEMBER(orion_state::orion128_romdisk_r)
72	67	{
73		return machine().device<i8255_device>("ppi8255_1")->read(space, offset & 3);
	68	return m_ppi8255_1->read(space, offset & 3);
74	69	}
75	70
76	71	WRITE8_MEMBER(orion_state::orion128_romdisk_w)
77	72	{
78		machine().device<i8255_device>("ppi8255_1")->write(space, offset & 3, data);
	73	m_ppi8255_1->write(space, offset & 3, data);
79	74	}
80	75
81		static void orion_set_video_mode(running_machine &machine, int width)
	76	void orion_state::orion_set_video_mode(int width)
82	77	{
83		rectangle visarea(0, width-1, 0, 255);
84		machine.primary_screen->configure(width, 256, visarea, machine.primary_screen->frame_period().attoseconds);
	78	rectangle visarea(0, width-1, 0, 255);
	79	machine().primary_screen->configure(width, 256, visarea, machine().primary_screen->frame_period().attoseconds);
85	80	}
86	81
87	82	WRITE8_MEMBER(orion_state::orion128_video_mode_w)
r21072	r21073
93	88	if (m_video_mode_mask == 31)
94	89	{
95	90	m_orion128_video_width = SCREEN_WIDTH_512;
96		orion_set_video_mode(machine(),512);
	91	orion_set_video_mode(512);
97	92	}
98	93	else
99	94	{
100	95	m_orion128_video_width = SCREEN_WIDTH_480;
101		orion_set_video_mode(machine(),480);
	96	orion_set_video_mode(480);
102	97	}
103	98	}
104	99	else
105	100	{
106	101	m_orion128_video_width = SCREEN_WIDTH_384;
107		orion_set_video_mode(machine(),384);
	102	orion_set_video_mode(384);
108	103	}
109	104	}
110	105
r21072	r21073
122	117	if (m_video_mode_mask == 31)
123	118	{
124	119	m_orion128_video_width = SCREEN_WIDTH_512;
125		orion_set_video_mode(machine(),512);
	120	orion_set_video_mode(512);
126	121	}
127	122	else
128	123	{
129	124	m_orion128_video_width = SCREEN_WIDTH_480;
130		orion_set_video_mode(machine(),480);
	125	orion_set_video_mode(480);
131	126	}
132	127	}
133	128	else
134	129	{
135	130	m_orion128_video_width = SCREEN_WIDTH_384;
136		orion_set_video_mode(machine(),384);
	131	orion_set_video_mode(384);
137	132	}
138	133	}
139	134	}
r21072	r21073
145	140	{
146	141	if (data!=m_orion128_memory_page )
147	142	{
148		membank("bank1")->set_base(machine().device<ram_device>(RAM_TAG)->pointer() + (data & 3) * 0x10000);
	143	m_bank1->set_base(m_ram->pointer() + (data & 3) * 0x10000);
149	144	m_orion128_memory_page = (data & 3);
150	145	}
151	146	}
r21072	r21073
155	150	m_orion128_video_page = 0;
156	151	m_orion128_video_mode = 0;
157	152	m_orion128_memory_page = -1;
158		membank("bank1")->set_base(memregion("maincpu")->base() + 0xf800);
159		membank("bank2")->set_base(machine().device<ram_device>(RAM_TAG)->pointer() + 0xf000);
	153	m_bank1->set_base(m_region_maincpu->base() + 0xf800);
	154	m_bank2->set_base(m_ram->pointer() + 0xf000);
160	155	m_orion128_video_width = SCREEN_WIDTH_384;
161		orion_set_video_mode(machine(),384);
162		radio86_init_keyboard(machine());
	156	orion_set_video_mode(384);
	157	radio86_init_keyboard();
163	158	}
164	159
165	160	WRITE8_MEMBER(orion_state::orion_disk_control_w)
166	161	{
167		static const char *names[] = { "fd0", "fd1", "fd2", "fd3"};
168		floppy_image_device *floppy = NULL;
169		floppy_connector *con = machine().device<floppy_connector>(names[data & 3]);
170		if(con)
171		floppy = con->get_device();
	162	floppy_connector *names[] = { m_fd0, m_fd1, m_fd2, m_fd3};
	163	floppy_image_device *floppy = names[data & 3]->get_device();
172	164
173	165	m_fdc->set_floppy(floppy);
174	166	floppy->mon_w(0);
r21072	r21073
212	204	{
213	205	if ((offset >= 0x60) && (offset <= 0x6f))
214	206	{
215		return machine().device<mc146818_device>("rtc")->read(space,offset-0x60);
	207	return m_rtc->read(space,offset-0x60);
216	208	}
217	209	else
218	210	{
r21072	r21073
224	216	{
225	217	if ((offset >= 0x60) && (offset <= 0x6f))
226	218	{
227		machine().device<mc146818_device>("rtc")->write(space,offset-0x60,data);
	219	m_rtc->write(space,offset-0x60,data);
228	220	}
229	221	else
230	222	{
r21072	r21073
240	232
241	233	WRITE8_MEMBER(orion_state::orionz80_sound_w)
242	234	{
243		device_t *speaker = machine().device(SPEAKER_TAG);
244		if (m_speaker == 0)
	235	if (m_speaker_data == 0)
245	236	{
246		m_speaker = data;
	237	m_speaker_data = data;
247	238	}
248	239	else
249	240	{
250		m_speaker = 0 ;
	241	m_speaker_data = 0;
251	242	}
252		speaker_level_w(speaker,m_speaker);
	243	speaker_level_w(m_speaker,m_speaker_data);
253	244
254	245	}
255	246
256	247	WRITE8_MEMBER(orion_state::orionz80_sound_fe_w)
257	248	{
258		device_t *speaker = machine().device(SPEAKER_TAG);
259		speaker_level_w(speaker,(data>>4) & 0x01);
	249	speaker_level_w(m_speaker,(data>>4) & 0x01);
260	250	}
261	251
262	252
263		static void orionz80_switch_bank(running_machine &machine)
	253	void orion_state::orionz80_switch_bank()
264	254	{
265		orion_state *state = machine.driver_data<orion_state>();
266	255	UINT8 bank_select;
267	256	UINT8 segment_select;
268		address_space &space = machine.device("maincpu")->memory().space(AS_PROGRAM);
	257	address_space &space = m_maincpu->space(AS_PROGRAM);
269	258
270		bank_select = (state->m_orionz80_dispatcher & 0x0c) >> 2;
271		segment_select = state->m_orionz80_dispatcher & 0x03;
	259	bank_select = (m_orionz80_dispatcher & 0x0c) >> 2;
	260	segment_select = m_orionz80_dispatcher & 0x03;
272	261
273	262	space.install_write_bank(0x0000, 0x3fff, "bank1");
274		if ((state->m_orionz80_dispatcher & 0x80)==0)
	263	if ((m_orionz80_dispatcher & 0x80)==0)
275	264	{ // dispatcher on
276		state->membank("bank1")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0x10000 * bank_select + segment_select * 0x4000 );
	265	m_bank1->set_base(m_ram->pointer() + 0x10000 * bank_select + segment_select * 0x4000 );
277	266	}
278	267	else
279	268	{ // dispatcher off
280		state->membank("bank1")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0x10000 * state->m_orionz80_memory_page);
	269	m_bank1->set_base(m_ram->pointer() + 0x10000 * m_orionz80_memory_page);
281	270	}
282	271
283		state->membank("bank2")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0x4000 + 0x10000 * state->m_orionz80_memory_page);
	272	m_bank2->set_base(m_ram->pointer() + 0x4000 + 0x10000 * m_orionz80_memory_page);
284	273
285		if ((state->m_orionz80_dispatcher & 0x20) == 0)
	274	if ((m_orionz80_dispatcher & 0x20) == 0)
286	275	{
287		space.install_write_handler(0xf400, 0xf4ff, write8_delegate(FUNC(orion_state::orion128_system_w),state));
288		space.install_write_handler(0xf500, 0xf5ff, write8_delegate(FUNC(orion_state::orion128_romdisk_w),state));
289		space.install_write_handler(0xf700, 0xf7ff, write8_delegate(FUNC(orion_state::orionz80_floppy_rtc_w),state));
290		space.install_read_handler(0xf400, 0xf4ff, read8_delegate(FUNC(orion_state::orion128_system_r),state));
291		space.install_read_handler(0xf500, 0xf5ff, read8_delegate(FUNC(orion_state::orion128_romdisk_r),state));
292		space.install_read_handler(0xf700, 0xf7ff, read8_delegate(FUNC(orion_state::orionz80_floppy_rtc_r),state));
	276	space.install_write_handler(0xf400, 0xf4ff, write8_delegate(FUNC(orion_state::orion128_system_w),this));
	277	space.install_write_handler(0xf500, 0xf5ff, write8_delegate(FUNC(orion_state::orion128_romdisk_w),this));
	278	space.install_write_handler(0xf700, 0xf7ff, write8_delegate(FUNC(orion_state::orionz80_floppy_rtc_w),this));
	279	space.install_read_handler(0xf400, 0xf4ff, read8_delegate(FUNC(orion_state::orion128_system_r),this));
	280	space.install_read_handler(0xf500, 0xf5ff, read8_delegate(FUNC(orion_state::orion128_romdisk_r),this));
	281	space.install_read_handler(0xf700, 0xf7ff, read8_delegate(FUNC(orion_state::orionz80_floppy_rtc_r),this));
293	282
294		space.install_write_handler(0xf800, 0xf8ff, write8_delegate(FUNC(orion_state::orion128_video_mode_w),state));
295		space.install_write_handler(0xf900, 0xf9ff, write8_delegate(FUNC(orion_state::orionz80_memory_page_w),state));
296		space.install_write_handler(0xfa00, 0xfaff, write8_delegate(FUNC(orion_state::orion128_video_page_w),state));
297		space.install_write_handler(0xfb00, 0xfbff, write8_delegate(FUNC(orion_state::orionz80_dispatcher_w),state));
	283	space.install_write_handler(0xf800, 0xf8ff, write8_delegate(FUNC(orion_state::orion128_video_mode_w),this));
	284	space.install_write_handler(0xf900, 0xf9ff, write8_delegate(FUNC(orion_state::orionz80_memory_page_w),this));
	285	space.install_write_handler(0xfa00, 0xfaff, write8_delegate(FUNC(orion_state::orion128_video_page_w),this));
	286	space.install_write_handler(0xfb00, 0xfbff, write8_delegate(FUNC(orion_state::orionz80_dispatcher_w),this));
298	287	space.unmap_write(0xfc00, 0xfeff);
299		space.install_write_handler(0xff00, 0xffff, write8_delegate(FUNC(orion_state::orionz80_sound_w),state));
	288	space.install_write_handler(0xff00, 0xffff, write8_delegate(FUNC(orion_state::orionz80_sound_w),this));
300	289
301		state->membank("bank3")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0xf000);
302		state->membank("bank5")->set_base(machine.root_device().memregion("maincpu")->base() + 0xf800);
	290	m_bank3->set_base(m_ram->pointer() + 0xf000);
	291	m_bank5->set_base(m_region_maincpu->base() + 0xf800);
303	292
304	293	}
305	294	else
306	295	{
307	296	/* if it is full memory access */
308		state->membank("bank3")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0xf000 + 0x10000 * state->m_orionz80_memory_page);
309		state->membank("bank4")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0xf400 + 0x10000 * state->m_orionz80_memory_page);
310		state->membank("bank5")->set_base(machine.device<ram_device>(RAM_TAG)->pointer() + 0xf800 + 0x10000 * state->m_orionz80_memory_page);
	297	m_bank3->set_base(m_ram->pointer() + 0xf000 + 0x10000 * m_orionz80_memory_page);
	298	m_bank4->set_base(m_ram->pointer() + 0xf400 + 0x10000 * m_orionz80_memory_page);
	299	m_bank5->set_base(m_ram->pointer() + 0xf800 + 0x10000 * m_orionz80_memory_page);
311	300	}
312	301	}
313	302
314	303	WRITE8_MEMBER(orion_state::orionz80_memory_page_w)
315	304	{
316	305	m_orionz80_memory_page = data & 7;
317		orionz80_switch_bank(machine());
	306	orionz80_switch_bank();
318	307	}
319	308
320	309	WRITE8_MEMBER(orion_state::orionz80_dispatcher_w)
321	310	{
322	311	m_orionz80_dispatcher = data;
323		orionz80_switch_bank(machine());
	312	orionz80_switch_bank();
324	313	}
325	314
326	315	MACHINE_RESET_MEMBER(orion_state,orionz80)
327	316	{
328		address_space &space = machine().device("maincpu")->memory().space(AS_PROGRAM);
	317	address_space &space = m_maincpu->space(AS_PROGRAM);
329	318
330	319	space.unmap_write(0x0000, 0x3fff);
331	320	space.install_write_bank(0x4000, 0xefff, "bank2");
r21072	r21073
346	335	space.install_write_handler(0xff00, 0xffff, write8_delegate(FUNC(orion_state::orionz80_sound_w),this));
347	336
348	337
349		membank("bank1")->set_base(machine().root_device().memregion("maincpu")->base() + 0xf800);
350		membank("bank2")->set_base(machine().device<ram_device>(RAM_TAG)->pointer() + 0x4000);
351		membank("bank3")->set_base(machine().device<ram_device>(RAM_TAG)->pointer() + 0xf000);
352		membank("bank5")->set_base(memregion("maincpu")->base() + 0xf800);
	338	m_bank1->set_base(m_region_maincpu->base() + 0xf800);
	339	m_bank2->set_base(m_ram->pointer() + 0x4000);
	340	m_bank3->set_base(m_ram->pointer() + 0xf000);
	341	m_bank5->set_base(m_region_maincpu->base() + 0xf800);
353	342
354	343
355	344	m_orion128_video_page = 0;
356	345	m_orion128_video_mode = 0;
357	346	m_orionz80_memory_page = 0;
358	347	m_orionz80_dispatcher = 0;
359		m_speaker = 0;
	348	m_speaker_data = 0;
360	349	m_orion128_video_width = SCREEN_WIDTH_384;
361		orion_set_video_mode(machine(),384);
362		radio86_init_keyboard(machine());
	350	orion_set_video_mode(384);
	351	radio86_init_keyboard();
363	352	}
364	353
365	354	INTERRUPT_GEN_MEMBER(orion_state::orionz80_interrupt)
r21072	r21073
374	363	{
375	364	if (offset == 0xFFFD)
376	365	{
377		return ay8910_r (machine().device("ay8912"), space, 0);
	366	return ay8910_r(m_ay8912, space, 0);
378	367	}
379	368	return 0xff;
380	369	}
r21072	r21073
392	381	}
393	382	switch(offset)
394	383	{
395		case 0xfffd : ay8910_address_w(machine().device("ay8912"), space, 0, data);
	384	case 0xfffd : ay8910_address_w(m_ay8912, space, 0, data);
396	385	break;
397	386	case 0xbffd :
398		case 0xbefd : ay8910_data_w(machine().device("ay8912"), space, 0, data);
	387	case 0xbefd : ay8910_data_w(m_ay8912, space, 0, data);
399	388	break;
400	389	}
401	390	}
r21072	r21073
406	395
407	396
408	397
409		static void orionpro_bank_switch(running_machine &machine)
	398	void orion_state::orionpro_bank_switch()
410	399	{
411		orion_state *state = machine.driver_data<orion_state>();
412		address_space &space = machine.device("maincpu")->memory().space(AS_PROGRAM);
413		int page = state->m_orionpro_page & 7; // we have only 8 pages
414		int is128 = (state->m_orionpro_dispatcher & 0x80) ? 1 : 0;
415		UINT8 *ram = machine.device<ram_device>(RAM_TAG)->pointer();
	400	address_space &space = m_maincpu->space(AS_PROGRAM);
	401	int page = m_orionpro_page & 7; // we have only 8 pages
	402	int is128 = (m_orionpro_dispatcher & 0x80) ? 1 : 0;
	403	UINT8 *ram = m_ram->pointer();
416	404
417	405	if (is128==1)
418	406	{
419		page = state->m_orionpro_128_page & 7;
	407	page = m_orionpro_128_page & 7;
420	408	}
421	409	space.install_write_bank(0x0000, 0x1fff, "bank1");
422	410	space.install_write_bank(0x2000, 0x3fff, "bank2");
r21072	r21073
428	416	space.install_write_bank(0xf800, 0xffff, "bank8");
429	417
430	418
431		if ((state->m_orionpro_dispatcher & 0x01)==0x00)
	419	if ((m_orionpro_dispatcher & 0x01)==0x00)
432	420	{   // RAM0 segment disabled
433		state->membank("bank1")->set_base(ram + 0x10000 * page);
434		state->membank("bank2")->set_base(ram + 0x10000 * page + 0x2000);
	421	m_bank1->set_base(ram + 0x10000 * page);
	422	m_bank2->set_base(ram + 0x10000 * page + 0x2000);
435	423	}
436	424	else
437	425	{
438		state->membank("bank1")->set_base(ram + (state->m_orionpro_ram0_segment & 31) * 0x4000);
439		state->membank("bank2")->set_base(ram + (state->m_orionpro_ram0_segment & 31) * 0x4000 + 0x2000);
	426	m_bank1->set_base(ram + (m_orionpro_ram0_segment & 31) * 0x4000);
	427	m_bank2->set_base(ram + (m_orionpro_ram0_segment & 31) * 0x4000 + 0x2000);
440	428	}
441		if ((state->m_orionpro_dispatcher & 0x10)==0x10)
	429	if ((m_orionpro_dispatcher & 0x10)==0x10)
442	430	{   // ROM1 enabled
443	431	space.unmap_write(0x0000, 0x1fff);
444		state->membank("bank1")->set_base(machine.root_device().memregion("maincpu")->base() + 0x20000);
	432	m_bank1->set_base(m_region_maincpu->base() + 0x20000);
445	433	}
446		if ((state->m_orionpro_dispatcher & 0x08)==0x08)
	434	if ((m_orionpro_dispatcher & 0x08)==0x08)
447	435	{   // ROM2 enabled
448	436	space.unmap_write(0x2000, 0x3fff);
449		state->membank("bank2")->set_base(machine.root_device().memregion("maincpu")->base() + 0x22000 + (state->m_orionpro_rom2_segment & 7) * 0x2000);
	437	m_bank2->set_base(m_region_maincpu->base() + 0x22000 + (m_orionpro_rom2_segment & 7) * 0x2000);
450	438	}
451	439
452		if ((state->m_orionpro_dispatcher & 0x02)==0x00)
	440	if ((m_orionpro_dispatcher & 0x02)==0x00)
453	441	{   // RAM1 segment disabled
454		state->membank("bank3")->set_base(ram + 0x10000 * page + 0x4000);
	442	m_bank3->set_base(ram + 0x10000 * page + 0x4000);
455	443	}
456	444	else
457	445	{
458		state->membank("bank3")->set_base(ram + (state->m_orionpro_ram1_segment & 31) * 0x4000);
	446	m_bank3->set_base(ram + (m_orionpro_ram1_segment & 31) * 0x4000);
459	447	}
460	448
461		if ((state->m_orionpro_dispatcher & 0x04)==0x00)
	449	if ((m_orionpro_dispatcher & 0x04)==0x00)
462	450	{   // RAM2 segment disabled
463		state->membank("bank4")->set_base(ram + 0x10000 * page + 0x8000);
	451	m_bank4->set_base(ram + 0x10000 * page + 0x8000);
464	452	}
465	453	else
466	454	{
467		state->membank("bank4")->set_base(ram + (state->m_orionpro_ram2_segment & 31) * 0x4000);
	455	m_bank4->set_base(ram + (m_orionpro_ram2_segment & 31) * 0x4000);
468	456	}
469	457
470		state->membank("bank5")->set_base(ram + 0x10000 * page + 0xc000);
	458	m_bank5->set_base(ram + 0x10000 * page + 0xc000);
471	459
472	460	if (is128)
473	461	{
474		state->membank("bank6")->set_base(ram + 0x10000 * 0 + 0xf000);
	462	m_bank6->set_base(ram + 0x10000 * 0 + 0xf000);
475	463
476		space.install_write_handler(0xf400, 0xf4ff, write8_delegate(FUNC(orion_state::orion128_system_w),state));
477		space.install_write_handler(0xf500, 0xf5ff, write8_delegate(FUNC(orion_state::orion128_romdisk_w),state));
	464	space.install_write_handler(0xf400, 0xf4ff, write8_delegate(FUNC(orion_state::orion128_system_w),this));
	465	space.install_write_handler(0xf500, 0xf5ff, write8_delegate(FUNC(orion_state::orion128_romdisk_w),this));
478	466	space.unmap_write(0xf600, 0xf6ff);
479		space.install_write_handler(0xf700, 0xf7ff, write8_delegate(FUNC(orion_state::orion128_floppy_w),state));
480		space.install_read_handler(0xf400, 0xf4ff, read8_delegate(FUNC(orion_state::orion128_system_r),state));
481		space.install_read_handler(0xf500, 0xf5ff, read8_delegate(FUNC(orion_state::orion128_romdisk_r),state));
	467	space.install_write_handler(0xf700, 0xf7ff, write8_delegate(FUNC(orion_state::orion128_floppy_w),this));
	468	space.install_read_handler(0xf400, 0xf4ff, read8_delegate(FUNC(orion_state::orion128_system_r),this));
	469	space.install_read_handler(0xf500, 0xf5ff, read8_delegate(FUNC(orion_state::orion128_romdisk_r),this));
482	470	space.unmap_read(0xf600, 0xf6ff);
483		space.install_read_handler(0xf700, 0xf7ff, read8_delegate(FUNC(orion_state::orion128_floppy_r),state));
	471	space.install_read_handler(0xf700, 0xf7ff, read8_delegate(FUNC(orion_state::orion128_floppy_r),this));
484	472
485		space.install_write_handler(0xf800, 0xf8ff, write8_delegate(FUNC(orion_state::orion128_video_mode_w),state));
486		space.install_write_handler(0xf900, 0xf9ff, write8_delegate(FUNC(orion_state::orionpro_memory_page_w),state));
487		space.install_write_handler(0xfa00, 0xfaff, write8_delegate(FUNC(orion_state::orion128_video_page_w),state));
	473	space.install_write_handler(0xf800, 0xf8ff, write8_delegate(FUNC(orion_state::orion128_video_mode_w),this));
	474	space.install_write_handler(0xf900, 0xf9ff, write8_delegate(FUNC(orion_state::orionpro_memory_page_w),this));
	475	space.install_write_handler(0xfa00, 0xfaff, write8_delegate(FUNC(orion_state::orion128_video_page_w),this));
488	476	space.unmap_write(0xfb00, 0xfeff);
489		space.install_write_handler(0xff00, 0xffff, write8_delegate(FUNC(orion_state::orionz80_sound_w),state));
	477	space.install_write_handler(0xff00, 0xffff, write8_delegate(FUNC(orion_state::orionz80_sound_w),this));
490	478
491	479
492		state->membank("bank8")->set_base(ram + 0x10000 * 0 + 0xf800);
	480	m_bank8->set_base(ram + 0x10000 * 0 + 0xf800);
493	481	}
494	482	else
495	483	{
496		if ((state->m_orionpro_dispatcher & 0x40)==0x40)
	484	if ((m_orionpro_dispatcher & 0x40)==0x40)
497	485	{   // FIX F000 enabled
498		state->membank("bank6")->set_base(ram + 0x10000 * 0 + 0xf000);
499		state->membank("bank7")->set_base(ram + 0x10000 * 0 + 0xf400);
500		state->membank("bank8")->set_base(ram + 0x10000 * 0 + 0xf800);
	486	m_bank6->set_base(ram + 0x10000 * 0 + 0xf000);
	487	m_bank7->set_base(ram + 0x10000 * 0 + 0xf400);
	488	m_bank8->set_base(ram + 0x10000 * 0 + 0xf800);
501	489	}
502	490	else
503	491	{
504		state->membank("bank6")->set_base(ram + 0x10000 * page + 0xf000);
505		state->membank("bank7")->set_base(ram + 0x10000 * page + 0xf400);
506		state->membank("bank8")->set_base(ram + 0x10000 * page + 0xf800);
	492	m_bank6->set_base(ram + 0x10000 * page + 0xf000);
	493	m_bank7->set_base(ram + 0x10000 * page + 0xf400);
	494	m_bank8->set_base(ram + 0x10000 * page + 0xf800);
507	495	}
508	496	}
509	497	}
r21072	r21073
511	499	WRITE8_MEMBER(orion_state::orionpro_memory_page_w)
512	500	{
513	501	m_orionpro_128_page = data;
514		orionpro_bank_switch(machine());
	502	orionpro_bank_switch();
515	503	}
516	504
517	505	MACHINE_RESET_MEMBER(orion_state,orionpro)
518	506	{
519		radio86_init_keyboard(machine());
	507	radio86_init_keyboard();
520	508
521	509	m_orion128_video_page = 0;
522	510	m_orion128_video_mode = 0;
r21072	r21073
529	517	m_orionpro_rom2_segment = 0;
530	518
531	519	m_orionpro_dispatcher = 0x50;
532		orionpro_bank_switch(machine());
	520	orionpro_bank_switch();
533	521
534		m_speaker = 0;
	522	m_speaker_data = 0;
535	523	m_orion128_video_width = SCREEN_WIDTH_384;
536		orion_set_video_mode(machine(),384);
	524	orion_set_video_mode(384);
537	525
538	526	m_video_mode_mask = 31;
539	527	m_orionpro_pseudo_color = 0;
r21072	r21073
566	554	}
567	555	if (offset == 0xFFFD)
568	556	{
569		return ay8910_r (machine().device("ay8912"), space, 0);
	557	return ay8910_r(m_ay8912, space, 0);
570	558	}
571	559	return 0xff;
572	560	}
r21072	r21073
575	563	{
576	564	switch (offset & 0xff)
577	565	{
578		case 0x04 : m_orionpro_ram0_segment = data; orionpro_bank_switch(machine()); break;
579		case 0x05 : m_orionpro_ram1_segment = data; orionpro_bank_switch(machine()); break;
580		case 0x06 : m_orionpro_ram2_segment = data; orionpro_bank_switch(machine()); break;
581		case 0x08 : m_orionpro_page = data;       orionpro_bank_switch(machine()); break;
582		case 0x09 : m_orionpro_rom2_segment = data; orionpro_bank_switch(machine()); break;
583		case 0x0a : m_orionpro_dispatcher = data;   orionpro_bank_switch(machine()); break;
	566	case 0x04 : m_orionpro_ram0_segment = data; orionpro_bank_switch(); break;
	567	case 0x05 : m_orionpro_ram1_segment = data; orionpro_bank_switch(); break;
	568	case 0x06 : m_orionpro_ram2_segment = data; orionpro_bank_switch(); break;
	569	case 0x08 : m_orionpro_page = data;       orionpro_bank_switch(); break;
	570	case 0x09 : m_orionpro_rom2_segment = data; orionpro_bank_switch(); break;
	571	case 0x0a : m_orionpro_dispatcher = data;   orionpro_bank_switch(); break;
584	572	case 0x10 : m_fdc->cmd_w(space, 0,data); break;
585	573	case 0x11 : m_fdc->track_w(space, 0,data);break;
586	574	case 0x12 : m_fdc->sector_w(space, 0,data);break;
r21072	r21073
596	584	case 0x2a : orion128_romdisk_w(space,2,data); break;
597	585	case 0x2b : orion128_romdisk_w(space,3,data); break;
598	586	case 0xf8 : orion128_video_mode_w(space,0,data);break;
599		case 0xf9 : m_orionpro_128_page = data;   orionpro_bank_switch(machine()); break;
	587	case 0xf9 : m_orionpro_128_page = data;   orionpro_bank_switch(); break;
600	588	case 0xfa : orion128_video_page_w(space,0,data);break;
601	589	case 0xfc : m_orionpro_pseudo_color = data;break;
602	590	case 0xfe : orionz80_sound_fe_w(space,0,data);break;
r21072	r21073
604	592	}
605	593	switch(offset)
606	594	{
607		case 0xfffd : ay8910_address_w(machine().device("ay8912"), space, 0, data);
	595	case 0xfffd : ay8910_address_w(m_ay8912, space, 0, data);
608	596	break;
609	597	case 0xbffd :
610		case 0xbefd : ay8910_data_w(machine().device("ay8912"), space, 0, data);
	598	case 0xbefd : ay8910_data_w(m_ay8912, space, 0, data);
611	599	break;
612	600	}
613	601	}

trunk/src/mess/machine/radio86.c

r21072	r21073
9	9
10	10	#include "emu.h"
11	11	#include "cpu/i8085/i8085.h"
12		#include "imagedev/cassette.h"
13	12	#include "machine/i8255.h"
14	13	#include "machine/8257dma.h"
15	14	#include "video/i8275.h"
r21072	r21073
17	16
18	17
19	18
20		void radio86_init_keyboard(running_machine &machine)
	19	void radio86_state::radio86_init_keyboard()
21	20	{
22		radio86_state *state = machine.driver_data<radio86_state>();
23		state->m_keyboard_mask = 0;
24		state->m_tape_value = 0x10;
	21	m_keyboard_mask = 0;
	22	m_tape_value = 0x10;
25	23	}
26	24
27	25	/* Driver initialization */
28	26	DRIVER_INIT_MEMBER(radio86_state,radio86)
29	27	{
30	28	/* set initialy ROM to be visible on first bank */
31		UINT8 *RAM = memregion("maincpu")->base();
	29	UINT8 *RAM = m_region_maincpu->base();
32	30	memset(RAM,0x0000,0x1000); // make frist page empty by default
33		membank("bank1")->configure_entries(1, 2, RAM, 0x0000);
34		membank("bank1")->configure_entries(0, 2, RAM, 0xf800);
35		radio86_init_keyboard(machine());
	31	m_bank1->configure_entries(1, 2, RAM, 0x0000);
	32	m_bank1->configure_entries(0, 2, RAM, 0xf800);
	33	radio86_init_keyboard();
36	34	}
37	35
38	36	DRIVER_INIT_MEMBER(radio86_state,radioram)
r21072	r21073
44	42	READ8_MEMBER(radio86_state::radio86_8255_portb_r2)
45	43	{
46	44	UINT8 key = 0xff;
47		if ((m_keyboard_mask & 0x01)!=0) { key &= ioport("LINE0")->read(); }
48		if ((m_keyboard_mask & 0x02)!=0) { key &= machine().root_device().ioport("LINE1")->read(); }
49		if ((m_keyboard_mask & 0x04)!=0) { key &= machine().root_device().ioport("LINE2")->read(); }
50		if ((m_keyboard_mask & 0x08)!=0) { key &= machine().root_device().ioport("LINE3")->read(); }
51		if ((m_keyboard_mask & 0x10)!=0) { key &= machine().root_device().ioport("LINE4")->read(); }
52		if ((m_keyboard_mask & 0x20)!=0) { key &= machine().root_device().ioport("LINE5")->read(); }
53		if ((m_keyboard_mask & 0x40)!=0) { key &= machine().root_device().ioport("LINE6")->read(); }
54		if ((m_keyboard_mask & 0x80)!=0) { key &= machine().root_device().ioport("LINE7")->read(); }
	45	if ((m_keyboard_mask & 0x01)!=0) { key &= m_io_line0->read(); }
	46	if ((m_keyboard_mask & 0x02)!=0) { key &= m_io_line1->read(); }
	47	if ((m_keyboard_mask & 0x04)!=0) { key &= m_io_line2->read(); }
	48	if ((m_keyboard_mask & 0x08)!=0) { key &= m_io_line3->read(); }
	49	if ((m_keyboard_mask & 0x10)!=0) { key &= m_io_line4->read(); }
	50	if ((m_keyboard_mask & 0x20)!=0) { key &= m_io_line5->read(); }
	51	if ((m_keyboard_mask & 0x40)!=0) { key &= m_io_line6->read(); }
	52	if ((m_keyboard_mask & 0x80)!=0) { key &= m_io_line7->read(); }
55	53	return key;
56	54	}
57	55
58	56	READ8_MEMBER(radio86_state::radio86_8255_portc_r2)
59	57	{
60		double level = (machine().device<cassette_image_device>(CASSETTE_TAG)->input());
61		UINT8 dat = ioport("LINE8")->read();
	58	double level = m_cassette->input();
	59	UINT8 dat = m_io_line8->read();
62	60	if (level <  0) {
63	61	dat ^= m_tape_value;
64	62	}
r21072	r21073
72	70
73	71	WRITE8_MEMBER(radio86_state::radio86_8255_portc_w2)
74	72	{
75		machine().device<cassette_image_device>(CASSETTE_TAG)->output(data & 0x01 ? 1 : -1);
	73	m_cassette->output(data & 0x01 ? 1 : -1);
76	74	}
77	75
78	76
r21072	r21073
100	98
101	99	READ8_MEMBER(radio86_state::rk7007_8255_portc_r)
102	100	{
103		double level = (machine().device<cassette_image_device>(CASSETTE_TAG)->input());
	101	double level = m_cassette->input();
104	102	UINT8 key = 0xff;
105		if ((m_keyboard_mask & 0x01)!=0) { key &= ioport("CLINE0")->read(); }
106		if ((m_keyboard_mask & 0x02)!=0) { key &= machine().root_device().ioport("CLINE1")->read(); }
107		if ((m_keyboard_mask & 0x04)!=0) { key &= machine().root_device().ioport("CLINE2")->read(); }
108		if ((m_keyboard_mask & 0x08)!=0) { key &= machine().root_device().ioport("CLINE3")->read(); }
109		if ((m_keyboard_mask & 0x10)!=0) { key &= machine().root_device().ioport("CLINE4")->read(); }
110		if ((m_keyboard_mask & 0x20)!=0) { key &= machine().root_device().ioport("CLINE5")->read(); }
111		if ((m_keyboard_mask & 0x40)!=0) { key &= machine().root_device().ioport("CLINE6")->read(); }
112		if ((m_keyboard_mask & 0x80)!=0) { key &= machine().root_device().ioport("CLINE7")->read(); }
	103	if ((m_keyboard_mask & 0x01)!=0) { key &= m_io_cline0->read(); }
	104	if ((m_keyboard_mask & 0x02)!=0) { key &= m_io_cline1->read(); }
	105	if ((m_keyboard_mask & 0x04)!=0) { key &= m_io_cline2->read(); }
	106	if ((m_keyboard_mask & 0x08)!=0) { key &= m_io_cline3->read(); }
	107	if ((m_keyboard_mask & 0x10)!=0) { key &= m_io_cline4->read(); }
	108	if ((m_keyboard_mask & 0x20)!=0) { key &= m_io_cline5->read(); }
	109	if ((m_keyboard_mask & 0x40)!=0) { key &= m_io_cline6->read(); }
	110	if ((m_keyboard_mask & 0x80)!=0) { key &= m_io_cline7->read(); }
113	111	key &= 0xe0;
114	112	if (level <  0) {
115	113	key ^= m_tape_value;
r21072	r21073
130	128	WRITE_LINE_MEMBER(radio86_state::hrq_w)
131	129	{
132	130	/* HACK - this should be connected to the BUSREQ line of Z80 */
133		machine().device("maincpu")->execute().set_input_line(INPUT_LINE_HALT, state);
	131	m_maincpu->set_input_line(INPUT_LINE_HALT, state);
134	132
135	133	/* HACK - this should be connected to the BUSACK line of Z80 */
136		i8257_hlda_w(machine().device("dma8257"), state);
	134	i8257_hlda_w(m_dma8257, state);
137	135	}
138	136
139	137	static UINT8 memory_read_byte(address_space &space, offs_t address, UINT8 mem_mask) { return space.read_byte(address); }
r21072	r21073
152	150
153	151	TIMER_CALLBACK_MEMBER(radio86_state::radio86_reset)
154	152	{
155		membank("bank1")->set_entry(0);
	153	m_bank1->set_entry(0);
156	154	}
157	155
158	156
r21072	r21073
163	161
164	162	READ8_MEMBER(radio86_state::radio_io_r)
165	163	{
166		return machine().device("maincpu")->memory().space(AS_PROGRAM).read_byte((offset << 8) + offset);
	164	return m_maincpu->space(AS_PROGRAM).read_byte((offset << 8) + offset);
167	165	}
168	166
169	167	WRITE8_MEMBER(radio86_state::radio_io_w)
170	168	{
171		machine().device("maincpu")->memory().space(AS_PROGRAM).write_byte((offset << 8) + offset,data);
	169	m_maincpu->space(AS_PROGRAM).write_byte((offset << 8) + offset,data);
172	170	}
173	171
174	172	MACHINE_RESET_MEMBER(radio86_state,radio86)
175	173	{
176	174	machine().scheduler().timer_set(attotime::from_usec(10), timer_expired_delegate(FUNC(radio86_state::radio86_reset),this));
177		membank("bank1")->set_entry(1);
	175	m_bank1->set_entry(1);
178	176
179	177	m_keyboard_mask = 0;
180	178	m_disk_sel = 0;
r21072	r21073
188	186
189	187	READ8_MEMBER(radio86_state::radio86_romdisk_porta_r)
190	188	{
191		UINT8 *romdisk = memregion("maincpu")->base() + 0x10000;
	189	UINT8 *romdisk = m_region_maincpu->base() + 0x10000;
192	190	if ((m_disk_sel & 0x0f) ==0) {
193	191	return romdisk[m_romdisk_msb*256+m_romdisk_lsb];
194	192	} else {

trunk/src/mess/includes/radio86.h

r21072	r21073
10	10	#include "machine/i8255.h"
11	11	#include "machine/8257dma.h"
12	12	#include "video/i8275.h"
	13	#include "imagedev/cassette.h"
13	14
	15
14	16	class radio86_state : public driver_device
15	17	{
16	18	public:
17	19	radio86_state(const machine_config &mconfig, device_type type, const char *tag)
18		: driver_device(mconfig, type, tag) { }
	20	: driver_device(mconfig, type, tag)
	21	, m_maincpu(*this, "maincpu")
	22	, m_cassette(*this, CASSETTE_TAG)
	23	, m_dma8257(*this, "dma8257")
	24	, m_ppi8255_1(*this, "ppi8255_1")
	25	, m_ppi8255_2(*this, "ppi8255_2")
	26	, m_region_maincpu(*this, "maincpu")
	27	, m_bank1(*this, "bank1")
	28	, m_io_line0(*this, "LINE0")
	29	, m_io_line1(*this, "LINE1")
	30	, m_io_line2(*this, "LINE2")
	31	, m_io_line3(*this, "LINE3")
	32	, m_io_line4(*this, "LINE4")
	33	, m_io_line5(*this, "LINE5")
	34	, m_io_line6(*this, "LINE6")
	35	, m_io_line7(*this, "LINE7")
	36	, m_io_line8(*this, "LINE8")
	37	, m_io_cline0(*this, "CLINE0")
	38	, m_io_cline1(*this, "CLINE1")
	39	, m_io_cline2(*this, "CLINE2")
	40	, m_io_cline3(*this, "CLINE3")
	41	, m_io_cline4(*this, "CLINE4")
	42	, m_io_cline5(*this, "CLINE5")
	43	, m_io_cline6(*this, "CLINE6")
	44	, m_io_cline7(*this, "CLINE7")
	45	{ }
19	46
20	47	virtual void video_start();
21	48
r21072	r21073
46	73	DECLARE_WRITE8_MEMBER(radio86_romdisk_portb_w);
47	74	DECLARE_WRITE8_MEMBER(radio86_romdisk_portc_w);
48	75	DECLARE_WRITE8_MEMBER(mikrosha_8255_font_page_w);
	76
	77	protected:
	78	required_device<cpu_device> m_maincpu;
	79	required_device<cassette_image_device> m_cassette;
	80	optional_device<device_t> m_dma8257;
	81	required_device<i8255_device> m_ppi8255_1;
	82	optional_device<i8255_device> m_ppi8255_2;
	83	required_memory_region m_region_maincpu;
	84	required_memory_bank m_bank1;
	85	required_ioport m_io_line0;
	86	required_ioport m_io_line1;
	87	required_ioport m_io_line2;
	88	required_ioport m_io_line3;
	89	required_ioport m_io_line4;
	90	required_ioport m_io_line5;
	91	required_ioport m_io_line6;
	92	required_ioport m_io_line7;
	93	required_ioport m_io_line8;
	94	optional_ioport m_io_cline0;
	95	optional_ioport m_io_cline1;
	96	optional_ioport m_io_cline2;
	97	optional_ioport m_io_cline3;
	98	optional_ioport m_io_cline4;
	99	optional_ioport m_io_cline5;
	100	optional_ioport m_io_cline6;
	101	optional_ioport m_io_cline7;
	102
	103	void radio86_init_keyboard();
49	104	};
50	105
51	106

trunk/src/mess/includes/orion.h

r21072	r21073
10	10	#include "machine/wd_fdc.h"
11	11	#include "includes/radio86.h"
12	12	#include "machine/i8255.h"
	13	#include "machine/ram.h"
	14	#include "machine/mc146818.h"
	15	#include "sound/speaker.h"
13	16
	17
14	18	class orion_state : public radio86_state
15	19	{
16	20	public:
17	21	orion_state(const machine_config &mconfig, device_type type, const char *tag)
18		: radio86_state(mconfig, type, tag),
19		m_fdc(*this, "fd1793")
20		{ }
	22	: radio86_state(mconfig, type, tag)
	23	, m_fdc(*this, "fd1793")
	24	, m_ram(*this, RAM_TAG)
	25	, m_fd0(*this, "fd0")
	26	, m_fd1(*this, "fd1")
	27	, m_fd2(*this, "fd2")
	28	, m_fd3(*this, "fd3")
	29	, m_rtc(*this, "rtc")
	30	, m_speaker(*this, SPEAKER_TAG)
	31	, m_ay8912(*this, "ay8912")
	32	, m_bank2(*this, "bank2")
	33	, m_bank3(*this, "bank3")
	34	, m_bank4(*this, "bank4")
	35	, m_bank5(*this, "bank5")
	36	, m_bank6(*this, "bank6")
	37	, m_bank7(*this, "bank7")
	38	, m_bank8(*this, "bank8")
	39	{ }
21	40
22	41	UINT8 m_orion128_video_mode;
23	42	UINT8 m_orion128_video_page;
r21072	r21073
29	48	UINT8 m_orion128_memory_page;
30	49	UINT8 m_orionz80_memory_page;
31	50	UINT8 m_orionz80_dispatcher;
32		UINT8 m_speaker;
	51	UINT8 m_speaker_data;
33	52	UINT8 m_orionpro_ram0_segment;
34	53	UINT8 m_orionpro_ram1_segment;
35	54	UINT8 m_orionpro_ram2_segment;
r21072	r21073
74	93	DECLARE_WRITE8_MEMBER(orion_romdisk_portb_w);
75	94	DECLARE_WRITE8_MEMBER(orion_romdisk_portc_w);
76	95	DECLARE_FLOPPY_FORMATS( orion_floppy_formats );
	96
	97	protected:
	98	required_device<ram_device> m_ram;
	99	required_device<floppy_connector> m_fd0;
	100	required_device<floppy_connector> m_fd1;
	101	required_device<floppy_connector> m_fd2;
	102	required_device<floppy_connector> m_fd3;
	103	optional_device<mc146818_device> m_rtc;
	104	optional_device<device_t> m_speaker;
	105	optional_device<device_t> m_ay8912;
	106	required_memory_bank m_bank2;
	107	optional_memory_bank m_bank3;
	108	optional_memory_bank m_bank4;
	109	optional_memory_bank m_bank5;
	110	optional_memory_bank m_bank6;
	111	optional_memory_bank m_bank7;
	112	optional_memory_bank m_bank8;
	113
	114	void orionz80_switch_bank();
	115	void orion_set_video_mode(int width);
	116	void orionpro_bank_switch();
77	117	};
78	118
79	119	/*----------- defined in machine/orion.c -----------*/

trunk/src/mess/video/orion.c

r21072	r21073
10	10
11	11	#include "emu.h"
12	12	#include "includes/orion.h"
13		#include "machine/ram.h"
14	13
15	14	VIDEO_START_MEMBER(orion_state,orion128)
16	15	{
r21072	r21073
24	23	int part1addr = (3-((m_orion128_video_page & 3) | orionproshift)) * 0x4000;
25	24	int part2addr = part1addr + 0x10000;
26	25	int video_mode = m_orion128_video_mode & m_video_mode_mask;
27		UINT8 *ram = machine().device<ram_device>(RAM_TAG)->pointer();
	26	UINT8 *ram = m_ram->pointer();
28	27
29	28	for (x = 0; x < m_orion128_video_width; x++)
30	29	{

trunk/src/mess/drivers/orion.c

r21072	r21073
12	12	#include "cpu/z80/z80.h"
13	13	#include "cpu/i8085/i8085.h"
14	14	#include "sound/ay8910.h"
15		#include "sound/speaker.h"
16	15	#include "sound/wave.h"
17		#include "machine/mc146818.h"
18	16	#include "imagedev/cassette.h"
19	17	#include "imagedev/cartslot.h"
20	18	#include "formats/smx_dsk.h"
21	19	#include "formats/rk_cas.h"
22	20	#include "includes/orion.h"
23		#include "machine/ram.h"
24	21
25	22	/* Address maps */
26	23

Previous

199869 Revisions

Next

---

© 1997-2024 The MAME Team