Previous

199869 Revisions

Next

r20868 Saturday 9th February, 2013 at 14:22:52 UTC by Wilbert Pol
(MESS) pk8000.c: Reduce tagmap lookups (nw)

[src/mess/drivers]

pk8000.c

trunk/src/mess/drivers/pk8000.c

r20867	r20868
22	22	{
23	23	public:
24	24	pk8000_state(const machine_config &mconfig, device_type type, const char *tag)
25		: driver_device(mconfig, type, tag) { }
	25	: driver_device(mconfig, type, tag)
	26	, m_maincpu(*this, "maincpu")
	27	, m_cassette(*this, CASSETTE_TAG)
	28	, m_ram(*this, RAM_TAG)
	29	, m_speaker(*this, SPEAKER_TAG)
	30	, m_region_maincpu(*this, "maincpu")
	31	, m_bank1(*this, "bank1")
	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	{ }
26	40
27	41	UINT8 m_keyboard_line;
28	42	DECLARE_READ8_MEMBER(pk8000_joy_1_r);
29	43	DECLARE_READ8_MEMBER(pk8000_joy_2_r);
	44	virtual void machine_start();
30	45	virtual void machine_reset();
31	46	virtual void video_start();
32	47	UINT32 screen_update_pk8000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
r20867	r20868
38	53	DECLARE_WRITE8_MEMBER(pk8000_84_porta_w);
39	54	DECLARE_WRITE8_MEMBER(pk8000_84_portc_w);
40	55	IRQ_CALLBACK_MEMBER(pk8000_irq_callback);
	56
	57	protected:
	58	required_device<cpu_device> m_maincpu;
	59	required_device<cassette_image_device> m_cassette;
	60	required_device<ram_device> m_ram;
	61	required_device<device_t> m_speaker;
	62	required_memory_region m_region_maincpu;
	63	required_memory_bank m_bank1;
	64	required_memory_bank m_bank2;
	65	required_memory_bank m_bank3;
	66	required_memory_bank m_bank4;
	67	required_memory_bank m_bank5;
	68	required_memory_bank m_bank6;
	69	required_memory_bank m_bank7;
	70	required_memory_bank m_bank8;
	71	ioport_port *m_io_port[10];
	72
	73	void pk8000_set_bank(UINT8 data);
41	74	};
42	75
43	76
44	77
45		static cassette_image_device *cassette_device_image(running_machine &machine)
	78	void pk8000_state::pk8000_set_bank(UINT8 data)
