Previous

15994 Revisions

Next

r862 Wednesday 22nd August, 2007 at 15:27:06 UTC by Curt Coder
[MFP68901] Cleanups

[src/mess/drivers]	atarist.c
[src/mess/machine]	68901mfp.c 68901mfp.h

src/mess/machine/68901mfp.c

r861	r862
1	1	/*
2	2
3	3	TODO:
4
5		- serial comms
6		- interrupt queueing
7		- trigger interrupt on AER change
8	4
	5	- GPIP read crash
	6	- serial I/O
	7
9	8	*/
10	9
11	10	#include "68901mfp.h"
r861	r862
34	33	UINT8 tsr;
35	34	UINT8 udr;
36	35
37		mame_timer *timer_a, *timer_b, *timer_c, *timer_d;
	36	mame_timer *timer[4], *irq_timer;
38	37
39	38	int   chip_clock;
40	39	int   timer_clock;
r861	r862
57	56	static TIMER_CALLBACK( timer_c );
58	57	static TIMER_CALLBACK( timer_d );
59	58
60		/*
61		void mfp68901_irq_ack(int which)
	59	static const int GPIO_MASK[] =
	60	{
	61	MFP68901_IPRB_GPIP_0, MFP68901_IPRB_GPIP_1, MFP68901_IPRB_GPIP_2, MFP68901_IPRB_GPIP_3,
	62	MFP68901_IPRB_GPIP_4, MFP68901_IPRB_GPIP_5, MFP68901_IPRA_GPIP_6, MFP68901_IPRA_GPIP_7
	63	};
	64
	65	static void mfp68901_poll_gpio(int which)
62	66	{
63	67	mfp_68901 *mfp_p = &mfp[which];
	68	UINT8 gpio = 0x80;//mfp_p->gpio_r(0);
	69	UINT8 gpold = (mfp_p->gpip & ~mfp_p->ddr) ^ mfp_p->aer;
	70	UINT8 gpnew = (gpio & ~mfp_p->ddr) ^ mfp_p->aer;
	71	UINT8 *ier, *ipr, *imr;
	72	int bit;
64	73
	74	for (bit = 0; bit < 8; bit++)
	75	{
	76	if (bit < 6)
	77	{
	78	ier = &mfp_p->ierb;
	79	ipr = &mfp_p->iprb;
	80	imr = &mfp_p->imrb;
	81	}
	82	else
	83	{
	84	ier = &mfp_p->iera;
	85	ipr = &mfp_p->ipra;
	86	imr = &mfp_p->imra;
	87	}
	88
	89	if ((BIT(gpold, bit) == 1) && (BIT(gpnew, bit) == 0))
	90	{
	91	if (*ier & GPIO_MASK[bit])
	92	{
	93	(*ipr) |= GPIO_MASK[bit];
	94	}
	95	}
	96	}
	97
	98	mfp_p->gpip = (gpio & ~mfp_p->ddr) | (mfp_p->gpip & mfp_p->ddr);
	99	}
	100
	101	static void mfp68901_irq_ack(int which)
	102	{
	103	mfp_68901 *mfp_p = &mfp[which];
	104
65	105	UINT16 ipr = (mfp_p->ipra << 8) | mfp_p->iprb;
66	106	UINT16 isr = (mfp_p->isra << 8) | mfp_p->isrb;
67	107	UINT16 imr = (mfp_p->imra << 8) | mfp_p->imrb;
68	108	int ch;
69	109
70		for (ch = 15; ch > 0; ch--)
	110	if (!isr)
71	111	{
72		if (BIT(isr, ch))
	112	for (ch = 15; ch > 0; ch--)
73	113	{
74		break;
75		}
	114	if (BIT(ipr, ch) && BIT(imr, ch))
	115	{
	116	ipr -= (1 << ch);
76	117
77		if (BIT(ipr, ch) && BIT(imr, ch))
78		{
79		ipr -= (1 << ch);
	118	mfp_p->ipra = (ipr & 0xff00) >> 8;
	119	mfp_p->iprb = ipr & 0xff;
80	120
81		mfp_p->ipra = (ipr & 0xff00) >> 8;
82		mfp_p->iprb = ipr & 0xff;
	121	if (mfp_p->vr & MFP68901_VR_S)
	122	{
	123	isr |= (1 << ch);
83	124
84		if (mfp_p->vr & MFP68901_VR_S)
85		{
86		isr |= (1 << ch);
	125	mfp_p->isra = (isr & 0xff00) >> 8;
	126	mfp_p->isrb = isr & 0xff;
	127	}
87	128
88		mfp_p->isra = (isr & 0xff00) >> 8;
89		mfp_p->isrb = isr & 0xff;
	129	mfp_p->irq_callback(which, HOLD_LINE, (mfp_p->vr & 0xf0) | (15 - ch));
	130	logerror("MFP68901 #%u Interrupt %u\n", which, 15 - ch);
	131	return;
90	132	}
91	133
92		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | (15 - ch));
93		return;
	134	ipr <<= 1;
	135	isr <<= 1;
	136	imr <<= 1;
94	137	}
95	138
96		ipr <<= 1;
97		isr <<= 1;
98		imr <<= 1;
	139	mfp_p->irq_callback(which, CLEAR_LINE, 0);
99	140	}
	141	}
100	142
101		mfp_p->irq_callback(which, CLEAR_LINE, 0);
	143	static TIMER_CALLBACK( mfp68901_tick )
	144	{
	145	mfp68901_poll_gpio(param);
	146	mfp68901_irq_ack(param);
102	147	}
103		*/
104	148
105	149	static UINT8 mfp68901_register_r(int which, int reg)
106	150	{
r861	r862
108	152
109	153	switch (reg)
110	154	{
111		case MFP68901_REGISTER_GPIP:
112		{
113		UINT8 gpio = 0;
114
115		if (mfp_p->gpio_r)
116		{
117		//gpio = (*mfp_p->gpio_r)(0);
118		}
119
120		gpio |= (mfp_p->gpip & mfp_p->ddr);
121
122		// signal interrupts if necessary
123		return 0x80;
124		}
	155	case MFP68901_REGISTER_GPIP:  return mfp_p->gpip;
125	156	case MFP68901_REGISTER_AER:   return mfp_p->aer;
126	157	case MFP68901_REGISTER_DDR:   return mfp_p->ddr;
127	158
r861	r862
148	179	case MFP68901_REGISTER_RSR:   return mfp_p->rsr;
149	180	case MFP68901_REGISTER_TSR:   return mfp_p->tsr;
150	181	case MFP68901_REGISTER_UDR:   return mfp_p->udr;
151		default:
152		return 0;
	182
	183	default:                 return 0;
153	184	}
154	185	}
155	186
r861	r862
236	267	{
237	268	case MFP68901_TCR_TIMER_DELAY_4:
238	269	logerror("MFP68901 #%u Timer A Delay Mode : 4 Prescale\n", which);
239		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
	270	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
240	271	break;
241	272	case MFP68901_TCR_TIMER_DELAY_10:
242	273	logerror("MFP68901 #%u Timer A Delay Mode : 10 Prescale\n", which);
243		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
	274	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
244	275	break;
245	276	case MFP68901_TCR_TIMER_DELAY_16:
246	277	logerror("MFP68901 #%u Timer A Delay Mode : 16 Prescale\n", which);
247		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
	278	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
248	279	break;
249	280	case MFP68901_TCR_TIMER_DELAY_50:
250	281	logerror("MFP68901 #%u Timer A Delay Mode : 50 Prescale\n", which);
251		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
	282	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
252	283	break;
253	284	case MFP68901_TCR_TIMER_DELAY_64:
254	285	logerror("MFP68901 #%u Timer A Delay Mode : 64 Prescale\n", which);
255		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
	286	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
256	287	break;
257	288	case MFP68901_TCR_TIMER_DELAY_100:
258	289	logerror("MFP68901 #%u Timer A Delay Mode : 100 Prescale\n", which);
259		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
	290	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
260	291	break;
261	292	case MFP68901_TCR_TIMER_DELAY_200:
262	293	logerror("MFP68901 #%u Timer A Delay Mode : 200 Prescale\n", which);
263		mame_timer_adjust(mfp_p->timer_a, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
	294	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
264	295	break;
265	296	case MFP68901_TCR_TIMER_STOPPED:
266	297	logerror("MFP68901 #%u Timer A Stopped\n", which);
267		mame_timer_enable(mfp_p->timer_a, 0);
	298	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_A], 0);
