summaryrefslogblamecommitdiffstatshomepage
path: root/src/mame/audio/vicdual.cpp
blob: 99e904e6d7719afdb3e59d6f44014571663ff7ea (plain) (tree)
1
2
3
4
5
6
7
8
9
                       
                                                            





                                                                          
                
                             
 

                              





                                                                          

                                





                                   

                    





                                   
         
                                   


                                             
                                                                       
                                    





                                                 
                                    
                           
                          










                                             
                                           
                                                         



                                                          






                                            
                                                                               



                                                                                              











                                                                           
                                                                                            








                                                                                                         
                                               

                 





                 
               

  
 





                                                         
 


                                                        

 
                                                            
 
                           


 
                                               
 
                                                                                                                                         

                        


 
                                               





                                    





                                                        

                        
                                                
                        
                                                  
                      
                                                  




                                                                                          
                                                                                                        




                                                                            









                                                                                  
                                
                                                              

            
                                   
                        
                                                   











                                                                          






                                       
 





                                        


                                               


                                                                                                                     
                                                


                               
                                                                 

            

                                                     


                                                                                 
                                                


                              
                                                                 

            
 
                                                                                

                                  
                                                
  
 
                                                                                

                                  
                                                                                               
  

                                                 





                                              

                                                 





                                                                       


                                                
                                           
                                    
                           
                               





                                                 








                                              








                                              









                                                                                 

  
                                                               



                                      
 
                                            
                                                         


                                                          








                                                         





                                                          




                                                                              


                              

                                                                                                        


                                                                                                          
                                                                            
                                                                 

                                                         

                                                          




                                                                              


                              

                                                                                                        


                                                                                                          
                                                                            
                                                               

                                                         

                                                          
 
                                                        



                                                                                                                                  

                                                          
 
                                                        


                                                                                                                                  

                                                          
 
                                                       
                                             


                                                                                                               








                                                                                       
                                                                  
                                                                                           
                                                                   

                                                         


                                                          
 
                                                       

                                                                                          
                                                    







                                                                                            
                                                    



                                                                       
                                                                                                          

                                                                          
                                                                 

                                                         

                                                          









                                                                                          




                                                        
 
                                                
 
                                  
                       






                                                             


 
                                                
 
                                  
                       






                                                             


 
  













                                                  






                                                            
 
                                                  


                                  

                                    

                                       
 

                                              
 

                                       
 




                                           
 


                               
                                                      
 




                                                             






















                                                                                                                              







                                                                        




















                                                                                                           
// license:BSD-3-Clause
// copyright-holders:Derrick Renaud, Couriersud, Aaron Giles
/*************************************************************************

    VIC Dual Game board

*************************************************************************/

#include "emu.h"
#include "includes/vicdual.h"

#include "audio/nl_brdrline.h"


/************************************************************************
 * frogs Sound System Analog emulation
 * Oct 2004, Derrick Renaud
 ************************************************************************/


/* Discrete Sound Input Nodes */
#define FROGS_FLY_EN        NODE_01
#define FROGS_JUMP_EN       NODE_03
#define FROGS_HOP_EN        NODE_04
#define FROGS_TONGUE_EN     NODE_05
#define FROGS_CAPTURE_EN    NODE_06
#define FROGS_SPLASH_EN     NODE_08

/* Nodes - Sounds */
#define FROGS_BUZZZ_SND     NODE_11
#define FROGS_BOING_SND     NODE_13
#define FROGS_HOP_SND       NODE_14
#define FROGS_ZIP_SND       NODE_15
#define FROGS_CROAK_SND     NODE_16
#define FROGS_SPLASH_SND    NODE_18
/* VRs */
#define FROGS_R93           NODE_25

static const discrete_555_desc frogsZip555m =
{
	DISC_555_OUT_CAP | DISC_555_OUT_DC | DISC_555_TRIGGER_IS_LOGIC,
	12,     // B+ voltage of 555
	DEFAULT_555_VALUES
};

