private void Normalize(ToneParamPM8 tone, uint output)
{
float ss = 0;
for (int i = 0; i < 4; i++)
{
if ((output & (1 << i)) == 0)
{
continue;
}
var env = tone.Op[i].Env;
var l = Mathf.Pow(2.0f, -env.TL * (1.0f / 8.0f));
ss += l * l;
}
var ll = (int)(Mathf.Log(Mathf.Sqrt(ss), 2.0f) * -8.0f);
for (int i = 0; i < 4; i++)
{
if ((output & (1 << i)) == 0)
{
continue;
}
var env = tone.Op[i].Env;
var tl = env.TL - ll;
tl = (tl < 0) ? 0 : (tl > 127) ? 127 : tl;
env.TL = (byte)tl;
}
}
private void loadTone(ToneParamPM8 tone)
{
param = (ToneParamPM8)tone.Clone();
{
var obj = transform.Find("Panel/FM").gameObject;
setSliderValue(obj, "Algorithm", "al:", 0, 7, param.Al);
setSliderValue(obj, "Feedback", "fb:", 0, 7, param.Fb);
setSliderValue(obj, "WaveForm", "lw:", 0, 7, param.Lfo.WS);
setSliderValue(obj, "Frequency", "lf:", 0, 127, param.Lfo.LF);
setSliderValue(obj, "PMPower", "lp:", 0, 127, param.Lfo.LP);
setSliderValue(obj, "AMPower", "la:", 0, 127, param.Lfo.LA);
if (param.Extended)
{
setSliderValue(obj, "AttackRate", "ar:", 0, 127, param.Lfo.Env.ExAR);
setSliderValue(obj, "DecayRate", "dr:", 0, 127, param.Lfo.Env.ExDR);
setSliderValue(obj, "SustainLevel", "sl:", 0, 127, param.Lfo.Env.ExSL);
setSliderValue(obj, "SustainRate", "sr:", 0, 127, param.Lfo.Env.ExSR);
setSliderValue(obj, "ReleaseRate", "rr:", 0, 127, param.Lfo.Env.ExRR);
}
else
{
setSliderValue(obj, "AttackRate", "ar:", 0, 31, param.Lfo.Env.AR);
setSliderValue(obj, "DecayRate", "dr:", 0, 31, param.Lfo.Env.DR);
setSliderValue(obj, "SustainLevel", "sl:", 0, 15, param.Lfo.Env.SL);
setSliderValue(obj, "SustainRate", "sr:", 0, 31, param.Lfo.Env.SR);
setSliderValue(obj, "ReleaseRate", "rr:", 0, 15, param.Lfo.Env.RR);
}
}
for (int i = 0; i < 4; i++)
{
int n = i;
var obj = transform.Find("Panel/OP" + (i + 1)).gameObject;
setSliderValue(obj, "WaveStyle", "ws:", 0, 7, param.Op[n].WS);
setSliderValue(obj, "AMEnable", "ae:", 0, 1, param.Op[n].AE);
setSliderValue(obj, "Multiple", "ml:", 0, 15, param.Op[n].Ml);
setSliderValue(obj, "Detune", "dt:", 0, 7, param.Op[n].Dt);
setSliderValue(obj, "KeyScale", "ks:", 0, 3, param.Op[n].Env.KS);
setSliderValue(obj, "VelocitySense", "vs:", 0, 7, param.Op[n].Env.VS);
setSliderValue(obj, "TotalLevel", "tl:", 0, 127, param.Op[n].Env.TL);
if (param.Extended)
{
setSliderValue(obj, "AttackRate", "ar:", 0, 127, param.Op[n].Env.ExAR);
setSliderValue(obj, "DecayRate", "dr:", 0, 127, param.Op[n].Env.ExDR);
setSliderValue(obj, "SustainLevel", "sl:", 0, 127, param.Op[n].Env.ExSL);
setSliderValue(obj, "SustainRate", "sr:", 0, 127, param.Op[n].Env.ExSR);
setSliderValue(obj, "ReleaseRate", "rr:", 0, 127, param.Op[n].Env.ExRR);
}
else
{
setSliderValue(obj, "AttackRate", "ar:", 0, 31, param.Op[n].Env.AR);
setSliderValue(obj, "DecayRate", "dr:", 0, 31, param.Op[n].Env.DR);
setSliderValue(obj, "SustainLevel", "sl:", 0, 15, param.Op[n].Env.SL);
setSliderValue(obj, "SustainRate", "sr:", 0, 31, param.Op[n].Env.SR);
setSliderValue(obj, "ReleaseRate", "rr:", 0, 15, param.Op[n].Env.RR);
}
}
{
var extend = transform.Find("Panel/Extend").GetComponent <Toggle>();
extend.isOn = param.Extended;
}
applyTone();
}
private void GenerateRandom(RandomMode mode)
{
var tone = new ToneParamPM8();
tone.Extended = mode != RandomMode.Normal;
tone.Al = GetRandomValue(0, 7);
tone.Fb = GetRandomValue(0, 7, 3.0f);
uint output;
// al0 fb-0-1-2-3
// al1 [[fb-0]+1]-2-3
// al2 [[fb-0]+[1-2]]-3
// al3 [[fb-0-1]+2]-3
// al4 [fb-0-1]+[2-3]
// al5 [fb-0]-[1+2+3]
// al6 [fb-0-1]+2+3
// al7 [fb-0]+1+2+3
switch (tone.Al)
{
case 0:
case 1:
case 2:
case 3:
output = 0x8;
break;
case 4:
output = 0xa;
break;
case 5:
case 6:
output = 0xe;
break;
case 7:
default:
output = 0xf;
break;
}
for (int i = 0; i < 4; i++)
{
var op = tone.Op[i];
bool o = (output & (1 << i)) != 0;
op.WS = (mode != RandomMode.Ex) ? (byte)0 : GetRandomValue(0, 0, 0, 1, 2, 3, 6, 7);
op.AE = 0;
op.Fx = 0;
var env = op.Env;
if (mode == RandomMode.Tx)
{
op.Ml = (byte)((GetRandomValue(0, 15) + 1) & 15);
op.MF = 0;
op.Dt = GetRandomValue(0, 7);
env.TL = GetRandomValue(0, 64);
if (o)
{
env.ExAR = GetRandomValue(32, 127);
env.ExDR = GetRandomValue(0, 127);
env.ExSL = GetRandomValue(0, 127);
env.ExSR = GetRandomValue(0, 127);
env.ExRR = GetRandomValue(32, 127);
env.VS = 1;
env.KS = 0;
}
else
{
env.ExAR = GetRandomValue(0, 127);
env.ExDR = GetRandomValue(0, 127);
env.ExSL = GetRandomValue(0, 127);
env.ExSR = GetRandomValue(0, 127);
env.ExRR = GetRandomValue(0, 127);
env.VS = 0; // normal ? (byte)0 : GetRandomValue(0, 7);
env.KS = 0; // normal ? (byte)0 : GetRandomValue(0, 3);
}
}
else
{
if (o)
{
op.Ml = (byte)((GetRandomValue(0, 15, 5.0f) + 1) & 15);
op.MF = 0;
op.Dt = GetRandomValue(0, 7, 2.0f);
env.TL = GetRandomValue(0, 64, 2.0f);
env.ExAR = GetRandomValue(32, 127, 0.8f);
env.ExDR = GetRandomValue(0, 127, 1.5f);
env.ExSL = GetRandomValue(0, 127, 1.5f);
env.ExSR = GetRandomValue(0, 127, 3.0f);
env.ExRR = GetRandomValue(32, 127, 0.8f);
env.VS = 1;
env.KS = 0;
}
else
{
op.Ml = (byte)((GetRandomValue(0, 15, 3.0f) + 1) & 15);
op.MF = 0;
op.Dt = GetRandomValue(0, 7, 1.0f);
env.TL = GetRandomValue(0, 118, 2.0f);
env.ExAR = GetRandomValue(0, 127, 0.5f);
env.ExDR = GetRandomValue(0, 127, 0.7f);
env.ExSL = GetRandomValue(0, 127, 1.0f);
env.ExSR = GetRandomValue(0, 127, 3.0f);
env.ExRR = GetRandomValue(0, 127, 2.0f);
env.VS = 0; // normal ? (byte)0 : GetRandomValue(0, 7);
env.KS = 0; // normal ? (byte)0 : GetRandomValue(0, 3);
}
}
}
Normalize(tone, output);
loadTone(tone);
}
private void Awake()
{
syntheStation = GameObject.FindObjectOfType <MySyntheStation>();
sampleTools = GameObject.FindObjectOfType <SampleTools>();
mmlBox = sampleTools.GetComponent <MyMMLBox>();
{
Toggle extend = transform.Find("Panel/Extend").GetComponent <Toggle>();
extend.onValueChanged.AddListener((value) =>
{
param.Extended = value;
loadTone(param);
});
}
{
inputField = transform.Find("Panel/InputField").GetComponent <InputField>();
inputField.onEndEdit.AddListener((v) =>
{
var tone = new ToneParamPM8();
if (tone.LoadFromString(v))
{
loadTone(tone);
}
});
var presets = GetComponentsInChildren <PresetButton>();
foreach (var pb in presets)
{
var btn = pb.GetComponent <Button>();
var tp = new ToneParamPM8(pb.ToneData);
btn.onClick.AddListener(() =>
{
loadTone(tp);
inputField.text = param.ToString();
});
}
}
{
var obj = transform.Find("Panel/FM").gameObject;
setupSlider(obj, "Algorithm", "al:", (val) => { param.Al = (Byte)val; applyTone(); });
setupSlider(obj, "Feedback", "fb:", (val) => { param.Fb = (Byte)val; applyTone(); });
setupSlider(obj, "WaveForm", "lw:", (val) => { param.Lfo.WS = (Byte)val; applyTone(); });
setupSlider(obj, "Frequency", "lf:", (val) => { param.Lfo.LF = (Byte)val; applyTone(); });
setupSlider(obj, "PMPower", "lp:", (val) => { param.Lfo.LP = (Byte)val; applyTone(); });
setupSlider(obj, "AMPower", "la:", (val) => { param.Lfo.LA = (Byte)val; applyTone(); });
setupSlider(obj, "AttackRate", "ar:", (val) => { if (param.Extended)
{
param.Lfo.Env.ExAR = (Byte)val;
}
else
{
param.Lfo.Env.AR = (Byte)val;
}; applyTone(); });
setupSlider(obj, "DecayRate", "dr:", (val) => { if (param.Extended)
{
param.Lfo.Env.ExDR = (Byte)val;
}
else
{
param.Lfo.Env.DR = (Byte)val;
}; applyTone(); });
setupSlider(obj, "SustainLevel", "sl:", (val) => { if (param.Extended)
{
param.Lfo.Env.ExSL = (Byte)val;
}
else
{
param.Lfo.Env.SL = (Byte)val;
}; applyTone(); });
setupSlider(obj, "SustainRate", "sr:", (val) => { if (param.Extended)
{
param.Lfo.Env.ExSR = (Byte)val;
}
else
{
param.Lfo.Env.SR = (Byte)val;
}; applyTone(); });
setupSlider(obj, "ReleaseRate", "rr:", (val) => { if (param.Extended)
{
param.Lfo.Env.ExRR = (Byte)val;
}
else
{
param.Lfo.Env.RR = (Byte)val;
}; applyTone(); });
}
for (int i = 0; i < 4; i++)
{
int n = i;
var obj = transform.Find("Panel/OP" + (i + 1)).gameObject;
setupSlider(obj, "WaveStyle", "ws:", (val) => { param.Op[n].WS = (Byte)val; applyTone(); });
setupSlider(obj, "AMEnable", "ae:", (val) => { param.Op[n].AE = (Byte)val; applyTone(); });
setupSlider(obj, "Multiple", "ml:", (val) => { param.Op[n].Ml = (Byte)val; applyTone(); });
setupSlider(obj, "Detune", "dt:", (val) => { param.Op[n].Dt = (Byte)val; applyTone(); });
setupSlider(obj, "KeyScale", "ks:", (val) => { param.Op[n].Env.KS = (Byte)val; applyTone(); });
setupSlider(obj, "VelocitySense", "vs:", (val) => { param.Op[n].Env.VS = (Byte)val; applyTone(); });
setupSlider(obj, "TotalLevel", "tl:", (val) => { param.Op[n].Env.TL = (Byte)val; applyTone(); });
setupSlider(obj, "AttackRate", "ar:", (val) => { if (param.Extended)
{
param.Op[n].Env.ExAR = (Byte)val;
}
else
{
param.Op[n].Env.AR = (Byte)val;
}; applyTone(); });
setupSlider(obj, "DecayRate", "dr:", (val) => { if (param.Extended)
{
param.Op[n].Env.ExDR = (Byte)val;
}
else
{
param.Op[n].Env.DR = (Byte)val;
}; applyTone(); });
setupSlider(obj, "SustainLevel", "sl:", (val) => { if (param.Extended)
{
param.Op[n].Env.ExSL = (Byte)val;
}
else
{
param.Op[n].Env.SL = (Byte)val;
}; applyTone(); });
setupSlider(obj, "SustainRate", "sr:", (val) => { if (param.Extended)
{
param.Op[n].Env.ExSR = (Byte)val;
}
else
{
param.Op[n].Env.SR = (Byte)val;
}; applyTone(); });
setupSlider(obj, "ReleaseRate", "rr:", (val) => { if (param.Extended)
{
param.Op[n].Env.ExRR = (Byte)val;
}
else
{
param.Op[n].Env.RR = (Byte)val;
}; applyTone(); });
}
{
var keyboard = transform.Find("Panel/Keyboard").GetComponent <Keyboard>();
keyboard.PortNo = portNo;
keyboard.ChNo = chNo;
}
{
var mmlEditorCanvas = transform.parent.Find("MMLPlayerCanvas");
var button = transform.Find("Panel/MMLEditorButton").GetComponent <Button>();
button.onClick.AddListener(() =>
{
mmlBox.Play("Click");
sampleTools.MoveCameraTo(mmlEditorCanvas.localPosition);
mmlEditorCanvas.GetComponent <CanvasGroup>().interactable = true;
this.GetComponent <CanvasGroup>().interactable = false;
});
}
{
var button = transform.Find("Panel/Random").GetComponent <Button>();
button.onClick.AddListener(() =>
{
GenerateRandom(RandomMode.Normal);
});
}
{
var button = transform.Find("Panel/RandomEx").GetComponent <Button>();
button.onClick.AddListener(() =>
{
GenerateRandom(RandomMode.Ex);
});
}
{
var button = transform.Find("Panel/RandomTx").GetComponent <Button>();
button.onClick.AddListener(() =>
{
GenerateRandom(RandomMode.Tx);
});
}
}
