Previous

199869 Revisions

Next

r31672 Sunday 17th August, 2014 at 03:12:12 UTC by Robbbert
st_mp100: fixed display, 4 games marked as working.

[src/mame/drivers]	st_mp100.c
[src/mame/layout]	st_mp100.lay

trunk/src/mame/drivers/st_mp100.c

r31671	r31672
6	6
7	7
8	8	ToDo:
9		- Display to fix
10	9	- Dips, Inputs, Solenoids vary per game
11	10	- Mechanical
12	11	- Sound board - an enormous mass of discrete circuitry
r31671	r31672
40	39	, m_io_x4(*this, "X4")
41	40	{ }
42	41
43		DECLARE_DRIVER_INIT(st_mp100);
44	42	DECLARE_READ8_MEMBER(u10_a_r);
45	43	DECLARE_WRITE8_MEMBER(u10_a_w);
46	44	DECLARE_READ8_MEMBER(u10_b_r);
r31671	r31672
54	52	DECLARE_WRITE_LINE_MEMBER(u11_cb2_w);
55	53	DECLARE_INPUT_CHANGED_MEMBER(activity_test);
56	54	DECLARE_INPUT_CHANGED_MEMBER(self_test);
57		TIMER_DEVICE_CALLBACK_MEMBER(u10_timer);
	55	TIMER_DEVICE_CALLBACK_MEMBER(timer_x);
58	56	TIMER_DEVICE_CALLBACK_MEMBER(u11_timer);
59	57	private:
60		UINT8 m_u10;
61		UINT8 m_u10_a;
62		UINT8 m_u10_b;
63		UINT8 m_u11_a;
64		UINT8 m_u11_b;
	58	UINT8 m_u10a;
	59	UINT8 m_u10b;
	60	UINT8 m_u11a;
	61	UINT8 m_u11b;
65	62	bool m_u10_ca2;
66	63	bool m_u10_cb2;
67		bool m_u10_timer;
	64	bool m_u11_cb2;
	65	bool m_timer_x;
68	66	bool m_u11_timer;
69	67	UINT8 m_digit;
70		UINT8 m_segment;
	68	UINT8 m_counter;
71	69	virtual void machine_reset();
72	70	required_device<m6800_cpu_device> m_maincpu;
73	71	required_device<pia6821_device> m_pia_u10;
r31671	r31672
90	88	AM_RANGE(0x0000, 0x007f) AM_RAM // internal to the cpu
91	89	AM_RANGE(0x0088, 0x008b) AM_DEVREADWRITE("pia_u10", pia6821_device, read, write)
92	90	AM_RANGE(0x0090, 0x0093) AM_DEVREADWRITE("pia_u11", pia6821_device, read, write)
93		AM_RANGE(0x00a0, 0x00bf) AM_WRITENOP // to sound board
94		AM_RANGE(0x00c0, 0x00df) // to sound board
	91	AM_RANGE(0x00a0, 0x00a7) AM_WRITENOP // to sound board
	92	AM_RANGE(0x00c0, 0x00c7) // to sound board