static const discrete_555_cc_desc frogsZip555cc =
{
	DISC_555_OUT_CAP | DISC_555_OUT_DC,
	12,     // B+ voltage of 555
	DEFAULT_555_VALUES,
	0.6     // Q13 Vbe
};

static const discrete_mixer_desc frogsMixer =
{
	DISC_MIXER_IS_OP_AMP,
	{RES_K(1), RES_K(5)},
	{FROGS_R93, 0},
	{CAP_U(0.01), CAP_U(0.01)},
	0, RES_K(56), 0, CAP_U(0.1), 0, 10000
};

static DISCRETE_SOUND_START(frogs_discrete)
	/************************************************
	 * Input register mapping for frogs
	 *
	 * All inputs are inverted by initial transistor.
	 ************************************************/
	DISCRETE_INPUT_LOGIC(FROGS_FLY_EN)
	DISCRETE_INPUT_NOT(FROGS_JUMP_EN)
	DISCRETE_INPUT_NOT(FROGS_HOP_EN)
	DISCRETE_INPUT_NOT(FROGS_TONGUE_EN)
	DISCRETE_INPUT_NOT(FROGS_CAPTURE_EN)
	DISCRETE_INPUT_NOT(FROGS_SPLASH_EN)

	DISCRETE_ADJUSTMENT(FROGS_R93, RES_M(1), RES_K(10), DISC_LOGADJ, "R93")

	DISCRETE_555_MSTABLE(NODE_30, 1, FROGS_TONGUE_EN, RES_K(100), CAP_U(1), &frogsZip555m)

	/* Q11 & Q12 transform the voltage from the oneshot U4, to what is
	 * needed by the 555CC circuit.  Vin to R29 must be > 1V for things
	 * to change.  <=1 then The Vout of this circuit is 12V.
	 * The Current through R28 equals current through R51. iR28 = iR51
	 * So when Vin>.5, iR51 = (Vin-.5)/39k.  =0 when Vin<=.5
	 * So the voltage drop across R28 is vR28 = iR51 * 22k.
	 * Finally the Vout = 12 - vR28.
	 * Note this formula only works when Vin < 39/(22+39)*12V+1.
	 * Which it always is, due to the 555 clamping to 12V*2/3.
	 * The Zip effect is hard to emulate 100% due to loading effects
	 * of the output stage on the charge stage.  So I added some values
	 * to get a similar waveshape to the breadboarded circuit.
	 */
	DISCRETE_TRANSFORM5(NODE_31, 12, NODE_30, .5, RES_K(22)/RES_K(39), 0, "012-P4>*3*-")

	DISCRETE_555_CC(NODE_32, 1, NODE_31, RES_K(1.1), CAP_U(0.14), 0, RES_K(100), 500, &frogsZip555cc)

	DISCRETE_MIXER2(NODE_90, 1, NODE_32, 0, &frogsMixer)

	DISCRETE_OUTPUT(NODE_90, 1)

DISCRETE_SOUND_END

static const char *const frogs_sample_names[] =
{
	"*frogs",
	"boing",
	"buzzz",
	"croak",
	"hop",
	"splash",
	"zip",
	nullptr
};


void vicdual_state::frogs_audio(machine_config &config)
{
	SAMPLES(config, m_samples);
	m_samples->set_channels(5);
	m_samples->set_samples_names(frogs_sample_names);
	m_samples->add_route(ALL_OUTPUTS, "mono", 0.35);

	DISCRETE(config, m_discrete, frogs_discrete);
	m_discrete->add_route(ALL_OUTPUTS, "mono", 1.0);
}


TIMER_CALLBACK_MEMBER( vicdual_state::frogs_croak_callback )
{
	m_samples->stop(2);
}


MACHINE_START_MEMBER(vicdual_state,frogs_audio)
{
	m_frogs_croak_timer = machine().scheduler().timer_alloc(timer_expired_delegate(FUNC(vicdual_state::frogs_croak_callback), this));

	machine_start();
}


