private void PitchBend(int channel, int data1, int data2)
{
var bendData = ((data2 << 7) | data1) - 8192;
pitchBends[channel] = Math.Pow(Math.Pow(2.0, pitchBendWidth[channel] / 12.0), bendData / 8192.0);
var correction = corrections[channel] * pitchBends[channel] * fineTune[channel];
Ymf825Driver.ConvertForFrequencyMultiplier(correction, out var integer, out var fraction);
Driver.Section(() =>
{
Driver.SetVoiceNumber(channel);
Driver.SetFrequencyMultiplier(integer, fraction);
});
}
private static void NoteOn(Ymf825Driver driver, int key)
{
Ymf825Driver.GetFnumAndBlock(key, out var fnum, out var block, out var correction);
Ymf825Driver.ConvertForFrequencyMultiplier(correction, out var integer, out var fraction);
var freq = Ymf825Driver.CalcFrequency(fnum, block);
Console.WriteLine($"key: {key}, freq: {freq:f1} Hz, fnum: {fnum:f0}, block: {block}, correction: {correction:f3}, integer: {integer}, fraction: {fraction}");
driver.Section(() =>
{
driver.SetVoiceNumber(0);
driver.SetVoiceVolume(15);
driver.SetFrequencyMultiplier(integer, fraction);
driver.SetFnumAndBlock((int)Math.Round(fnum), block);
driver.SetToneFlag(0, true, false, false);
});
}
private void SendNoteOn(int channel, int key, int velocity)
{
var volume = velocity / 127.0;
Ymf825Driver.GetFnumAndBlock(key, out var fnum, out var block, out var correction);
corrections[channel] = correction;
correction *= pitchBends[channel] * fineTune[channel];
Ymf825Driver.ConvertForFrequencyMultiplier(correction, out var integer, out var fraction);
Driver.Section(() =>
{
Driver.SetVoiceNumber(channel);
Driver.SetChannelVolume((int)Math.Round(volume * 31.0), false);
Driver.SetFrequencyMultiplier(integer, fraction);
Driver.SetFnumAndBlock((int)Math.Round(fnum), block);
Driver.SetToneFlag(channel, true, false, false);
});
}
private void Rpn(int channel)
{
if (rpnMsb[channel] == 0 && rpnLsb[channel] == 1)
{
var bendData = ((dataEntryMsb[channel] << 7) | dataEntryLsb[channel]) - 8192;
// precalc: Math.Pow(2.0, 2.0 / 12.0) = 1.122462048309373
fineTune[channel] = Math.Pow(Math.Pow(2.0, 2.0 / 12.0), bendData / 8192.0);
var correction = corrections[channel] * pitchBends[channel] * fineTune[channel];
Ymf825Driver.ConvertForFrequencyMultiplier(correction, out var integer, out var fraction);
Driver.Section(() =>
{
Driver.SetVoiceNumber(channel);
Driver.SetFrequencyMultiplier(integer, fraction);
});
}
if (rpnMsb[channel] == 0 && rpnLsb[channel] == 0)
{
pitchBendWidth[channel] = dataEntryMsb[channel];
}
}
private static void Main()
{
Console.WriteLine("Image type: {0}bit", Environment.Is64BitProcess ? "64" : "32");
if (D2XxSpi.DeviceCount < 1)
{
return;
}
using (var ymf825 = SelectInterface())
{
var driver = new Ymf825Driver(ymf825);
driver.EnableSectionMode();
Console.WriteLine("Software Reset");
driver.ResetSoftware();
{
Console.WriteLine("Tone Init");
var tones = new ToneParameterCollection {
[0] = ToneParameter.GetSine()
};
driver.Section(() =>
{
driver.WriteContentsData(tones, 0);
driver.SetSequencerSetting(SequencerSetting.AllKeyOff | SequencerSetting.AllMute | SequencerSetting.AllEgReset |
SequencerSetting.R_FIFOR | SequencerSetting.R_SEQ | SequencerSetting.R_FIFO);
}, 1);
driver.Section(() =>
{
driver.SetSequencerSetting(SequencerSetting.Reset);
driver.SetToneFlag(0, false, true, true);
driver.SetChannelVolume(31, true);
driver.SetVibratoModuration(0);
driver.SetFrequencyMultiplier(1, 0);
});
}
var noteon = new Action <int>(key =>
{
Ymf825Driver.GetFnumAndBlock(key, out var fnum, out var block, out var correction);
Ymf825Driver.ConvertForFrequencyMultiplier(correction, out var integer, out var fraction);
var freq = Ymf825Driver.CalcFrequency(fnum, block);
Console.WriteLine("key: {0}, freq: {4:f1} Hz, fnum: {5:f0}, block: {6}, correction: {1:f3}, integer: {2}, fraction: {3}", key, correction, integer, fraction, freq, fnum, block);
driver.Section(() =>
{
driver.SetVoiceNumber(0);
driver.SetVoiceVolume(15);
driver.SetFrequencyMultiplier(integer, fraction);
driver.SetFnumAndBlock((int)Math.Round(fnum), block);
driver.SetToneFlag(0, true, false, false);
});
});
var noteoff = new Action(() =>
{
driver.Section(() => driver.SetToneFlag(0, false, false, false));
});
var index = 0;
var score = new[]
{
60, 62, 64, 65, 67, 69, 71, 72,
72, 74, 76, 77, 79, 81, 83, 84,
84, 83, 81, 79, 77, 76, 74, 72,
72, 71, 69, 67, 65, 64, 62, 60
};
while (true)
{
const int noteOnTime = 250;
const int sleepTime = 0;
noteon(score[index]);
Thread.Sleep(noteOnTime);
noteoff();
Thread.Sleep(sleepTime);
if (Console.KeyAvailable)
{
break;
}
index++;
if (index >= score.Length)
{
index = 0;
}
}
ymf825.InvokeHardwareReset();
}
}