1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
// license:BSD-3-Clause
// copyright-holders:hap
/*
Texas Instruments TMS1024/TMS1025 I/O expander
No documentation was available, just a pinout. But documentation
is available for pin-compatible Mitsubishi M50780SP/M50781SP.
Other than more port pins, TMS1025 is assumed to be same as TMS1024.
TODO:
- x
*/
#include "emu.h"
#include "machine/tms1024.h"
DEFINE_DEVICE_TYPE(TMS1024, tms1024_device, "tms1024", "TMS1024 I/O Expander")
DEFINE_DEVICE_TYPE(TMS1025, tms1025_device, "tms1025", "TMS1025 I/O Expander")
//-------------------------------------------------
// constructor
//-------------------------------------------------
tms1024_device::tms1024_device(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, u32 clock)
: device_t(mconfig, type, tag, owner, clock)
, m_h(0), m_s(0), m_std(0), m_ms(0)
, m_read_port{{*this}, {*this}, {*this}, {*this}, {*this}, {*this}, {*this}}
, m_write_port{{*this}, {*this}, {*this}, {*this}, {*this}, {*this}, {*this}}
{
}
tms1024_device::tms1024_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
: tms1024_device(mconfig, TMS1024, tag, owner, clock)
{
}
tms1025_device::tms1025_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
: tms1024_device(mconfig, TMS1025, tag, owner, clock)
{
}
//-------------------------------------------------
// device_start - device-specific startup
//-------------------------------------------------
void tms1024_device::device_start()
{
// resolve callbacks (there is no port 0)
for (devcb_read8 &cb : m_read_port)
cb.resolve_safe(0);
for (devcb_write8 &cb : m_write_port)
cb.resolve_safe();
// register for savestates
save_item(NAME(m_h));
save_item(NAME(m_s));
save_item(NAME(m_std));
save_item(NAME(m_ms));
}
//-------------------------------------------------
// handlers
//-------------------------------------------------
WRITE8_MEMBER(tms1024_device::write_h)
{
// H1,2,3,4: data for outputs A,B,C,D
m_h = data & 0xf;
}
READ8_MEMBER(tms1024_device::read_h)
{
if (!m_ms)
{
// read selected port data
if (m_s != 0)
m_h = (m_read_port[m_s-1])((offs_t)(m_s-1)) & 0xf;
// high-impedance otherwise
}
return m_h;
}
WRITE8_MEMBER(tms1024_device::write_s)
{
// S0,1,2: select port
m_s = data & 7;
}
WRITE_LINE_MEMBER(tms1024_device::write_std)
{
state = (state) ? 1 : 0;
// output on falling edge
if (m_ms && !state && m_std)
{
if (m_s != 0)
(m_write_port[m_s-1])((offs_t)(m_s-1), m_h);
else
{
// reset all ports
for (int i = PORT1; i <= PORT7; i++)
(m_write_port[i])(offs_t(i), 0);
}
}
m_std = state;
}
WRITE_LINE_MEMBER(tms1024_device::write_ms)
{
// 0: multiplexer(read) mode, 1: latch(write) mode
m_ms = (state) ? 1 : 0;
}
|