private bool ReadPatterns(int idx)
{
var maxIdx = idx + blockSize;
while (idx < maxIdx)
{
var songIdx = BitConverter.ToInt32(bytes, idx); idx += sizeof(int);
var chanIdx = BitConverter.ToInt32(bytes, idx); idx += sizeof(int);
var patIdx = BitConverter.ToInt32(bytes, idx); idx += sizeof(int);
var items = BitConverter.ToInt32(bytes, idx); idx += sizeof(int);
var song = project.Songs[songIdx];
var channel = song.Channels[chanIdx];
var pattern = channel.GetPattern($"{patIdx:X2}");
var dummy = false;
// Famitracker can have patterns that arent actually used in the song.
// Skip with a dummy pattern.
if (pattern == null)
{
pattern = new Pattern(project.GenerateUniqueId(), song, channel.Type, $"{patIdx:X2}");
dummy = true;
}
var fxCount = songEffectColumnCount[song][chanIdx];
var fxData = new RowFxData[song.PatternLength, fxCount + 1];
patternFxData[pattern] = fxData;
for (int i = 0; i < items; i++)
{
var n = BitConverter.ToInt32(bytes, idx); idx += sizeof(int);
var note = bytes[idx++];
var octave = bytes[idx++];
var instrument = bytes[idx++];
var volume = bytes[idx++];
// This happens when some patterns are longer than the song pattern length.
// The TNMT song from FamiTracker has this.
if (n < song.PatternLength)
{
if (volume != 16)
{
pattern.GetOrCreateNoteAt(n).Volume = (byte)(volume & 0x0f);
}
if (blockVersion < 5 && project.ExpansionAudio == Project.ExpansionFds && channel.Type == Channel.FdsWave && octave < 6 && octave != 0)
{
octave += 2;
}
if (note == 13)
{
pattern.GetOrCreateNoteAt(n).Value = Note.NoteRelease;
}
else if (note == 14)
{
pattern.GetOrCreateNoteAt(n).Value = Note.NoteStop;
}
else if (note != 0)
{
if (instrument < MaxInstruments && channel.Type != Channel.Dpcm)
{
pattern.GetOrCreateNoteAt(n).Instrument = instruments[instrument];
}
if (channel.Type == Channel.Noise)
{
pattern.GetOrCreateNoteAt(n).Value = (byte)(octave * 12 + note + 15);
}
else
{
pattern.GetOrCreateNoteAt(n).Value = (byte)(octave * 12 + note);
}
}
}
for (int j = 0; j < fxCount + 1; ++j)
{
RowFxData fx;
fx.fx = bytes[idx++];
fx.param = bytes[idx++];
// See comment above.
if (n < song.PatternLength)
{
fxData[n, j] = fx;
}
ApplySimpleEffects(fx, pattern, n, patternLengths, !dummy);
}
}
}
return(true);
}
protected void ApplySimpleEffects(RowFxData fx, Pattern pattern, int n, Dictionary <Pattern, byte> patternLengths, bool allowSongEffects)
{
Note note = null;
switch (fx.fx)
{
case Effect_None:
return;
case Effect_Jump:
// Ignore if there was a Dxx or Bxx before.
if (allowSongEffects && !patternLengths.ContainsKey(pattern))
{
pattern.Song.SetLoopPoint(fx.param);
patternLengths[pattern] = (byte)(n + 1);
}
return;
case Effect_Skip:
// Ignore if there was a Dxx or Bxx before.
if (!patternLengths.ContainsKey(pattern))
{
patternLengths[pattern] = (byte)(n + 1);
}
return;
case Effect_Speed:
if (pattern.Channel.SupportsEffect(Note.EffectSpeed))
{
if (fx.param <= 0x1f) // We only support speed change for now.
{
pattern.GetOrCreateNoteAt(n).Speed = Math.Max((byte)1, (byte)fx.param);
}
else
{
Log.LogMessage(LogSeverity.Warning, $"Only speed changes are supported, not tempo. Will be ignored. {GetPatternString(pattern, n)}");
}
}
return;
case Effect_Pitch:
if (pattern.Channel.SupportsEffect(Note.EffectFinePitch))
{
pattern.GetOrCreateNoteAt(n).FinePitch = (sbyte)(0x80 - fx.param);
}
return;
case Effect_Vibrato:
if (pattern.Channel.SupportsEffect(Note.EffectVibratoDepth))
{
note = pattern.GetOrCreateNoteAt(n);
note.VibratoDepth = (byte)(fx.param & 0x0f);
note.VibratoSpeed = (byte)VibratoSpeedImportLookup[fx.param >> 4];
if (note.VibratoDepth == 0 ||
note.VibratoSpeed == 0)
{
note.RawVibrato = 0;
}
}
return;
case Effect_FdsModSpeedHi:
if (pattern.Channel.SupportsEffect(Note.EffectFdsModSpeed))
{
// TODO: If both hi/lo effects arent in a pair, this is likely not going to work.
note = pattern.GetOrCreateNoteAt(n);
if (!note.HasFdsModSpeed)
{
note.FdsModSpeed = 0;
}
note.FdsModSpeed = (ushort)(((note.FdsModSpeed) & 0x00ff) | (fx.param << 8));
}
return;
case Effect_FdsModSpeedLo:
if (pattern.Channel.SupportsEffect(Note.EffectFdsModSpeed))
{
// TODO: If both hi/lo effects arent in a pair, this is likely not going to work.
note = pattern.GetOrCreateNoteAt(n);
if (!note.HasFdsModSpeed)
{
note.FdsModSpeed = 0;
}
note.FdsModSpeed = (ushort)(((note.FdsModSpeed) & 0xff00) | (fx.param << 0));
}
return;
case Effect_FdsModDepth:
if (pattern.Channel.SupportsEffect(Note.EffectFdsModDepth))
{
pattern.GetOrCreateNoteAt(n).FdsModDepth = fx.param;
}
return;
case Effect_DutyCycle:
if (pattern.Channel.SupportsEffect(Note.EffectDutyCycle))
{
pattern.GetOrCreateNoteAt(n).DutyCycle = fx.param;
}
return;
case Effect_Delay:
if (pattern.Channel.SupportsEffect(Note.EffectNoteDelay))
{
pattern.GetOrCreateNoteAt(n).NoteDelay = Math.Min((byte)31, fx.param);
}
return;
case Effect_NoteCut:
if (pattern.Channel.SupportsEffect(Note.EffectCutDelay))
{
pattern.GetOrCreateNoteAt(n).CutDelay = Math.Min((byte)31, fx.param);
}
return;
case Effect_Halt:
case Effect_PortaUp:
case Effect_PortaDown:
case Effect_Portamento:
case Effect_SlideUp:
case Effect_SlideDown:
case Effect_Arpeggio:
// These will be applied later.
return;
}
if (EffectToTextLookup.ContainsKey(fx.fx))
{
Log.LogMessage(LogSeverity.Warning, $"Effect '{EffectToTextLookup[fx.fx]}' is not supported and will be ignored. {GetPatternString(pattern, n)}");
}
else
{
Log.LogMessage(LogSeverity.Warning, $"Unknown effect code ({fx.fx}) and will be ignored. {GetPatternString(pattern, n)}");
}
}
public static Project Load(string filename)
{
var project = new Project();
var envelopes = new Dictionary <int, Envelope> [Project.ExpansionCount, Envelope.Max];
var duties = new Dictionary <int, int> [Project.ExpansionCount];
var instruments = new Dictionary <int, Instrument>();
var dpcms = new Dictionary <int, DPCMSample>();
var columns = new int[5] {
1, 1, 1, 1, 1
};
var patternFxData = new Dictionary <Pattern, RowFxData[, ]>();
var noteLookup = new Dictionary <string, int>
{
["A-"] = 9,
["A#"] = 10,
["B-"] = 11,
["C-"] = 0,
["C#"] = 1,
["D-"] = 2,
["D#"] = 3,
["E-"] = 4,
["F-"] = 5,
["F#"] = 6,
["G-"] = 7,
["G#"] = 8
};
for (int i = 0; i < envelopes.GetLength(0); i++)
{
for (int j = 0; j < envelopes.GetLength(1); j++)
{
envelopes[i, j] = new Dictionary <int, Envelope>();
}
}
for (int i = 0; i < duties.Length; i++)
{
duties[i] = new Dictionary <int, int>();
}
DPCMSample currentDpcm = null;
int dpcmWriteIdx = 0;
Song song = null;
string patternName = "";
var lines = File.ReadAllLines(filename);
for (int i = 0; i < lines.Length; i++)
{
var line = lines[i].Trim();
if (line.StartsWith("TITLE"))
{
project.Name = line.Substring(5).Trim(' ', '"');
}
else if (line.StartsWith("AUTHOR"))
{
project.Author = line.Substring(6).Trim(' ', '"');
}
else if (line.StartsWith("COPYRIGHT"))
{
project.Copyright = line.Substring(9).Trim(' ', '"');
}
else if (line.StartsWith("EXPANSION"))
{
var exp = int.Parse(line.Substring(9));
if (exp == 1)
{
project.SetExpansionAudio(Project.ExpansionVrc6);
}
}
else if (line.StartsWith("MACRO"))
{
var expansion = line.Substring(5, 4) == "VRC6" ? Project.ExpansionVrc6 : Project.ExpansionNone;
var halves = line.Substring(line.IndexOf(' ')).Split(':');
var param = halves[0].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var curve = halves[1].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var type = int.Parse(param[0]);
var idx = int.Parse(param[1]);
var loop = int.Parse(param[2]);
var rel = int.Parse(param[3]);
if (type < 3)
{
var env = new Envelope();
env.Length = curve.Length;
// FamiTracker allows envelope with release with no loop. We dont allow that.
if (type == Envelope.Volume && loop == -1 && rel != -1)
{
loop = rel;
}
env.Loop = loop;
env.Release = type == Envelope.Volume && rel != -1 ? rel + 1 : -1;
for (int j = 0; j < curve.Length; j++)
{
env.Values[j] = sbyte.Parse(curve[j]);
}
if (type == 2)
{
env.Relative = true;
}
envelopes[expansion, type][idx] = env;
}
else if (type == 4)
{
duties[expansion][idx] = int.Parse(curve[0]);
}
}
else if (line.StartsWith("DPCMDEF"))
{
var param = SplitStringKeepQuotes(line.Substring(7));
var name = param[2];
var j = 2;
while (!project.IsDPCMSampleNameUnique(name))
{
name = param[2] + "-" + j++;
}
currentDpcm = project.CreateDPCMSample(name, new byte[int.Parse(param[1])]);
dpcms[int.Parse(param[0])] = currentDpcm;
dpcmWriteIdx = 0;
}
else if (line.StartsWith("DPCM"))
{
var param = line.Substring(6).Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
foreach (var s in param)
{
currentDpcm.Data[dpcmWriteIdx++] = Convert.ToByte(s, 16);
}
}
else if (line.StartsWith("KEYDPCM"))
{
var param = line.Substring(7).Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
if (param[0] == "0")
{
int octave = int.Parse(param[1]);
int semitone = int.Parse(param[2]);
int note = octave * 12 + semitone + 1;
if (project.NoteSupportsDPCM(note))
{
int dpcm = int.Parse(param[3]);
int pitch = int.Parse(param[4]);
int loop = int.Parse(param[5]);
project.MapDPCMSample(note, dpcms[dpcm], pitch, loop != 0);
}
}
}
else if (line.StartsWith("INST2A03") || line.StartsWith("INSTVRC6"))
{
var expansion = line.Substring(4, 4) == "VRC6" ? Project.ExpansionVrc6 : Project.ExpansionNone;
var param = SplitStringKeepQuotes(line.Substring(line.IndexOf(' ')));
int idx = int.Parse(param[0]);
int vol = int.Parse(param[1]);
int arp = int.Parse(param[2]);
int pit = int.Parse(param[3]);
int dut = int.Parse(param[5]);
var name = param[6];
var j = 2;
if (!project.IsInstrumentNameUnique(name))
{
name = param[6] + "-" + j++;
}
var expansionType = line.StartsWith("INSTVRC6") ? Project.ExpansionVrc6 : Project.ExpansionNone;
var instrument = project.CreateInstrument(expansionType, name);
if (vol >= 0)
{
instrument.Envelopes[0] = envelopes[expansion, 0][vol].Clone();
}
if (arp >= 0)
{
instrument.Envelopes[1] = envelopes[expansion, 1][arp].Clone();
}
if (pit >= 0)
{
instrument.Envelopes[2] = envelopes[expansion, 2][pit].Clone();
}
if (dut >= 0)
{
instrument.DutyCycle = duties[expansionType][dut];
}
instruments[idx] = instrument;
}
else if (line.StartsWith("TRACK"))
{
var param = SplitStringKeepQuotes(line.Substring(5));
song = project.CreateSong(param[3]);
song.SetLength(0);
song.SetPatternLength(int.Parse(param[0]));
song.Speed = int.Parse(param[1]);
song.Tempo = int.Parse(param[2]);
columns = new int[song.Channels.Length];
}
else if (line.StartsWith("COLUMNS"))
{
var param = line.Substring(7).Split(new[] { ' ', ':' }, StringSplitOptions.RemoveEmptyEntries);
for (int j = 0; j < song.Channels.Length; j++)
{
columns[j] = int.Parse(param[j]);
}
}
else if (line.StartsWith("ORDER"))
{
var orderIdx = Convert.ToInt32(line.Substring(6, 2), 16);
var values = line.Substring(5).Split(':')[1].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var order = new int[song.Channels.Length];
for (int j = 0; j < song.Channels.Length; j++)
{
int patternIdx = Convert.ToInt32(values[j], 16);
var name = values[j];
var pattern = song.Channels[j].GetPattern(name);
if (pattern == null)
{
pattern = song.Channels[j].CreatePattern(name);
}
song.Channels[j].PatternInstances[orderIdx] = pattern;
}
song.SetLength(song.Length + 1);
}
else if (line.StartsWith("PATTERN"))
{
patternName = line.Substring(8);
}
else if (line.StartsWith("ROW"))
{
var channels = line.Split(new[] { ':' }, StringSplitOptions.RemoveEmptyEntries);
var rowIdx = Convert.ToInt32(channels[0].Substring(4, 2), 16);
for (int j = 1; j <= song.Channels.Length; j++)
{
var noteData = channels[j].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var pattern = song.Channels[j - 1].GetPattern(patternName);
if (pattern == null)
{
continue;
}
//var fxData = new RowFxData[song.PatternLength];
if (!patternFxData.ContainsKey(pattern))
{
patternFxData[pattern] = new RowFxData[song.PatternLength, 4];
}
// Note
if (noteData[0] == "---")
{
pattern.Notes[rowIdx].Value = Note.NoteStop;
}
else if (noteData[0] == "===")
{
pattern.Notes[rowIdx].Value = Note.NoteRelease;
}
else if (noteData[0] != "...")
{
int famitoneNote;
if (j == 4)
{
famitoneNote = (Convert.ToInt32(noteData[0].Substring(0, 1), 16) + 31) + 1;
}
else
{
int semitone = noteLookup[noteData[0].Substring(0, 2)];
int octave = noteData[0][2] - '0';
famitoneNote = octave * 12 + semitone + 1;
}
if (famitoneNote >= Note.MusicalNoteMin && famitoneNote <= Note.MusicalNoteMax)
{
pattern.Notes[rowIdx].Value = (byte)famitoneNote;
pattern.Notes[rowIdx].Instrument = j == 5 ? null : instruments[Convert.ToInt32(noteData[1], 16)];
}
else
{
// Note outside of range.
}
}
// Volume
if (noteData[2] != ".")
{
pattern.Notes[rowIdx].Volume = Convert.ToByte(noteData[2], 16);
}
// Read FX.
for (int k = 0; k < columns[j - 1]; k++)
{
var fx = noteData[3 + k];
if (fx == "...")
{
continue;
}
var param = Convert.ToByte(fx.Substring(1), 16);
var fxData = patternFxData[pattern];
fxData[rowIdx, k].fx = fx[0];
fxData[rowIdx, k].param = param;
switch (fx[0])
{
case 'B': // Jump
pattern.Notes[rowIdx].Jump = param;
break;
case 'D': // Skip
pattern.Notes[rowIdx].Skip = param;
break;
case 'F': // Tempo
if (param <= 0x1f) // We only support speed change for now.
{
pattern.Notes[rowIdx].Speed = param;
}
break;
case '4': // Vibrato
pattern.Notes[rowIdx].VibratoDepth = (byte)(param & 0x0f);
pattern.Notes[rowIdx].VibratoSpeed = (byte)VibratoSpeedImportLookup[param >> 4];
if (pattern.Notes[rowIdx].VibratoDepth == 0 ||
pattern.Notes[rowIdx].VibratoSpeed == 0)
{
pattern.Notes[rowIdx].Vibrato = 0;
}
break;
}
}
}
}
}
foreach (var s in project.Songs)
{
CreateSlideNotes(s, patternFxData);
s.RemoveEmptyPatterns();
s.SetSensibleBarLength();
foreach (var c in s.Channels)
{
c.ColorizePatterns();
}
}
project.UpdateAllLastValidNotesAndVolume();
return(project);
}
protected void ApplySimpleEffects(RowFxData fx, Pattern pattern, int n, Dictionary <Pattern, byte> patternLengths)
{
Note note = null;
switch (fx.fx)
{
case Effect_Jump:
pattern.Song.SetLoopPoint(fx.param);
break;
case Effect_Skip:
patternLengths[pattern] = (byte)(n + 1);
break;
case Effect_Speed:
if (fx.param <= 0x1f) // We only support speed change for now.
{
pattern.GetOrCreateNoteAt(n).Speed = Math.Max((byte)1, (byte)fx.param);
}
break;
case Effect_Pitch:
pattern.GetOrCreateNoteAt(n).FinePitch = (sbyte)(0x80 - fx.param);
break;
case Effect_Vibrato:
note = pattern.GetOrCreateNoteAt(n);
note.VibratoDepth = (byte)(fx.param & 0x0f);
note.VibratoSpeed = (byte)VibratoSpeedImportLookup[fx.param >> 4];
if (note.VibratoDepth == 0 ||
note.VibratoSpeed == 0)
{
note.RawVibrato = 0;
}
break;
case Effect_FdsModSpeedHi:
// TODO: If both hi/lo effects arent in a pair, this is likely not going to work.
note = pattern.GetOrCreateNoteAt(n);
if (!note.HasFdsModSpeed)
{
note.FdsModSpeed = 0;
}
note.FdsModSpeed = (ushort)(((note.FdsModSpeed) & 0x00ff) | (fx.param << 8));
break;
case Effect_FdsModSpeedLo:
// TODO: If both hi/lo effects arent in a pair, this is likely not going to work.
note = pattern.GetOrCreateNoteAt(n);
if (!note.HasFdsModSpeed)
{
note.FdsModSpeed = 0;
}
note.FdsModSpeed = (ushort)(((note.FdsModSpeed) & 0xff00) | (fx.param << 0));
break;
case Effect_FdsModDepth:
pattern.GetOrCreateNoteAt(n).FdsModDepth = fx.param;
break;
}
}
public Project Load(string filename)
{
var envelopes = new Dictionary <int, Envelope> [Project.ExpansionCount, Envelope.Count];
var instruments = new Dictionary <int, Instrument>();
var dpcms = new Dictionary <int, DPCMSample>();
var columns = new int[5] {
1, 1, 1, 1, 1
};
for (int i = 0; i < envelopes.GetLength(0); i++)
{
for (int j = 0; j < envelopes.GetLength(1); j++)
{
envelopes[i, j] = new Dictionary <int, Envelope>();
}
}
project = new Project();
project.TempoMode = Project.TempoFamiTracker;
DPCMSample currentDpcm = null;
int dpcmWriteIdx = 0;
Song song = null;
string patternName = "";
var lines = File.ReadAllLines(filename);
for (int i = 0; i < lines.Length; i++)
{
var line = lines[i].Trim();
if (line.StartsWith("TITLE"))
{
project.Name = line.Substring(5).Trim(' ', '"');
}
else if (line.StartsWith("AUTHOR"))
{
project.Author = line.Substring(6).Trim(' ', '"');
}
else if (line.StartsWith("COPYRIGHT"))
{
project.Copyright = line.Substring(9).Trim(' ', '"');
}
else if (line.StartsWith("EXPANSION"))
{
var exp = int.Parse(line.Substring(9));
var convertedExp = ConvertExpansionAudio(exp);
if (convertedExp < 0)
{
return(null);
}
project.SetExpansionAudio(convertedExp);
}
else if (line.StartsWith("N163CHANNELS"))
{
var numExpChannels = int.Parse(line.Substring(12).Trim(' ', '"'));
project.SetExpansionAudio(Project.ExpansionN163, numExpChannels);
}
else if (line.StartsWith("MACRO"))
{
var expansion = line.StartsWith("MACROVRC6") ? Project.ExpansionVrc6 :
line.StartsWith("MACRON163") ? Project.ExpansionN163 : Project.ExpansionNone;
var halves = line.Substring(line.IndexOf(' ')).Split(':');
var param = halves[0].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var curve = halves[1].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var type = int.Parse(param[0]);
var idx = int.Parse(param[1]);
var loop = int.Parse(param[2]);
var rel = int.Parse(param[3]);
var famistudioType = EnvelopeTypeLookup[type];
if (famistudioType < Envelope.Count)
{
var env = new Envelope(famistudioType);
env.Length = curve.Length;
// FamiTracker allows envelope with release with no loop. We dont allow that.
if (env.CanRelease && loop == -1 && rel != -1)
{
loop = rel;
}
env.Loop = loop;
env.Release = env.CanRelease && rel != -1 ? rel + 1 : -1;
env.Relative = famistudioType == Envelope.Pitch;
for (int j = 0; j < curve.Length; j++)
{
env.Values[j] = sbyte.Parse(curve[j]);
}
envelopes[expansion, famistudioType][idx] = env;
}
}
else if (line.StartsWith("DPCMDEF"))
{
var param = SplitStringKeepQuotes(line.Substring(7));
currentDpcm = CreateUniquelyNamedSample(param[2], new byte[int.Parse(param[1])]);
dpcms[int.Parse(param[0])] = currentDpcm;
dpcmWriteIdx = 0;
}
else if (line.StartsWith("DPCM"))
{
if (currentDpcm != null) // Can happen if more than 16KB of samples
{
var param = line.Substring(6).Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
foreach (var s in param)
{
currentDpcm.Data[dpcmWriteIdx++] = Convert.ToByte(s, 16);
}
}
}
else if (line.StartsWith("KEYDPCM"))
{
var param = line.Substring(7).Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
if (param[0] == "0")
{
int octave = int.Parse(param[1]);
int semitone = int.Parse(param[2]);
int note = octave * 12 + semitone + 1;
if (project.NoteSupportsDPCM(note))
{
int dpcm = int.Parse(param[3]);
int pitch = int.Parse(param[4]);
int loop = int.Parse(param[5]);
project.MapDPCMSample(note, dpcms[dpcm], pitch, loop != 0);
}
}
}
else if (line.StartsWith("INST2A03") || line.StartsWith("INSTVRC6") || line.StartsWith("INSTN163"))
{
var expansion = line.StartsWith("INSTVRC6") ? Project.ExpansionVrc6 :
line.StartsWith("INSTN163") ? Project.ExpansionN163 : Project.ExpansionNone;
var param = SplitStringKeepQuotes(line.Substring(line.IndexOf(' ')));
int idx = int.Parse(param[0]);
int vol = int.Parse(param[1]);
int arp = int.Parse(param[2]);
int pit = int.Parse(param[3]);
int dut = int.Parse(param[5]);
var instrument = CreateUniquelyNamedInstrument(expansion, param[param.Length - 1]);
if (expansion == Project.ExpansionN163)
{
instrument.N163WavePreset = Envelope.WavePresetCustom;
instrument.N163WaveSize = byte.Parse(param[6]);
instrument.N163WavePos = byte.Parse(param[7]);
}
if (vol >= 0 && instrument.IsEnvelopeActive(Envelope.Volume))
{
instrument.Envelopes[Envelope.Volume] = envelopes[expansion, Envelope.Volume][vol].ShallowClone();
}
if (arp >= 0 && instrument.IsEnvelopeActive(Envelope.Arpeggio))
{
instrument.Envelopes[Envelope.Arpeggio] = envelopes[expansion, Envelope.Arpeggio][arp].ShallowClone();
}
if (pit >= 0 && instrument.IsEnvelopeActive(Envelope.Pitch))
{
instrument.Envelopes[Envelope.Pitch] = envelopes[expansion, Envelope.Pitch][pit].ShallowClone();
}
if (dut >= 0 && instrument.IsEnvelopeActive(Envelope.DutyCycle))
{
instrument.Envelopes[Envelope.DutyCycle] = envelopes[expansion, Envelope.DutyCycle][dut].ShallowClone();
}
instruments[idx] = instrument;
}
else if (line.StartsWith("INSTVRC7"))
{
var param = SplitStringKeepQuotes(line.Substring(line.IndexOf(' ')));
int idx = int.Parse(param[0]);
var instrument = CreateUniquelyNamedInstrument(Project.ExpansionVrc7, param[param.Length - 1]);
instrument.Vrc7Patch = byte.Parse(param[1]);
if (instrument.Vrc7Patch == 0)
{
for (int j = 0; j < 8; j++)
{
instrument.Vrc7PatchRegs[j] = Convert.ToByte(param[2 + j], 16);
}
}
instruments[idx] = instrument;
}
else if (line.StartsWith("INSTFDS"))
{
var param = SplitStringKeepQuotes(line.Substring(line.IndexOf(' ')));
int idx = int.Parse(param[0]);
int modEnable = int.Parse(param[1]);
int modSpeed = int.Parse(param[2]);
int modDepth = int.Parse(param[3]);
int modDelay = int.Parse(param[4]);
if (modEnable == 0)
{
modSpeed = 0;
modDepth = 0;
modDelay = 0;
}
instruments[idx] = CreateUniquelyNamedInstrument(Project.ExpansionFds, param[5]);
instruments[idx].FdsModSpeed = (ushort)modSpeed;
instruments[idx].FdsModDepth = (byte)modDepth;
instruments[idx].FdsModDelay = (byte)modDelay;
instruments[idx].FdsWavePreset = Envelope.WavePresetCustom;
instruments[idx].FdsModPreset = Envelope.WavePresetCustom;
}
else if (line.StartsWith("FDSMACRO"))
{
var halves = line.Substring(line.IndexOf(' ')).Split(':');
var param = halves[0].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var curve = halves[1].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var inst = int.Parse(param[0]);
var type = int.Parse(param[1]);
var loop = int.Parse(param[2]);
var rel = int.Parse(param[3]);
var famistudioType = EnvelopeTypeLookup[type];
var env = instruments[inst].Envelopes[famistudioType];
env.Length = curve.Length;
// FamiTracker allows envelope with release with no loop. We dont allow that.
if (env.CanRelease && loop == -1 && rel != -1)
{
loop = rel;
}
env.Loop = loop;
env.Release = env.CanRelease && rel != -1 ? rel + 1 : -1;
env.Relative = famistudioType == Envelope.Pitch;
for (int j = 0; j < curve.Length; j++)
{
env.Values[j] = sbyte.Parse(curve[j]);
}
}
else if (line.StartsWith("FDSMOD") || line.StartsWith("FDSWAVE"))
{
var mod = line.StartsWith("FDSMOD");
var halves = line.Substring(line.IndexOf(' ')).Split(':');
var param = halves[0].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var curve = halves[1].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var inst = int.Parse(param[0]);
var env = instruments[inst].Envelopes[mod ? Envelope.FdsModulation : Envelope.FdsWaveform];
for (int j = 0; j < curve.Length; j++)
{
env.Values[j] = sbyte.Parse(curve[j]);
}
if (mod)
{
env.ConvertFdsModulationToAbsolute();
}
}
else if (line.StartsWith("N163WAVE"))
{
var param = line.Substring(8).Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var instIdx = int.Parse(param[0]);
var waveIdx = int.Parse(param[1]);
// TODO: We could create different instruments for each wave.
if (waveIdx == 0)
{
var env = instruments[instIdx].Envelopes[Envelope.N163Waveform];
for (int j = 3; j < param.Length; j++)
{
env.Values[j - 3] = sbyte.Parse(param[j]);
}
}
}
else if (line.StartsWith("TRACK"))
{
var param = SplitStringKeepQuotes(line.Substring(5));
song = project.CreateSong(param[3]);
song.SetLength(0);
song.SetDefaultPatternLength(int.Parse(param[0]));
song.FamitrackerSpeed = int.Parse(param[1]);
song.FamitrackerTempo = int.Parse(param[2]);
columns = new int[song.Channels.Length];
}
else if (line.StartsWith("COLUMNS"))
{
var param = line.Substring(7).Split(new[] { ' ', ':' }, StringSplitOptions.RemoveEmptyEntries);
for (int j = 0; j < song.Channels.Length; j++)
{
columns[j] = int.Parse(param[j]);
}
}
else if (line.StartsWith("ORDER"))
{
var orderIdx = Convert.ToInt32(line.Substring(6, 2), 16);
var values = line.Substring(5).Split(':')[1].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var order = new int[song.Channels.Length];
for (int j = 0; j < song.Channels.Length; j++)
{
int patternIdx = Convert.ToInt32(values[j], 16);
var name = values[j];
var pattern = song.Channels[j].GetPattern(name);
if (pattern == null)
{
pattern = song.Channels[j].CreatePattern(name);
}
song.Channels[j].PatternInstances[orderIdx] = pattern;
}
song.SetLength(song.Length + 1);
}
else if (line.StartsWith("PATTERN"))
{
patternName = line.Substring(8);
}
else if (line.StartsWith("ROW"))
{
var channels = line.Split(new[] { ':' }, StringSplitOptions.RemoveEmptyEntries);
var n = Convert.ToInt32(channels[0].Substring(4, 2), 16);
for (int j = 1; j <= song.Channels.Length; j++)
{
var noteData = channels[j].Split(new[] { ' ' }, StringSplitOptions.RemoveEmptyEntries);
var pattern = song.Channels[j - 1].GetPattern(patternName);
if (pattern == null)
{
continue;
}
//var fxData = new RowFxData[song.PatternLength];
if (!patternFxData.ContainsKey(pattern))
{
patternFxData[pattern] = new RowFxData[song.PatternLength, 4];
}
// Note
if (noteData[0] == "---")
{
pattern.GetOrCreateNoteAt(n).Value = Note.NoteStop;
}
else if (noteData[0] == "===")
{
pattern.GetOrCreateNoteAt(n).Value = Note.NoteRelease;
}
else if (noteData[0] != "...")
{
int famitoneNote;
if (j == 4)
{
famitoneNote = (Convert.ToInt32(noteData[0].Substring(0, 1), 16) + 31) + 1;
}
else
{
int semitone = TextToNoteLookup[noteData[0].Substring(0, 2)];
int octave = noteData[0][2] - '0';
famitoneNote = octave * 12 + semitone + 1;
}
if (famitoneNote >= Note.MusicalNoteMin && famitoneNote <= Note.MusicalNoteMax)
{
var note = pattern.GetOrCreateNoteAt(n);
note.Value = (byte)famitoneNote;
note.Instrument = j == 5 ? null : instruments[Convert.ToInt32(noteData[1], 16)];
}
else
{
// Note outside of range.
}
}
// Volume
if (noteData[2] != ".")
{
pattern.GetOrCreateNoteAt(n).Volume = Convert.ToByte(noteData[2], 16);
}
// Read FX.
for (int k = 0; k < columns[j - 1]; k++)
{
var fxStr = noteData[3 + k];
if (fxStr == "...")
{
continue;
}
var fx = new RowFxData();
if (project.ExpansionAudio == Project.ExpansionFds && FdsTextToEffectLookup.TryGetValue(fxStr[0], out var fdsFx))
{
fx.fx = (byte)fdsFx;
}
else
{
fx.fx = TextToEffectLookup[fxStr[0]];
}
fx.param = Convert.ToByte(fxStr.Substring(1), 16);
patternFxData[pattern][n, k] = fx;
ApplySimpleEffects(fx, pattern, n, patternLengths);
}
}
}
}
FinishImport();
return(project);
}