void vicdual_state::frogs_audio_w(uint8_t data)
{
	static int last_croak = 0;
	static int last_buzzz = 0;
	int new_croak = data & 0x08;
	int new_buzzz = data & 0x10;

//  m_discrete->write(FROGS_HOP_EN, data & 0x01);
//  m_discrete->write(FROGS_JUMP_EN, data & 0x02);
	m_discrete->write(FROGS_TONGUE_EN, data & 0x04);
//  m_discrete->write(FROGS_CAPTURE_EN, data & 0x08);
//  m_discrete->write(FROGS_FLY_EN, data & 0x10);
//  m_discrete->write(FROGS_SPLASH_EN, data & 0x80);

	if (data & 0x01)
		m_samples->start(3, 3);   // Hop
	if (data & 0x02)
		m_samples->start(0, 0);   // Boing
	if (new_croak)
		m_samples->start(2, 2);   // Croak
	else
	{
		if (last_croak)
		{
			/* The croak will keep playing until .429s after being disabled */
			m_frogs_croak_timer->adjust(attotime::from_double(1.1 * RES_K(390) * CAP_U(1)));
		}
	}
	if (new_buzzz)
	{
		/* The Buzzz sound starts off a little louder in volume then
		 * settles down to a steady buzzz.  Whenever the trigger goes
		 * low, the sound is disabled.  If it then goes high, the buzzz
		 * then starts off louder again.  The games does this every time
		 * the fly moves.
		 * So I made the sample start with the louder effect and then play
		 * for 12 seconds.  A fly should move before this.  If not the
		 * sample loops, adding the loud part as if the fly moved.
		 * This is obviously incorrect, but a fly never stands still for
		 * 12 seconds.
		 */
		if (!last_buzzz)
			m_samples->start(1, 1, true); // Buzzz
	}
	else
		m_samples->stop(1);
	if (data & 0x80)
		m_samples->start(4, 4);   // Splash

	last_croak = new_croak;
	last_buzzz = new_buzzz;
}



/************************************************************************
 * headon Sound System Analog emulation
 * July 2007, couriersud
 ************************************************************************/

#define HEADON_HISPEED_CC_EN    NODE_01
#define HEADON_HISPEED_PC_EN    NODE_02
#define HEADON_CAR_ON_EN        NODE_03
#define HEADON_CRASH_EN         NODE_04
#define HEADON_SCREECH1_EN      NODE_05
#define HEADON_SCREECH2_EN      NODE_06
#define HEADON_BONUS_EN         NODE_07

#define HEADON_COMP_CAR_OUT     NODE_200
#define HEADON_PLAYER_CAR_OUT   NODE_201
#define HEADON_CRASH_OUT        NODE_202
#define HEADON_SCREECH1_OUT     NODE_203
#define HEADON_SCREECH2_OUT     NODE_204
#define HEADON_BONUS_OUT        NODE_205


static const discrete_mixer_desc headon_mixer =
{
	DISC_MIXER_IS_RESISTOR,
	{RES_K(130), RES_K(130), RES_K(100), RES_K(100), RES_K(100), RES_K(10)},   // 130 = 390/3, Bonus Res is dummy
	{0,0,0,0,0},    // no variable resistors
	{0,0,0,0,CAP_N(470),0},
	0, RES_K(100),
	0,
	CAP_U(1),       // not in schematics, used to suppress DC
	0, 1
};

static const discrete_mixer_desc headon_crash_mixer =
{
	DISC_MIXER_IS_OP_AMP,
	{RES_K(50), RES_K(10)},   // Resistors, in fact variable resistors (100k)
	{0,0,0,0,0},    // no variable resistors
	{CAP_N(100),CAP_U(1)},
	0, RES_K(100),
	0,
	CAP_U(1)*0,     // not in schematics, used to suppress DC
	0, 1
};

static const discrete_dss_inverter_osc_node::description headon_inverter_osc_1 =
{
	DEFAULT_CD40XX_VALUES(12),
	discrete_dss_inverter_osc_node::IS_TYPE4
};

