Method CompileData

Source/PatternCompiler.cpp:141–654

}

void CPatternCompiler::CompileData(int Track, int Pattern, stChannelID Channel) {
	const auto *pSong = modfile_.GetSong(Track);		// // //
	if (!pSong)
		return;
	const auto *pInstManager = modfile_.GetInstrumentManager();

	int EffColumns = pSong->GetEffectColumnCount(Channel);

	// Global init
	m_iHash = 0;
	m_iDuration = 0;
	m_iCurrentDefaultDuration = 0xFF;

	m_vData.clear();
	m_vCompressedData.clear();

	// Local init
	unsigned int iPatternLen = pSong->GetPatternLength();
	unsigned char LastInstrument = MAX_INSTRUMENTS + 1;
	unsigned char DPCMInst = 0;

	for (unsigned int i = 0; i < iPatternLen; ++i) {
		stChanNote ChanNote = pSong->GetPattern(Channel, Pattern).GetNoteOn(i);		// // //

		const note_t Note = ChanNote.Note;
		const unsigned char Octave = ChanNote.Octave;
		const unsigned char Instrument = FindInstrument(ChanNote.Instrument);
		const unsigned char Volume = ChanNote.Vol;

		bool Action = false;

		if (ChanNote.Instrument != MAX_INSTRUMENTS && ChanNote.Instrument != HOLD_INSTRUMENT && (is_note(Note) || Note == note_t::echo))		// // //
			if (!IsInstrumentCompatible(Channel.Chip, pInstManager->GetInstrumentType(ChanNote.Instrument)))		// // //
				Print("Error: Missing or incompatible instrument (on row " + conv::from_uint(i) +
					", channel " + std::string {FTEnv.GetSoundChipService()->GetChannelFullName(Channel)} + ", pattern " + conv::from_uint(Pattern) + ")\n");

		// Check for delays, must come first
		for (int j = 0; j < EffColumns; ++j) {
			effect_t Effect = ChanNote.Effects[j].fx;
			unsigned char EffParam = ChanNote.Effects[j].param;
			if (Effect == effect_t::DELAY && EffParam > 0) {
				WriteDuration();
				for (int k = 0; k < EffColumns; ++k) {
					// Clear skip and jump commands on delayed rows
					if (ChanNote.Effects[k].fx == effect_t::SKIP) {
						WriteData(Command(CMD_EFF_SKIP));
						WriteData(ChanNote.Effects[k].param + 1);
						ChanNote.Effects[k] = { };
					}
					else if (ChanNote.Effects[k].fx == effect_t::JUMP) {
						WriteData(Command(CMD_EFF_JUMP));
						WriteData(ChanNote.Effects[k].param + 1);
						ChanNote.Effects[k] = { };
					}
				}
				Action = true;
				WriteData(Command(CMD_EFF_DELAY));
				WriteData(EffParam);