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
|
// license:BSD-3-Clause
// copyright-holders:Fabio Priuli
/**********************************************************************
Sega Saturn MD Joypad (3 buttons & 6 buttons) emulation
**********************************************************************/
#include "emu.h"
#include "joy_md.h"
//**************************************************************************
// DEVICE DEFINITIONS
//**************************************************************************
DEFINE_DEVICE_TYPE(SATURN_JOYMD3B, saturn_joymd3b_device, "saturn_md3b", "Sega Saturn Joypad MD 3buttons")
DEFINE_DEVICE_TYPE(SATURN_JOYMD6B, saturn_joymd6b_device, "saturn_md6b", "Sega Saturn Joypad MD 6buttons")
static INPUT_PORTS_START( saturn_md3b )
PORT_START("JOY")
PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT )
PORT_BIT( 0x4000, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT )
PORT_BIT( 0x2000, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN )
PORT_BIT( 0x1000, IP_ACTIVE_LOW, IPT_JOYSTICK_UP )
PORT_BIT( 0x0800, IP_ACTIVE_LOW, IPT_START )
PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("A")
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_NAME("C")
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("B")
PORT_BIT( 0x00ff, IP_ACTIVE_LOW, IPT_UNUSED ) //reads '1' when direct mode is polled
INPUT_PORTS_END
static INPUT_PORTS_START( saturn_md6b )
PORT_START("JOY")
PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT )
PORT_BIT( 0x4000, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT )
PORT_BIT( 0x2000, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN )
PORT_BIT( 0x1000, IP_ACTIVE_LOW, IPT_JOYSTICK_UP )
PORT_BIT( 0x0800, IP_ACTIVE_LOW, IPT_START )
PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("A")
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_NAME("C")
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("B")
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_BUTTON8 ) PORT_NAME("Mode")
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_BUTTON4 ) PORT_NAME("X")
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_BUTTON5 ) PORT_NAME("Y")
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_BUTTON6 ) PORT_NAME("Z")
PORT_BIT( 0x000f, IP_ACTIVE_LOW, IPT_UNUSED ) //reads '1' when direct mode is polled
INPUT_PORTS_END
//-------------------------------------------------
// input_ports - device-specific input ports
//-------------------------------------------------
ioport_constructor saturn_joymd3b_device::device_input_ports() const
{
return INPUT_PORTS_NAME( saturn_md3b );
}
ioport_constructor saturn_joymd6b_device::device_input_ports() const
{
return INPUT_PORTS_NAME( saturn_md6b );
}
//**************************************************************************
// LIVE DEVICE
//**************************************************************************
//-------------------------------------------------
// constructors
//-------------------------------------------------
saturn_joymd3b_device::saturn_joymd3b_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
device_t(mconfig, SATURN_JOYMD3B, tag, owner, clock),
device_saturn_control_port_interface(mconfig, *this),
m_joy(*this, "JOY")
{
m_ctrl_id = 0xe1;
}
saturn_joymd6b_device::saturn_joymd6b_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
device_t(mconfig, SATURN_JOYMD6B, tag, owner, clock),
device_saturn_control_port_interface(mconfig, *this),
m_joy(*this, "JOY")
{
m_ctrl_id = 0xe2;
}
//-------------------------------------------------
// read_ctrl
//-------------------------------------------------
uint8_t saturn_joymd3b_device::read_ctrl(uint8_t offset)
{
uint8_t res = 0;
switch (offset)
{
case 0:
default:
res = m_joy->read() >> 8;
break;
}
return res;
}
uint8_t saturn_joymd6b_device::read_ctrl(uint8_t offset)
{
uint8_t res = 0;
switch (offset)
{
case 0:
default:
res = m_joy->read() >> 8;
break;
case 1:
res = m_joy->read() & 0xff;
break;
}
return res;
}
|