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
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
|
// license:BSD-3-Clause
// copyright-holders:K.Wilkins,Couriersud,Derrick Renaud,Frank Palazzolo
#ifndef MAME_SOUND_DISC_CLS_H
#define MAME_SOUND_DISC_CLS_H
#pragma once
#include "wavwrite.h"
/***********************************************************************
*
* MAME - Discrete sound system emulation library
*
* Written by K.Wilkins (mame@esplexo.co.uk)
*
* (c) K.Wilkins 2000
*
* Coding started in November 2000
*
* Additions/bugfix February 2003 - Derrick Renaud, F.Palazzolo, K.Wilkins
* Discrete parallel tasks 2009 - Couriersud
* Discrete classes 2010 - Couriersud
*
***********************************************************************/
#define DISCRETE_CLASS_NAME(_name) discrete_ ## _name ## _node
#define DISCRETE_CLASS_INPUT(_name, _num) inline double _name() { return *(m_input[_num]); }
#define DISCRETE_CLASS_CONSTRUCTOR(_name, _base) \
public: \
DISCRETE_CLASS_NAME(_name)() \
: DISCRETE_CLASS_NAME(_base)() { }
#define DISCRETE_CLASS_DESTRUCTOR(_name) \
public: \
virtual ~ DISCRETE_CLASS_NAME(_name)() { }
#define DISCRETE_CLASS_STEP_RESET(_name, _maxout, _priv) \
class DISCRETE_CLASS_NAME(_name): public discrete_base_node, public discrete_step_interface \
{ \
DISCRETE_CLASS_CONSTRUCTOR(_name, base) \
DISCRETE_CLASS_DESTRUCTOR(_name) \
public: \
virtual void step() override; \
virtual void reset() override; \
virtual int max_output() override { return _maxout; } \
private: \
_priv \
}
#define DISCRETE_CLASS_STEP(_name, _maxout, _priv) \
class DISCRETE_CLASS_NAME(_name): public discrete_base_node, public discrete_step_interface \
{ \
DISCRETE_CLASS_CONSTRUCTOR(_name, base) \
DISCRETE_CLASS_DESTRUCTOR(_name) \
public: \
virtual void step() override; \
virtual void reset() override { this->step(); } \
virtual int max_output() override { return _maxout; } \
private: \
_priv \
}
#define DISCRETE_CLASS_RESET(_name, _maxout) \
class DISCRETE_CLASS_NAME(_name): public discrete_base_node \
{ \
DISCRETE_CLASS_CONSTRUCTOR(_name, base) \
DISCRETE_CLASS_DESTRUCTOR(_name) \
public: \
virtual void reset() override; \
virtual int max_output() override { return _maxout; } \
}
#define DISCRETE_CLASS(_name, _maxout, _priv) \
class DISCRETE_CLASS_NAME(_name): public discrete_base_node, public discrete_step_interface \
{ \
DISCRETE_CLASS_DESTRUCTOR(_name) \
DISCRETE_CLASS_CONSTRUCTOR(_name, base) \
public: \
virtual void step() override; \
virtual void reset() override; \
virtual void start() override; \
virtual void stop() override; \
virtual int max_output() override { return _maxout; } \
private: \
_priv \
}
class DISCRETE_CLASS_NAME(special): public discrete_base_node
{
DISCRETE_CLASS_CONSTRUCTOR(special, base)
DISCRETE_CLASS_DESTRUCTOR(special)
public:
virtual int max_output() override { return 0; }
};
class DISCRETE_CLASS_NAME(unimplemented): public discrete_base_node
{
DISCRETE_CLASS_CONSTRUCTOR(unimplemented, base)
DISCRETE_CLASS_DESTRUCTOR(unimplemented)
public:
virtual int max_output() override { return 0; }
};
/*************************************
*
* disc_sys.inc
*
*************************************/
class DISCRETE_CLASS_NAME(dso_output): public discrete_base_node,
public discrete_sound_output_interface,
public discrete_step_interface
{
DISCRETE_CLASS_CONSTRUCTOR(dso_output, base)
DISCRETE_CLASS_DESTRUCTOR(dso_output)
public:
virtual void step() override {
/* Add gain to the output and put into the buffers */
/* Clipping will be handled by the main sound system */
double val = DISCRETE_INPUT(0) * DISCRETE_INPUT(1);
m_stream->put(m_stream_output, m_outview_sample++, val * (1.0 / 32768.0));
}
virtual int max_output() override { return 0; }
virtual void set_output_ptr(sound_stream &stream, int output) override { m_stream = &stream; m_stream_output = output; m_outview_sample = 0; }
private:
sound_stream *m_stream = nullptr;
int m_stream_output = 0;
u32 m_outview_sample = 0U;
};
DISCRETE_CLASS(dso_csvlog, 0,
FILE *m_csv_file = nullptr;
int64_t m_sample_num = 0;
char m_name[32];
);
DISCRETE_CLASS(dso_wavlog, 0,
util::wav_file_ptr m_wavfile;
char m_name[32];
);
/*************************************
*
* disc_inp.inc
*
*************************************/
class DISCRETE_CLASS_NAME(dss_adjustment): public discrete_base_node, public discrete_step_interface
{
DISCRETE_CLASS_CONSTRUCTOR(dss_adjustment, base)
DISCRETE_CLASS_DESTRUCTOR(dss_adjustment)
public:
virtual void step() override;
virtual void reset() override;
private:
ioport_port *m_port = 0;
int32_t m_lastpval = 0;
int32_t m_pmin = 0;
double m_pscale = 0.0;
double m_min = 0.0;
double m_scale = 0.0;
};
DISCRETE_CLASS_RESET(dss_constant, 1);
class DISCRETE_CLASS_NAME(dss_input_data): public discrete_base_node, public discrete_input_interface
{
DISCRETE_CLASS_DESTRUCTOR(dss_input_data)
DISCRETE_CLASS_CONSTRUCTOR(dss_input_data, base)
public:
virtual void reset() override;
virtual void input_write(int sub_node, uint8_t data ) override;
private:
double m_gain = 0.0; /* node gain */
double m_offset = 0.0; /* node offset */
uint8_t m_data = 0; /* data written */
};
class DISCRETE_CLASS_NAME(dss_input_logic): public discrete_base_node, public discrete_input_interface
{
DISCRETE_CLASS_CONSTRUCTOR(dss_input_logic, base)
DISCRETE_CLASS_DESTRUCTOR(dss_input_logic)
public:
virtual void reset() override;
virtual void input_write(int sub_node, uint8_t data ) override;
private:
double m_gain = 0.0; /* node gain */
double m_offset = 0.0; /* node offset */
uint8_t m_data = 0; /* data written */
};
class DISCRETE_CLASS_NAME(dss_input_not): public discrete_base_node, public discrete_input_interface
{
DISCRETE_CLASS_CONSTRUCTOR(dss_input_not, base)
DISCRETE_CLASS_DESTRUCTOR(dss_input_not)
public:
virtual void reset() override;
virtual void input_write(int sub_node, uint8_t data ) override;
private:
double m_gain = 0.0; /* node gain */
double m_offset = 0.0; /* node offset */
uint8_t m_data = 0; /* data written */
};
class DISCRETE_CLASS_NAME(dss_input_pulse): public discrete_base_node, public discrete_input_interface, public discrete_step_interface
{
DISCRETE_CLASS_CONSTRUCTOR(dss_input_pulse, base)
DISCRETE_CLASS_DESTRUCTOR(dss_input_pulse)
public:
virtual void step() override;
virtual void reset() override;
virtual void input_write(int sub_node, uint8_t data ) override;
private:
//double m_gain = 0.0; /* node gain */
//double m_offset = 0.0; /* node offset */
uint8_t m_data = 0; /* data written */
};
class DISCRETE_CLASS_NAME(dss_input_stream): public discrete_base_node, public discrete_input_interface, public discrete_step_interface
{
DISCRETE_CLASS_CONSTRUCTOR(dss_input_stream, base)
DISCRETE_CLASS_DESTRUCTOR(dss_input_stream)
public:
virtual void step() override;
virtual void reset() override;
virtual void start() override;
virtual void input_write(int sub_node, uint8_t data ) override;
virtual bool is_buffered() { return false; }
/* This is called by discrete_sound_device */
void stream_start();
//protected:
uint32_t m_stream_in_number = 0;
uint32_t m_inview_sample = 0;
private:
void stream_generate(sound_stream &stream);
double m_gain = 0.0; /* node gain */
double m_offset = 0.0; /* node offset */
uint8_t m_data = 0; /* data written */
uint8_t m_is_buffered = 0;
/* the buffer stream */
sound_stream *m_buffer_stream = nullptr;
};
class DISCRETE_CLASS_NAME(dss_input_buffer): public DISCRETE_CLASS_NAME(dss_input_stream)
{
DISCRETE_CLASS_CONSTRUCTOR(dss_input_buffer, dss_input_stream)
DISCRETE_CLASS_DESTRUCTOR(dss_input_buffer)
public:
virtual bool is_buffered() override { return true; }
};
#include "disc_wav.h"
#include "disc_mth.h"
#include "disc_flt.h"
#include "disc_dev.h"
#endif // MAME_SOUND_DISC_CLS_H
|