268	299	break;
269	300	case MFP68901_TCR_TIMER_EVENT:
270	301	logerror("MFP68901 #%u Timer A Event Count Mode\n", which);
271		mame_timer_enable(mfp_p->timer_a, 0);
	302	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_A], 0);
272	303	break;
273	304	case MFP68901_TCR_TIMER_PULSE_4:
274	305	logerror("MFP68901 #%u Timer A Pulse Width Mode : 4 Prescale\n", which);
275		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
	306	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
276	307	break;
277	308	case MFP68901_TCR_TIMER_PULSE_10:
278	309	logerror("MFP68901 #%u Timer A Pulse Width Mode : 10 Prescale\n", which);
279		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
	310	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
280	311	break;
281	312	case MFP68901_TCR_TIMER_PULSE_16:
282	313	logerror("MFP68901 #%u Timer A Pulse Width Mode : 16 Prescale\n", which);
283		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
	314	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
284	315	break;
285	316	case MFP68901_TCR_TIMER_PULSE_50:
286	317	logerror("MFP68901 #%u Timer A Pulse Width Mode : 50 Prescale\n", which);
287		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
	318	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
288	319	break;
289	320	case MFP68901_TCR_TIMER_PULSE_64:
290	321	logerror("MFP68901 #%u Timer A Pulse Width Mode : 64 Prescale\n", which);
291		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
	322	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
292	323	break;
293	324	case MFP68901_TCR_TIMER_PULSE_100:
294	325	logerror("MFP68901 #%u Timer A Pulse Width Mode : 100 Prescale\n", which);
295		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
	326	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
296	327	break;
297	328	case MFP68901_TCR_TIMER_PULSE_200:
298	329	logerror("MFP68901 #%u Timer A Pulse Width Mode : 200 Prescale\n", which);
299		mame_timer_adjust(mfp_p->timer_a, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
	330	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_A], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
