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
|
// license:BSD-3-Clause
// copyright-holders:Wilbert Pol
/***************************************************************************
cassette.h - Atari 8 bit cassette player(s)
Known cassette players:
- Atari XC11
- Atari XC12 (no SIO connection for an additional device)
TODO:
- Implement cassette reading
- Implement cassette writing
- Add audio support
- Add SIO connector for a next device
***************************************************************************/
#include "emu.h"
#include "cassette.h"
//**************************************************************************
// GLOBAL VARIABLES
//**************************************************************************
const device_type A8SIO_CASSETTE = &device_creator<a8sio_cassette_device>;
const device_timer_id TIMER_CASSETTE_READ = 1;
static MACHINE_CONFIG_FRAGMENT( cassette )
MCFG_CASSETTE_ADD("cassette")
//MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_STOPPED)
MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_PLAY)
MCFG_CASSETTE_INTERFACE("atari8bit_cass")
MACHINE_CONFIG_END
machine_config_constructor a8sio_cassette_device::device_mconfig_additions() const
{
return MACHINE_CONFIG_NAME( cassette );
}
//**************************************************************************
// LIVE DEVICE
//**************************************************************************
a8sio_cassette_device::a8sio_cassette_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock)
: device_t(mconfig, A8SIO_CASSETTE, "Atari 8 bit cassette", tag, owner, clock, "a8sio_cass", __FILE__)
, device_a8sio_card_interface(mconfig, *this)
, m_cassette(*this, "cassette")
, m_old_cass_signal(0)
, m_signal_count(0)
{
}
a8sio_cassette_device::a8sio_cassette_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, UINT32 clock, const char *shortname, const char *source)
: device_t(mconfig, type, name, tag, owner, clock, shortname, source)
, device_a8sio_card_interface(mconfig, *this)
, m_cassette(*this, "cassette")
, m_old_cass_signal(0)
, m_signal_count(0)
{
}
void a8sio_cassette_device::device_start()
{
set_a8sio_device();
save_item(NAME(m_old_cass_signal));
save_item(NAME(m_signal_count));
m_read_timer = timer_alloc(TIMER_CASSETTE_READ);
}
void a8sio_cassette_device::device_reset()
{
}
WRITE_LINE_MEMBER( a8sio_cassette_device::motor_w )
{
//printf("a8sio_cassette::motor_w %d\n", state);
if (!state)
{
m_cassette->change_state(CASSETTE_MOTOR_ENABLED, CASSETTE_MASK_MOTOR);
m_read_timer->adjust(attotime::zero, 0, attotime::from_hz(44100));
}
else
{
m_cassette->change_state(CASSETTE_MOTOR_DISABLED, CASSETTE_MASK_MOTOR);
m_read_timer->reset();
}
}
void a8sio_cassette_device::device_timer(emu_timer &timer, device_timer_id id, int param, void *ptr)
{
switch (id)
{
case TIMER_CASSETTE_READ:
UINT8 cass_signal = m_cassette->input() < 0 ? 0 : 1;
if (m_signal_count < 20)
{
m_signal_count++;
}
if (cass_signal != m_old_cass_signal)
{
//printf("cass_signal: %d, count: %d, data: %d\n", cass_signal, m_signal_count, m_signal_count < 5 ? 1 : 0);
// ~4 kHz -> 0
// ~5 kHz -> 1
m_a8sio->data_in_w((m_signal_count < 5) ? 1 : 0);
m_signal_count = 0;
m_old_cass_signal = cass_signal;
}
break;
}
}
|