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
|
// license:BSD-3-Clause
// copyright-holders:Nigel Barnes
/**********************************************************************
BBC analogue port emulation
**********************************************************************/
#include "emu.h"
#include "analogue.h"
//**************************************************************************
// DEVICE DEFINITIONS
//**************************************************************************
DEFINE_DEVICE_TYPE(BBC_ANALOGUE_SLOT, bbc_analogue_slot_device, "bbc_analogue_slot", "BBC Micro Analogue port")
//**************************************************************************
// DEVICE BBC_ANALOGUE PORT INTERFACE
//**************************************************************************
//-------------------------------------------------
// device_bbc_analogue_interface - constructor
//-------------------------------------------------
device_bbc_analogue_interface::device_bbc_analogue_interface(const machine_config &mconfig, device_t &device)
: device_slot_card_interface(mconfig, device)
{
m_slot = dynamic_cast<bbc_analogue_slot_device *>(device.owner());
}
//-------------------------------------------------
// ~device_bbc_analogue_interface - destructor
//-------------------------------------------------
device_bbc_analogue_interface::~device_bbc_analogue_interface()
{
}
//**************************************************************************
// LIVE DEVICE
//**************************************************************************
//-------------------------------------------------
// bbc_analogue_slot_device - constructor
//-------------------------------------------------
bbc_analogue_slot_device::bbc_analogue_slot_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
device_t(mconfig, BBC_ANALOGUE_SLOT, tag, owner, clock),
device_slot_interface(mconfig, *this)
{
}
void bbc_analogue_slot_device::device_validity_check(validity_checker &valid) const
{
device_t *const carddev = get_card_device();
if (carddev && !dynamic_cast<device_bbc_analogue_interface *>(carddev))
osd_printf_error("Card device %s (%s) does not implement device_bbc_analogue_interface\n", carddev->tag(), carddev->name());
}
//-------------------------------------------------
// device_start - device-specific startup
//-------------------------------------------------
void bbc_analogue_slot_device::device_start()
{
device_t *const carddev = get_card_device();
if (carddev && !dynamic_cast<device_bbc_analogue_interface *>(carddev))
osd_printf_error("Card device %s (%s) does not implement device_bbc_analogue_interface\n", carddev->tag(), carddev->name());
}
uint8_t bbc_analogue_slot_device::ch_r(int channel)
{
if (m_card)
return m_card->ch_r(channel);
else
return 0x00;
}
uint8_t bbc_analogue_slot_device::pb_r()
{
if (m_card)
return m_card->pb_r();
else
return 0x30;
}
//-------------------------------------------------
// device_reset - device-specific reset
//-------------------------------------------------
void bbc_analogue_slot_device::device_reset()
{
}
//-------------------------------------------------
// SLOT_INTERFACE( bbc_analogue_devices )
//-------------------------------------------------
// slot devices
#include "joystick.h"
//#include "quinkey.h"
#include "cfa3000a.h"
SLOT_INTERFACE_START( bbc_analogue_devices )
SLOT_INTERFACE("acornjoy", BBC_ACORNJOY) /* Acorn ANH01 Joysticks */
SLOT_INTERFACE("voltmace3b", BBC_VOLTMACE3B) /* Voltmace Delta 3b "Twin" Joysticks */
// SLOT_INTERFACE("quinkey", BBC_QUINKEY) /* Microwriter Quinkey */
SLOT_INTERFACE("cfa3000a", CFA3000_ANLG) /* Hanson CFA 3000 Analogue */
SLOT_INTERFACE_END
|