300	331	break;
301	332	}
302	333
r861	r862
319	350	{
320	351	case MFP68901_TCR_TIMER_DELAY_4:
321	352	logerror("MFP68901 #%u Timer B Delay Mode : 4 Prescale\n", which);
322		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
	353	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
323	354	break;
324	355	case MFP68901_TCR_TIMER_DELAY_10:
325	356	logerror("MFP68901 #%u Timer B Delay Mode : 10 Prescale\n", which);
326		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
	357	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
327	358	break;
328	359	case MFP68901_TCR_TIMER_DELAY_16:
329	360	logerror("MFP68901 #%u Timer B Delay Mode : 16 Prescale\n", which);
330		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
	361	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
331	362	break;
332	363	case MFP68901_TCR_TIMER_DELAY_50:
333	364	logerror("MFP68901 #%u Timer B Delay Mode : 50 Prescale\n", which);
334		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
	365	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
335	366	break;
336	367	case MFP68901_TCR_TIMER_DELAY_64:
337	368	logerror("MFP68901 #%u Timer B Delay Mode : 64 Prescale\n", which);
338		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
	369	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
339	370	break;
340	371	case MFP68901_TCR_TIMER_DELAY_100:
341	372	logerror("MFP68901 #%u Timer B Delay Mode : 100 Prescale\n", which);
342		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
	373	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
343	374	break;
344	375	case MFP68901_TCR_TIMER_DELAY_200:
345	376	logerror("MFP68901 #%u Timer B Delay Mode : 200 Prescale\n", which);
346		mame_timer_adjust(mfp_p->timer_b, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
	377	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
347	378	break;
348	379	case MFP68901_TCR_TIMER_STOPPED:
349	380	logerror("MFP68901 #%u Timer B Stopped\n", which);
350		mame_timer_enable(mfp_p->timer_b, 0);
	381	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_B], 0);
351	382	break;
352	383	case MFP68901_TCR_TIMER_EVENT:
353	384	logerror("MFP68901 #%u Timer B Event Count Mode\n", which);
354		mame_timer_enable(mfp_p->timer_b, 0);
	385	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_B], 0);
355	386	break;
356	387	case MFP68901_TCR_TIMER_PULSE_4:
357	388	logerror("MFP68901 #%u Timer B Pulse Width Mode : 4 Prescale\n", which);
358		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
	389	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
359	390	break;
360	391	case MFP68901_TCR_TIMER_PULSE_10:
361	392	logerror("MFP68901 #%u Timer B Pulse Width Mode : 10 Prescale\n", which);
362		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
	393	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
363	394	break;
364	395	case MFP68901_TCR_TIMER_PULSE_16:
365	396	logerror("MFP68901 #%u Timer B Pulse Width Mode : 16 Prescale\n", which);
366		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
	397	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
367	398	break;
368	399	case MFP68901_TCR_TIMER_PULSE_50:
369	400	logerror("MFP68901 #%u Timer B Pulse Width Mode : 50 Prescale\n", which);
370		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
	401	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
371	402	break;
372	403	case MFP68901_TCR_TIMER_PULSE_64:
373	404	logerror("MFP68901 #%u Timer B Pulse Width Mode : 64 Prescale\n", which);
374		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
	405	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
375	406	break;
376	407	case MFP68901_TCR_TIMER_PULSE_100:
377	408	logerror("MFP68901 #%u Timer B Pulse Width Mode : 100 Prescale\n", which);
378		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
	409	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
379	410	break;
380	411	case MFP68901_TCR_TIMER_PULSE_200:
381	412	logerror("MFP68901 #%u Timer B Pulse Width Mode : 200 Prescale\n", which);
382		mame_timer_adjust(mfp_p->timer_b, time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
	413	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_B], time_zero, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
383	414	break;
384	415	}
385	416
r861	r862
402	433	{
403	434	case MFP68901_TCR_TIMER_DELAY_4:
404	435	logerror("MFP68901 #%u Timer D Delay Mode : 4 Prescale\n", which);
405		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
	436	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
406	437	break;
407	438	case MFP68901_TCR_TIMER_DELAY_10:
408	439	logerror("MFP68901 #%u Timer D Delay Mode : 10 Prescale\n", which);
409		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
	440	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
410	441	break;
411	442	case MFP68901_TCR_TIMER_DELAY_16:
412	443	logerror("MFP68901 #%u Timer D Delay Mode : 16 Prescale\n", which);
413		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
	444	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
414	445	break;
415	446	case MFP68901_TCR_TIMER_DELAY_50:
416	447	logerror("MFP68901 #%u Timer D Delay Mode : 50 Prescale\n", which);
417		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
	448	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
418	449	break;
419	450	case MFP68901_TCR_TIMER_DELAY_64:
420	451	logerror("MFP68901 #%u Timer D Delay Mode : 64 Prescale\n", which);
421		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
	452	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
422	453	break;
423	454	case MFP68901_TCR_TIMER_DELAY_100:
424	455	logerror("MFP68901 #%u Timer D Delay Mode : 100 Prescale\n", which);
425		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
	456	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
426	457	break;
427	458	case MFP68901_TCR_TIMER_DELAY_200:
428	459	logerror("MFP68901 #%u Timer D Delay Mode : 200 Prescale\n", which);
429		mame_timer_adjust(mfp_p->timer_d, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
	460	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_D], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
430	461	break;
431	462	case MFP68901_TCR_TIMER_STOPPED:
432	463	logerror("MFP68901 #%u Timer D Stopped\n", which);
433		mame_timer_enable(mfp_p->timer_d, 0);
	464	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_D], 0);