static const discrete_dss_inverter_osc_node::description headon_inverter_osc_2 =
{
	DEFAULT_CD40XX_VALUES(12),
	discrete_dss_inverter_osc_node::IS_TYPE5 | discrete_dss_inverter_osc_node::OUT_IS_LOGIC
};

static const discrete_555_desc headon_555_bonus =
{
	DISC_555_OUT_ENERGY | DISC_555_OUT_DC,
	12,
	DEFAULT_555_CHARGE,
	12.0-0.5
};

static const discrete_555_desc headon_555_crash =
{
	DISC_555_OUT_SQW | DISC_555_OUT_DC | DISC_555_TRIGGER_IS_LOGIC,
	12,
	DEFAULT_555_CHARGE,
	12.0-0.5
};

static const discrete_555_cc_desc headon_555cc =
{
	DISC_555_OUT_SQW | DISC_555_OUT_DC,
	12,     // B+ voltage of 555
	DEFAULT_555_VALUES,
	0.6     // Q16, Q10 Vbe
};


/*
 * From : http://www.vego.nl/8/08/03/08_08_03.htm
 *
 *- voeding:  -7 V, clock-frequency:  2.267 Hz
 *- voeding:  -8 V, clock-frequency:  8.731 Hz
 *- voeding:  -9 V, clock-frequency: 16,38 kHz
 *- voeding: -10 V, clock-frequency: 23,53 kHz
 *- voeding: -11 V, clock-frequency: 32,56 kHz
 *- voeding: -12 V, clock-frequency: 38,34 kHz
 *- voeding: -13 V, clock-frequency: 40,00 kHz
 *- voeding: -14 V, clock-frequency: 37,80 kHz
 *- voeding: -15 V, clock-frequency: 33,17 kHz
 *
 *  However all other mame sources say 100kHz.
 */

#define MM5837_CLOCK_12V 100000

static const discrete_lfsr_desc mm5837_lfsr =
{
	DISC_CLK_IS_FREQ,
	17,                   /* Bit Length */
	0,                    /* Reset Value */
	13,                   /* Use Bit 14 as F0 input 0 */
	16,                   /* Use Bit 17 as F0 input 1 */
	DISC_LFSR_XOR,        /* F0 is XOR */
	DISC_LFSR_NOT_IN0,    /* F1 is inverted F0*/
	DISC_LFSR_REPLACE,    /* F2 replaces the shifted register contents */
	0x000001,             /* Everything is shifted into the first bit only */
	0,                    /* Flags */
	16                    /* Output bit */
};

static const discrete_op_amp_filt_info headon_sallen_key_info =
{
	RES_K(15), RES_K(15), 0, 0, 0,
	CAP_N(470), CAP_N(47), 0
};

static DISCRETE_SOUND_START(headon_discrete)
	/************************************************
	 * Input register mapping for headon
	 *
	 ************************************************/
	DISCRETE_INPUT_LOGIC(HEADON_HISPEED_CC_EN)
	DISCRETE_INPUT_LOGIC(HEADON_HISPEED_PC_EN)
	DISCRETE_INPUT_LOGIC(HEADON_CAR_ON_EN)
	DISCRETE_INPUT_LOGIC(HEADON_CRASH_EN)
	DISCRETE_INPUT_LOGIC(HEADON_SCREECH1_EN)
	DISCRETE_INPUT_LOGIC(HEADON_SCREECH2_EN)
	DISCRETE_INPUT_LOGIC(HEADON_BONUS_EN)

	/************************************************
	 * CAR Sound generation Player Car
	 * The ramp values are taken from a
	 * SWITCHER CAD III simulation of the
	 * respective circuit. Using ramps may not be
	 * 100% accurate but comes very close.
	 ************************************************/

	DISCRETE_RAMP(NODE_20, 1, HEADON_CAR_ON_EN, (12-10.8)/7, 12, 10.8, 12)
	DISCRETE_RAMP(NODE_21, 1, HEADON_HISPEED_PC_EN, 2.0 / 0.8, 0, -2, 0)
	DISCRETE_ADDER2(NODE_22, 1, NODE_20, NODE_21)

