protected void Load(byte[] binary, EndianBinaryReader reader, int headerOffset)
{
_binary = binary;
Header = reader.ReadObject <M4ASongHeader>(headerOffset);
VoiceTable = VoiceTable.LoadTable <M4AVoiceTable>(Header.VoiceTable - ROM.Pak);
Commands = new List <SongEvent> [Header.NumTracks];
for (int i = 0; i < Header.NumTracks; i++)
{
Commands[i] = new List <SongEvent>();
}
if (Header.NumTracks > ROM.Instance.Game.Engine.TrackLimit)
{
throw new InvalidDataException($"La canzone ha troppe tracce ({Header.NumTracks}).");
}
for (int i = 0; i < NumTracks; i++)
{
reader.BaseStream.Position = Header.Tracks[i] - ROM.Pak;
byte cmd = 0, runCmd = 0, prevNote = 0, prevVelocity = 0x7F;
while (cmd != 0xB1 && cmd != 0xB6)
{
int off = (int)reader.BaseStream.Position;
ICommand command = null;
cmd = reader.ReadByte();
if (cmd >= 0xBD) // Commands that work within running status
{
runCmd = cmd;
}
#region TIE & Notes
if (runCmd >= 0xCF && cmd < 0x80) // Within running status
{
var peek = reader.PeekBytes(2);
if (peek[0] >= 0x80)
{
command = AddNoteEvent(cmd, prevVelocity, 0, runCmd, out prevNote, out prevVelocity);
}
else if (peek[1] > 3 || peek[1] < 1)
{
command = AddNoteEvent(cmd, reader.ReadByte(), 0, runCmd, out prevNote, out prevVelocity);
}
else
{
command = AddNoteEvent(cmd, reader.ReadByte(), reader.ReadByte(), runCmd, out prevNote, out prevVelocity);
}
}
else if (cmd >= 0xCF)
{
var peek = reader.PeekBytes(3);
if (peek[0] >= 0x80)
{
command = AddNoteEvent(prevNote, prevVelocity, 0, runCmd, out prevNote, out prevVelocity);
}
else if (peek[1] >= 0x80)
{
command = AddNoteEvent(reader.ReadByte(), prevVelocity, 0, runCmd, out prevNote, out prevVelocity);
}
// TIE cannot have an added duration so it needs to stop here
else if (cmd == 0xCF || peek[2] > 3 || peek[2] < 1)
{
command = AddNoteEvent(reader.ReadByte(), reader.ReadByte(), 0, runCmd, out prevNote, out prevVelocity);
}
else
{
command = AddNoteEvent(reader.ReadByte(), reader.ReadByte(), reader.ReadByte(), runCmd, out prevNote, out prevVelocity);
}
}
#endregion
#region Rests
else if (cmd >= 0x80 && cmd <= 0xB0)
{
command = new RestCommand {
Rest = SongEvent.RestFromCMD(0x80, cmd)
}
}
;
#endregion
#region Commands
else if (runCmd < 0xCF && cmd < 0x80) // Commands within running status
{
switch (runCmd)
{
case 0xBD: command = new VoiceCommand {
Voice = cmd
}; break;
case 0xBE: command = new VolumeCommand {
Volume = cmd
}; break;
case 0xBF: command = new PanpotCommand {
Panpot = (sbyte)(cmd - 0x40)
}; break;
case 0xC0: command = new BendCommand {
Bend = (sbyte)(cmd - 0x40)
}; break;
case 0xC1: command = new BendRangeCommand {
Range = cmd
}; break;
case 0xC2: command = new LFOSpeedCommand {
Speed = cmd
}; break;
case 0xC3: command = new LFODelayCommand {
Delay = cmd
}; break;
case 0xC4: command = new ModDepthCommand {
Depth = cmd
}; break;
case 0xC5: command = new ModTypeCommand {
Type = cmd
}; break;
case 0xC8: command = new TuneCommand {
Tune = (sbyte)(cmd - 0x40)
}; break;
case 0xCD: command = new LibraryCommand {
Command = cmd, Argument = reader.ReadByte()
}; break;
case 0xCE: command = new EndOfTieCommand {
Note = (sbyte)cmd
}; prevNote = cmd; break;
}
}
else if (cmd > 0xB0 && cmd < 0xCF)
{
switch (cmd)
{
case 0xB1: // FINE & PREV
case 0xB6: command = new M4AFinishCommand {
Type = cmd
}; break;
case 0xB2: command = new GoToCommand {
Offset = reader.ReadInt32() - ROM.Pak
}; break;
case 0xB3: command = new CallCommand {
Offset = reader.ReadInt32() - ROM.Pak
}; break;
case 0xB4: command = new ReturnCommand(); break;
case 0xB5: command = new RepeatCommand {
Times = reader.ReadByte(), Offset = reader.ReadInt32() - ROM.Pak
}; break;
case 0xB9: command = new MemoryAccessCommand {
Arg1 = reader.ReadByte(), Arg2 = reader.ReadByte(), Arg3 = reader.ReadByte()
}; break;
case 0xBA: command = new PriorityCommand {
Priority = reader.ReadByte()
}; break;
case 0xBB: command = new TempoCommand {
Tempo = (short)(reader.ReadByte() * 2)
}; break;
case 0xBC: command = new KeyShiftCommand {
Shift = reader.ReadSByte()
}; break;
// Commands that work within running status:
case 0xBD: command = new VoiceCommand {
Voice = reader.ReadByte()
}; break;
case 0xBE: command = new VolumeCommand {
Volume = reader.ReadByte()
}; break;
case 0xBF: command = new PanpotCommand {
Panpot = (sbyte)(reader.ReadByte() - 0x40)
}; break;
case 0xC0: command = new BendCommand {
Bend = (sbyte)(reader.ReadByte() - 0x40)
}; break;
case 0xC1: command = new BendRangeCommand {
Range = reader.ReadByte()
}; break;
case 0xC2: command = new LFOSpeedCommand {
Speed = reader.ReadByte()
}; break;
case 0xC3: command = new LFODelayCommand {
Delay = reader.ReadByte()
}; break;
case 0xC4: command = new ModDepthCommand {
Depth = reader.ReadByte()
}; break;
case 0xC5: command = new ModTypeCommand {
Type = reader.ReadByte()
}; break;
case 0xC8: command = new TuneCommand {
Tune = (sbyte)(reader.ReadByte() - 0x40)
}; break;
case 0xCD: command = new LibraryCommand {
Command = reader.ReadByte(), Argument = reader.ReadByte()
}; break;
case 0xCE: // EOT
sbyte note;
if (reader.PeekByte() < 0x80)
{
note = reader.ReadSByte();
prevNote = (byte)note;
}
else
{
note = -1;
}
command = new EndOfTieCommand {
Note = note
};
break;
default: Console.WriteLine("Comando invalido: 0x{0:X} = {1}", off, cmd); break;
}
}
#endregion
Commands[i].Add(new SongEvent(off, command));
}
}
ICommand AddNoteEvent(byte note, byte velocity, byte addedDuration, byte runCmd, out byte prevNote, out byte prevVelocity)
{
return(new M4ANoteCommand
{
Note = (sbyte)(prevNote = note),
Velocity = prevVelocity = velocity,
Duration = (short)(runCmd == 0xCF ? -1 : (SongEvent.RestFromCMD(0xCF, runCmd) + addedDuration))
});
}
}
protected void Load(byte[] binary, M4ASongHeader head)
{
_binary = binary;
Header = head;
Array.Resize(ref Header.Tracks, Header.NumTracks); // Not really necessary yet
Commands = new List <SongEvent> [Header.NumTracks];
for (int i = 0; i < Header.NumTracks; i++)
{
Commands[i] = new List <SongEvent>();
}
VoiceTable = VoiceTable.LoadTable <M4AVoiceTable>(Header.VoiceTable);
if (NumTracks == 0 || NumTracks > 16)
{
return;
}
var reader = new ROMReader();
reader.InitReader(_binary);
for (int i = 0; i < NumTracks; i++)
{
reader.SetOffset(Header.Tracks[i]);
byte cmd = 0, runCmd = 0, prevNote = 0, prevVelocity = 127;
while (cmd != 0xB1 && cmd != 0xB6)
{
uint off = reader.Position;
ICommand command = null;
cmd = reader.ReadByte();
if (cmd >= 0xBD) // Commands that work within running status
{
runCmd = cmd;
}
#region TIE & Notes
if (runCmd >= 0xCF && cmd < 0x80) // Within running status
{
var o = reader.Position;
byte peek1 = reader.ReadByte(),
peek2 = reader.ReadByte();
reader.SetOffset(o);
if (peek1 >= 128)
{
command = AddNoteEvent(cmd, prevVelocity, 0, runCmd, out prevNote, out prevVelocity);
}
else if (peek2 > 3 || peek2 < 1)
{
command = AddNoteEvent(cmd, reader.ReadByte(), 0, runCmd, out prevNote, out prevVelocity);
}
else
{
command = AddNoteEvent(cmd, reader.ReadByte(), reader.ReadByte(), runCmd, out prevNote, out prevVelocity);
}
}
else if (cmd >= 0xCF)
{
var o = reader.Position;
byte peek1 = reader.ReadByte(),
peek2 = reader.ReadByte(),
peek3 = reader.ReadByte();
reader.SetOffset(o);
if (peek1 >= 128)
{
command = AddNoteEvent(prevNote, prevVelocity, 0, runCmd, out prevNote, out prevVelocity);
}
else if (peek2 >= 128)
{
command = AddNoteEvent(reader.ReadByte(), prevVelocity, 0, runCmd, out prevNote, out prevVelocity);
}
// TIE cannot have an added duration so it needs to stop here
else if (cmd == 0xCF || peek3 > 3 || peek3 < 1)
{
command = AddNoteEvent(reader.ReadByte(), reader.ReadByte(), 0, runCmd, out prevNote, out prevVelocity);
}
else
{
command = AddNoteEvent(reader.ReadByte(), reader.ReadByte(), reader.ReadByte(), runCmd, out prevNote, out prevVelocity);
}
}
#endregion
#region Rests
else if (cmd >= 0x80 && cmd <= 0xB0)
{
command = new RestCommand {
Rest = SongEvent.RestFromCMD(0x80, cmd)
}
}
;
#endregion
#region Commands
else if (runCmd < 0xCF && cmd < 0x80) // Commands within running status
{
switch (runCmd)
{
case 0xBD: command = new VoiceCommand {
Voice = cmd
}; break;
case 0xBE: command = new VolumeCommand {
Volume = cmd
}; break;
case 0xBF: command = new PanpotCommand {
Panpot = (sbyte)(cmd - 0x40)
}; break;
case 0xC0: command = new BendCommand {
Bend = (sbyte)(cmd - 0x40)
}; break;
case 0xC1: command = new BendRangeCommand {
Range = cmd
}; break;
case 0xC2: command = new LFOSpeedCommand {
Speed = cmd
}; break;
case 0xC3: command = new LFODelayCommand {
Delay = cmd
}; break;
case 0xC4: command = new ModDepthCommand {
Depth = cmd
}; break;
case 0xC5: command = new ModTypeCommand {
Type = cmd
}; break;
case 0xC8: command = new TuneCommand {
Tune = (sbyte)(cmd - 0x40)
}; break;
case 0xCD: command = new LibraryCommand {
Command = cmd, Argument = reader.ReadByte()
}; break;
case 0xCE: command = new EndOfTieCommand {
Note = (sbyte)cmd
}; prevNote = cmd; break;
}
}
else if (cmd > 0xB0 && cmd < 0xCF)
{
switch (cmd)
{
case 0xB1: // FINE & PREV
case 0xB6: command = new M4AFinishCommand {
Type = cmd
}; break;
case 0xB2: command = new GoToCommand {
Offset = reader.ReadPointer()
}; break;
case 0xB3: command = new CallCommand {
Offset = reader.ReadPointer()
}; break;
case 0xB4: command = new ReturnCommand(); break;
case 0xB5: command = new RepeatCommand {
Times = reader.ReadByte(), Offset = reader.ReadPointer()
}; break;
case 0xB9: command = new MemoryAccessCommand {
Arg1 = reader.ReadByte(), Arg2 = reader.ReadByte(), Arg3 = reader.ReadByte()
}; break;
case 0xBA: command = new PriorityCommand {
Priority = reader.ReadByte()
}; break;
case 0xBB: command = new TempoCommand {
Tempo = (ushort)(reader.ReadByte() * 2)
}; break;
case 0xBC: command = new KeyShiftCommand {
Shift = reader.ReadSByte()
}; break;
// Commands that work within running status:
case 0xBD: command = new VoiceCommand {
Voice = reader.ReadByte()
}; break;
case 0xBE: command = new VolumeCommand {
Volume = reader.ReadByte()
}; break;
case 0xBF: command = new PanpotCommand {
Panpot = (sbyte)(reader.ReadByte() - 0x40)
}; break;
case 0xC0: command = new BendCommand {
Bend = (sbyte)(reader.ReadByte() - 0x40)
}; break;
case 0xC1: command = new BendRangeCommand {
Range = reader.ReadByte()
}; break;
case 0xC2: command = new LFOSpeedCommand {
Speed = reader.ReadByte()
}; break;
case 0xC3: command = new LFODelayCommand {
Delay = reader.ReadByte()
}; break;
case 0xC4: command = new ModDepthCommand {
Depth = reader.ReadByte()
}; break;
case 0xC5: command = new ModTypeCommand {
Type = reader.ReadByte()
}; break;
case 0xC8: command = new TuneCommand {
Tune = (sbyte)(reader.ReadByte() - 0x40)
}; break;
case 0xCD: command = new LibraryCommand {
Command = reader.ReadByte(), Argument = reader.ReadByte()
}; break;
case 0xCE: // EOT
sbyte note;
if (reader.PeekByte() < 128)
{
note = reader.ReadSByte();
prevNote = (byte)note;
}
else
{
note = -1;
}
command = new EndOfTieCommand {
Note = note
};
break;
default: Console.WriteLine("Invalid command: 0x{0:X} = {1}", reader.Position, cmd); break;
}
}
#endregion
Commands[i].Add(new SongEvent(off, command));
}
}
ICommand AddNoteEvent(byte note, byte velocity, byte addedDuration, byte runCmd, out byte prevNote, out byte prevVelocity)
{
return(new M4ANoteCommand
{
Note = (sbyte)(prevNote = note),
Velocity = prevVelocity = velocity,
Duration = (short)(runCmd == 0xCF ? -1 : (SongEvent.RestFromCMD(0xCF, runCmd) + addedDuration))
});
}
}