434	465	break;
435	466	}
436	467
r861	r862
438	469	{
439	470	case MFP68901_TCR_TIMER_DELAY_4:
440	471	logerror("MFP68901 #%u Timer C Delay Mode : 4 Prescale\n", which);
441		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
	472	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 4));
442	473	break;
443	474	case MFP68901_TCR_TIMER_DELAY_10:
444	475	logerror("MFP68901 #%u Timer C Delay Mode : 10 Prescale\n", which);
445		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
	476	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 10));
446	477	break;
447	478	case MFP68901_TCR_TIMER_DELAY_16:
448	479	logerror("MFP68901 #%u Timer C Delay Mode : 16 Prescale\n", which);
449		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
	480	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 16));
450	481	break;
451	482	case MFP68901_TCR_TIMER_DELAY_50:
452	483	logerror("MFP68901 #%u Timer C Delay Mode : 50 Prescale\n", which);
453		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
	484	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 50));
454	485	break;
455	486	case MFP68901_TCR_TIMER_DELAY_64:
456	487	logerror("MFP68901 #%u Timer C Delay Mode : 64 Prescale\n", which);
457		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
	488	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 64));
458	489	break;
459	490	case MFP68901_TCR_TIMER_DELAY_100:
460	491	logerror("MFP68901 #%u Timer C Delay Mode : 100 Prescale\n", which);
461		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
	492	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 100));
462	493	break;
463	494	case MFP68901_TCR_TIMER_DELAY_200:
464	495	logerror("MFP68901 #%u Timer C Delay Mode : 200 Prescale\n", which);
465		mame_timer_adjust(mfp_p->timer_c, time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
	496	mame_timer_adjust(mfp_p->timer[MFP68901_TIMER_C], time_never, 0, MAME_TIME_IN_HZ(mfp_p->timer_clock / 200));
466	497	break;
467	498	case MFP68901_TCR_TIMER_STOPPED:
468	499	logerror("MFP68901 #%u Timer C Stopped\n", which);
469		mame_timer_enable(mfp_p->timer_c, 0);
	500	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_C], 0);
470	501	break;
471	502	}
472	503	break;
r861	r862
475	506
476	507	mfp_p->tadr = data;
477	508
478		if (!mame_timer_enabled(mfp_p->timer_a))
	509	if (!mame_timer_enabled(mfp_p->timer[MFP68901_TIMER_A]))
479	510	{
480	511	mfp_p->tamc = data;
481	512	}
r861	r862
485	516
486	517	mfp_p->tbdr = data;
487	518
488		if (!mame_timer_enabled(mfp_p->timer_b))
	519	if (!mame_timer_enabled(mfp_p->timer[MFP68901_TIMER_B]))
489	520	{
490	521	mfp_p->tbmc = data;
491	522	}
r861	r862
495	526
496	527	mfp_p->tcdr = data;
497	528
498		if (!mame_timer_enabled(mfp_p->timer_c))
	529	if (!mame_timer_enabled(mfp_p->timer[MFP68901_TIMER_C]))
499	530	{
500	531	mfp_p->tcmc = data;
501	532	}
r861	r862
505	536
506	537	mfp_p->tddr = data;
507	538
508		if (!mame_timer_enabled(mfp_p->timer_d))
	539	if (!mame_timer_enabled(mfp_p->timer[MFP68901_TIMER_D]))
509	540	{
510	541	mfp_p->tdmc = data;
511	542	}
r861	r862
630	661	mfp_p->tsr = data & 0x2f;
631	662	}
632	663	break;
633
634		logerror("MFP68901 TSR %x\n", data);
635		mfp_p->tsr = data;
636		break;
637	664	case MFP68901_REGISTER_UDR:
638	665	logerror("MFP68901 UDR %x\n", data);
639	666	mfp_p->udr = data;
r861	r862
652	679
653	680	memset(mfp_p, 0, sizeof(mfp));
654	681
	682	mfp_p->tsr = MFP68901_TSR_BUFFER_EMPTY;
	683
655	684	mfp_p->chip_clock = intf->chip_clock;
656	685	mfp_p->timer_clock = intf->timer_clock;
657	686	mfp_p->irq_callback = intf->irq_callback;
658	687	mfp_p->gpio_r = intf->gpio_r;
659	688	mfp_p->gpio_w = intf->gpio_w;
660	689
661		mfp_p->timer_a = mame_timer_alloc(timer_a);
662		mfp_p->timer_b = mame_timer_alloc(timer_b);
663		mfp_p->timer_c = mame_timer_alloc(timer_c);
664		mfp_p->timer_d = mame_timer_alloc(timer_d);
	690	mfp_p->timer[MFP68901_TIMER_A] = mame_timer_alloc(timer_a);
	691	mfp_p->timer[MFP68901_TIMER_B] = mame_timer_alloc(timer_b);
	692	mfp_p->timer[MFP68901_TIMER_C] = mame_timer_alloc(timer_c);
	693	mfp_p->timer[MFP68901_TIMER_D] = mame_timer_alloc(timer_d);
