// license:BSD-3-Clause // copyright-holders:K.Wilkins,Derrick Renaud /************************************************************************* audio\firetrk.cpp *************************************************************************/ #include "emu.h" #include "includes/firetrk.h" #include "sound/discrete.h" void firetrk_state::firetrk_skid_reset_w(uint8_t data) { m_skid[0] = 0; m_skid[1] = 0; // also SUPERBUG_SKID_EN m_discrete->write(FIRETRUCK_SKID_EN, 1); } void firetrk_state::montecar_skid_reset_w(uint8_t data) { m_discrete->write(MONTECAR_SKID_EN, 1); } void firetrk_state::firetrk_crash_snd_w(uint8_t data) { // also SUPERBUG_CRASH_DATA and MONTECAR_CRASH_DATA m_discrete->write(FIRETRUCK_CRASH_DATA, data >> 4); } void firetrk_state::firetrk_skid_snd_w(uint8_t data) { // also SUPERBUG_SKID_EN and MONTECAR_SKID_EN m_discrete->write(FIRETRUCK_SKID_EN, 0); } void firetrk_state::firetrk_motor_snd_w(uint8_t data) { // also MONTECAR_DRONE_MOTOR_DATA m_discrete->write(FIRETRUCK_SIREN_DATA, data >> 4); // also MONTECAR_MOTOR_DATA m_discrete->write(FIRETRUCK_MOTOR_DATA, data & 0x0f); } void firetrk_state::superbug_motor_snd_w(uint8_t data) { m_discrete->write(SUPERBUG_SPEED_DATA, data & 0x0f); } void firetrk_state::firetrk_xtndply_w(uint8_t data) { // also SUPERBUG_ASR_EN (extended play) m_discrete->write(FIRETRUCK_XTNDPLY_EN, data); } #define FIRETRUCK_HSYNC 15750.0 /* not checked */ #define FIRETRUCK_1V FIRETRUCK_HSYNC/2 #define FIRETRUCK_2V FIRETRUCK_1V/2 #define FIRETRUCK_8V FIRETRUCK_1V/8 #define FIRETRUCK_64V FIRETRUCK_1V/64 /************************************************************************/ /* firetrk Sound System Analog emulation by K.Wilkins Feb 2001 */ /* Questions/Suggestions to mame@esplexo.co.uk */ /* Modified and added superbug/montecar sounds. Jan 2003 D.R. */ /* Complete re-write Feb 2004, D. Renaud */ /************************************************************************/ static const discrete_lfsr_desc firetrk_lfsr={ DISC_CLK_IS_FREQ, 16, /* Bit Length */ 0, /* Reset Value */ 0, /* Use Bit 0 as XOR input 0 */ 14, /* Use Bit 14 as XOR input 1 */ DISC_LFSR_XNOR, /* Feedback stage1 is XNOR */ DISC_LFSR_OR, /* Feedback stage2 is just stage 1 output OR with external feed */ DISC_LFSR_REPLACE, /* Feedback stage3 replaces the shifted register contents */ 0x000001, /* Everything is shifted into the first bit only */ 0, /* Output is not inverted */ 15 /* Output bit */ }; static const discrete_dac_r1_ladder firetrk_motor_v_dac = { 4, // size of ladder {RES_M(2.2), RES_M(1), RES_K(470), RES_K(220), 0,0,0,0}, // R24, R23, R22, R21 4.4, // 5V - diode junction (0.6V) RES_K(68), // R25 0, // no rGnd CAP_U(10) // C24 }; static const discrete_555_cc_desc firetrk_motor_vco = { DISC_555_OUT_DC | DISC_555_OUT_SQW, 5, // B+ voltage of 555 DEFAULT_555_VALUES, 0.7 // Q2 junction voltage }; static const discrete_dac_r1_ladder firetrk_motor_out_dac = { 4, // size of ladder {RES_K(10), 0,0, RES_K(10)}, // R74, -, -, R73 DEFAULT_TTL_V_LOGIC_1, 0, // no rBias 0, // no rGnd CAP_U(0.1) // C43 }; static const discrete_dac_r1_ladder firetrk_siren_cv_dac = { 4, // size of ladder {RES_M(2.2), RES_M(1), RES_K(470), RES_K(220), 0,0,0,0}, // R46, R47, R45, R48 5, // 5V RES_K(100), // R49 RES_K(390), // R44 CAP_U(10) // C30 }; static const discrete_555_desc firetrk_siren_555 = { DISC_555_OUT_SQW | DISC_555_OUT_DC, 5, // B+ voltage of 555 DEFAULT_555_VALUES }; static const discrete_dac_r1_ladder firetrk_bang_dac = { 4, // size of ladder {RES_K(8.2), RES_K(3.9), RES_K(2.2), RES_K(1), 0,0,0,0}, // R37, R35, R36, R34 0, // no vBias 0, // no rBias 0, // no rGnd 0 // no smoothing cap }; static const discrete_schmitt_osc_desc firetrk_screech_osc = { RES_K(2.2), // R29 330, // R16 CAP_U(2.2), // C8 DEFAULT_74LS14_VALUES, DISC_SCHMITT_OSC_IN_IS_LOGIC | DISC_SCHMITT_OSC_ENAB_IS_NOR }; static const discrete_mixer_desc firetrk_mixer = { DISC_MIXER_IS_OP_AMP, {RES_K(4.7), RES_K(22), RES_K(31.333), RES_K(33), RES_K(10.5456), RES_K(32), RES_K(150)}, // R54, R55, R72||(R70+R71), R53, R56 + R37||R35||R36||R34, R58 + R73||R74, R52 {0}, // No variable resistor nodes {CAP_U(0.22), CAP_U(0.22), CAP_U(0.01), CAP_U(0.22), CAP_U(0.22), 0, CAP_U(0.22)}, // C34, C32, C44, C35, C33, NA, C31 0, // No rI RES_K(22), // R43 0, // No Filter CAP_U(10), // C12 5.0 * 820 / (270 + 820), // vBias = 5V * R51/(R41+R51) 3400 // final gain }; #define FIRETRUCK_ATTRACT_INV NODE_09 /* Nodes - Sounds */ #define FIRETRUCK_NOISE NODE_11 #define FIRETRUCK_MOTORSND NODE_12 #define FIRETRUCK_HORNSND NODE_13 #define FIRETRUCK_SIRENSND NODE_14 #define FIRETRUCK_BANGSND NODE_15 #define FIRETRUCK_SCREECHSND NODE_16 #define FIRETRUCK_BELLSND NODE_17 #define FIRETRUCK_XTNDPLYSND NODE_18 DISCRETE_SOUND_START(firetrk_discrete) /************************************************/ /* Input register mapping for firetruck */ /************************************************/ DISCRETE_INPUT_DATA (FIRETRUCK_MOTOR_DATA) DISCRETE_INPUT_LOGIC(FIRETRUCK_HORN_EN) DISCRETE_INPUT_DATA (FIRETRUCK_SIREN_DATA) DISCRETE_INPUTX_DATA(FIRETRUCK_CRASH_DATA , -1, 0x0f, 0) DISCRETE_INPUT_LOGIC(FIRETRUCK_SKID_EN) DISCRETE_INPUT_LOGIC(FIRETRUCK_BELL_EN) DISCRETE_INPUT_LOGIC(FIRETRUCK_ATTRACT_EN) DISCRETE_INPUT_NOT (FIRETRUCK_XTNDPLY_EN) DISCRETE_LOGIC_INVERT(FIRETRUCK_ATTRACT_INV, FIRETRUCK_ATTRACT_EN) /************************************************/ /* Motor sound circuit is based on a 556 VCO */ /* with the input frequency set by the MotorSND */ /* latch (4 bit). This freqency is then used to */ /* drive a modulo 12 counter, with div6 & div12 */ /* summed as the output of the circuit. */ /************************************************/ DISCRETE_ADJUSTMENT(NODE_20, RES_K(260), // R26 + R27 @ max RES_K(10), // R26 + R27 @ min DISC_LOGADJ, "R27") DISCRETE_DAC_R1(NODE_21, // base of Q1 FIRETRUCK_MOTOR_DATA, // IC F8, pins 2,5,6,9 DEFAULT_TTL_V_LOGIC_1, &firetrk_motor_v_dac) DISCRETE_555_CC(NODE_22, 1, // IC B9 pin 3, always enabled NODE_21, // vIn NODE_20, // current adjust CAP_U(0.01), // C25 RES_M(1), 0, 0, // R28, no rGnd, no rDis &firetrk_motor_vco) DISCRETE_COUNTER_7492(NODE_23, 1, FIRETRUCK_ATTRACT_EN, // IC A9, QB-QD NODE_22, DISC_CLK_ON_F_EDGE) // from IC B9, pin 3 DISCRETE_TRANSFORM2(NODE_24, NODE_23, 0x04, "01&") // IC A9, pin 8 DISCRETE_COUNTER(NODE_25, 1, FIRETRUCK_ATTRACT_EN, // IC A9, pin 12 NODE_24, // from IC A9, pin 8 0, 1, 1, 0, DISC_CLK_ON_F_EDGE) DISCRETE_TRANSFORM3(NODE_26, NODE_23, 2, NODE_25, "01*2+") // Mix QA and QB-D together DISCRETE_DAC_R1(FIRETRUCK_MOTORSND, NODE_26, DEFAULT_TTL_V_LOGIC_1, &firetrk_motor_out_dac) /************************************************/ /* Horn, this is taken from the 64V signal. */ /* 64V = HSYNC/128 */ /* = 15750/128 */ /************************************************/ DISCRETE_SQUAREWFIX(NODE_30, FIRETRUCK_ATTRACT_INV, FIRETRUCK_64V, DEFAULT_TTL_V_LOGIC_1, 50.0, DEFAULT_TTL_V_LOGIC_1/2, 0) DISCRETE_ONOFF(FIRETRUCK_HORNSND, FIRETRUCK_HORN_EN, NODE_30) /************************************************/ /* Siren is built around a 556 based VCO, the */ /* 4 bit input value is smoothed between trans- */ /* itions by a 10u capacitor. */ /* 0000 = 666Hz with 35% duty cycle */ /* 1111 = 526Hz with 63% duty cycle */ /************************************************/ DISCRETE_DAC_R1(NODE_40, // IC E9, pin 7 FIRETRUCK_SIREN_DATA, // IC F8, pins 15,16,12,19 DEFAULT_TTL_V_LOGIC_1, &firetrk_siren_cv_dac) DISCRETE_555_ASTABLE_CV(FIRETRUCK_SIRENSND, FIRETRUCK_ATTRACT_INV, RES_K(2.2), // R60 RES_K(10), // R59 CAP_U(0.1), // C37 NODE_40, // CV is straight from DAC because op-amp E9 is just x1 buffer &firetrk_siren_555) /************************************************/ /* Crash circuit is built around a noise */ /* generator built from 2 shift registers that */ /* are clocked by the 2V signal. */ /* 2V = HSYNC/4 */ /* = 15750/4 */ /* Output is binary weighted with 4 bits of */ /* crash volume. */ /************************************************/ DISCRETE_LFSR_NOISE(FIRETRUCK_NOISE, FIRETRUCK_ATTRACT_INV, FIRETRUCK_ATTRACT_INV, FIRETRUCK_2V, 1.0, 0, 0.5, &firetrk_lfsr) DISCRETE_SWITCH(NODE_50, 1, FIRETRUCK_NOISE, 0, // Enable gate K9 FIRETRUCK_CRASH_DATA) // IC K9, pins 3,6,11,8 DISCRETE_DAC_R1(FIRETRUCK_BANGSND, // Bang NODE_50, // from enable gates K9 DEFAULT_TTL_V_LOGIC_1, &firetrk_bang_dac) /************************************************/ /* Screech is just the noise modulating a */ /* Schmitt VCO. */ /************************************************/ DISCRETE_SCHMITT_OSCILLATOR(FIRETRUCK_SCREECHSND, FIRETRUCK_SKID_EN, FIRETRUCK_NOISE, DEFAULT_TTL_V_LOGIC_1, &firetrk_screech_osc) /************************************************/ /* Bell circuit - */ /* The Hsync signal is put into a div 16 */ /* counter. */ /************************************************/ DISCRETE_RCDISC2(NODE_70, FIRETRUCK_BELL_EN, 4.4, 10, // Q3 instantally charges C42 0, RES_K(33), // discharges through R66 CAP_U(10)) // C42 DISCRETE_TRANSFORM2(NODE_71, NODE_70, 5.0 * 680 / (RES_K(10) + 680), // vRef = 5V * R64 / (R65 + R64) "01<") // Output is low until vIn drops below vRef DISCRETE_COUNTER(NODE_72, 1, NODE_71, FIRETRUCK_HSYNC, 0, 15, 1, 0, DISC_CLK_IS_FREQ) // IC B10 DISCRETE_TRANSFORM4(FIRETRUCK_BELLSND, NODE_72, 8, // count 0-7 allow cap voltage to output. 8-15 ground output. NODE_70, // scale logic to cap voltage RES_K(47) / (RES_K(47) + RES_K(47) + RES_K(47)), // to drop voltage per divider R72 / (R70+R71+R72) "01<2*3*") /************************************************/ /* Extended play circuit is just the 8V signal */ /* 8V = HSYNC/16 */ /* = 15750/16 */ /************************************************/ DISCRETE_SQUAREWFIX(FIRETRUCK_XTNDPLYSND, FIRETRUCK_XTNDPLY_EN, FIRETRUCK_8V, DEFAULT_TTL_V_LOGIC_1, 50.0, DEFAULT_TTL_V_LOGIC_1, 0.0) /************************************************/ /* Combine all 7 sound sources. */ /************************************************/ DISCRETE_MIXER7(NODE_90, 1, FIRETRUCK_XTNDPLYSND, FIRETRUCK_HORNSND, FIRETRUCK_BELLSND, FIRETRUCK_SCREECHSND, FIRETRUCK_BANGSND, FIRETRUCK_MOTORSND, FIRETRUCK_SIRENSND, &firetrk_mixer) DISCRETE_OUTPUT(NODE_90, 1) DISCRETE_SOUND_END /************************************************************************/ /* superbug Sound System Analog emulation */ /* Complete re-write Feb 2004, D. Renaud */ /************************************************************************/ static const discrete_dac_r1_ladder superbug_motor_v_dac = { 4, // size of ladder {RES_M(2.2), RES_M(1), RES_K(470), RES_K(220), 0,0,0,0}, // R8, R9, R6, R7 4.4, // 5V - diode junction (0.6V) RES_K(68), // R10 0, // no rGnd CAP_U(10) // C20 }; static const discrete_555_cc_desc superbug_motor_vco = { DISC_555_OUT_DC | DISC_555_OUT_SQW, 5, // B+ voltage of 555 DEFAULT_555_VALUES, 0.7 // Q1 junction voltage }; static const discrete_dac_r1_ladder superbug_motor_out_dac = { 4, // size of ladder {RES_K(10), 0,0, RES_K(10)}, // R34, -, -, R32 DEFAULT_TTL_V_LOGIC_1, 0, // no rBias 0, // no rGnd CAP_U(0.1) // C26 }; static const discrete_dac_r1_ladder superbug_bang_dac = { 4, // size of ladder {RES_K(8.2), RES_K(3.9), RES_K(2.2), RES_K(1), 0,0,0,0}, // R28, R28, R27, R26 0, // no vBias 0, // no rBias 0, // no rGnd CAP_U(0.1) // C25 }; static const discrete_schmitt_osc_desc superbug_screech_osc = { RES_K(2.2), // R30 330, // R52 CAP_U(2.2), // C27 DEFAULT_7414_VALUES, DISC_SCHMITT_OSC_IN_IS_LOGIC | DISC_SCHMITT_OSC_ENAB_IS_NOR }; static const discrete_mixer_desc superbug_mixer = { DISC_MIXER_IS_RESISTOR, {RES_K(15), RES_K(10.5456), RES_K(33), RES_K(4.7)}, // R54, R55, R72||(R70+R71), R53, R56 + R37||R35||R36||R34, R58 + R73||R74, R52 {0}, // No variable resistor nodes {0}, // No caps 0, // No rI RES_K(5), // R63 0, // No Filter CAP_U(0.1), // C35 0, // not used in resistor network 33000 // final gain }; /* Nodes - Inputs */ #define SUPERBUG_ATTRACT_INV NODE_09 /* Nodes - Sounds */ #define SUPERBUG_NOISE NODE_10 #define SUPERBUG_MOTORSND NODE_11 #define SUPERBUG_BANGSND NODE_12 #define SUPERBUG_SCREECHSND NODE_13 #define SUPERBUG_ASRSND NODE_14 DISCRETE_SOUND_START(superbug_discrete) /************************************************/ /* Input register mapping for superbug */ /************************************************/ DISCRETE_INPUTX_DATA(SUPERBUG_SPEED_DATA, -1, 0x0f, 0) DISCRETE_INPUTX_DATA(SUPERBUG_CRASH_DATA, -1, 0x0f, 0) DISCRETE_INPUT_LOGIC(SUPERBUG_SKID_EN) DISCRETE_INPUT_LOGIC(SUPERBUG_ATTRACT_EN) DISCRETE_INPUT_LOGIC(SUPERBUG_ASR_EN) DISCRETE_LOGIC_INVERT(SUPERBUG_ATTRACT_INV, SUPERBUG_ATTRACT_EN) /************************************************/ /* Motor sound circuit is based on a 556 VCO */ /* with the input frequency set by the MotorSND */ /* latch (4 bit). This freqency is then used to */ /* drive a modulo 12 counter. */ /************************************************/ DISCRETE_ADJUSTMENT(NODE_20, RES_K(260), // R12 + R62 @ max RES_K(10), // R12 + R62 @ min DISC_LOGADJ, "R62") DISCRETE_DAC_R1(NODE_21, // base of Q1 SUPERBUG_SPEED_DATA, // IC B5, pins 3, 14, 6, 11 DEFAULT_TTL_V_LOGIC_1, &superbug_motor_v_dac) DISCRETE_555_CC(NODE_22, 1, // IC A6 pin 3, always enabled NODE_21, // vIn NODE_20, // current adjust CAP_U(0.01), // C21 RES_M(3.3), 0, 0, // R11, no rGnd, no rDis &superbug_motor_vco) DISCRETE_COUNTER_7492(NODE_23, 1, SUPERBUG_ATTRACT_EN, // IC A7, QB-QD NODE_22, DISC_CLK_ON_F_EDGE) // from IC A6, pin 3 DISCRETE_TRANSFORM2(NODE_24, NODE_23, 0x04, "01&") // IC A7, pin 8-QD DISCRETE_TRANSFORM2(NODE_25, NODE_23, 0x01, "01&") // IC A7, pin 11-QB DISCRETE_LOGIC_XOR(NODE_26, NODE_24, NODE_25) // Gate A9, pin 8 DISCRETE_COUNTER(NODE_27, 1, SUPERBUG_ATTRACT_EN, // IC A7, pin 12-QA NODE_26, // from IC A9, pin 8 0, 1, 1, 0, DISC_CLK_ON_F_EDGE) DISCRETE_TRANSFORM3(NODE_28, NODE_23, 2, NODE_27, "01*2+") // Mix QA and QB-D together DISCRETE_DAC_R1(SUPERBUG_MOTORSND, NODE_28, DEFAULT_TTL_V_LOGIC_1, &superbug_motor_out_dac) /************************************************/ /* Crash circuit is built around a noise */ /* generator built from 2 shift registers that */ /* are clocked by the 2V signal. */ /* 2V = HSYNC/4 */ /* = 15750/4 */ /* Output is binary weighted with 4 bits of */ /* crash volume. */ /************************************************/ DISCRETE_LFSR_NOISE(SUPERBUG_NOISE, SUPERBUG_ATTRACT_INV, SUPERBUG_ATTRACT_INV, FIRETRUCK_2V, 1.0, 0, 0.5, &firetrk_lfsr) // Same as firetrk DISCRETE_SWITCH(NODE_40, 1, SUPERBUG_NOISE, 0, // Enable gate C8 SUPERBUG_CRASH_DATA) // IC D8, pins 3,14,6,11 DISCRETE_DAC_R1(SUPERBUG_BANGSND, // Bang NODE_40, // from enable gates C8 DEFAULT_TTL_V_LOGIC_1, &superbug_bang_dac) /************************************************/ /* Screech is just the noise modulating a */ /* Schmitt VCO. */ /************************************************/ DISCRETE_SCHMITT_OSCILLATOR(SUPERBUG_SCREECHSND, SUPERBUG_SKID_EN, SUPERBUG_NOISE, DEFAULT_TTL_V_LOGIC_1, &superbug_screech_osc) /************************************************/ /* ASR circuit is just the 8V signal */ /* 8V = HSYNC/16 */ /* = 15750/16 */ /************************************************/ DISCRETE_SQUAREWFIX(SUPERBUG_ASRSND, SUPERBUG_ASR_EN, FIRETRUCK_8V, DEFAULT_TTL_V_LOGIC_1, 50.0, DEFAULT_TTL_V_LOGIC_1/2, 0.0) /************************************************/ /* Combine all 4 sound sources. */ /************************************************/ DISCRETE_MIXER4(NODE_90, 1, SUPERBUG_MOTORSND, SUPERBUG_BANGSND, SUPERBUG_SCREECHSND, SUPERBUG_ASRSND, &superbug_mixer) DISCRETE_OUTPUT(NODE_90, 1) DISCRETE_SOUND_END /************************************************************************/ /* montecar Sound System Analog emulation */ /* Complete re-write Mar 2004, D. Renaud */ /************************************************************************/ /* Both cars use same parts for v_dac, vco and out_dac */ static const discrete_dac_r1_ladder montecar_motor_v_dac = { 4, // size of ladder {RES_M(2.2), RES_M(1), RES_K(470), RES_K(220), 0,0,0,0}, // R44, R43, R46, R45 4.4, // 5V - diode junction (0.6V) RES_K(68), // R80 0, // no rGnd CAP_U(4.7) // C77 }; static const discrete_555_cc_desc montecar_motor_vco = { DISC_555_OUT_DC | DISC_555_OUT_SQW, 5, // B+ voltage of 555 DEFAULT_555_VALUES, 0.7 // Q1 junction voltage }; static const discrete_dac_r1_ladder montecar_motor_out_dac = { 4, // size of ladder {RES_K(10), RES_K(10), 0, RES_K(10)}, // R31, R30, -, R29 DEFAULT_TTL_V_LOGIC_1, 0, // no rBias 0, // no rGnd CAP_U(0.1) // C53 }; static const discrete_comp_adder_table montecar_drone_vol_res = { DISC_COMP_P_RESISTOR, 0, // no default 4, // # of resistors {RES_K(100.25), RES_K(47.25), RES_K(22.25), RES_K(10.25), 0,0,0,0} // R105, R104, R103, R102 (250 added to all for 4066 resistance) }; static const discrete_dac_r1_ladder montecar_bang_dac = { 4, // size of ladder {RES_K(8.2), RES_K(3.9), RES_K(2.2), RES_K(1), 0,0,0,0}, // R39, R42, R41, R40 0, // no vBias 0, // no rBias 0, // no rGnd 0 // no cSmoothing }; static const discrete_op_amp_filt_info montecar_bang_filt = { 1.0/(1.0/RES_K(8.2) + 1.0/RES_K(3.9) + 1.0/RES_K(2.2) + 1.0/RES_K(1)) + RES_K(3.3), // R39, R42, R41, R40, r82 0, 680, // R83 0, RES_K(330), // r84 CAP_U(.1), // c79 CAP_U(.1), // c78 0, 5, 12, 0 }; static const discrete_schmitt_osc_desc montecar_screech_osc = { RES_K(2.2), // R54 330, // R53 CAP_U(2.2), // C57 DEFAULT_74LS14_VALUES, DISC_SCHMITT_OSC_IN_IS_LOGIC | DISC_SCHMITT_OSC_ENAB_IS_NOR }; static const discrete_mixer_desc montecar_mixer = { DISC_MIXER_IS_OP_AMP, {RES_K(15), RES_K(33), RES_K(10), RES_K(10), RES_K(13.3333)}, // R93, R97, R96, variable , R95 + R31||R30||R29 {0,0,0,NODE_30,0}, // Only drone has variable node {CAP_U(0.22), CAP_U(0.22), CAP_U(0.22), CAP_U(1), CAP_U(1)}, // C83, C84, C85, C88, C47 RES_K(27), // R92 RES_K(82), // R98 0, // No Filter CAP_U(0.22), // C6 5, // vRef 5000 // final gain }; #define MONTECAR_ATTRACT_EN NODE_09 /* Nodes - Sounds */ #define MONTECAR_NOISE NODE_15 #define MONTECAR_MOTORSND NODE_10 // MotorAud1 #define MONTECAR_BEEPSND NODE_11 #define MONTECAR_DRONE_MOTORSND NODE_12 // MotorAud2 #define MONTECAR_BANGSND NODE_13 #define MONTECAR_SCREECHSND NODE_14 DISCRETE_SOUND_START(montecar_discrete) /************************************************/ /* Input register mapping for montecar */ /************************************************/ DISCRETE_INPUT_DATA (MONTECAR_MOTOR_DATA) // Motor 1-4 DISCRETE_INPUT_DATA (MONTECAR_DRONE_MOTOR_DATA) // Motor 5-8 DISCRETE_INPUTX_DATA(MONTECAR_CRASH_DATA, -1, 0x0f, 0) DISCRETE_INPUT_LOGIC(MONTECAR_SKID_EN ) DISCRETE_INPUT_DATA (MONTECAR_DRONE_LOUD_DATA) DISCRETE_INPUT_LOGIC(MONTECAR_ATTRACT_INV) DISCRETE_INPUT_NOT (MONTECAR_BEEPER_EN) DISCRETE_LOGIC_INVERT(MONTECAR_ATTRACT_EN, MONTECAR_ATTRACT_INV) /************************************************/ /* Motor sound circuit is based on a 556 VCO */ /* with the input frequency set by the MotorSND */ /* latch (4 bit). This freqency is then used to */ /* driver a modulo 12 counter, with div6, 4 & 3 */ /* summed as the output of the circuit. */ /************************************************/ DISCRETE_ADJUSTMENT(NODE_20, RES_K(260), // R87 + R89 @ max RES_K(10), // R87 + R89 @ min DISC_LOGADJ, "R89") DISCRETE_DAC_R1(NODE_21, // base of Q7 MONTECAR_MOTOR_DATA, // IC H8, pins 5, 2, 9, 6 DEFAULT_TTL_V_LOGIC_1, &montecar_motor_v_dac) DISCRETE_555_CC(NODE_22, 1, // IC C9 pin 9 NODE_21, // vIn NODE_20, // current adjust CAP_U(0.01), // C81 RES_M(1), 0, 0, // R86, no rGnd, no rDis &montecar_motor_vco) DISCRETE_COUNTER_7492(NODE_23, 1, MONTECAR_ATTRACT_EN, // IC B/C9, QB-QD NODE_22, DISC_CLK_ON_F_EDGE) // from IC C9, pin 9 DISCRETE_TRANSFORM2(NODE_24, NODE_23, 0x04, "01&") // IC B/C9, pin 8-QD DISCRETE_TRANSFORM2(NODE_25, NODE_23, 0x01, "01&") // IC B/C9, pin 11-QB DISCRETE_LOGIC_XOR(NODE_26, NODE_24, NODE_25) // Gate A9, pin 11 DISCRETE_COUNTER(NODE_27, 1, MONTECAR_ATTRACT_EN, // IC B/C9, pin 12-QA NODE_26, // from IC A9, pin 11 0, 1, 1, 0, DISC_CLK_ON_F_EDGE) DISCRETE_TRANSFORM3(NODE_28, NODE_23, 2, NODE_27, "01*2+") // Mix QA and QB-D together DISCRETE_DAC_R1(MONTECAR_MOTORSND, NODE_28, DEFAULT_TTL_V_LOGIC_1, &montecar_motor_out_dac) /************************************************/ /* Drone motor sound is basically the same as */ /* the regular car but with a volume control. */ /* Also I shifted the frequencies up for it to */ /* sound different from the player's car. */ /************************************************/ DISCRETE_COMP_ADDER(NODE_30, MONTECAR_DRONE_LOUD_DATA, &montecar_drone_vol_res) // make sure to change the node value in the mixer table if you change this node number DISCRETE_ADJUSTMENT(NODE_40, RES_K(260), // R85 + R88 @ max RES_K(10), // R85 + R88 @ min DISC_LOGADJ, "R88") DISCRETE_DAC_R1(NODE_41, // base of Q7 MONTECAR_DRONE_MOTOR_DATA, // IC H8, pins 19, 16, 12, 15 DEFAULT_TTL_V_LOGIC_1, &montecar_motor_v_dac) DISCRETE_555_CC(NODE_42, 1, // IC C9 pin 5 NODE_41, // vIn NODE_40, // current adjust CAP_U(0.01), // C80 RES_M(1), 0, 0, // R81, no rGnd, no rDis &montecar_motor_vco) DISCRETE_COUNTER_7492(NODE_43, 1, MONTECAR_ATTRACT_EN, // IC A/B9, QB-QD NODE_42, DISC_CLK_ON_F_EDGE) // from IC C9, pin 5 DISCRETE_TRANSFORM2(NODE_44, NODE_43, 0x04, "01&") // IC A/B9, pin 8-QD DISCRETE_TRANSFORM2(NODE_45, NODE_43, 0x01, "01&") // IC A/B9, pin 11-QB DISCRETE_LOGIC_XOR(NODE_46, NODE_44, NODE_45) // Gate A9, pin 6 DISCRETE_COUNTER(NODE_47, 1, MONTECAR_ATTRACT_EN, // IC A/B9, pin 12-QA NODE_46, // from IC A9, pin 6 0, 1, 1, 0, DISC_CLK_ON_F_EDGE) DISCRETE_TRANSFORM3(NODE_48, NODE_43, 2, NODE_47, "01*2+") // Mix QA and QB-D together DISCRETE_DAC_R1(MONTECAR_DRONE_MOTORSND, NODE_48, DEFAULT_TTL_V_LOGIC_1, &montecar_motor_out_dac) /************************************************/ /* Crash circuit is built around a noise */ /* generator built from 2 shift registers that */ /* are clocked by the 2V signal. */ /* 2V = HSYNC/4 */ /* = 15750/4 */ /* Output is binary weighted with 4 bits of */ /* crash volume. */ /************************************************/ DISCRETE_LFSR_NOISE(MONTECAR_NOISE, MONTECAR_ATTRACT_INV, MONTECAR_ATTRACT_INV,FIRETRUCK_2V , 1.0, 0, 0.5, &firetrk_lfsr) // Same as firetrk DISCRETE_SWITCH(NODE_50, 1, MONTECAR_NOISE, 0, // Enable gate A9 MONTECAR_CRASH_DATA) // IC J8, pins 3,6,11,14 DISCRETE_DAC_R1(NODE_51, // Bang NODE_50, // from enable gates A9 DEFAULT_TTL_V_LOGIC_1, &montecar_bang_dac) DISCRETE_OP_AMP_FILTER(MONTECAR_BANGSND, 1, NODE_51, 0, DISC_OP_AMP_FILTER_IS_BAND_PASS_1M, &montecar_bang_filt) /************************************************/ /* Screech is just the noise modulating a */ /* Schmitt VCO. */ /************************************************/ DISCRETE_SCHMITT_OSCILLATOR(NODE_60, MONTECAR_SKID_EN, MONTECAR_NOISE, DEFAULT_TTL_V_LOGIC_1, &montecar_screech_osc) DISCRETE_SWITCH(MONTECAR_SCREECHSND, 1, MONTECAR_ATTRACT_INV, 0, NODE_60) /************************************************/ /* Beep circuit is just the 8V signal */ /* 8V = HSYNC/16 */ /* = 15750/16 */ /************************************************/ DISCRETE_SQUAREWFIX(MONTECAR_BEEPSND, MONTECAR_BEEPER_EN, FIRETRUCK_8V, DEFAULT_TTL_V_LOGIC_1, 50.0, DEFAULT_TTL_V_LOGIC_1/2, 0.0) /************************************************/ /* Combine all 5 sound sources. */ /************************************************/ DISCRETE_MIXER5(NODE_90, 1, MONTECAR_BEEPSND, MONTECAR_SCREECHSND, MONTECAR_BANGSND, MONTECAR_DRONE_MOTORSND, MONTECAR_MOTORSND, &montecar_mixer) DISCRETE_OUTPUT(NODE_90, 1) DISCRETE_SOUND_END