public static void Put(Tone @Tone, ref string Buffer)
{
if (Tone.IsValid())
{
var Header = String.Format("@{0}", Tone.Number) + Put(Tone.AL) + Put(Tone.FB) + String.Format(" = {0}", Tone.Name) + "\n";
var Op0 = Put(Tone.aOp[0]) + "\n";
var Op1 = Put(Tone.aOp[1]) + "\n";
var Op2 = Put(Tone.aOp[2]) + "\n";
var Op3 = Put(Tone.aOp[3]) + "\n";
Buffer += Header + Op0 + Op1 + Op2 + Op3 + "\n";
}
}
public static void Put(Tone @Tone, ref string Buffer)
{
if (Tone.IsValid())
{
var Entry = " " + String.Format("@{0}:{{", Tone.Number) + "\n";
var Header = " " + Put(Tone.FB) + Put(Tone.AL).TrimEnd(',') + "\n";
var Op0 = " " + Put(Tone.aOp[0]) + "\n";
var Op1 = " " + Put(Tone.aOp[1]) + "\n";
var Op2 = " " + Put(Tone.aOp[2]) + "\n";
var Op3 = " " + Put(Tone.aOp[3]) + String.Format(",\"{0}\"}}", Tone.Name) + "\n";
Buffer += Entry + Header + Op0 + Op1 + Op2 + Op3 + "\n";
}
}
public static void Put(Tone @Tone, ref string Buffer)
{
if (Tone.IsValid())
{
var Name = String.Format("({0})", Tone.Name) + "\n";
var Header = "'@ " + String.Format("FA {0}", Tone.Number) + "\n";
var Op0 = "'@ " + Put(Tone.aOp[0]) + "\n";
var Op1 = "'@ " + Put(Tone.aOp[1]) + "\n";
var Op2 = "'@ " + Put(Tone.aOp[2]) + "\n";
var Op3 = "'@ " + Put(Tone.aOp[3]) + "\n";
var Footer = "'@ " + Put(Tone.AL) + Put(Tone.FB).TrimEnd(',') + "\n";
Buffer += Name + Header + Op0 + Op1 + Op2 + Op3 + Footer + "\n";
}
}
public static void Put(Tone @Tone, ref byte[] Buffer)
{
if (Tone.IsValid())
{
int o = Tone.Number * PutLength();
Buffer[o + (int)ePut.Void] = 0;
Buffer[o + (int)ePut.DTML0] = (byte)((Tone.aOp[0].DT << 4) | Tone.aOp[0].ML);
Buffer[o + (int)ePut.DTML1] = (byte)((Tone.aOp[1].DT << 4) | Tone.aOp[1].ML);
Buffer[o + (int)ePut.DTML2] = (byte)((Tone.aOp[2].DT << 4) | Tone.aOp[2].ML);
Buffer[o + (int)ePut.DTML3] = (byte)((Tone.aOp[3].DT << 4) | Tone.aOp[3].ML);
Buffer[o + (int)ePut.TL0] = (byte)Tone.aOp[0].TL;
Buffer[o + (int)ePut.TL1] = (byte)Tone.aOp[1].TL;
Buffer[o + (int)ePut.TL2] = (byte)Tone.aOp[2].TL;
Buffer[o + (int)ePut.TL3] = (byte)Tone.aOp[3].TL;
Buffer[o + (int)ePut.KSAR0] = (byte)((Tone.aOp[0].KS << 6) | Tone.aOp[0].AR);
Buffer[o + (int)ePut.KSAR1] = (byte)((Tone.aOp[1].KS << 6) | Tone.aOp[1].AR);
Buffer[o + (int)ePut.KSAR2] = (byte)((Tone.aOp[2].KS << 6) | Tone.aOp[2].AR);
Buffer[o + (int)ePut.KSAR3] = (byte)((Tone.aOp[3].KS << 6) | Tone.aOp[3].AR);
Buffer[o + (int)ePut.DR0] = (byte)Tone.aOp[0].DR;
Buffer[o + (int)ePut.DR1] = (byte)Tone.aOp[1].DR;
Buffer[o + (int)ePut.DR2] = (byte)Tone.aOp[2].DR;
Buffer[o + (int)ePut.DR3] = (byte)Tone.aOp[3].DR;
Buffer[o + (int)ePut.SR0] = (byte)Tone.aOp[0].SR;
Buffer[o + (int)ePut.SR1] = (byte)Tone.aOp[1].SR;
Buffer[o + (int)ePut.SR2] = (byte)Tone.aOp[2].SR;
Buffer[o + (int)ePut.SR3] = (byte)Tone.aOp[3].SR;
Buffer[o + (int)ePut.SLRR0] = (byte)((Tone.aOp[0].SL << 4) | Tone.aOp[0].RR);
Buffer[o + (int)ePut.SLRR1] = (byte)((Tone.aOp[1].SL << 4) | Tone.aOp[1].RR);
Buffer[o + (int)ePut.SLRR2] = (byte)((Tone.aOp[2].SL << 4) | Tone.aOp[2].RR);
Buffer[o + (int)ePut.SLRR3] = (byte)((Tone.aOp[3].SL << 4) | Tone.aOp[3].RR);
Buffer[o + (int)ePut.FBAL] = (byte)((Tone.FB << 3) | Tone.AL);
Buffer[o + (int)ePut.Name0] = (byte)((Tone.Name.Length > 0) ? Tone.Name[0] : 0);
Buffer[o + (int)ePut.Name1] = (byte)((Tone.Name.Length > 1) ? Tone.Name[1] : 0);
Buffer[o + (int)ePut.Name2] = (byte)((Tone.Name.Length > 2) ? Tone.Name[2] : 0);
Buffer[o + (int)ePut.Name3] = (byte)((Tone.Name.Length > 3) ? Tone.Name[3] : 0);
Buffer[o + (int)ePut.Name4] = (byte)((Tone.Name.Length > 4) ? Tone.Name[4] : 0);
Buffer[o + (int)ePut.Name5] = (byte)((Tone.Name.Length > 5) ? Tone.Name[5] : 0);
}
}
public static void Put(Tone @Tone, ref byte[] Buffer)
{
if (Tone.IsValid() && Tone.Number < ToneLength())
{
int o = HeadLength() + (Tone.Number * PutLength());
Buffer[o + (int)ePut.AR0] = (byte)Tone.aOp[0].AR;
Buffer[o + (int)ePut.AR1] = (byte)Tone.aOp[1].AR;
Buffer[o + (int)ePut.AR2] = (byte)Tone.aOp[2].AR;
Buffer[o + (int)ePut.AR3] = (byte)Tone.aOp[3].AR;
Buffer[o + (int)ePut.DR0] = (byte)Tone.aOp[0].DR;
Buffer[o + (int)ePut.DR1] = (byte)Tone.aOp[1].DR;
Buffer[o + (int)ePut.DR2] = (byte)Tone.aOp[2].DR;
Buffer[o + (int)ePut.DR3] = (byte)Tone.aOp[3].DR;
Buffer[o + (int)ePut.SR0] = (byte)Tone.aOp[0].SR;
Buffer[o + (int)ePut.SR1] = (byte)Tone.aOp[1].SR;
Buffer[o + (int)ePut.SR2] = (byte)Tone.aOp[2].SR;
Buffer[o + (int)ePut.SR3] = (byte)Tone.aOp[3].SR;
Buffer[o + (int)ePut.RR0] = (byte)Tone.aOp[0].RR;
Buffer[o + (int)ePut.RR1] = (byte)Tone.aOp[1].RR;
Buffer[o + (int)ePut.RR2] = (byte)Tone.aOp[2].RR;
Buffer[o + (int)ePut.RR3] = (byte)Tone.aOp[3].RR;
Buffer[o + (int)ePut.SL0] = (byte)Tone.aOp[0].SL;
Buffer[o + (int)ePut.SL1] = (byte)Tone.aOp[1].SL;
Buffer[o + (int)ePut.SL2] = (byte)Tone.aOp[2].SL;
Buffer[o + (int)ePut.SL3] = (byte)Tone.aOp[3].SL;
Buffer[o + (int)ePut.TL0] = (byte)Tone.aOp[0].TL;
Buffer[o + (int)ePut.TL1] = (byte)Tone.aOp[1].TL;
Buffer[o + (int)ePut.TL2] = (byte)Tone.aOp[2].TL;
Buffer[o + (int)ePut.TL3] = (byte)Tone.aOp[3].TL;
Buffer[o + (int)ePut.KS0] = (byte)Tone.aOp[0].KS;
Buffer[o + (int)ePut.KS1] = (byte)Tone.aOp[1].KS;
Buffer[o + (int)ePut.KS2] = (byte)Tone.aOp[2].KS;
Buffer[o + (int)ePut.KS3] = (byte)Tone.aOp[3].KS;
Buffer[o + (int)ePut.ML0] = (byte)Tone.aOp[0].ML;
Buffer[o + (int)ePut.ML1] = (byte)Tone.aOp[1].ML;
Buffer[o + (int)ePut.ML2] = (byte)Tone.aOp[2].ML;
Buffer[o + (int)ePut.ML3] = (byte)Tone.aOp[3].ML;
Buffer[o + (int)ePut.DT1_0] = (byte)Tone.aOp[0].DT;
Buffer[o + (int)ePut.DT1_1] = (byte)Tone.aOp[1].DT;
Buffer[o + (int)ePut.DT1_2] = (byte)Tone.aOp[2].DT;
Buffer[o + (int)ePut.DT1_3] = (byte)Tone.aOp[3].DT;
Buffer[o + (int)ePut.DT2_0] = (byte)Tone.aOp[0].DT2;
Buffer[o + (int)ePut.DT2_1] = (byte)Tone.aOp[1].DT2;
Buffer[o + (int)ePut.DT2_2] = (byte)Tone.aOp[2].DT2;
Buffer[o + (int)ePut.DT2_3] = (byte)Tone.aOp[3].DT2;
Buffer[o + (int)ePut.AM0] = (byte)Tone.aOp[0].AM;
Buffer[o + (int)ePut.AM1] = (byte)Tone.aOp[1].AM;
Buffer[o + (int)ePut.AM2] = (byte)Tone.aOp[2].AM;
Buffer[o + (int)ePut.AM3] = (byte)Tone.aOp[3].AM;
Buffer[o + (int)ePut.AL] = (byte)Tone.AL;
Buffer[o + (int)ePut.FB] = (byte)Tone.FB;
Buffer[o + (int)ePut.Mask] = 0xf << 3;
if (String.IsNullOrWhiteSpace(Tone.Name))
{
Tone.Name = Tone.Number.ToString();
}
Buffer[o + (int)ePut.Name0] = (byte)((Tone.Name.Length > 0) ? Tone.Name[0] : 0);
Buffer[o + (int)ePut.Name1] = (byte)((Tone.Name.Length > 1) ? Tone.Name[1] : 0);
Buffer[o + (int)ePut.Name2] = (byte)((Tone.Name.Length > 2) ? Tone.Name[2] : 0);
Buffer[o + (int)ePut.Name3] = (byte)((Tone.Name.Length > 3) ? Tone.Name[3] : 0);
Buffer[o + (int)ePut.Name4] = (byte)((Tone.Name.Length > 4) ? Tone.Name[4] : 0);
Buffer[o + (int)ePut.Name5] = (byte)((Tone.Name.Length > 5) ? Tone.Name[5] : 0);
Buffer[o + (int)ePut.Name6] = (byte)((Tone.Name.Length > 6) ? Tone.Name[6] : 0);
Buffer[o + (int)ePut.Name7] = (byte)((Tone.Name.Length > 7) ? Tone.Name[7] : 0);
Buffer[o + (int)ePut.Name8] = (byte)((Tone.Name.Length > 8) ? Tone.Name[8] : 0);
Buffer[o + (int)ePut.Name9] = (byte)((Tone.Name.Length > 9) ? Tone.Name[9] : 0);
Buffer[o + (int)ePut.Name10] = (byte)((Tone.Name.Length > 10) ? Tone.Name[10] : 0);
Buffer[o + (int)ePut.Name11] = (byte)((Tone.Name.Length > 11) ? Tone.Name[11] : 0);
Buffer[o + (int)ePut.Name12] = (byte)((Tone.Name.Length > 12) ? Tone.Name[12] : 0);
Buffer[o + (int)ePut.Name13] = (byte)((Tone.Name.Length > 13) ? Tone.Name[13] : 0);
Buffer[o + (int)ePut.Name14] = (byte)((Tone.Name.Length > 14) ? Tone.Name[14] : 0);
Buffer[o + (int)ePut.Name15] = (byte)((Tone.Name.Length > 15) ? Tone.Name[15] : 0);
}
}
static void Get(ref Tone @Tone, byte[] Buffer, int i)
{
int o = HeadLength() + (i * PutLength());
int O = o + NameLength();
Tone.aOp[0].AR = Get(Buffer, O, (int)ePut.AR0, 31);
Tone.aOp[1].AR = Get(Buffer, O, (int)ePut.AR1, 31);
Tone.aOp[2].AR = Get(Buffer, O, (int)ePut.AR2, 31);
Tone.aOp[3].AR = Get(Buffer, O, (int)ePut.AR3, 31);
Tone.aOp[0].DR = Get(Buffer, O, (int)ePut.DR0, 31);
Tone.aOp[1].DR = Get(Buffer, O, (int)ePut.DR1, 31);
Tone.aOp[2].DR = Get(Buffer, O, (int)ePut.DR2, 31);
Tone.aOp[3].DR = Get(Buffer, O, (int)ePut.DR3, 31);
Tone.aOp[0].SR = Get(Buffer, O, (int)ePut.SR0, 31);
Tone.aOp[1].SR = Get(Buffer, O, (int)ePut.SR1, 31);
Tone.aOp[2].SR = Get(Buffer, O, (int)ePut.SR2, 31);
Tone.aOp[3].SR = Get(Buffer, O, (int)ePut.SR3, 31);
Tone.aOp[0].RR = Get(Buffer, O, (int)ePut.RR0, 15);
Tone.aOp[1].RR = Get(Buffer, O, (int)ePut.RR1, 15);
Tone.aOp[2].RR = Get(Buffer, O, (int)ePut.RR2, 15);
Tone.aOp[3].RR = Get(Buffer, O, (int)ePut.RR3, 15);
Tone.aOp[0].SL = Get(Buffer, O, (int)ePut.SL0, 15);
Tone.aOp[1].SL = Get(Buffer, O, (int)ePut.SL1, 15);
Tone.aOp[2].SL = Get(Buffer, O, (int)ePut.SL2, 15);
Tone.aOp[3].SL = Get(Buffer, O, (int)ePut.SL3, 15);
Tone.aOp[0].TL = Get(Buffer, O, (int)ePut.TL0, 127);
Tone.aOp[1].TL = Get(Buffer, O, (int)ePut.TL1, 127);
Tone.aOp[2].TL = Get(Buffer, O, (int)ePut.TL2, 127);
Tone.aOp[3].TL = Get(Buffer, O, (int)ePut.TL3, 127);
Tone.aOp[0].KS = Get(Buffer, O, (int)ePut.KS0, 3);
Tone.aOp[1].KS = Get(Buffer, O, (int)ePut.KS1, 3);
Tone.aOp[2].KS = Get(Buffer, O, (int)ePut.KS2, 3);
Tone.aOp[3].KS = Get(Buffer, O, (int)ePut.KS3, 3);
Tone.aOp[0].ML = Get(Buffer, O, (int)ePut.ML0, 15);
Tone.aOp[1].ML = Get(Buffer, O, (int)ePut.ML1, 15);
Tone.aOp[2].ML = Get(Buffer, O, (int)ePut.ML2, 15);
Tone.aOp[3].ML = Get(Buffer, O, (int)ePut.ML3, 15);
Tone.aOp[0].DT = Get(Buffer, O, (int)ePut.DT1_0, 99);
Tone.aOp[1].DT = Get(Buffer, O, (int)ePut.DT1_1, 99);
Tone.aOp[2].DT = Get(Buffer, O, (int)ePut.DT1_2, 99);
Tone.aOp[3].DT = Get(Buffer, O, (int)ePut.DT1_3, 99);
Tone.aOp[0].DT2 = Get(Buffer, O, (int)ePut.DT2_0, 3);
Tone.aOp[1].DT2 = Get(Buffer, O, (int)ePut.DT2_1, 3);
Tone.aOp[2].DT2 = Get(Buffer, O, (int)ePut.DT2_2, 3);
Tone.aOp[3].DT2 = Get(Buffer, O, (int)ePut.DT2_3, 3);
Tone.AL = Get(Buffer, O, (int)ePut.AL, 7);
Tone.FB = Get(Buffer, O, (int)ePut.FB, 7);
var aChar = new char[]
{
(char)Buffer[o + (int)eName.Name0],
(char)Buffer[o + (int)eName.Name1],
(char)Buffer[o + (int)eName.Name2],
(char)Buffer[o + (int)eName.Name3],
(char)Buffer[o + (int)eName.Name4],
(char)Buffer[o + (int)eName.Name5],
(char)Buffer[o + (int)eName.Name6],
(char)Buffer[o + (int)eName.Name7],
(char)Buffer[o + (int)eName.Name8],
(char)Buffer[o + (int)eName.Name9],
(char)Buffer[o + (int)eName.Name10],
(char)Buffer[o + (int)eName.Name11],
(char)Buffer[o + (int)eName.Name12],
(char)Buffer[o + (int)eName.Name13],
(char)Buffer[o + (int)eName.Name14],
(char)Buffer[o + (int)eName.Name15],
(char)Buffer[o + (int)eName.Name16],
(char)Buffer[o + (int)eName.Name17],
(char)Buffer[o + (int)eName.Name18],
(char)Buffer[o + (int)eName.Name19],
(char)Buffer[o + (int)eName.Name20],
};
Tone.Name = "";
foreach (var Char in aChar)
{
if (Char != 0)
{
Tone.Name += Char.ToString();
}
}
Tone.Number = i;
}
public static void Put(Tone @Tone, ref byte[] Buffer)
{
if (Tone.IsValid() && Tone.Number < ToneLength())
{
int o = HeadLength() + (Tone.Number * PutLength());
int O = o + NameLength();
Put(Buffer, O, (int)ePut.AR0, 31, Tone.aOp[0].AR);
Put(Buffer, O, (int)ePut.AR1, 31, Tone.aOp[1].AR);
Put(Buffer, O, (int)ePut.AR2, 31, Tone.aOp[2].AR);
Put(Buffer, O, (int)ePut.AR3, 31, Tone.aOp[3].AR);
Put(Buffer, O, (int)ePut.DR0, 31, Tone.aOp[0].DR);
Put(Buffer, O, (int)ePut.DR1, 31, Tone.aOp[1].DR);
Put(Buffer, O, (int)ePut.DR2, 31, Tone.aOp[2].DR);
Put(Buffer, O, (int)ePut.DR3, 31, Tone.aOp[3].DR);
Put(Buffer, O, (int)ePut.SR0, 31, Tone.aOp[0].SR);
Put(Buffer, O, (int)ePut.SR1, 31, Tone.aOp[1].SR);
Put(Buffer, O, (int)ePut.SR2, 31, Tone.aOp[2].SR);
Put(Buffer, O, (int)ePut.SR3, 31, Tone.aOp[3].SR);
Put(Buffer, O, (int)ePut.RR0, 15, Tone.aOp[0].RR);
Put(Buffer, O, (int)ePut.RR1, 15, Tone.aOp[1].RR);
Put(Buffer, O, (int)ePut.RR2, 15, Tone.aOp[2].RR);
Put(Buffer, O, (int)ePut.RR3, 15, Tone.aOp[3].RR);
Put(Buffer, O, (int)ePut.SL0, 15, Tone.aOp[0].SL);
Put(Buffer, O, (int)ePut.SL1, 15, Tone.aOp[1].SL);
Put(Buffer, O, (int)ePut.SL2, 15, Tone.aOp[2].SL);
Put(Buffer, O, (int)ePut.SL3, 15, Tone.aOp[3].SL);
Put(Buffer, O, (int)ePut.TL0, 127, Tone.aOp[0].TL);
Put(Buffer, O, (int)ePut.TL1, 127, Tone.aOp[1].TL);
Put(Buffer, O, (int)ePut.TL2, 127, Tone.aOp[2].TL);
Put(Buffer, O, (int)ePut.TL3, 127, Tone.aOp[3].TL);
Put(Buffer, O, (int)ePut.KS0, 3, Tone.aOp[0].KS);
Put(Buffer, O, (int)ePut.KS1, 3, Tone.aOp[1].KS);
Put(Buffer, O, (int)ePut.KS2, 3, Tone.aOp[2].KS);
Put(Buffer, O, (int)ePut.KS3, 3, Tone.aOp[3].KS);
Put(Buffer, O, (int)ePut.ML0, 15, Tone.aOp[0].ML);
Put(Buffer, O, (int)ePut.ML1, 15, Tone.aOp[1].ML);
Put(Buffer, O, (int)ePut.ML2, 15, Tone.aOp[2].ML);
Put(Buffer, O, (int)ePut.ML3, 15, Tone.aOp[3].ML);
Put(Buffer, O, (int)ePut.DT1_0, 99, Tone.aOp[0].DT);
Put(Buffer, O, (int)ePut.DT1_1, 99, Tone.aOp[1].DT);
Put(Buffer, O, (int)ePut.DT1_2, 99, Tone.aOp[2].DT);
Put(Buffer, O, (int)ePut.DT1_3, 99, Tone.aOp[3].DT);
Put(Buffer, O, (int)ePut.DT2_0, 3, Tone.aOp[0].DT2);
Put(Buffer, O, (int)ePut.DT2_1, 3, Tone.aOp[1].DT2);
Put(Buffer, O, (int)ePut.DT2_2, 3, Tone.aOp[2].DT2);
Put(Buffer, O, (int)ePut.DT2_3, 3, Tone.aOp[3].DT2);
Put(Buffer, O, (int)ePut.AL, 7, Tone.AL);
Put(Buffer, O, (int)ePut.FB, 7, Tone.FB);
Put(Buffer, O, (int)ePut.MX, 7, 7);
Put(Buffer, O, (int)ePut.OS, 1, 1);
Put(Buffer, O, (int)ePut.PB, 127, 2);
if (String.IsNullOrWhiteSpace(Tone.Name))
{
Tone.Name = Tone.Number.ToString();
}
Buffer[o + (int)eName.Name0] = (byte)((Tone.Name.Length > 0) ? Tone.Name[0] : 0);
Buffer[o + (int)eName.Name1] = (byte)((Tone.Name.Length > 1) ? Tone.Name[1] : 0);
Buffer[o + (int)eName.Name2] = (byte)((Tone.Name.Length > 2) ? Tone.Name[2] : 0);
Buffer[o + (int)eName.Name3] = (byte)((Tone.Name.Length > 3) ? Tone.Name[3] : 0);
Buffer[o + (int)eName.Name4] = (byte)((Tone.Name.Length > 4) ? Tone.Name[4] : 0);
Buffer[o + (int)eName.Name5] = (byte)((Tone.Name.Length > 5) ? Tone.Name[5] : 0);
Buffer[o + (int)eName.Name6] = (byte)((Tone.Name.Length > 6) ? Tone.Name[6] : 0);
Buffer[o + (int)eName.Name7] = (byte)((Tone.Name.Length > 7) ? Tone.Name[7] : 0);
Buffer[o + (int)eName.Name8] = (byte)((Tone.Name.Length > 8) ? Tone.Name[8] : 0);
Buffer[o + (int)eName.Name9] = (byte)((Tone.Name.Length > 9) ? Tone.Name[9] : 0);
Buffer[o + (int)eName.Name10] = (byte)((Tone.Name.Length > 10) ? Tone.Name[10] : 0);
Buffer[o + (int)eName.Name11] = (byte)((Tone.Name.Length > 11) ? Tone.Name[11] : 0);
Buffer[o + (int)eName.Name12] = (byte)((Tone.Name.Length > 12) ? Tone.Name[12] : 0);
Buffer[o + (int)eName.Name13] = (byte)((Tone.Name.Length > 13) ? Tone.Name[13] : 0);
Buffer[o + (int)eName.Name14] = (byte)((Tone.Name.Length > 14) ? Tone.Name[14] : 0);
Buffer[o + (int)eName.Name15] = (byte)((Tone.Name.Length > 15) ? Tone.Name[15] : 0);
Buffer[o + (int)eName.Name16] = (byte)((Tone.Name.Length > 16) ? Tone.Name[16] : 0);
Buffer[o + (int)eName.Name17] = (byte)((Tone.Name.Length > 17) ? Tone.Name[17] : 0);
Buffer[o + (int)eName.Name18] = (byte)((Tone.Name.Length > 18) ? Tone.Name[18] : 0);
Buffer[o + (int)eName.Name19] = (byte)((Tone.Name.Length > 19) ? Tone.Name[19] : 0);
Buffer[o + (int)eName.Name20] = (byte)((Tone.Name.Length > 20) ? Tone.Name[20] : 0);
}
}
public static void Reader(string Path, Option @Option)
{
var vTone = new Tone();
bool bLineComment = false;
var BufferMuc = "";
var BufferDat = Dat.New();
var BufferFmp = "";
var BufferVopm = Vopm.New();
var BufferFMtrial = FMtrial.New();
var State = eState.Entry;
var aLine = ReadLine(Path);
foreach (var Line in aLine)
{
if (String.IsNullOrWhiteSpace(Line))
{
continue;
}
var bLine = (Line[0] == '`');
if (bLine)
{
bLineComment = !bLineComment;
continue;
}
if (bLineComment)
{
continue;
}
var bPartCommnet = false;
var bTailCommnet = false;
var aChar = Line.ToCharArray();
var oChar = 0;
foreach (var Char in aChar)
{
if (bTailCommnet)
{
aChar[oChar] = ' ';
}
var bPart = (Char == '`');
if (bPartCommnet)
{
aChar[oChar] = ' ';
}
if (bPart)
{
bPartCommnet = !bPartCommnet;
}
if (bPartCommnet)
{
aChar[oChar] = ' ';
}
if (Char == ';')
{
bTailCommnet = true;
}
if (bTailCommnet)
{
aChar[oChar] = ' ';
}
++oChar;
}
var Text = new string(aChar);
if (String.IsNullOrEmpty(Text.Trim(' ')))
{
continue;
}
switch (State)
{
case eState.Entry:
{
if (Text[0] == ' ' || Text[0] == '\t')
{
continue;
}
var bHead = Text.StartsWith("@");
var oName = Text.IndexOf('=');
if (bHead)
{
var aTok = Text.Split(new char[] { ' ', '\t', '=', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 3)
{
aTok[0] = aTok[0].Substring(1);
int.TryParse(aTok[0], out vTone.Number);
int.TryParse(aTok[1], out vTone.AL);
int.TryParse(aTok[2], out vTone.FB);
vTone.Name = (aTok.Length >= 4 && oName > 0) ? aTok[3] : "";
State = eState.Op0;
break;
}
}
break;
}
case eState.Op0:
{
var aTok = Text.Split(new char[] { ' ', '\t', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 10)
{
GetOp(aTok, ref vTone.aOp[0]);
State = eState.Op1;
break;
}
State = eState.Entry;
break;
}
case eState.Op1:
{
var aTok = Text.Split(new char[] { ' ', '\t', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 10)
{
GetOp(aTok, ref vTone.aOp[1]);
State = eState.Op2;
break;
}
State = eState.Entry;
break;
}
case eState.Op2:
{
var aTok = Text.Split(new char[] { ' ', '\t', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 10)
{
GetOp(aTok, ref vTone.aOp[2]);
State = eState.Op3;
break;
}
State = eState.Entry;
break;
}
case eState.Op3:
{
var aTok = Text.Split(new char[] { ' ', '\t', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 10)
{
GetOp(aTok, ref vTone.aOp[3]);
if (Option.bMuc)
{
Muc.Put(vTone, ref BufferMuc);
}
if (Option.bDat)
{
Dat.Put(vTone, ref BufferDat);
}
if (Option.bFmp)
{
Fmp.Put(vTone, ref BufferFmp);
}
if (Option.bVopm)
{
Vopm.Put(vTone, ref BufferVopm);
}
if (Option.bFMtrial)
{
FMtrial.Put(vTone, ref BufferFMtrial);
}
}
State = eState.Entry;
break;
}
}
}
if (Option.bMuc)
{
Muc.Writer(Path, BufferMuc);
}
if (Option.bDat)
{
Dat.Writer(Path, BufferDat);
}
if (Option.bFmp)
{
Fmp.Writer(Path, BufferFmp);
}
if (Option.bVopm)
{
Vopm.Writer(Path, BufferVopm);
}
if (Option.bFMtrial)
{
FMtrial.Writer(Path, BufferFMtrial);
}
}
public static IEnumerable <Tone> Reader(string Path, Option @Option)
{
List <Tone> tones = new List <Tone>();
var vTone = new Tone();
int nTok = 0;
var BufferMuc = "";
var BufferDat = Dat.New();
var BufferPmd = "";
var BufferVopm = Vopm.New();
var State = eState.Entry;
var aLine = ReadLine(Path);
foreach (var Line in aLine)
{
if (String.IsNullOrWhiteSpace(Line))
{
continue;
}
if (Line[0] != '\'')
{
continue;
}
var bPartCommnet = false;
var aChar = Line.ToCharArray();
var oChar = 0;
foreach (var Char in aChar)
{
var bPart = (Char == ';');
if (bPartCommnet)
{
aChar[oChar] = ' ';
}
if (bPart)
{
bPartCommnet = !bPartCommnet;
}
if (bPartCommnet)
{
aChar[oChar] = ' ';
}
++oChar;
}
var Text = new string(aChar);
switch (State)
{
case eState.Entry:
{
var bHead = Text.StartsWith("'@");
if (bHead)
{
nTok = 9;
var oSub = 0;
Text = Text.Substring(2).Trim();
if (Text.StartsWith("F"))
{
nTok = 9; oSub = 1;
}
if (Text.StartsWith("FA"))
{
nTok = 10; oSub = 2;
}
if (Text.StartsWith("FC"))
{
nTok = 11; oSub = 2;
}
Text = Text.Substring(oSub);
var aTok = Text.Split(new char[] { ' ', '\t', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 1)
{
int.TryParse(aTok[0], out vTone.Number);
State = eState.Op0;
break;
}
}
break;
}
case eState.Op0:
{
var bHead = Text.StartsWith("'@");
if (bHead)
{
Text = Text.Substring(2);
var aTok = Text.Split(new char[] { ' ', '\t', ',' }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[0], nTok);
State = eState.Op1;
break;
}
}
State = eState.Entry;
break;
}
case eState.Op1:
{
var bHead = Text.StartsWith("'@");
if (bHead)
{
Text = Text.Substring(2);
var aTok = Text.Split(new char[] { ' ', '\t', ',' }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[1], nTok);
State = eState.Op2;
break;
}
}
State = eState.Entry;
break;
}
case eState.Op2:
{
var bHead = Text.StartsWith("'@");
if (bHead)
{
Text = Text.Substring(2);
var aTok = Text.Split(new char[] { ' ', '\t', ',' }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[2], nTok);
State = eState.Op3;
break;
}
}
State = eState.Entry;
break;
}
case eState.Op3:
{
var bHead = Text.StartsWith("'@");
if (bHead)
{
Text = Text.Substring(2);
var aTok = Text.Split(new char[] { ' ', '\t', ',' }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[3], nTok);
State = eState.Header;
break;
}
}
State = eState.Entry;
break;
}
case eState.Header:
{
var bHead = Text.StartsWith("'@");
if (bHead)
{
Text = Text.Substring(2);
var aTok = Text.Split(new char[] { ' ', '\t', ',' }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 2)
{
int.TryParse(aTok[0], out vTone.AL);
int.TryParse(aTok[1], out vTone.FB);
vTone.Name = "";
if (Option.bMuc)
{
Muc.Put(vTone, ref BufferMuc);
}
if (Option.bDat)
{
Dat.Put(vTone, ref BufferDat);
}
if (Option.bPmd)
{
Pmd.Put(vTone, ref BufferPmd);
}
if (Option.bVopm)
{
Vopm.Put(vTone, ref BufferVopm);
}
if (vTone.IsValid())
{
tones.Add(new Tone(vTone));
}
}
}
State = eState.Entry;
break;
}
}
}
if (Option.bMuc)
{
Muc.Writer(Path, BufferMuc);
}
if (Option.bDat)
{
Dat.Writer(Path, BufferDat);
}
if (Option.bPmd)
{
Pmd.Writer(Path, BufferPmd);
}
if (Option.bVopm)
{
Vopm.Writer(Path, BufferVopm);
}
return(tones);
}
public static IEnumerable <Tone> Reader(string Path, Option @Option)
{
List <Tone> tones = new List <Tone>();
var Buffer = ReadByte(Path);
if (Buffer.Length == DatLength())
{
Tone vTone = new Tone();
var BufferMuc = "";
var BufferFmp = "";
var BufferPmd = "";
var BufferVopm = Vopm.New();
for (int i = 0; i < ToneLength(); ++i)
{
Get(ref vTone, Buffer, i);
if (Option.bMuc)
{
Muc.Put(vTone, ref BufferMuc);
}
if (Option.bFmp)
{
Fmp.Put(vTone, ref BufferFmp);
}
if (Option.bPmd)
{
Pmd.Put(vTone, ref BufferPmd);
}
if (Option.bVopm)
{
Vopm.Put(vTone, ref BufferVopm);
}
if (vTone.IsValid() &&
i != 0) //skip index 0 tone is dummy
{
tones.Add(new Tone(vTone));
}
}
if (Option.bMuc)
{
Muc.Writer(Path, BufferMuc);
}
if (Option.bFmp)
{
Fmp.Writer(Path, BufferFmp);
}
if (Option.bPmd)
{
Pmd.Writer(Path, BufferPmd);
}
if (Option.bVopm)
{
Vopm.Writer(Path, BufferVopm);
}
}
return(tones);
}
/// <summary>
///
/// </summary>
/// <param name="offset"></param>
/// <param name="fileName"></param>
/// <returns></returns>
public static Tone[] LoadSyx(int offset, string fileName)
{
List <Tone> tones = new List <Tone>();
int[] opidtbl = { 0, 2, 1, 3 };
var dat = System.IO.File.ReadAllBytes(fileName);
if (dat.Length != 4104)
{
return(tones.ToArray());
}
int fileidx = 0;
//check VMEM header
if (dat[fileidx++] != 0xf0)
{
return(tones.ToArray());
}
if (dat[fileidx++] != 0x43)
{
return(tones.ToArray());
}
fileidx++;
if (dat[fileidx++] != 0x04)
{
return(tones.ToArray());
}
if (dat[fileidx++] != 0x20)
{
return(tones.ToArray());
}
if (dat[fileidx++] != 0x00)
{
return(tones.ToArray());
}
for (int ti = 0; ti < 32; ti++)
{
FM_SoundConvertor.Tone tone = new FM_SoundConvertor.Tone();
tone.Number = ti;
//Tone
for (int opi = 0; opi < 4; opi++)
{
int opidx = opidtbl[opi];
tone.aOp[opidx].AR = dat[fileidx++] & 31;
tone.aOp[opidx].DR = dat[fileidx++] & 31;
tone.aOp[opidx].SR = dat[fileidx++] & 31;
tone.aOp[opidx].RR = dat[fileidx++] & 15;
tone.aOp[opidx].SL = 15 - (dat[fileidx++] & 15); //TODO: need to check
tone.aOp[opidx].LS = dat[fileidx++] & 127; //(0-99)
{
tone.aOp[opidx].KVS = dat[fileidx] & 0x7;
//TODO: tone.aOp[opidx].EBS = (dat[fileidx] >> 3) & 0x7;
tone.aOp[opidx].AM = (dat[fileidx++] & 0x40) == 0x40 ? 1 : 0;
}
{
//https://nornand.hatenablog.com/entry/2020/11/21/201911
tone.aOp[opidx].TL = AttenuationOfOperatorOutputLevels[dat[fileidx++] % 100];
}
{
int F = dat[fileidx++] & 63;
tone.aOp[opidx].ML = CoarseToMul[F];
tone.aOp[opidx].DT2 = CoarseToDt2[F];
tone.aOp[opidx].FIXF = F >> 2;
}
{
tone.aOp[opidx].KS = (dat[fileidx] >> 3) & 3;
tone.aOp[opidx].DT = Detune1Table[dat[fileidx++] & 7];
}
}
{
tone.SY = (dat[fileidx] >> 6) & 1; tone.SY2 = tone.SY;
tone.FB = (dat[fileidx] >> 3) & 7;
tone.AL = dat[fileidx++] & 7;
//https://nornand.hatenablog.com/entry/2020/11/21/201911
switch (tone.AL)
{
case 4:
tone.aOp[1].TL += 8;
tone.aOp[3].TL += 8;
break;
case 5:
case 6:
tone.aOp[1].TL += 13;
tone.aOp[2].TL += 13;
tone.aOp[3].TL += 13;
break;
case 7:
tone.aOp[1].TL += 16;
tone.aOp[1].TL += 16;
tone.aOp[2].TL += 16;
tone.aOp[3].TL += 16;
break;
}
}
tone.LFRQ = LfoSpeeds[dat[fileidx++]]; tone.LFRQ2 = tone.LFRQ;
tone.LFD = dat[fileidx++]; tone.LFD2 = tone.LFD;
tone.LFOD = PMDepth[dat[fileidx++]]; tone.LFOF = 1;
tone.LFOD2 = AMDepth[dat[fileidx++]]; tone.LFOF2 = 0;
{
tone.PMS = (dat[fileidx] >> 4) & 7; tone.PMS2 = tone.PMS;
tone.AMS = (dat[fileidx] >> 2) & 3; tone.AMS2 = tone.AMS;
tone.LFOW = dat[fileidx++] & 3; tone.LFOW2 = tone.LFOW;
}
tone.KeyShift = dat[fileidx++] - 24;
fileidx++; //Pitch Bend Range
fileidx++; //CH
fileidx++; //PORT
fileidx++; //FC VOL
fileidx++; //MW PITCH
fileidx++; //MW AMPLI
fileidx++; //BC PITCH
fileidx++; //BC AMPLI
fileidx++; //BC P BIAS
fileidx++; //BC E BIAS
StringBuilder name = new StringBuilder(new String(new char[] { (char)dat[fileidx++] }));
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
name.Append((char)dat[fileidx++]);
tone.Name = name.ToString();
fileidx++; //PEG PR1
fileidx++; //PEG PR2
fileidx++; //PEG PR3
fileidx++; //PEG PL1
fileidx++; //PEG PL2
fileidx++; //PEG PL3
for (int opi = 0; opi < 4; opi++)
{
int opidx = opidtbl[opi];
{
tone.aOp[opidx].EGSF = (dat[fileidx] >> 4) & 3;
tone.aOp[0].FIX = (dat[fileidx] >> 3) & 1;
tone.aOp[opidx].FIXR = dat[fileidx] & 7;
fileidx++;
}
{
tone.aOp[opidx].FINE = dat[fileidx] & 15;
tone.aOp[opidx].OSCW = (dat[fileidx] >> 4) & 7;
fileidx++;
}
}
{
var rev = dat[fileidx++] & 7;
for (int opi = 0; opi < 4; opi++)
{
int opidx = opidtbl[opi];
tone.aOp[opidx].REV = rev;
}
}
fileidx++; //FOOT CONTROL PITCH RANGE (0-99)
fileidx++; //FOOT CONTROL AMPLITUDE RANGE (0-99)
fileidx += 44;
tones.Add(tone);
}
return(tones.ToArray());
}
static IEnumerable <Tone> Reader(string Path, Option @Option)
{
List <Tone> tones = new List <Tone>();
var vTone = new Tone();
var Type = eType.Mucom;
var nTok = 0;
var BufferDat = Dat.New();
var BufferFmp = "";
var BufferPmd = "";
var BufferVopm = Vopm.New();
var State = eState.Entry;
var aLine = ReadLine(Path);
foreach (var Line in aLine)
{
if (String.IsNullOrWhiteSpace(Line))
{
continue;
}
if (Line[0] == '\'')
{
continue;
}
var oMark = Line.IndexOf(';');
var Text = (oMark >= 0)? Line.Remove(oMark): Line;
switch (State)
{
case eState.Entry:
{
Text = Text.Trim();
var bHead = Text.StartsWith("@");
var bTail = Text.EndsWith(":{");
if (bHead)
{
vTone.Number++;
Type = (bTail) ? eType.Mucom : eType.Mmldrv;
nTok = (bTail) ? 9 : 11;
var aTok = Text.Split(new char[] { ' ', '\t', '@', ':', '{', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 1)
{
int Number;
if (int.TryParse(aTok[0], out Number))
{
vTone.Number = Number;
}
}
State = eState.Header;
break;
}
break;
}
case eState.Header:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= 2)
{
switch (Type)
{
case eType.Mucom:
{
int.TryParse(aTok[0], out vTone.FB);
int.TryParse(aTok[1], out vTone.AL);
break;
}
case eType.Mmldrv:
{
int.TryParse(aTok[0], out vTone.AL);
int.TryParse(aTok[1], out vTone.FB);
break;
}
}
State = eState.Op0;
break;
}
State = eState.Entry;
break;
}
case eState.Op0:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[0], Type);
State = eState.Op1;
break;
}
State = eState.Entry;
break;
}
case eState.Op1:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[1], Type);
State = eState.Op2;
break;
}
State = eState.Entry;
break;
}
case eState.Op2:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[2], Type);
State = eState.Op3;
break;
}
State = eState.Entry;
break;
}
case eState.Op3:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
switch (Type)
{
case eType.Mucom:
{
if (aTok.Length >= (nTok + 1))
{
GetOp(aTok, ref vTone.aOp[3], Type);
var Tok = "";
for (int o = nTok; o < aTok.Length; ++o)
{
Tok += aTok[o];
}
var oHead = Tok.IndexOf('\"');
var oTail = Tok.IndexOf('\"', oHead + 1);
var bTerm = Tok.EndsWith("}");
if (oHead >= 0 && oTail >= 0 && bTerm)
{
vTone.Name = Tok.Substring(oHead + 1, oTail - oHead - 1);
if (Option.bDat)
{
Dat.Put(vTone, ref BufferDat);
}
if (Option.bFmp)
{
Fmp.Put(vTone, ref BufferFmp);
}
if (Option.bPmd)
{
Pmd.Put(vTone, ref BufferPmd);
}
if (Option.bVopm)
{
Vopm.Put(vTone, ref BufferVopm);
}
if (vTone.IsValid())
{
tones.Add(new Tone(vTone));
}
}
}
break;
}
case eType.Mmldrv:
{
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[3], Type);
vTone.Name = "";
if (Option.bDat)
{
Dat.Put(vTone, ref BufferDat);
}
if (Option.bFmp)
{
Fmp.Put(vTone, ref BufferFmp);
}
if (Option.bPmd)
{
Pmd.Put(vTone, ref BufferPmd);
}
if (Option.bVopm)
{
Vopm.Put(vTone, ref BufferVopm);
}
if (vTone.IsValid())
{
tones.Add(new Tone(vTone));
}
}
break;
}
}
State = eState.Entry;
break;
}
}
}
if (Option.bDat)
{
Dat.Writer(Path, BufferDat);
}
if (Option.bFmp)
{
Fmp.Writer(Path, BufferFmp);
}
if (Option.bPmd)
{
Pmd.Writer(Path, BufferPmd);
}
if (Option.bVopm)
{
Vopm.Writer(Path, BufferVopm);
}
return(tones);
}
static IEnumerable <Tone> Reader(string Path, Option @Option)
{
List <Tone> tones = new List <Tone>();
var vTone = new Tone();
var Type = eType.FM;
var nTok = 0;
var BufferDat = Dat.New();
var BufferFmp = "";
var BufferPmd = "";
var BufferVopm = Vopm.New();
var State = eState.Entry;
var aLine = ReadLine(Path);
foreach (var Line in aLine)
{
if (String.IsNullOrWhiteSpace(Line))
{
continue;
}
if (Line[0] != '\'')
{
continue;
}
var oMark = Line.IndexOf(';');
var Text = (oMark >= 0) ? Line.Remove(oMark) : Line;
switch (State)
{
case eState.Entry:
{
Text = Text.Trim();
var bHead = Text.StartsWith("'@ ");
if (bHead)
{
List <string> list = new List <string>();
foreach (Match match in headerSplit.Matches(Text))
{
var curr = match.Value;
if (curr.Length != 0)
{
list.Add(curr.TrimStart(',').Trim());
}
}
var aTok = list.ToArray();
if (aTok.Length >= 3)
{
switch (aTok[1])
{
case "F":
Type = eType.FM;
break;
case "N":
Type = eType.OPN;
break;
case "M":
Type = eType.OPM;
break;
case "LL":
Type = eType.OPLL;
break;
case "L":
Type = eType.OPL3_2;
break;
case "L4":
Type = eType.OPL3_4;
break;
}
//No
int Number;
if (int.TryParse(aTok[2], out Number))
{
vTone.Number = Number;
}
//Name
if (aTok.Length >= 4)
{
vTone.Name = aTok[3].Trim('"');
}
else
{
vTone.Name = null;
}
}
State = eState.Header;
break;
}
break;
}
case eState.Header:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[0], Type);
State = eState.Op0;
break;
}
State = eState.Entry;
break;
}
case eState.Op0:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[1], Type);
if (Type == eType.OPLL || Type == eType.OPL3_2)
{
State = eState.Op3;
}
else
{
State = eState.Op1;
}
break;
}
State = eState.Entry;
break;
}
case eState.Op1:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[2], Type);
State = eState.Op2;
break;
}
State = eState.Entry;
break;
}
case eState.Op2:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
if (aTok.Length >= nTok)
{
GetOp(aTok, ref vTone.aOp[3], Type);
State = eState.Op3;
break;
}
State = eState.Entry;
break;
}
case eState.Op3:
{
var aTok = Text.Split(new char[] { ' ', '\t', ',', }, StringSplitOptions.RemoveEmptyEntries);
switch (Type)
{
case eType.FM:
case eType.OPN:
case eType.OPM:
{
if (aTok.Length >= 3)
{
int.TryParse(aTok[1], out vTone.AL);
int.TryParse(aTok[2], out vTone.FB);
if (vTone.IsValid())
{
tones.Add(new Tone(vTone));
}
}
break;
}
case eType.OPLL:
{
if (aTok.Length >= 3)
{
int.TryParse(aTok[1], out vTone.aOp[0].TL);
vTone.aOp[0].TL *= 2;
int.TryParse(aTok[2], out vTone.FB);
if (vTone.IsValid2Op())
{
tones.Add(new Tone(vTone));
}
}
break;
}
case eType.OPL3_2:
{
if (aTok.Length >= 3)
{
int.TryParse(aTok[1], out vTone.CNT);
int.TryParse(aTok[2], out vTone.FB);
if (vTone.IsValid2Op())
{
tones.Add(new Tone(vTone));
}
}
break;
}
case eType.OPL3_4:
{
if (aTok.Length >= 3)
{
int cnt1, cnt2;
int.TryParse(aTok[1], out cnt1);
int.TryParse(aTok[2], out cnt2);
vTone.CNT = ((cnt2 << 1) | cnt1) + 2;
int.TryParse(aTok[3], out vTone.FB);
if (vTone.IsValid())
{
tones.Add(new Tone(vTone));
}
}
break;
}
}
State = eState.Entry;
break;
}
}
}
if (Option.bDat)
{
Dat.Writer(Path, BufferDat);
}
if (Option.bFmp)
{
Fmp.Writer(Path, BufferFmp);
}
if (Option.bPmd)
{
Pmd.Writer(Path, BufferPmd);
}
if (Option.bVopm)
{
Vopm.Writer(Path, BufferVopm);
}
return(tones);
}
static void Get(ref Tone @Tone, byte[] Buffer, int i)
{
var o = i * PutLength();
Tone.aOp[0].AR = Buffer[o + (int)ePut.KSAR0] & 0x1f;
Tone.aOp[1].AR = Buffer[o + (int)ePut.KSAR1] & 0x1f;
Tone.aOp[2].AR = Buffer[o + (int)ePut.KSAR2] & 0x1f;
Tone.aOp[3].AR = Buffer[o + (int)ePut.KSAR3] & 0x1f;
Tone.aOp[0].DR = Buffer[o + (int)ePut.DR0];
Tone.aOp[1].DR = Buffer[o + (int)ePut.DR1];
Tone.aOp[2].DR = Buffer[o + (int)ePut.DR2];
Tone.aOp[3].DR = Buffer[o + (int)ePut.DR3];
Tone.aOp[0].SR = Buffer[o + (int)ePut.SR0];
Tone.aOp[1].SR = Buffer[o + (int)ePut.SR1];
Tone.aOp[2].SR = Buffer[o + (int)ePut.SR2];
Tone.aOp[3].SR = Buffer[o + (int)ePut.SR3];
Tone.aOp[0].RR = Buffer[o + (int)ePut.SLRR0] & 0xf;
Tone.aOp[1].RR = Buffer[o + (int)ePut.SLRR1] & 0xf;
Tone.aOp[2].RR = Buffer[o + (int)ePut.SLRR2] & 0xf;
Tone.aOp[3].RR = Buffer[o + (int)ePut.SLRR3] & 0xf;
Tone.aOp[0].SL = Buffer[o + (int)ePut.SLRR0] >> 4;
Tone.aOp[1].SL = Buffer[o + (int)ePut.SLRR1] >> 4;
Tone.aOp[2].SL = Buffer[o + (int)ePut.SLRR2] >> 4;
Tone.aOp[3].SL = Buffer[o + (int)ePut.SLRR3] >> 4;
Tone.aOp[0].TL = Buffer[o + (int)ePut.TL0];
Tone.aOp[1].TL = Buffer[o + (int)ePut.TL1];
Tone.aOp[2].TL = Buffer[o + (int)ePut.TL2];
Tone.aOp[3].TL = Buffer[o + (int)ePut.TL3];
Tone.aOp[0].KS = Buffer[o + (int)ePut.KSAR0] >> 6;
Tone.aOp[1].KS = Buffer[o + (int)ePut.KSAR1] >> 6;
Tone.aOp[2].KS = Buffer[o + (int)ePut.KSAR2] >> 6;
Tone.aOp[3].KS = Buffer[o + (int)ePut.KSAR3] >> 6;
Tone.aOp[0].ML = Buffer[o + (int)ePut.DTML0] & 0xf;
Tone.aOp[1].ML = Buffer[o + (int)ePut.DTML1] & 0xf;
Tone.aOp[2].ML = Buffer[o + (int)ePut.DTML2] & 0xf;
Tone.aOp[3].ML = Buffer[o + (int)ePut.DTML3] & 0xf;
Tone.aOp[0].DT = Buffer[o + (int)ePut.DTML0] >> 4;
Tone.aOp[1].DT = Buffer[o + (int)ePut.DTML1] >> 4;
Tone.aOp[2].DT = Buffer[o + (int)ePut.DTML2] >> 4;
Tone.aOp[3].DT = Buffer[o + (int)ePut.DTML3] >> 4;
Tone.aOp[0].DT2 = 0;
Tone.aOp[1].DT2 = 0;
Tone.aOp[2].DT2 = 0;
Tone.aOp[3].DT2 = 0;
Tone.aOp[0].AM = 0;
Tone.aOp[1].AM = 0;
Tone.aOp[2].AM = 0;
Tone.aOp[3].AM = 0;
Tone.AL = Buffer[o + (int)ePut.FBAL] & 0x7;
Tone.FB = Buffer[o + (int)ePut.FBAL] >> 3;
var aChar = new byte[]
{
Buffer[o + (int)ePut.Name0],
Buffer[o + (int)ePut.Name1],
Buffer[o + (int)ePut.Name2],
Buffer[o + (int)ePut.Name3],
Buffer[o + (int)ePut.Name4],
Buffer[o + (int)ePut.Name5],
};
Tone.Name = Encoding.GetEncoding("Shift_JIS").GetString(aChar);
Tone.Number = i;
}
public static void Reader(string Path, Option @Option)
{
var Buffer = ReadByte(Path);
if (Buffer.Length == FxbLength() && IsValid(Buffer))
{
Tone vTone = new Tone();
var BufferMuc = "";
var BufferDat = Dat.New();
var BufferFmp = "";
var BufferPmd = "";
var BufferFMtrial = FMtrial.New();
for (int i = 0; i < ToneLength(); ++i)
{
Get(ref vTone, Buffer, i);
if (Option.bMuc)
{
Muc.Put(vTone, ref BufferMuc);
}
if (Option.bDat)
{
Dat.Put(vTone, ref BufferDat);
}
if (Option.bFmp)
{
Fmp.Put(vTone, ref BufferFmp);
}
if (Option.bPmd)
{
Pmd.Put(vTone, ref BufferPmd);
}
if (Option.bFMtrial)
{
FMtrial.Put(vTone, ref BufferFMtrial);
}
}
if (Option.bMuc)
{
Muc.Writer(Path, BufferMuc);
}
if (Option.bDat)
{
Dat.Writer(Path, BufferDat);
}
if (Option.bFmp)
{
Fmp.Writer(Path, BufferFmp);
}
if (Option.bPmd)
{
Pmd.Writer(Path, BufferPmd);
}
if (Option.bFMtrial)
{
FMtrial.Writer(Path, BufferFMtrial);
}
}
}
static void Get(ref Tone @Tone, byte[] Buffer, int i)
{
var o = i * PutLength();
Tone.aOp[0].AR = Buffer[o + (int)ePut.KSAR0] & 0x1f;
Tone.aOp[1].AR = Buffer[o + (int)ePut.KSAR1] & 0x1f;
Tone.aOp[2].AR = Buffer[o + (int)ePut.KSAR2] & 0x1f;
Tone.aOp[3].AR = Buffer[o + (int)ePut.KSAR3] & 0x1f;
Tone.aOp[0].DR = Buffer[o + (int)ePut.DR0];
Tone.aOp[1].DR = Buffer[o + (int)ePut.DR1];
Tone.aOp[2].DR = Buffer[o + (int)ePut.DR2];
Tone.aOp[3].DR = Buffer[o + (int)ePut.DR3];
Tone.aOp[0].SR = Buffer[o + (int)ePut.SR0];
Tone.aOp[1].SR = Buffer[o + (int)ePut.SR1];
Tone.aOp[2].SR = Buffer[o + (int)ePut.SR2];
Tone.aOp[3].SR = Buffer[o + (int)ePut.SR3];
Tone.aOp[0].RR = Buffer[o + (int)ePut.SLRR0] & 0xf;
Tone.aOp[1].RR = Buffer[o + (int)ePut.SLRR1] & 0xf;
Tone.aOp[2].RR = Buffer[o + (int)ePut.SLRR2] & 0xf;
Tone.aOp[3].RR = Buffer[o + (int)ePut.SLRR3] & 0xf;
Tone.aOp[0].SL = Buffer[o + (int)ePut.SLRR0] >> 4;
Tone.aOp[1].SL = Buffer[o + (int)ePut.SLRR1] >> 4;
Tone.aOp[2].SL = Buffer[o + (int)ePut.SLRR2] >> 4;
Tone.aOp[3].SL = Buffer[o + (int)ePut.SLRR3] >> 4;
Tone.aOp[0].TL = Buffer[o + (int)ePut.TL0];
Tone.aOp[1].TL = Buffer[o + (int)ePut.TL1];
Tone.aOp[2].TL = Buffer[o + (int)ePut.TL2];
Tone.aOp[3].TL = Buffer[o + (int)ePut.TL3];
Tone.aOp[0].KS = Buffer[o + (int)ePut.KSAR0] >> 6;
Tone.aOp[1].KS = Buffer[o + (int)ePut.KSAR1] >> 6;
Tone.aOp[2].KS = Buffer[o + (int)ePut.KSAR2] >> 6;
Tone.aOp[3].KS = Buffer[o + (int)ePut.KSAR3] >> 6;
Tone.aOp[0].ML = Buffer[o + (int)ePut.DTML0] & 0xf;
Tone.aOp[1].ML = Buffer[o + (int)ePut.DTML1] & 0xf;
Tone.aOp[2].ML = Buffer[o + (int)ePut.DTML2] & 0xf;
Tone.aOp[3].ML = Buffer[o + (int)ePut.DTML3] & 0xf;
Tone.aOp[0].DT = Buffer[o + (int)ePut.DTML0] >> 4;
Tone.aOp[1].DT = Buffer[o + (int)ePut.DTML1] >> 4;
Tone.aOp[2].DT = Buffer[o + (int)ePut.DTML2] >> 4;
Tone.aOp[3].DT = Buffer[o + (int)ePut.DTML3] >> 4;
Tone.aOp[0].DT2 = 0;
Tone.aOp[1].DT2 = 0;
Tone.aOp[2].DT2 = 0;
Tone.aOp[3].DT2 = 0;
Tone.aOp[0].AM = 0;
Tone.aOp[1].AM = 0;
Tone.aOp[2].AM = 0;
Tone.aOp[3].AM = 0;
Tone.AL = Buffer[o + (int)ePut.FBAL] & 0x7;
Tone.FB = Buffer[o + (int)ePut.FBAL] >> 3;
var aChar = new char[]
{
(char)Buffer[o + (int)ePut.Name0],
(char)Buffer[o + (int)ePut.Name1],
(char)Buffer[o + (int)ePut.Name2],
(char)Buffer[o + (int)ePut.Name3],
(char)Buffer[o + (int)ePut.Name4],
(char)Buffer[o + (int)ePut.Name5],
};
Tone.Name = "";
foreach (var Char in aChar)
{
if (Char != 0)
{
Tone.Name += Char.ToString();
}
}
Tone.Number = i;
}
static void Get(ref Tone @Tone, byte[] Buffer, int i)
{
int o = HeadLength() + (i * PutLength());
Tone.aOp[0].AR = Buffer[o + (int)ePut.AR0];
Tone.aOp[1].AR = Buffer[o + (int)ePut.AR1];
Tone.aOp[2].AR = Buffer[o + (int)ePut.AR2];
Tone.aOp[3].AR = Buffer[o + (int)ePut.AR3];
Tone.aOp[0].DR = Buffer[o + (int)ePut.DR0];
Tone.aOp[1].DR = Buffer[o + (int)ePut.DR1];
Tone.aOp[2].DR = Buffer[o + (int)ePut.DR2];
Tone.aOp[3].DR = Buffer[o + (int)ePut.DR3];
Tone.aOp[0].SR = Buffer[o + (int)ePut.SR0];
Tone.aOp[1].SR = Buffer[o + (int)ePut.SR1];
Tone.aOp[2].SR = Buffer[o + (int)ePut.SR2];
Tone.aOp[3].SR = Buffer[o + (int)ePut.SR3];
Tone.aOp[0].RR = Buffer[o + (int)ePut.RR0];
Tone.aOp[1].RR = Buffer[o + (int)ePut.RR1];
Tone.aOp[2].RR = Buffer[o + (int)ePut.RR2];
Tone.aOp[3].RR = Buffer[o + (int)ePut.RR3];
Tone.aOp[0].SL = Buffer[o + (int)ePut.SL0];
Tone.aOp[1].SL = Buffer[o + (int)ePut.SL1];
Tone.aOp[2].SL = Buffer[o + (int)ePut.SL2];
Tone.aOp[3].SL = Buffer[o + (int)ePut.SL3];
Tone.aOp[0].TL = Buffer[o + (int)ePut.TL0];
Tone.aOp[1].TL = Buffer[o + (int)ePut.TL1];
Tone.aOp[2].TL = Buffer[o + (int)ePut.TL2];
Tone.aOp[3].TL = Buffer[o + (int)ePut.TL3];
Tone.aOp[0].KS = Buffer[o + (int)ePut.KS0];
Tone.aOp[1].KS = Buffer[o + (int)ePut.KS1];
Tone.aOp[2].KS = Buffer[o + (int)ePut.KS2];
Tone.aOp[3].KS = Buffer[o + (int)ePut.KS3];
Tone.aOp[0].ML = Buffer[o + (int)ePut.ML0];
Tone.aOp[1].ML = Buffer[o + (int)ePut.ML1];
Tone.aOp[2].ML = Buffer[o + (int)ePut.ML2];
Tone.aOp[3].ML = Buffer[o + (int)ePut.ML3];
Tone.aOp[0].DT = Buffer[o + (int)ePut.DT1_0];
Tone.aOp[1].DT = Buffer[o + (int)ePut.DT1_1];
Tone.aOp[2].DT = Buffer[o + (int)ePut.DT1_2];
Tone.aOp[3].DT = Buffer[o + (int)ePut.DT1_3];
Tone.aOp[0].DT2 = Buffer[o + (int)ePut.DT2_0];
Tone.aOp[1].DT2 = Buffer[o + (int)ePut.DT2_1];
Tone.aOp[2].DT2 = Buffer[o + (int)ePut.DT2_2];
Tone.aOp[3].DT2 = Buffer[o + (int)ePut.DT2_3];
Tone.aOp[0].AM = Buffer[o + (int)ePut.AM0];
Tone.aOp[1].AM = Buffer[o + (int)ePut.AM1];
Tone.aOp[2].AM = Buffer[o + (int)ePut.AM2];
Tone.aOp[3].AM = Buffer[o + (int)ePut.AM3];
Tone.AL = Buffer[o + (int)ePut.AL];
Tone.FB = Buffer[o + (int)ePut.FB];
var aChar = new char[]
{
(char)Buffer[o + (int)ePut.Name0],
(char)Buffer[o + (int)ePut.Name1],
(char)Buffer[o + (int)ePut.Name2],
(char)Buffer[o + (int)ePut.Name3],
(char)Buffer[o + (int)ePut.Name4],
(char)Buffer[o + (int)ePut.Name5],
(char)Buffer[o + (int)ePut.Name6],
(char)Buffer[o + (int)ePut.Name7],
(char)Buffer[o + (int)ePut.Name8],
(char)Buffer[o + (int)ePut.Name9],
(char)Buffer[o + (int)ePut.Name10],
(char)Buffer[o + (int)ePut.Name11],
(char)Buffer[o + (int)ePut.Name12],
(char)Buffer[o + (int)ePut.Name13],
(char)Buffer[o + (int)ePut.Name14],
(char)Buffer[o + (int)ePut.Name15],
};
Tone.Name = "";
foreach (var Char in aChar)
{
if (Char != 0)
{
Tone.Name += Char.ToString();
}
}
Tone.Number = i;
}
public static IEnumerable <Tone> Reader(string Path, Option @Option)
{
List <Tone> tones = new List <Tone>();
var Buffer = ReadByte(Path);
if (Buffer.Length == FxbLength())
{
Tone vTone = new Tone();
var BufferMuc = "";
var BufferDat = Dat.New();
var BufferFmp = "";
var BufferPmd = "";
for (int i = 0; i < ToneLength(); ++i)
{
Get(ref vTone, Buffer, i);
if (Option.bMuc)
{
Muc.Put(vTone, ref BufferMuc);
}
if (Option.bDat)
{
Dat.Put(vTone, ref BufferDat);
}
if (Option.bFmp)
{
Fmp.Put(vTone, ref BufferFmp);
}
if (Option.bPmd)
{
Pmd.Put(vTone, ref BufferPmd);
}
if (vTone.IsValid())
{
tones.Add(new Tone(vTone));
}
}
if (Option.bMuc)
{
Muc.Writer(Path, BufferMuc);
}
if (Option.bDat)
{
Dat.Writer(Path, BufferDat);
}
if (Option.bFmp)
{
Fmp.Writer(Path, BufferFmp);
}
if (Option.bPmd)
{
Pmd.Writer(Path, BufferPmd);
}
}
return(tones);
}