665	694
666		mame_timer_reset(mfp_p->timer_a, time_never);
667		mame_timer_reset(mfp_p->timer_b, time_never);
668		mame_timer_reset(mfp_p->timer_c, time_never);
669		mame_timer_reset(mfp_p->timer_d, time_never);
	695	mfp_p->irq_timer = mame_timer_alloc(mfp68901_tick);
	696	mame_timer_adjust(mfp_p->irq_timer, time_zero, which, MAME_TIME_IN_HZ(mfp_p->chip_clock / 4));
670	697
671	698	state_save_register_item("mfp68901", which, mfp_p->gpip);
672	699	state_save_register_item("mfp68901", which, mfp_p->aer);
r861	r862
712	739
713	740	if (mfp_p->tamc == 0x01)
714	741	{
	742	mfp_p->tao = mfp_p->tao ? 0 : 1;
	743
	744	if (mfp_p->tao_w)
	745	{
	746	mfp_p->tao_w(which, mfp_p->tao);
	747	}
	748
715	749	if (mfp_p->iera & MFP68901_IPRA_TIMER_A)
716	750	{
717	751	mfp_p->ipra |= MFP68901_IPRA_TIMER_A;
718
719		if (mfp_p->imra & MFP68901_IPRA_TIMER_A)
720		{
721		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_TIMER_A);
722
723		if (mfp_p->tao)
724		{
725		mfp_p->tao = 0;
726		}
727		else
728		{
729		mfp_p->tao = 1;
730		}
731
732		if (mfp_p->tao_w)
733		{
734		mfp_p->tao_w(which, mfp_p->tao);
735		}
736		}
737	752	}
738	753
739	754	mfp_p->tamc = mfp_p->tadr;
r861	r862
750	765
751	766	if (mfp_p->tbmc == 0x01)
752	767	{
	768	mfp_p->tbo = mfp_p->tbo ? 0 : 1;
	769
	770	if (mfp_p->tbo_w)
	771	{
	772	mfp_p->tbo_w(which, mfp_p->tbo);
	773	}
	774
753	775	if (mfp_p->iera & MFP68901_IPRA_TIMER_B)
754	776	{
755	777	mfp_p->ipra |= MFP68901_IPRA_TIMER_B;
756
757		if (mfp_p->imra & MFP68901_IPRA_TIMER_B)
758		{
759		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_TIMER_B);
760
761		if (mfp_p->tbo)
762		{
763		mfp_p->tbo = 0;
764		}
765		else
766		{
767		mfp_p->tbo = 1;
768		}
769
770		if (mfp_p->tbo_w)
771		{
772		mfp_p->tbo_w(which, mfp_p->tbo);
773		}
774		}
775	778	}
776	779
777	780	mfp_p->tbmc = mfp_p->tbdr;
r861	r862
788	791
789	792	if (mfp_p->tcmc == 0x01)
790	793	{
	794	mfp_p->tco = mfp_p->tco ? 0 : 1;
	795
	796	if (mfp_p->tco_w)
	797	{
	798	mfp_p->tco_w(which, mfp_p->tco);
	799	}
	800
791	801	if (mfp_p->ierb & MFP68901_IPRB_TIMER_C)
792	802	{
793	803	mfp_p->iprb |= MFP68901_IPRB_TIMER_C;
794
795		if (mfp_p->imrb & MFP68901_IPRB_TIMER_C)
796		{
797		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_TIMER_C);
798
799		if (mfp_p->tco)
800		{
801		mfp_p->tco = 0;
802		}
803		else
804		{
805		mfp_p->tco = 1;
806		}
807
808		if (mfp_p->tco_w)
809		{
810		mfp_p->tco_w(which, mfp_p->tco);
811		}
812		}
813	804	}
814	805
815	806	mfp_p->tcmc = mfp_p->tcdr;
r861	r862
826	817
827	818	if (mfp_p->tdmc == 0x01)
828	819	{
	820	mfp_p->tdo = mfp_p->tdo ? 0 : 1;
	821
	822	if (mfp_p->tdo_w)
	823	{
	824	mfp_p->tdo_w(which, mfp_p->tdo);
	825	}
	826
829	827	if (mfp_p->ierb & MFP68901_IPRB_TIMER_D)
830	828	{
831	829	mfp_p->iprb |= MFP68901_IPRB_TIMER_D;
832
833		if (mfp_p->imrb & MFP68901_IPRB_TIMER_D)
834		{
835		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_TIMER_D);
836
837		if (mfp_p->tdo)
838		{
839		mfp_p->tdo = 0;
840		}
841		else
842		{
843		mfp_p->tdo = 1;
844		}
845
846		if (mfp_p->tdo_w)
847		{
848		mfp_p->tdo_w(which, mfp_p->tdo);
849		}
850		}
851	830	}
852	831
853	832	mfp_p->tdmc = mfp_p->tddr;
r861	r862
875	854	return;
876	855
877	856	case MFP68901_TCR_TIMER_EVENT:
878		if (mfp_p->aer & MFP68901_AER_GPIP_4)
	857	if (BIT(mfp_p->aer, 4))
879	858	{
880	859	// count down on 0->1 transition
881	860	if (mfp_p->tai == 0 && value == 1)
r861	r862
904	883	case MFP68901_TCR_TIMER_PULSE_200:
905	884	if (BIT(mfp_p->aer, 4) == value)
906	885	{
907		mame_timer_enable(mfp_p->timer_a, 1);
	886	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_A], 1);
