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
|
// license:BSD-3-Clause
// copyright-holders:Curt Coder
/**********************************************************************
Atari Video Computer System lightpen emulation
Copyright MESS Team.
Visit http://mamedev.org for licensing and usage restrictions.
**********************************************************************/
#include "vcs_lightpen.h"
//**************************************************************************
// DEVICE DEFINITIONS
//**************************************************************************
const device_type VCS_LIGHTPEN = &device_creator<vcs_lightpen_device>;
INPUT_CHANGED_MEMBER( vcs_lightpen_device::trigger )
{
// TODO trigger timer at correct screen position
m_port->trigger_w(newval);
}
static INPUT_PORTS_START( vcs_lightpen )
PORT_START("JOY")
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_CHANGED_MEMBER(DEVICE_SELF, vcs_lightpen_device, trigger, 0)
PORT_BIT( 0xdf, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_START("LIGHTX")
PORT_BIT( 0xff, 0x00, IPT_LIGHTGUN_X) PORT_CROSSHAIR(X, 1.0, 0.0, 0) PORT_SENSITIVITY(45) PORT_KEYDELTA(15)
PORT_START("LIGHTY")
PORT_BIT( 0xff, 0x00, IPT_LIGHTGUN_Y) PORT_CROSSHAIR(Y, 1.0, 0.0, 0) PORT_SENSITIVITY(45) PORT_KEYDELTA(15)
INPUT_PORTS_END
//-------------------------------------------------
// input_ports - device-specific input ports
//-------------------------------------------------
ioport_constructor vcs_lightpen_device::device_input_ports() const
{
return INPUT_PORTS_NAME( vcs_lightpen );
}
//**************************************************************************
// LIVE DEVICE
//**************************************************************************
//-------------------------------------------------
// vcs_lightpen_device - constructor
//-------------------------------------------------
vcs_lightpen_device::vcs_lightpen_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) :
device_t(mconfig, VCS_LIGHTPEN, "Light Pen", tag, owner, clock, "vcs_lightpen", __FILE__),
device_vcs_control_port_interface(mconfig, *this),
m_joy(*this, "JOY"),
m_lightx(*this, "LIGHTX"),
m_lighty(*this, "LIGHTY")
{
}
//-------------------------------------------------
// device_start - device-specific startup
//-------------------------------------------------
void vcs_lightpen_device::device_start()
{
}
//-------------------------------------------------
// vcs_joy_r - lightpen read
//-------------------------------------------------
UINT8 vcs_lightpen_device::vcs_joy_r()
{
return m_joy->read();
}
|