218
218
static const ay8910_interface irem_ay8910_interface_1 =
220
AY8910_SINGLE_OUTPUT,
220
AY8910_SINGLE_OUTPUT | AY8910_DISCRETE_OUTPUT,
222
222
DEVCB_MEMORY_HANDLER("iremsound", PROGRAM, soundlatch_r),
258
258
* I did my test to verify against pcb pictures of "tropical angel"
261
263
#define M52_R12 RES_K(10)
262
264
#define M52_R13 RES_K(10)
263
265
#define M52_R14 RES_K(10)
264
#define M52_R15 RES_K(2.2) /* schematics RES_K(22) */
266
#define M52_R15 RES_K(2.2) /* schematics RES_K(22) , althought 10-Yard states 2.2 */
265
267
#define M52_R19 RES_K(10)
266
#define M52_R22 RES_K(4.7) /* schematics RES_K(47) */
268
#define M52_R22 RES_K(47)
267
269
#define M52_R23 RES_K(2.2)
268
270
#define M52_R25 RES_K(10)
269
271
#define M52_VR1 RES_K(50)
273
#define M52_C28 CAP_U(1)
271
274
#define M52_C30 CAP_U(0.022)
272
275
#define M52_C32 CAP_U(0.022)
273
276
#define M52_C35 CAP_U(47)
284
287
static const discrete_mixer_desc m52_sound_c_stage1 =
285
288
{DISC_MIXER_IS_RESISTOR,
287
{ 0, 0 }, /* variable resistors */
288
{M52_C37, 0 }, /* node capacitors */
289
0, M52_R23, /* rI, rF */
289
{M52_R19, M52_R22, M52_R23 },
290
{ 0, 0, 0 }, /* variable resistors */
291
{M52_C37, 0, 0 }, /* node capacitors */
294
297
static const discrete_op_amp_filt_info m52_sound_c_sallen_key =
320
323
DISCRETE_DIVIDE(NODE_10, 1, NODE_09, 2.0)
322
325
/* Mix in 5 V to MSM5250 signal */
323
DISCRETE_MIXER2(NODE_20, 1, NODE_03, 32767.0, &m52_sound_c_stage1)
326
DISCRETE_MIXER3(NODE_20, 1, NODE_03, 32767.0, 0, &m52_sound_c_stage1)
325
328
/* Sallen - Key Filter */
326
329
/* TODO: R12, C30: This looks like a band pass */
327
DISCRETE_SALLEN_KEY_FILTER(NODE_30, 1, NODE_20, DISC_SALLEN_KEY_LOW_PASS, &m52_sound_c_sallen_key)
330
DISCRETE_RCFILTER(NODE_25, NODE_20, M52_R12, M52_C30)
331
DISCRETE_SALLEN_KEY_FILTER(NODE_30, 1, NODE_25, DISC_SALLEN_KEY_LOW_PASS, &m52_sound_c_sallen_key)
329
333
/* Mix signals */
330
DISCRETE_MIXER2(NODE_40, 1, NODE_10, NODE_30, &m52_sound_c_mix1)
334
DISCRETE_MIXER2(NODE_40, 1, NODE_10, NODE_25, &m52_sound_c_mix1)
335
DISCRETE_CRFILTER(NODE_45, NODE_40, M52_R10+M52_R9, M52_C28)
332
337
DISCRETE_OUTPUT(NODE_40, 18.0)