908	887	}
909	888	else
910	889	{
911		mame_timer_enable(mfp_p->timer_a, 0);
	890	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_A], 0);
912	891	}
913	892
914		if (mfp_p->aer & MFP68901_AER_GPIP_4)
	893	if (BIT(mfp_p->aer, 4))
915	894	{
916	895	// interrupt on 1->0 transition
917	896	if (mfp_p->tai == 1 && value == 0)
r861	r862
919	898	if (mfp_p->ierb & MFP68901_IPRB_GPIP_4)
920	899	{
921	900	mfp_p->iprb |= MFP68901_IPRB_GPIP_4;
922
923		if (mfp_p->imrb & MFP68901_IPRB_GPIP_4)
924		{
925		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_GPI4);
926		}
927	901	}
928	902	}
929	903	}
r861	r862
935	909	if (mfp_p->ierb & MFP68901_IPRB_GPIP_4)
936	910	{
937	911	mfp_p->iprb |= MFP68901_IPRB_GPIP_4;
938
939		if (mfp_p->imrb & MFP68901_IPRB_GPIP_4)
940		{
941		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_GPI4);
942		}
943	912	}
944	913	}
945	914	}
r861	r862
966	935	return;
967	936
968	937	case MFP68901_TCR_TIMER_EVENT:
969		if (mfp_p->aer & MFP68901_AER_GPIP_3)
	938	if (BIT(mfp_p->aer, 3))
970	939	{
971	940	// count down on 0->1 transition
972	941	if (mfp_p->tbi == 0 && value == 1)
r861	r862
995	964	case MFP68901_TCR_TIMER_PULSE_200:
996	965	if (BIT(mfp_p->aer, 3) == value)
997	966	{
998		mame_timer_enable(mfp_p->timer_b, 1);
	967	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_B], 1);
999	968	}
1000	969	else
1001	970	{
1002		mame_timer_enable(mfp_p->timer_b, 0);
	971	mame_timer_enable(mfp_p->timer[MFP68901_TIMER_B], 0);
1003	972	}
1004	973
1005		if (mfp_p->aer & MFP68901_AER_GPIP_3)
	974	if (BIT(mfp_p->aer, 3))
1006	975	{
1007	976	// interrupt on 1->0 transition
1008	977	if (mfp_p->tbi == 1 && value == 0)
r861	r862
1010	979	if (mfp_p->ierb & MFP68901_IPRB_GPIP_3)
1011	980	{
1012	981	mfp_p->iprb |= MFP68901_IPRB_GPIP_3;
1013
1014		if (mfp_p->imrb & MFP68901_IPRB_GPIP_3)
1015		{
1016		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_GPI3);
1017		}
1018	982	}
1019	983	}
1020	984	}
r861	r862
1026	990	if (mfp_p->ierb & MFP68901_IPRB_GPIP_3)
1027	991	{
1028	992	mfp_p->iprb |= MFP68901_IPRB_GPIP_3;
1029
1030		if (mfp_p->imrb & MFP68901_IPRB_GPIP_3)
1031		{
1032		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | MFP68901_INT_GPI3);
1033		}
1034	993	}
1035	994	}
1036	995	}
r861	r862
1040	999	}
1041	1000	}
1042	1001
1043		static const int GPIO_MASK[] =
1044		{
1045		MFP68901_IPRB_GPIP_0, MFP68901_IPRB_GPIP_1, MFP68901_IPRB_GPIP_2, MFP68901_IPRB_GPIP_3,
1046		MFP68901_IPRB_GPIP_4, MFP68901_IPRB_GPIP_5, MFP68901_IPRA_GPIP_6, MFP68901_IPRA_GPIP_7
1047		};
1048
1049		static const int GPIO_VECTOR[] =
1050		{
1051		MFP68901_INT_GPI0, MFP68901_INT_GPI1, MFP68901_INT_GPI2, MFP68901_INT_GPI3,
1052		MFP68901_INT_GPI4, MFP68901_INT_GPI5, MFP68901_INT_GPI6, MFP68901_INT_GPI7
1053		};
1054
1055		void mfp68901_gpio_w(int which, int line, int value)
1056		{
1057		mfp_68901 *mfp_p = &mfp[which];
1058		UINT8 *ier, *ipr, *imr;
1059		int lvalue, rvalue;
1060
1061		if (line < 6)
1062		{
1063		ier = &mfp_p->ierb;
1064		ipr = &mfp_p->iprb;
1065		imr = &mfp_p->imrb;
1066		}
1067		else
1068		{
1069		ier = &mfp_p->iera;
1070		ipr = &mfp_p->ipra;
1071		imr = &mfp_p->imra;
1072		}
1073
1074		if (mfp_p->aer & (1 << line))
1075		{
1076		lvalue = mfp_p->gpip & (1 << line);
1077		rvalue = value;
1078		}
1079		else
1080		{
1081		lvalue = value;
1082		rvalue = mfp_p->gpip & (1 << line);
1083		}
1084
1085		if (lvalue == 1 && rvalue == 0)
1086		{
1087		if (*ier & GPIO_MASK[line])
1088		{
1089		(*ipr) |= GPIO_MASK[line];
1090
1091		if (*imr & GPIO_MASK[line])
1092		{
1093		mfp_p->irq_callback(which, ASSERT_LINE, (mfp_p->vr & 0xf0) | GPIO_VECTOR[line]);
1094		}
1095		}
1096		}
1097		}
1098
1099	1002	static TIMER_CALLBACK( timer_a )
1100	1003	{
1101		int which = param;
1102
1103		mfp68901_timer_count_a(which);
	1004	mfp68901_timer_count_a(param);
1104	1005	}
1105	1006
1106	1007	static TIMER_CALLBACK( timer_b )
1107	1008	{
1108		int which = param;
1109
1110		mfp68901_timer_count_b(which);
	1009	mfp68901_timer_count_b(param);
1111	1010	}
1112	1011
1113	1012	static TIMER_CALLBACK( timer_c )
1114	1013	{
1115		int which = param;
1116
1117		mfp68901_timer_count_c(which);
	1014	mfp68901_timer_count_c(param);
1118	1015	}
1119	1016
1120	1017	static TIMER_CALLBACK( timer_d )
1121	1018	{
1122		int which = param;
1123
1124		mfp68901_timer_count_d(which);
	1019	mfp68901_timer_count_d(param);
1125	1020	}
1126	1021
1127		READ16_HANDLER( mfp68901_0_register16_r ) { return mfp68901_register_r(0, offset); }
1128		READ16_HANDLER( mfp68901_1_register16_r ) { return mfp68901_register_r(1, offset); }
1129		READ16_HANDLER( mfp68901_2_register16_r ) { return mfp68901_register_r(2, offset); }
1130		READ16_HANDLER( mfp68901_3_register16_r ) { return mfp68901_register_r(3, offset); }
	1022	READ16_HANDLER( mfp68901_0_register_msb_r ) { return mfp68901_register_r(0, offset) << 8; }
	1023	READ16_HANDLER( mfp68901_1_register_msb_r ) { return mfp68901_register_r(1, offset) << 8; }
	1024	READ16_HANDLER( mfp68901_2_register_msb_r ) { return mfp68901_register_r(2, offset) << 8; }
	1025	READ16_HANDLER( mfp68901_3_register_msb_r ) { return mfp68901_register_r(3, offset) << 8; }
