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
|
// license:BSD-3-Clause
// copyright-holders:Nathan Woods
/***************************************************************************
coco_dcmodem.cpp
Code for emulating the CoCo Direct Connect Modem PAK
***************************************************************************/
#include "emu.h"
#include "coco_dcmodem.h"
#include "machine/mos6551.h"
#include "bus/rs232/rs232.h"
/***************************************************************************
CONSTANTS
***************************************************************************/
#define UART_TAG "uart"
#define PORT_TAG "port"
//**************************************************************************
// TYPE DEFINITIONS
//**************************************************************************
// ======================> coco_dc_modem_device
namespace
{
class coco_dc_modem_device :
public device_t,
public device_cococart_interface
{
public:
// construction/destruction
coco_dc_modem_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock)
: device_t(mconfig, COCO_DCMODEM, tag, owner, clock)
, device_cococart_interface(mconfig, *this)
, m_uart(*this, UART_TAG)
{
}
// optional information overrides
virtual void device_add_mconfig(machine_config &config) override;
// callbacks
WRITE_LINE_MEMBER(uart_irq_w)
{
set_line_value(line::CART, state != 0);
}
protected:
// device-level overrides
virtual void device_start() override
{
install_readwrite_handler(0xFF6C, 0xFF6F,
read8sm_delegate(FUNC(mos6551_device::read), (mos6551_device *)m_uart),
write8sm_delegate(FUNC(mos6551_device::write), (mos6551_device *)m_uart));
}
virtual const tiny_rom_entry *device_rom_region() const override;
// CoCo cartridge level overrides
virtual uint8_t *get_cart_base() override
{
return memregion("eprom")->base();
}
virtual memory_region* get_cart_memregion() override
{
return memregion("eprom");
}
private:
// internal state
required_device<mos6551_device> m_uart;
};
};
/***************************************************************************
IMPLEMENTATION
***************************************************************************/
void coco_dc_modem_device::device_add_mconfig(machine_config &config)
{
MOS6551(config, m_uart, 0);
m_uart->set_xtal(1.8432_MHz_XTAL);
m_uart->irq_handler().set(FUNC(coco_dc_modem_device::uart_irq_w));
m_uart->txd_handler().set(PORT_TAG, FUNC(rs232_port_device::write_txd));
rs232_port_device &rs232(RS232_PORT(config, PORT_TAG, default_rs232_devices, nullptr));
rs232.rxd_handler().set(m_uart, FUNC(mos6551_device::write_rxd));
rs232.dcd_handler().set(m_uart, FUNC(mos6551_device::write_dcd));
rs232.dsr_handler().set(m_uart, FUNC(mos6551_device::write_dsr));
rs232.cts_handler().set(m_uart, FUNC(mos6551_device::write_cts));
}
ROM_START(coco_dcmodem)
ROM_REGION(0x2000, "eprom", ROMREGION_ERASE00)
ROM_LOAD("direct connect modem pak,1985,26-2228,tandy.rom", 0x0000, 0x2000, CRC(667bc55d) SHA1(703fe0aba4a603591078cb675ffd26a67c02df88))
ROM_END
DEFINE_DEVICE_TYPE_PRIVATE(COCO_DCMODEM, device_cococart_interface, coco_dc_modem_device, "coco_dcmodem", "CoCo Direct Connect Modem PAK")
//-------------------------------------------------
// device_rom_region
//-------------------------------------------------
const tiny_rom_entry *coco_dc_modem_device::device_rom_region() const
{
return ROM_NAME(coco_dcmodem);
}
|