46	79	{
47		return machine.device<cassette_image_device>(CASSETTE_TAG);
48		}
49
50		static void pk8000_set_bank(running_machine &machine,UINT8 data)
51		{
52		pk8000_state *state = machine.driver_data<pk8000_state>();
53		UINT8 *rom = machine.root_device().memregion("maincpu")->base();
54		UINT8 *ram = machine.device<ram_device>(RAM_TAG)->pointer();
	80	UINT8 *rom = m_region_maincpu->base();
	81	UINT8 *ram = m_ram->pointer();
55	82	UINT8 block1 = data & 3;
56	83	UINT8 block2 = (data >> 2) & 3;
57	84	UINT8 block3 = (data >> 4) & 3;
r20867	r20868
59	86
60	87	switch(block1) {
61	88	case 0:
62		state->membank("bank1")->set_base(rom + 0x10000);
63		state->membank("bank5")->set_base(ram);
	89	m_bank1->set_base(rom + 0x10000);
	90	m_bank5->set_base(ram);
64	91	break;
65	92	case 1: break;
66	93	case 2: break;
67	94	case 3:
68		state->membank("bank1")->set_base(ram);
69		state->membank("bank5")->set_base(ram);
	95	m_bank1->set_base(ram);
	96	m_bank5->set_base(ram);
70	97	break;
71	98	}
72	99
73	100	switch(block2) {
74	101	case 0:
75		state->membank("bank2")->set_base(rom + 0x14000);
76		state->membank("bank6")->set_base(ram + 0x4000);
	102	m_bank2->set_base(rom + 0x14000);
	103	m_bank6->set_base(ram + 0x4000);
77	104	break;
78	105	case 1: break;
79	106	case 2: break;
80	107	case 3:
81		state->membank("bank2")->set_base(ram + 0x4000);
82		state->membank("bank6")->set_base(ram + 0x4000);
	108	m_bank2->set_base(ram + 0x4000);
	109	m_bank6->set_base(ram + 0x4000);
83	110	break;
84	111	}
85	112	switch(block3) {
86	113	case 0:
87		state->membank("bank3")->set_base(rom + 0x18000);
88		state->membank("bank7")->set_base(ram + 0x8000);
	114	m_bank3->set_base(rom + 0x18000);
	115	m_bank7->set_base(ram + 0x8000);
89	116	break;
90	117	case 1: break;
91	118	case 2: break;
92	119	case 3:
93		state->membank("bank3")->set_base(ram + 0x8000);
94		state->membank("bank7")->set_base(ram + 0x8000);
	120	m_bank3->set_base(ram + 0x8000);
	121	m_bank7->set_base(ram + 0x8000);
95	122	break;
96	123	}
97	124	switch(block4) {
98	125	case 0:
99		state->membank("bank4")->set_base(rom + 0x1c000);
100		state->membank("bank8")->set_base(ram + 0xc000);
	126	m_bank4->set_base(rom + 0x1c000);
	127	m_bank8->set_base(ram + 0xc000);
101	128	break;
102	129	case 1: break;
103	130	case 2: break;
104	131	case 3:
105		state->membank("bank4")->set_base(ram + 0xc000);
106		state->membank("bank8")->set_base(ram + 0xc000);
	132	m_bank4->set_base(ram + 0xc000);
	133	m_bank8->set_base(ram + 0xc000);
107	134	break;
108	135	}
109	136	}
110	137	WRITE8_MEMBER(pk8000_state::pk8000_80_porta_w)
111	138	{
112		pk8000_set_bank(machine(),data);
	139	pk8000_set_bank(data);
113	140	}
114	141
115	142	READ8_MEMBER(pk8000_state::pk8000_80_portb_r)
116	143	{
117		static const char *const keynames[] = { "LINE0", "LINE1", "LINE2", "LINE3", "LINE4", "LINE5", "LINE6", "LINE7", "LINE8", "LINE9" };
118	144	if(m_keyboard_line>9) {
119	145	return 0xff;
120	146	}
121		return machine().root_device().ioport(keynames[m_keyboard_line])->read();
	147	return m_io_port[m_keyboard_line]->read();
122	148	}
123	149
124	150	WRITE8_MEMBER(pk8000_state::pk8000_80_portc_w)
125	151	{
126	152	m_keyboard_line = data & 0x0f;
127	153
128		speaker_level_w(machine().device(SPEAKER_TAG), BIT(data,7));
	154	speaker_level_w(m_speaker, BIT(data,7));
129	155
130		cassette_device_image(machine())->change_state(
131		(BIT(data,4)) ? CASSETTE_MOTOR_ENABLED : CASSETTE_MOTOR_DISABLED,
132		CASSETTE_MASK_MOTOR);
133		cassette_device_image(machine())->output((BIT(data,6)) ? +1.0 : 0.0);
	156	m_cassette->change_state( (BIT(data,4)) ? CASSETTE_MOTOR_ENABLED : CASSETTE_MOTOR_DISABLED, CASSETTE_MASK_MOTOR);
	157	m_cassette->output((BIT(data,6)) ? +1.0 : 0.0);
134	158	}
135	159
136	160	static I8255_INTERFACE( pk8000_ppi8255_interface_1 )
r20867	r20868
169	193
170	194	READ8_MEMBER(pk8000_state::pk8000_joy_1_r)
171	195	{
172		UINT8 retVal = (cassette_device_image(machine())->input() > 0.0038 ? 0x80 : 0);
	196	UINT8 retVal = (m_cassette->input() > 0.0038 ? 0x80 : 0);
173	197	retVal |= ioport("JOY1")->read() & 0x7f;
174	198	return retVal;
175	199	}
176	200	READ8_MEMBER(pk8000_state::pk8000_joy_2_r)
177	201	{
178		UINT8 retVal = (cassette_device_image(machine())->input() > 0.0038 ? 0x80 : 0);
	202	UINT8 retVal = (m_cassette->input() > 0.0038 ? 0x80 : 0);
179	203	retVal |= ioport("JOY2")->read() & 0x7f;
180	204	return retVal;
181	205	}
r20867	r20868
325	349	}
326	350
327	351
	352	void pk8000_state::machine_start()
	353	{
	354	static const char *const keynames[] = { "LINE0", "LINE1", "LINE2", "LINE3", "LINE4", "LINE5", "LINE6", "LINE7", "LINE8", "LINE9" };
	355
	356	for ( int i = 0; i < 10; i++ )
	357	{
	358	m_io_port[i] = ioport(keynames[i]);
	359	}
	360	}
	361
328	362	void pk8000_state::machine_reset()
329	363	{
330		pk8000_set_bank(machine(),0);
331		machine().device("maincpu")->execute().set_irq_acknowledge_callback(device_irq_acknowledge_delegate(FUNC(pk8000_state::pk8000_irq_callback),this));
	364	pk8000_set_bank(0);
	365	m_maincpu->set_irq_acknowledge_callback(device_irq_acknowledge_delegate(FUNC(pk8000_state::pk8000_irq_callback),this));
332	366	}
333	367
334	368	void pk8000_state::video_start()
r20867	r20868
337	371
338	372	UINT32 pk8000_state::screen_update_pk8000(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
339	373	{
340		return pk8000_video_update(screen, bitmap, cliprect, machine().device<ram_device>(RAM_TAG)->pointer());
	374	return pk8000_video_update(screen, bitmap, cliprect, m_ram->pointer());
341	375	}
342	376
343	377	/* Machine driver */

Previous

199869 Revisions

Next

---

© 1997-2024 The MAME Team