1131	1026
	1027	READ16_HANDLER( mfp68901_0_register_lsb_r ) { return mfp68901_register_r(0, offset); }
	1028	READ16_HANDLER( mfp68901_1_register_lsb_r ) { return mfp68901_register_r(1, offset); }
	1029	READ16_HANDLER( mfp68901_2_register_lsb_r ) { return mfp68901_register_r(2, offset); }
	1030	READ16_HANDLER( mfp68901_3_register_lsb_r ) { return mfp68901_register_r(3, offset); }
	1031
1132	1032	WRITE16_HANDLER( mfp68901_0_register_msb_w ) { if (ACCESSING_MSB) mfp68901_register_w(0, offset, (data >> 8) & 0xff); }
1133	1033	WRITE16_HANDLER( mfp68901_1_register_msb_w ) { if (ACCESSING_MSB) mfp68901_register_w(0, offset, (data >> 8) & 0xff); }
1134	1034	WRITE16_HANDLER( mfp68901_2_register_msb_w ) { if (ACCESSING_MSB) mfp68901_register_w(0, offset, (data >> 8) & 0xff); }

src/mess/machine/68901mfp.h

r861	r862
70	70	MFP68901_INT_GPI7
71	71	};
72	72
	73	enum
	74	{
	75	MFP68901_TIMER_A = 0,
	76	MFP68901_TIMER_B,
	77	MFP68901_TIMER_C,
	78	MFP68901_TIMER_D
	79	};
	80
73	81	#define MFP68901_AER_GPIP_0            0x01
74	82	#define MFP68901_AER_GPIP_1            0x02
75	83	#define MFP68901_AER_GPIP_2            0x04
r861	r862
157	165	void mfp68901_tbi_w(int which, int value);
158	166	void mfp68901_gpio_w(int which, int line, int value);
159	167
160		READ16_HANDLER( mfp68901_0_register16_r );
161		READ16_HANDLER( mfp68901_1_register16_r );
162		READ16_HANDLER( mfp68901_2_register16_r );
163		READ16_HANDLER( mfp68901_3_register16_r );
	168	READ16_HANDLER( mfp68901_0_register_msb_r );
	169	READ16_HANDLER( mfp68901_1_register_msb_r );
	170	READ16_HANDLER( mfp68901_2_register_msb_r );
	171	READ16_HANDLER( mfp68901_3_register_msb_r );
164	172
	173	READ16_HANDLER( mfp68901_0_register_lsb_r );
	174	READ16_HANDLER( mfp68901_1_register_lsb_r );
	175	READ16_HANDLER( mfp68901_2_register_lsb_r );
	176	READ16_HANDLER( mfp68901_3_register_lsb_r );
	177
165	178	WRITE16_HANDLER( mfp68901_0_register_msb_w );
166	179	WRITE16_HANDLER( mfp68901_1_register_msb_w );
167	180	WRITE16_HANDLER( mfp68901_2_register_msb_w );

src/mess/drivers/atarist.c