#define HO_R56      RES_K(10)
#define HO_R72      RES_K(1)
#define HO_C31      CAP_N(100)

	DISCRETE_555_CC(NODE_25, HEADON_CAR_ON_EN, NODE_22, HO_R56, HO_C31, 0, 0, HO_R72, &headon_555cc)
	DISCRETE_COUNTER(NODE_26, 1, 0, NODE_25, 0, 1, DISC_COUNT_UP, 0, DISC_CLK_ON_R_EDGE) //divide by 2
	DISCRETE_COUNTER(NODE_27, 1, 0, NODE_25, 0, 3, DISC_COUNT_UP, 0, DISC_CLK_ON_R_EDGE) //divide by 4
	DISCRETE_COUNTER(NODE_28, 1, 0, NODE_25, 0, 2, DISC_COUNT_UP, 0, DISC_CLK_ON_R_EDGE) //divide by 3
	DISCRETE_TRANSFORM5(NODE_29,NODE_26,NODE_27,NODE_28,1,2,"13>24=+0+")
	DISCRETE_MULTIPLY(HEADON_PLAYER_CAR_OUT, NODE_29, 12 / 3)

	/************************************************
	 * CAR Sound generation Computer Car
	 ************************************************/

	DISCRETE_RAMP(NODE_30, 1, HEADON_CAR_ON_EN, (12-10.8)/7, 12, 10.8, 12)
	DISCRETE_RAMP(NODE_31, 1, HEADON_HISPEED_CC_EN, 2.0 / 0.8, 0, -2, 0)
	DISCRETE_ADDER2(NODE_32, 1, NODE_30, NODE_31)

