Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-05-21 21:29:15 +03:00
Code Issues Actions 3 Packages Projects Releases Wiki Activity

Draw Poker Hi-Lo - added discrete sound

Browse Source
This commit is contained in:
Derrick Renaud 2009-10-12 17:45:59 +00:00
parent 9868967b2c
commit dad9d8782b
3 changed files with 55 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

84
src/mame/audio/norautp.c
View File

@ -10,6 +10,44 @@
/* Discrete Sound Input Nodes */
/* defined in norautp.h */
static const discrete_555_desc desc_norautp_555 =
{
DISC_555_OUT_ENERGY | DISC_555_OUT_AC,
5, // B+ voltage of 555
DEFAULT_555_VALUES
};
#define NORAUTP_SOUND_CIRCUIT(_name, _r1, _r2, _c1, _c2, _c3, _c4) \
static const discrete_comp_adder_table desc_##_name##_caps = \
{ \
DISC_COMP_P_CAPACITOR, _c4, 3, \
{ \
_c3, _c2, _c1 \
} \
}; \
\
DISCRETE_SOUND_START( _name ) \
/************************************************ \
* Input register mapping \
************************************************/ \
DISCRETE_INPUT_LOGIC(NORAUTP_SND_EN) \
DISCRETE_INPUT_DATA (NORAUTP_FREQ_DATA) \
\
/************************************************ \
* Tone Generator \
************************************************/ \
DISCRETE_COMP_ADDER(NODE_20, NORAUTP_FREQ_DATA, &desc_##_name##_caps) \
DISCRETE_555_ASTABLE(NODE_21, \
NORAUTP_SND_EN, /* RESET */ \
_r2, _r1, NODE_20, &desc_norautp_555) \
\
DISCRETE_OUTPUT(NODE_21, 65000.0/3.8) \
DISCRETE_SOUND_END
/* Noraut Poker */
/* Parts List - Resistors */
#define NORAUTP_R1 RES_K(120)
#define NORAUTP_R2 RES_K(2.2)
@ -20,38 +58,22 @@
#define NORAUTP_C3 CAP_U(.047)
#define NORAUTP_C4 CAP_U(.01)
static const discrete_555_desc desc_norautp_555 =
{
DISC_555_OUT_ENERGY | DISC_555_OUT_AC,
5, // B+ voltage of 555
DEFAULT_555_VALUES
};
static const discrete_comp_adder_table desc_norautp_caps =
{
DISC_COMP_P_CAPACITOR, NORAUTP_C4, 3,
{
NORAUTP_C3, NORAUTP_C2, NORAUTP_C1
}
};
NORAUTP_SOUND_CIRCUIT(norautp,
NORAUTP_R1, NORAUTP_R2,
NORAUTP_C1, NORAUTP_C2, NORAUTP_C3, NORAUTP_C4)
DISCRETE_SOUND_START( norautp )
/************************************************
* Input register mapping
************************************************/
DISCRETE_INPUT_LOGIC(NORAUTP_SND_EN)
DISCRETE_INPUT_DATA (NORAUTP_FREQ_DATA)
/* Noraut old Draw Poker Hi-Lo */
/* Parts List - Resistors */
#define DPHL_R1 RES_K(120)
#define DPHL_R2 RES_K(1)
/************************************************
* Tone Generator
************************************************/
DISCRETE_COMP_ADDER(NODE_20, NORAUTP_FREQ_DATA, &desc_norautp_caps)
DISCRETE_555_ASTABLE(NODE_21,
NORAUTP_SND_EN, /* RESET */
NORAUTP_R2, NORAUTP_R1, NODE_20, &desc_norautp_555)
/* Parts List - Capacitors */
#define DPHL_C1 CAP_U(.01)
#define DPHL_C2 CAP_U(.022)
#define DPHL_C3 CAP_U(.05)
#define DPHL_C4 CAP_U(.01)
DISCRETE_OUTPUT(NODE_21, 65000.0/3.8)
DISCRETE_SOUND_END
NORAUTP_SOUND_CIRCUIT(dphl,
DPHL_R1, DPHL_R2,
DPHL_C1, DPHL_C2, DPHL_C3, DPHL_C4)

2
src/mame/drivers/norautp.c
View File

@ -1578,7 +1578,7 @@ static MACHINE_DRIVER_START( dphl )
/* sound hardware */
MDRV_SPEAKER_STANDARD_MONO("mono")
MDRV_SOUND_ADD("discrete", DISCRETE, 0)
MDRV_SOUND_CONFIG_DISCRETE(norautp)
MDRV_SOUND_CONFIG_DISCRETE(dphl)
MDRV_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0)
MACHINE_DRIVER_END

1
src/mame/includes/norautp.h
View File

@ -9,3 +9,4 @@
/*----------- defined in audio/norautp.c -----------*/
DISCRETE_SOUND_EXTERN( norautp );
DISCRETE_SOUND_EXTERN( dphl );