r861	r862
476	476	AM_RANGE(0xff8608, 0xff860d) AM_READWRITE(atarist_fdc_dma_base_r, atarist_fdc_dma_base_w)
477	477	AM_RANGE(0xff8800, 0xff8801) AM_READWRITE(AY8910_read_port_0_msb_r, AY8910_control_port_0_msb_w)
478	478	AM_RANGE(0xff8802, 0xff8803) AM_WRITE(AY8910_write_port_0_msb_w)
479		AM_RANGE(0xfffa00, 0xfffa2f) AM_READWRITE(mfp68901_0_register16_r, mfp68901_0_register_lsb_w)
	479	AM_RANGE(0xfffa00, 0xfffa2f) AM_READWRITE(mfp68901_0_register_lsb_r, mfp68901_0_register_lsb_w)
480	480	AM_RANGE(0xfffc00, 0xfffc01) AM_READWRITE(acia6850_0_stat_msb_r, acia6850_0_ctrl_msb_w)
481	481	AM_RANGE(0xfffc02, 0xfffc03) AM_READWRITE(acia6850_0_data_msb_r, acia6850_0_data_msb_w)
482	482	AM_RANGE(0xfffc04, 0xfffc05) AM_READWRITE(acia6850_1_stat_msb_r, acia6850_1_ctrl_msb_w)
r861	r862
501	501	AM_RANGE(0xff8800, 0xff8801) AM_READWRITE(AY8910_read_port_0_msb_r, AY8910_control_port_0_msb_w)
502	502	AM_RANGE(0xff8802, 0xff8803) AM_WRITE(AY8910_write_port_0_msb_w)
503	503	//   AM_RANGE(0xff8a00, 0xff8a3f) AM_READWRITE(atarist_blitter_r, atarist_blitter_w)
504		AM_RANGE(0xfffa00, 0xfffa3f) AM_READWRITE(mfp68901_0_register16_r, mfp68901_0_register_msb_w)
	504	AM_RANGE(0xfffa00, 0xfffa3f) AM_READWRITE(mfp68901_0_register_lsb_r, mfp68901_0_register_msb_w)
505	505	AM_RANGE(0xfffc00, 0xfffc01) AM_READWRITE(acia6850_0_stat_msb_r, acia6850_0_ctrl_msb_w)
506	506	AM_RANGE(0xfffc02, 0xfffc03) AM_READWRITE(acia6850_0_data_msb_r, acia6850_0_data_msb_w)
507	507	AM_RANGE(0xfffc04, 0xfffc05) AM_READWRITE(acia6850_1_stat_msb_r, acia6850_1_ctrl_msb_w)
r861	r862
546	546	AM_RANGE(0xff9216, 0xff9217) AM_READ(port_tag_to_handler16("PADDLE1Y"))
547	547	AM_RANGE(0xff9220, 0xff9221) AM_READ(port_tag_to_handler16("GUNX"))
548	548	AM_RANGE(0xff9222, 0xff9223) AM_READ(port_tag_to_handler16("GUNY"))
549		AM_RANGE(0xfffa00, 0xfffa2f) AM_READWRITE(mfp68901_0_register16_r, mfp68901_0_register_lsb_w)
	549	AM_RANGE(0xfffa00, 0xfffa2f) AM_READWRITE(mfp68901_0_register_lsb_r, mfp68901_0_register_lsb_w)
550	550	AM_RANGE(0xfffc00, 0xfffc01) AM_READWRITE(acia6850_0_stat_msb_r, acia6850_0_ctrl_msb_w)
551	551	AM_RANGE(0xfffc02, 0xfffc03) AM_READWRITE(acia6850_0_data_msb_r, acia6850_0_data_msb_w)
552	552	AM_RANGE(0xfffc04, 0xfffc05) AM_READWRITE(acia6850_1_stat_msb_r, acia6850_1_ctrl_msb_w)
r861	r862
583	583	//   AM_RANGE(0xff8924, 0xff8925) AM_READWRITE(atariste_mixer_mask_r, atariste_mixer_mask_w)
584	584	//   AM_RANGE(0xff8a00, 0xff8a3f) AM_READWRITE(atariste_blitter_r, atariste_blitter_w)
585	585	//   AM_RANGE(0xff8e20, 0xff8e21) AM_READWRITE(megaste_cache_r, megaste_cache_w)
586		AM_RANGE(0xfffa00, 0xfffa3f) AM_READWRITE(mfp68901_0_register16_r, mfp68901_0_register_msb_w)
	586	AM_RANGE(0xfffa00, 0xfffa3f) AM_READWRITE(mfp68901_0_register_lsb_r, mfp68901_0_register_msb_w)
587	587	//   AM_RANGE(0xfffa40, 0xfffa5f) AM_READWRITE(megaste_fpu_r, megaste_fpu_w)
588	588	//   AM_RANGE(0xff8c80, 0xff8c87) AM_READWRITE(megaste_scc8530_r, megaste_scc8530_w)
589	589	AM_RANGE(0xfffc00, 0xfffc01) AM_READWRITE(acia6850_0_stat_msb_r, acia6850_0_ctrl_msb_w)
r861	r862
919	919
920	920	static struct mfp68901_interface mfp_intf =
921	921	{
922		Y2/32,
	922	Y2/8,
923	923	Y1,
924	924	NULL,
925	925	NULL,

Previous

15994 Revisions

Next

---

© 1998-2018 The MESS Team