#define HO_R43      RES_K(10)
#define HO_R35      RES_K(1)
#define HO_C20      CAP_N(100)

	DISCRETE_555_CC(NODE_35, HEADON_CAR_ON_EN, NODE_32, HO_R43, HO_C20, 0, 0, HO_R35, &headon_555cc)
	DISCRETE_COUNTER(NODE_36, 1, 0, NODE_35, 0, 1, DISC_COUNT_UP, 0, DISC_CLK_ON_R_EDGE) //divide by 2
	DISCRETE_COUNTER(NODE_37, 1, 0, NODE_35, 0, 3, DISC_COUNT_UP, 0, DISC_CLK_ON_R_EDGE) //divide by 4
	DISCRETE_COUNTER(NODE_38, 1, 0, NODE_35, 0, 2, DISC_COUNT_UP, 0, DISC_CLK_ON_R_EDGE) //divide by 3
	DISCRETE_TRANSFORM5(NODE_39,NODE_36,NODE_37,NODE_38,1,2,"13>24=+0+")
	DISCRETE_MULTIPLY(HEADON_COMP_CAR_OUT, NODE_39, 12 / 3)

	/************************************************
	 * Screech #1
	 ************************************************/

	DISCRETE_MULTIPLY(NODE_50,HEADON_SCREECH1_EN,12)
	DISCRETE_LFSR_NOISE(NODE_51, 1, 1, MM5837_CLOCK_12V, 12.0, 0, 6.0, &mm5837_lfsr)
	DISCRETE_INVERTER_OSC(HEADON_SCREECH1_OUT,NODE_50,NODE_51,RES_K(10),RES_K(100),CAP_N(47),RES_K(10),&headon_inverter_osc_1)

	/************************************************
	 * Screech #2
	 ************************************************/

	DISCRETE_MULTIPLY(NODE_60,HEADON_SCREECH2_EN,12)
	DISCRETE_INVERTER_OSC(HEADON_SCREECH2_OUT,NODE_60,NODE_51,RES_K(10),RES_K(100),CAP_N(57),RES_K(10),&headon_inverter_osc_1)

	/************************************************
	 * Bonus
	 ************************************************/

	DISCRETE_LOGIC_INVERT(NODE_70, HEADON_BONUS_EN)
	DISCRETE_MULTIPLY(NODE_71,NODE_70,12)
	DISCRETE_INVERTER_OSC(NODE_73,NODE_71,0,RES_K(22),RES_M(1),CAP_N(470),RES_M(10),&headon_inverter_osc_2)

	/* FIXME: the following is a bit of a hack
	 * The NE555 is operating at a frequency of 400Hz
	 * The output of the oscillator is connectred through a 150K resistor to
	 * the discharge pin.
	 * The simulation gives a frequency of roughly 600Hz if the osc output is high.
	 * This is equivalent to R1 being 47k || 150k = 35K
	 * The simulation gives a frequency of roughly 375Hz if the osc output is low.
	 * This is not emulated exactly. We will just use 200k for R1.
	 *
	 */
	DISCRETE_TRANSFORM3(NODE_74,NODE_73,200000,165000,"102*-")
	DISCRETE_555_ASTABLE(NODE_75, 1, NODE_74, RES_K(100), CAP_N(10), &headon_555_bonus)
	DISCRETE_MULTIPLY(HEADON_BONUS_OUT,NODE_75,HEADON_BONUS_EN)

	/************************************************
	 * Crash
	 * FIXME: Just a prototype several filter missing
	 ************************************************/

	DISCRETE_LOGIC_INVERT(NODE_80, HEADON_CRASH_EN)
	DISCRETE_555_MSTABLE(NODE_81, 1, NODE_80, RES_K(470), CAP_U(1), &headon_555_crash)
	// Mix with noise
	DISCRETE_MULTIPLY(NODE_84, NODE_81, NODE_51)
	// Taken from simulation
	// Center frequency is 500 Hz
	// roughly 6db per octave
	DISCRETE_FILTER1(NODE_85, 1, NODE_84, 500, DISC_FILTER_BANDPASS)


	DISCRETE_555_MSTABLE(NODE_86, 1, NODE_80, RES_K(470), CAP_U(2.2), &headon_555_crash)
	// Mix with noise
	DISCRETE_MULTIPLY(NODE_87, NODE_86, NODE_51)
	// Sallen Key filter ...
	// http://www.t-linespeakers.org/tech/filters/Sallen-Key.html
	// f = w / 2 / pi  = 1 / ( 2 * pi * 15k*sqrt(470n*47n)) = 71 Hz
	// Q = 1/2 * sqrt(470n/47n)= 1.58
	DISCRETE_SALLEN_KEY_FILTER(NODE_88, 1, NODE_87, DISC_SALLEN_KEY_LOW_PASS, &headon_sallen_key_info)

	DISCRETE_MIXER2(NODE_95, 1, NODE_85, NODE_88, &headon_crash_mixer)
	DISCRETE_TRANSFORM2(HEADON_CRASH_OUT, NODE_95, 12, "01/")

	/************************************************
	 * Mixer Stage
	 ************************************************/

	DISCRETE_MIXER6(NODE_210, 1, HEADON_PLAYER_CAR_OUT, HEADON_COMP_CAR_OUT,
					HEADON_SCREECH1_OUT, HEADON_SCREECH2_OUT,
					HEADON_BONUS_OUT, HEADON_CRASH_OUT, &headon_mixer)

	DISCRETE_OUTPUT(NODE_210, 37000.0 / 12.0)
	//DISCRETE_CSVLOG3(HEADON_CRASH_EN,NODE_81,NODE_80)

DISCRETE_SOUND_END

void vicdual_state::headon_audio(machine_config &config)
{
	DISCRETE(config, m_discrete, headon_discrete);
	m_discrete->add_route(ALL_OUTPUTS, "mono", 1.0);
}

void vicdual_state::headon_audio_w(uint8_t data)
{
	if (m_discrete == nullptr)
		return;
	m_discrete->write(HEADON_HISPEED_PC_EN, data & 0x01);
	m_discrete->write(HEADON_SCREECH1_EN, data & 0x02);
	m_discrete->write(HEADON_CRASH_EN, data & 0x04);
	m_discrete->write(HEADON_HISPEED_CC_EN, data & 0x08);
	m_discrete->write(HEADON_SCREECH2_EN, data & 0x10);
	m_discrete->write(HEADON_BONUS_EN, data & 0x20);
	m_discrete->write(HEADON_CAR_ON_EN, data & 0x40);

}

