61				/* Envelope generation based on: */
62				/* HH  channel 7->slot1 */
63				/* SD  channel 7->slot2 */
64				/* TOM channel 8->slot1 */
65				/* TOP channel 8->slot2 */
66				//So phase modulation is based on the Modulator signal. The volume envelope is in the Modulator signal (Hi-hat/Tom-tom) or Carrier signal ()
67			case 7: //Hi-hat(Carrier)/Snare drum(Modulator)? High-hat uses modulator, Snare drum uses Carrier signals.
68				immresult = 0.0f; //Initialize immediate result!
69				if (adlibop[op7_1].volenvstatus) //Hi-hat on Modulator?
70				{
71					//Derive frequency from channel 7(modulator) and 8(carrier).
72					tempop_phase = getphase(op7_1,adlibfreq(op7_1)); //Save the phase!
73					tempphase = (tempop_phase>>2);
74					tempphase ^= (tempop_phase>>7);
75					tempphase |= (tempop_phase>>3);
76					tempphase &= 1; //Only 1 bit is used!
77					tempphase = tempphase?(0x200|(0xD0>>2)):0xD0;
78					tempop_phase = getphase(op8_2,adlibfreq(op8_2)); //Calculate the phase of channel 8 carrier signal!
79					if (((tempop_phase>>3)^(tempop_phase>>5))&1) tempphase = 0x200|(0xD0>>2);
80					if (tempphase&0x200)
81					{
82						if (OPL2_RNG) tempphase = 0x2D0;
83					}
84					else if (OPL2_RNG) tempphase = (0xD0>>2);
85					
86					result = calcOperator(8, op8_2,op8_2,op8_2,adlibfreq(op8_2), 0.0f,((adlibop[op8_2].volenvstatus)?1:0)); //Calculate the modulator, but only use the current time(position in the sine wave)!
87					result = calcOperator(7, op7_1,op7_1,op7_1,adlibfreq(op7_1), convertphase(tempphase), 2|((adlibop[op8_2].volenvstatus||adlibop[op7_2].volenvstatus)?0x09:0x08)); //Calculate the carrier with applied modulator!
88					immresult += result; //Apply the tremolo!
89				}
90				if (adlibop[op7_2].volenvstatus) //Snare drum on Carrier volume?
91				{
92					//Derive frequency from channel 0.
93					tempphase = 0x100 << ((getphase(op7_1, adlibfreq(op7_1)) >> 8) & 1); //Bit8=0(Positive) then 0x100, else 0x200! Based on the phase to generate!
94					tempphase ^= (OPL2_RNG << 8); //Noise bits XOR'es phase by 0x100 when set!
95					result = calcOperator(7, op7_2,op7_2,op7_2,adlibfreq(op7_2), convertphase(tempphase), 0); //Calculate the carrier with applied modulator!
96					result = calcOperator(7, op7_1,op7_1,op7_2,adlibfreq(op7_1), convertphase(tempphase), ((adlibop[op8_2].volenvstatus) ? 0x09 : 0x08)); //Calculate the carrier with applied modulator!
97					immresult += result; //Apply the tremolo!
98				}
99				result = immresult; //Load the resulting channel!
100				result *= 0.5; //We only have half(two channels combined)!
101				return result; //Give the result, converted to short!
102				break;
103			case 8: //Tom-tom(Carrier)/Cymbal(Modulator)? Tom-tom uses Modulator, Cymbal uses Carrier signals.
104				immresult = 0.0f; //Initialize immediate result!
105				if (adlibop[op8_1].volenvstatus) //Tom-tom(Modulator)?
106				{
107					result = calcOperator(8, op8_1, op8_1, op8_1, adlibfreq(op8_1), 0.0f, 0x8); //Calculate the carrier without applied modulator additive! Ignore volume!
108					immresult += result*2.0f; //Apply the exponential!
109				}
110				if (adlibop[op8_2].volenvstatus) //Cymbal(Carrier)?
111				{
112					//Derive frequency from channel 7(modulator) and 8(carrier).
113					tempop_phase = getphase(op7_1,adlibfreq(op7_1)); //Save the phase!
114					tempphase = (tempop_phase>>2);
115					tempphase ^= (tempop_phase>>7);
116					tempphase |= (tempop_phase>>3);
117					tempphase &= 1; //Only 1 bit is used!
118					tempphase <<= 9; //0x200 when 1 makes it become 0x300
119					tempphase |= 0x100; //0x100 is always!
120					tempop_phase = getphase(op8_1,adlibfreq(op8_1)); //Calculate the phase of channel 8 carrier signal!
121					if (((tempop_phase>>3)^(tempop_phase>>5))&1) tempphase = 0x300;
122					
123					result = calcOperator(7, op7_1,op7_1,op7_1, adlibfreq(op7_1), 0.0f,0); //Calculate the modulator, but only use the current time(position in the sine wave)!
124					result = calcOperator(8, op8_2,op8_2,op8_2, adlibfreq(op8_2), convertphase(tempphase), 0x8); //Calculate the carrier with applied modulator! Use volume!
125					immresult += result; //Apply the exponential!
126				}
127				result = immresult; //Load the resulting channel!
128				result *= 0.5; //We only have half(two channels combined)!
129				return result; //Give the result, converted to short!
130				break;
131		}
132		#endif
133		//Not a percussion channel? Pass through!
134	}
135
136	//Operator 1!
137	//Calculate the frequency to use!
138	result = calcOperator(curchan, op1,op1,op1, op1frequency, 0.0f,0x80); //Calculate the modulator for feedback!
139
140	if (adlibch[curchan].synthmode) //Additive synthesis?
141	{
142		result += calcOperator(curchan, op2,op2,op2, op2frequency, 0.0f,0x00); //Calculate the carrier without applied modulator additive!
143	}
144	else //FM synthesis?
145	{
146		result = calcOperator(curchan, op2,op2,op2, op2frequency, result, 0x00); //Calculate the carrier with applied modulator!
147	}
148
149	return result; //Give the result!
150}

61}
62
63float adlib_scaleFactor = 0.0f; //We're running 9 channels in a 16-bit space, so 1/9 of SHRT_MAX
64
65OPTINLINE word getphase(byte operator, float frequency) //Get the current phrase of the operator!
66{
67	return (word)(fmodf((adlibop[operator].time*frequency),1.0)*((float)0x3D0)); //Give the 10-bits value
68}
69
70word convertphase_real(word phase)
71{
72	return ((phase&0x200)?0:SIGNBIT)|(word)((phase&0x1FF)*((1.0f/(float)0x1FF)*SIGNMASK)); //Give the phase to execute, as a full sinus modulation!
73}
74
75float convertphase(word phase)
76{
77	return OPL2_Exponential(phaseconversion[phase]); //Lookup the phase translated!
78}