95	93	AM_RANGE(0x0200, 0x02ff) AM_RAM AM_SHARE("nvram")
96	94	AM_RANGE(0x1000, 0x1fff) AM_ROM AM_REGION("roms", 0 )
97	95	ADDRESS_MAP_END
r31671	r31672
496	494	WRITE_LINE_MEMBER( st_mp100_state::u10_ca2_w )
497	495	{
498	496	m_u10_ca2 = state;
	497	if (!state)
	498	m_counter = 0;
499	499	}
500	500
501	501	WRITE_LINE_MEMBER( st_mp100_state::u10_cb2_w )
r31671	r31672
509	509
510	510	WRITE_LINE_MEMBER( st_mp100_state::u11_cb2_w )
511	511	{
	512	m_u11_cb2 = state;
512	513	}
513	514
514	515	READ8_MEMBER( st_mp100_state::u10_a_r )
515	516	{
516		return m_u10_a;
	517	return m_u10a;
517	518	}
518	519
519	520	WRITE8_MEMBER( st_mp100_state::u10_a_w )
520	521	{
521	522	static const UINT8 patterns[16] = { 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0,0,0,0,0,0 }; // MC14543
522		m_segment = data >> 4;
523		m_u10_a = data;
524		m_u10 = (data & 15) | (BIT(m_u11_a, 0) << 4);
	523	m_u10a = data;
525	524
526	525	if (!m_u10_ca2)
527	526	{
528		switch (m_u10)
529		{
530		case 0x10:
531		output_set_digit_value(m_digit, patterns[m_segment]);
532		break;
533		case 0x1d:
534		output_set_digit_value(8+m_digit, patterns[m_segment]);
535		break;
536		case 0x1b:
537		output_set_digit_value(16+m_digit, patterns[m_segment]);
538		break;
539		case 0x07:
540		output_set_digit_value(24+m_digit, patterns[m_segment]);
541		break;
542		case 0x0f:
543		output_set_digit_value(32+m_digit, patterns[m_segment]);
544		break;
545		default:
546		break;
547		}
	527	m_counter++;
	528	UINT8 segment = data >> 4;
	529
	530	if (m_counter==1)
	531	output_set_digit_value(m_digit, patterns[segment]);
	532
	533	if (m_counter==3)
	534	output_set_digit_value(10+m_digit, patterns[segment]);
	535	else
	536	if (m_counter==5)
	537	output_set_digit_value(20+m_digit, patterns[segment]);
	538	else
	539	if (m_counter==8)
	540	output_set_digit_value(30+m_digit, patterns[segment]);
	541	else
	542	if (m_counter==10)
	543	output_set_digit_value(40+m_digit, patterns[segment]);
548	544	}
549	545	}
550	546
r31671	r31672
552	548	{
553	549	UINT8 data = 0;
554	550
555		if (BIT(m_u10_a, 0))
	551	if (BIT(m_u10a, 0))
556	552	data |= m_io_x0->read();
557	553
558		if (BIT(m_u10_a, 1))
	554	if (BIT(m_u10a, 1))
559	555	data |= m_io_x1->read();
560	556
561		if (BIT(m_u10_a, 2))
	557	if (BIT(m_u10a, 2))
562	558	data |= m_io_x2->read();
563	559
564		if (BIT(m_u10_a, 3))
	560	if (BIT(m_u10a, 3))
565	561	data |= m_io_x3->read();
566	562
567		if (BIT(m_u10_a, 4))
	563	if (BIT(m_u10a, 4))
568	564	data |= m_io_x4->read();
569	565
570		if (BIT(m_u10_a, 5))
	566	if (BIT(m_u10a, 5))
571	567	data |= m_io_dsw0->read();
572	568
573		if (BIT(m_u10_a, 6))
	569	if (BIT(m_u10a, 6))
574	570	data |= m_io_dsw1->read();
575	571
576		if (BIT(m_u10_a, 7))
	572	if (BIT(m_u10a, 7))
577	573	data |= m_io_dsw2->read();
578	574
579	575	if (m_u10_cb2)
r31671	r31672
584	580
585	581	WRITE8_MEMBER( st_mp100_state::u10_b_w )
586	582	{
587		m_u10_b = data;
	583	m_u10b = data;
588	584	}
589	585
590	586	READ8_MEMBER( st_mp100_state::u11_a_r )
591	587	{
592		return m_u11_a;
	588	return m_u11a;
593	589	}
594	590
595	591	WRITE8_MEMBER( st_mp100_state::u11_a_w )
596	592	{
597		m_u11_a = data;
	593	m_u11a = data;
598	594
599		m_digit = 0xff;
600		if BIT(data, 2)
601		m_digit = 4;
602		else
603		if BIT(data, 3)
604		m_digit = 3;
605		else
606		if BIT(data, 4)
607		m_digit = 2;
608		else
609		if BIT(data, 5)
610		m_digit = 1;
611		else
612		if BIT(data, 6)
613		m_digit = 0;
614		else
615		if BIT(data, 7)
616		m_digit = 5;
	595	if (!m_u10_ca2)
	596	{
	597	if BIT(data, 2)
	598	m_digit = 5;
	599	else
	600	if BIT(data, 3)
	601	m_digit = 4;
	602	else
	603	if BIT(data, 4)
	604	m_digit = 3;
	605	else
	606	if BIT(data, 5)
	607	m_digit = 2;
	608	else
	609	if BIT(data, 6)
	610	m_digit = 1;
	611	else
	612	if BIT(data, 7)
	613	m_digit = 0;
	614
	615	m_counter++;
	616	}
617	617	}
618	618
619	619	WRITE8_MEMBER( st_mp100_state::u11_b_w )
620	620	{
621		m_u11_b = data;
622		switch (data & 15)
	621	m_u11b = data;
	622	if (!m_u11_cb2)
623	623	{
624		case 0x0: // chime 10
625		m_samples->start(1, 1);
626		break;
627		case 0x1: // chime 100
628		m_samples->start(2, 2);
629		break;
630		case 0x2: // chime 1000
631		m_samples->start(3, 3);
632		break;
633		case 0x3: // chime 10000
634		m_samples->start(0, 4);
635		break;
636		case 0x4: // chime 10000
637		m_samples->start(0, 4);
638		break;
639		case 0x5: // knocker
640		m_samples->start(0, 6);
641		break;
642		case 0x6: // outhole
643		m_samples->start(0, 5);
644		break;
645		// from here, vary per game
646		case 0x7:
647		case 0x8:
648		case 0x9:
649		//m_samples->start(0, 5);
650		break;
651		case 0xa:
652		m_samples->start(0, 0);
653		break;
654		case 0xb:
655		m_samples->start(0, 0);
656		break;
657		case 0xc:
658		m_samples->start(0, 0);
659		break;
660		case 0xd:
661		//m_samples->start(0, 0);
662		break;
663		case 0xe:
664		//m_samples->start(0, 5);
665		break;
666		case 0xf: // not used
667		break;
	624	switch (data & 15)
	625	{
	626	case 0x0: // chime 10
	627	m_samples->start(1, 1);
	628	break;
	629	case 0x1: // chime 100
	630	m_samples->start(2, 2);
	631	break;
	632	case 0x2: // chime 1000
	633	m_samples->start(3, 3);
	634	break;
	635	case 0x3: // chime 10000
	636	m_samples->start(0, 4);
	637	break;
	638	case 0x4: // chime 10000
	639	m_samples->start(0, 4);
	640	break;
	641	case 0x5: // knocker
	642	m_samples->start(0, 6);
	643	break;
	644	case 0x6: // outhole
	645	m_samples->start(0, 5);
	646	break;
	647	// from here, vary per game
	648	case 0x7:
	649	case 0x8:
	650	case 0x9:
	651	//m_samples->start(0, 5);
	652	break;
	653	case 0xa:
	654	m_samples->start(0, 0);
	655	break;
	656	case 0xb:
	657	m_samples->start(0, 0);
	658	break;
	659	case 0xc:
	660	m_samples->start(0, 0);
	661	break;
	662	case 0xd:
	663	//m_samples->start(0, 0);
	664	break;
	665	case 0xe:
	666	//m_samples->start(0, 5);
	667	break;
	668	case 0xf: // not used
	669	break;
	670	}
668	671	}
669	672	}
670	673
671	674	void st_mp100_state::machine_reset()
672	675	{
673		m_u10_a = 0;
674		m_u10_b = 0;
	676	m_u10a = 0;
	677	m_u10b = 0;
675	678	m_u10_cb2 = 0;
676		m_u11_a = 0;
677		m_u11_b = 0;
	679	m_u11a = 0;
	680	m_u11b = 0;
678	681	}
679	682
680		DRIVER_INIT_MEMBER(st_mp100_state,st_mp100)
681		{
682		}
683
684	683	// zero-cross detection
685		TIMER_DEVICE_CALLBACK_MEMBER( st_mp100_state::u10_timer )
	684	TIMER_DEVICE_CALLBACK_MEMBER( st_mp100_state::timer_x )
686	685	{
687		m_u10_timer ^= 1;
688		m_pia_u10->cb1_w(m_u10_timer);
	686	m_timer_x ^= 1;
	687	m_pia_u10->cb1_w(m_timer_x);
689	688	}
690	689
691	690	// 555 timer for display refresh
r31671	r31672
718	717	MCFG_PIA_CB2_HANDLER(WRITELINE(st_mp100_state, u10_cb2_w))
719	718	MCFG_PIA_IRQA_HANDLER(DEVWRITELINE("maincpu", m6800_cpu_device, irq_line))
720	719	MCFG_PIA_IRQB_HANDLER(DEVWRITELINE("maincpu", m6800_cpu_device, irq_line))
721		MCFG_TIMER_DRIVER_ADD_PERIODIC("timer_z", st_mp100_state, u10_timer, attotime::from_hz(120)) // mains freq*2
	720	MCFG_TIMER_DRIVER_ADD_PERIODIC("timer_x", st_mp100_state, timer_x, attotime::from_hz(120)) // mains freq*2
722	721
723	722	MCFG_DEVICE_ADD("pia_u11", PIA6821, 0)
724	723	MCFG_PIA_READPA_HANDLER(READ8(st_mp100_state, u11_a_r))
r31671	r31672
841	840	ROM_END
842	841
843	842	// chimes
844		GAME(1977,  pinball,    0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Pinball",              GAME_IS_SKELETON_MECHANICAL)
845		GAME(1977,  stingray,   0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Stingray",             GAME_IS_SKELETON_MECHANICAL)
846		GAME(1978,  stars,      0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Stars",                GAME_IS_SKELETON_MECHANICAL)
847		GAME(1978,  memlane,    0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Memory Lane",          GAME_IS_SKELETON_MECHANICAL)
	843	GAME(1977,  pinball,    0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Pinball", GAME_MECHANICAL)
	844	GAME(1977,  stingray,   0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Stingray", GAME_MECHANICAL)
	845	GAME(1978,  stars,      0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Stars", GAME_MECHANICAL)
	846	GAME(1978,  memlane,    0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Memory Lane", GAME_MECHANICAL)
848	847
849	848	// sound unit B-521
850		GAME(1978,  lectrono,   0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Lectronamo",           GAME_IS_SKELETON_MECHANICAL)
851		GAME(1978,  wildfyre,   0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Wildfyre",             GAME_IS_SKELETON_MECHANICAL)
852		GAME(1978,  nugent,     0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Nugent",               GAME_IS_SKELETON_MECHANICAL)
853		GAME(1979,  dracula,    0,      st_mp100,   mp100, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Dracula",              GAME_IS_SKELETON_MECHANICAL)
	849	GAME(1978,  lectrono,   0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Lectronamo", GAME_MECHANICAL | GAME_NO_SOUND )
	850	GAME(1978,  wildfyre,   0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Wildfyre", GAME_MECHANICAL | GAME_NO_SOUND )
	851	GAME(1978,  nugent,     0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Nugent", GAME_MECHANICAL | GAME_NO_SOUND )
	852	GAME(1979,  dracula,    0,      st_mp100,   mp100, driver_device, 0,   ROT0,   "Stern", "Dracula", GAME_MECHANICAL | GAME_NO_SOUND )
854	853
855	854	// different inputs
856		GAME(1979,  trident,    0,      st_mp100,   mp200, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Trident",              GAME_IS_SKELETON_MECHANICAL)
857		GAME(1979,  hothand,    0,      st_mp100,   mp200, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Hot Hand",             GAME_IS_SKELETON_MECHANICAL)
858		GAME(1979,  magic,      0,      st_mp100,   mp200, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Magic",                GAME_IS_SKELETON_MECHANICAL)
859		GAME(1979,  princess,   0,      st_mp100,   mp200, st_mp100_state,   st_mp100,   ROT0,   "Stern",    "Cosmic Princess",      GAME_IS_SKELETON_MECHANICAL)
	855	GAME(1979,  trident,    0,      st_mp100,   mp200, driver_device, 0,   ROT0,   "Stern", "Trident", GAME_MECHANICAL | GAME_NO_SOUND )
	856	GAME(1979,  hothand,    0,      st_mp100,   mp200, driver_device, 0,   ROT0,   "Stern", "Hot Hand", GAME_MECHANICAL | GAME_NO_SOUND )
	857	GAME(1979,  magic,      0,      st_mp100,   mp200, driver_device, 0,   ROT0,   "Stern", "Magic", GAME_MECHANICAL | GAME_NO_SOUND )
	858	GAME(1979,  princess,   0,      st_mp100,   mp200, driver_device, 0,   ROT0,   "Stern", "Cosmic Princess", GAME_MECHANICAL | GAME_NO_SOUND )

trunk/src/mame/layout/st_mp100.lay

r31671	r31672
37	37
38	38	<!-- Player 1 Score -->
39	39
40		<bezel name="digit5" element="digit">
	40	<bezel name="digit0" element="digit">
41	41	<bounds left="10" top="45" right="44" bottom="84" />
42	42	</bezel>
43		<bezel name="digit4" element="digit">
	43	<bezel name="digit5" element="digit">
44	44	<bounds left="54" top="45" right="88" bottom="84" />
45	45	</bezel>
46		<bezel name="digit3" element="digit">
	46	<bezel name="digit4" element="digit">
47	47	<bounds left="98" top="45" right="132" bottom="84" />
48	48	</bezel>
49		<bezel name="digit2" element="digit">
	49	<bezel name="digit3" element="digit">
50	50	<bounds left="142" top="45" right="176" bottom="84" />
51	51	</bezel>
52		<bezel name="digit1" element="digit">
	52	<bezel name="digit2" element="digit">
53	53	<bounds left="186" top="45" right="220" bottom="84" />
54	54	</bezel>
55		<bezel name="digit0" element="digit">
	55	<bezel name="digit1" element="digit">
56	56	<bounds left="230" top="45" right="264" bottom="84" />
57	57	</bezel>
58	58
59	59	<!-- Player 2 Score -->
60		<bezel name="digit13" element="digit">
	60	<bezel name="digit10" element="digit">
61	61	<bounds left="10" top="105" right="44" bottom="144" />
62	62	</bezel>
63		<bezel name="digit12" element="digit">
	63	<bezel name="digit15" element="digit">
64	64	<bounds left="54" top="105" right="88" bottom="144" />
65	65	</bezel>
66		<bezel name="digit11" element="digit">
	66	<bezel name="digit14" element="digit">
67	67	<bounds left="98" top="105" right="132" bottom="144" />
68	68	</bezel>
69		<bezel name="digit10" element="digit">
	69	<bezel name="digit13" element="digit">
70	70	<bounds left="142" top="105" right="176" bottom="144" />
71	71	</bezel>
72		<bezel name="digit9" element="digit">
	72	<bezel name="digit12" element="digit">
73	73	<bounds left="186" top="105" right="220" bottom="144" />
74	74	</bezel>
75		<bezel name="digit8" element="digit">
	75	<bezel name="digit11" element="digit">
76	76	<bounds left="230" top="105" right="264" bottom="144" />
77	77	</bezel>
78	78
79	79	<!-- Player 3 Score -->
80		<bezel name="digit21" element="digit">
	80	<bezel name="digit20" element="digit">
81	81	<bounds left="10" top="165" right="44" bottom="204" />
82	82	</bezel>
83		<bezel name="digit20" element="digit">
	83	<bezel name="digit25" element="digit">
84	84	<bounds left="54" top="165" right="88" bottom="204" />
85	85	</bezel>
86		<bezel name="digit19" element="digit">
	86	<bezel name="digit24" element="digit">
87	87	<bounds left="98" top="165" right="132" bottom="204" />
88	88	</bezel>
89		<bezel name="digit18" element="digit">
	89	<bezel name="digit23" element="digit">
90	90	<bounds left="142" top="165" right="176" bottom="204" />
91	91	</bezel>
92		<bezel name="digit17" element="digit">
	92	<bezel name="digit22" element="digit">
93	93	<bounds left="186" top="165" right="220" bottom="204" />
94	94	</bezel>
95		<bezel name="digit16" element="digit">
	95	<bezel name="digit21" element="digit">
96	96	<bounds left="230" top="165" right="264" bottom="204" />
97	97	</bezel>
98	98
99	99	<!-- Player 4 Score -->
100		<bezel name="digit28" element="digit">
	100	<bezel name="digit35" element="digit">
101	101	<bounds left="10" top="225" right="44" bottom="264" />
102	102	</bezel>
103		<bezel name="digit27" element="digit">
	103	<bezel name="digit34" element="digit">
104	104	<bounds left="54" top="225" right="88" bottom="264" />
105	105	</bezel>
106		<bezel name="digit26" element="digit">
	106	<bezel name="digit33" element="digit">
107	107	<bounds left="98" top="225" right="132" bottom="264" />
108	108	</bezel>
109		<bezel name="digit25" element="digit">
	109	<bezel name="digit32" element="digit">
110	110	<bounds left="142" top="225" right="176" bottom="264" />
111	111	</bezel>
112		<bezel name="digit24" element="digit">
	112	<bezel name="digit31" element="digit">
113	113	<bounds left="186" top="225" right="220" bottom="264" />
114	114	</bezel>
115		<bezel name="digit29" element="digit">
	115	<bezel name="digit30" element="digit">
116	116	<bounds left="230" top="225" right="264" bottom="264" />
117	117	</bezel>
118	118
119	119	<!-- Credits and Balls -->
120		<bezel name="digit35" element="digit">
	120	<bezel name="digit44" element="digit">
121	121	<bounds left="10" top="345" right="44" bottom="384" />
122	122	</bezel>
123		<bezel name="digit34" element="digit">
	123	<bezel name="digit43" element="digit">
124	124	<bounds left="54" top="345" right="88" bottom="384" />
125	125	</bezel>
126		<bezel name="digit32" element="digit">
	126	<bezel name="digit41" element="digit">
127	127	<bounds left="186" top="345" right="220" bottom="384" />
128	128	</bezel>
129		<bezel name="digit37" element="digit">
	129	<bezel name="digit40" element="digit">
130	130	<bounds left="230" top="345" right="264" bottom="384" />
131	131	</bezel>
132	132

Previous

199869 Revisions

Next

---

© 1997-2024 The MAME Team