void vicdual_state::invho2_audio_w(uint8_t data)
{
	if (m_discrete == nullptr)
		return;
	m_discrete->write(HEADON_HISPEED_PC_EN, data & 0x10);
	m_discrete->write(HEADON_SCREECH1_EN, data & 0x08);
	m_discrete->write(HEADON_CRASH_EN, data & 0x80);
	m_discrete->write(HEADON_HISPEED_CC_EN, data & 0x40);
	m_discrete->write(HEADON_SCREECH2_EN, data & 0x04);
	m_discrete->write(HEADON_BONUS_EN, data & 0x02);
	m_discrete->write(HEADON_CAR_ON_EN, data & 0x20);

}

/*
static const char *const brdrline_sample_names[] =
{
	"*brdrline",
	"boot_and_start",
	"coin",
	"crashes",
	"end_level",
	"engine_noise",
	"field",
	"fire",
	nullptr
};


void vicdual_state::brdrline_audio(machine_config &config)
{
	SAMPLES(config, m_samples);
	m_samples->set_channels(7);
	m_samples->set_samples_names(brdrline_sample_names);
	m_samples->add_route(ALL_OUTPUTS, "mono", 0.35);
}

void vicdual_state::brdrline_audio_w(uint8_t data)
{
	uint8_t res = data ^ 0xff;

//  if(res & 2) // low fuel, MISSING

	if(res & 8) // end level
		m_samples->start(3, 3);

	if(res & 0x10)  // moving in the brush
		m_samples->start(5, 5);

	if(res & 0x20) // fire
		m_samples->start(6, 6);

	if(res & 0x40)  // car engine noise
		m_samples->start(4, 4);

	if(res & 0x80)  // crashes
		m_samples->start(2, 2);

	//printf("%02x\n",res);
}

void vicdual_state::brdrline_audio_aux_w(uint8_t data)
{
	if(data & 0xfc) // coin, unknown which is the trigger
		m_samples->start(1, 1);
	else // boot sample
		m_samples->start(0, 0);
}
*/



/*************************************
 *
 *  Borderline
 *
 *************************************/

borderline_audio_device::borderline_audio_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) :
	device_t(mconfig, BORDERLINE_AUDIO, tag, owner, clock),
	device_mixer_interface(mconfig, *this),
	m_input_line(*this, "sound_nl:in_%u", 0)
{
}

void borderline_audio_device::device_add_mconfig(machine_config &config)
{
	NETLIST_SOUND(config, "sound_nl", 48000)
		.set_source(NETLIST_NAME(brdrline))
		.add_route(ALL_OUTPUTS, *this, 1.0);

	NETLIST_LOGIC_INPUT(config, m_input_line[0], "I_SOUND_0.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[1], "I_SOUND_1.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[2], "I_SOUND_2.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[3], "I_SOUND_3.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[4], "I_SOUND_4.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[5], "I_SOUND_5.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[6], "I_SOUND_6.IN", 0);
	NETLIST_LOGIC_INPUT(config, m_input_line[7], "I_SOUND_7.IN", 0);

	NETLIST_STREAM_OUTPUT(config, "sound_nl:cout0", 0, "OUTPUT").set_mult_offset(1.0, 0.0);
}

void borderline_audio_device::device_start()
{
	save_item(NAME(m_input_state));
}

void borderline_audio_device::write(u8 value)
{
	if (value != m_input_state)
	{
		m_input_state = value;
		for (int index = 0; index < 8; index++)
			if (m_input_line[index] != nullptr)
				m_input_line[index]->write_line(BIT(m_input_state, index));
	}
}

DEFINE_DEVICE_TYPE(BORDERLINE_AUDIO, borderline_audio_device, "borderline_audio", "Borderline Sound Board")