diff src/adplug/core/fmc.cxx @ 12:3da1b8942b8b trunk

[svn] - remove src/Input src/Output src/Effect src/General src/Visualization src/Container

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/adplug/core/fmc.cxx	Mon Sep 18 03:14:20 2006 -0700
@@ -0,0 +1,223 @@
+/*
+  Adplug - Replayer for many OPL2/OPL3 audio file formats.
+  Copyright (C) 1999 - 2003 Simon Peter <[e-mail]>, et al.
+
+  This library is free software; you can redistribute it and/or
+  modify it under the terms of the GNU Lesser General Public
+  License as published by the Free Software Foundation; either
+  version 2.1 of the License, or (at your option) any later version.
+
+  This library is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+  Lesser General Public License for more details.
+
+  You should have received a copy of the GNU Lesser General Public
+  License along with this library; if not, write to the Free Software
+  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+
+  fmc.cpp - FMC Loader by Riven the Mage <[e-mail]>
+*/
+
+#include "fmc.h"
+
+/* -------- Public Methods -------------------------------- */
+
+CPlayer *CfmcLoader::factory(Copl *newopl)
+{
+  return new CfmcLoader(newopl);
+}
+
+bool CfmcLoader::load(const std::string &filename, const CFileProvider &fp)
+{
+        binistream *f = fp.open(filename); if(!f) return false;
+	const unsigned char conv_fx[16] = {0,1,2,3,4,8,255,255,255,255,26,11,12,13,14,15};
+
+	int i,j,k,t=0;
+
+	// read header
+	f->readString(header.id, 4);
+	f->readString(header.title, 21);
+	header.numchan = f->readInt(1);
+
+	// 'FMC!' - signed ?
+	if (strncmp(header.id,"FMC!",4)) { fp.close(f); return false; }
+
+	// init CmodPlayer
+	realloc_instruments(32);
+	realloc_order(256);
+	realloc_patterns(64,64,header.numchan);
+	init_trackord();
+
+	// load order
+	for(i = 0; i < 256; i++) order[i] = f->readInt(1);
+
+	f->ignore(2);
+
+	// load instruments
+	for(i = 0; i < 32; i++) {
+	  instruments[i].synthesis = f->readInt(1);
+	  instruments[i].feedback = f->readInt(1);
+
+	  instruments[i].mod_attack = f->readInt(1);
+	  instruments[i].mod_decay = f->readInt(1);
+	  instruments[i].mod_sustain = f->readInt(1);
+	  instruments[i].mod_release = f->readInt(1);
+	  instruments[i].mod_volume = f->readInt(1);
+	  instruments[i].mod_ksl = f->readInt(1);
+	  instruments[i].mod_freq_multi = f->readInt(1);
+	  instruments[i].mod_waveform = f->readInt(1);
+	  instruments[i].mod_sustain_sound = f->readInt(1);
+	  instruments[i].mod_ksr = f->readInt(1);
+	  instruments[i].mod_vibrato = f->readInt(1);
+	  instruments[i].mod_tremolo = f->readInt(1);
+
+	  instruments[i].car_attack = f->readInt(1);
+	  instruments[i].car_decay = f->readInt(1);
+	  instruments[i].car_sustain = f->readInt(1);
+	  instruments[i].car_release = f->readInt(1);
+	  instruments[i].car_volume = f->readInt(1);
+	  instruments[i].car_ksl = f->readInt(1);
+	  instruments[i].car_freq_multi = f->readInt(1);
+	  instruments[i].car_waveform = f->readInt(1);
+	  instruments[i].car_sustain_sound = f->readInt(1);
+	  instruments[i].car_ksr = f->readInt(1);
+	  instruments[i].car_vibrato = f->readInt(1);
+	  instruments[i].car_tremolo = f->readInt(1);
+
+	  instruments[i].pitch_shift = f->readInt(1);
+
+	  f->readString(instruments[i].name, 21);
+	}
+
+	// load tracks
+	for (i=0;i<64;i++)
+	{
+	        if(f->ateof()) break;
+
+		for (j=0;j<header.numchan;j++)
+		{
+			for (k=0;k<64;k++)
+			{
+				fmc_event event;
+
+				// read event
+				event.byte0 = f->readInt(1);
+				event.byte1 = f->readInt(1);
+				event.byte2 = f->readInt(1);
+
+				// convert event
+				tracks[t][k].note = event.byte0 & 0x7F;
+				tracks[t][k].inst = ((event.byte0 & 0x80) >> 3) + (event.byte1 >> 4) + 1;
+				tracks[t][k].command = conv_fx[event.byte1 & 0x0F];
+				tracks[t][k].param1 = event.byte2 >> 4;
+				tracks[t][k].param2 = event.byte2 & 0x0F;
+
+				// fix effects
+				if (tracks[t][k].command == 0x0E) // 0x0E (14): Retrig
+					tracks[t][k].param1 = 3;
+				if (tracks[t][k].command == 0x1A) // 0x1A (26): Volume Slide
+					if (tracks[t][k].param1 > tracks[t][k].param2)
+					{
+						tracks[t][k].param1 -= tracks[t][k].param2;
+						tracks[t][k].param2 = 0;
+					}
+					else
+					{
+						tracks[t][k].param2 -= tracks[t][k].param1;
+						tracks[t][k].param1 = 0;
+					}
+			}
+
+			t++;
+		}
+	}
+	fp.close(f);
+
+	// convert instruments
+	for (i=0;i<31;i++)
+		buildinst(i);
+
+	// order length
+	for (i=0;i<256;i++)
+	{
+		if (order[i] >= 0xFE)
+		{
+			length = i;
+			break;
+		}
+	}
+
+	// data for Protracker
+	activechan = (0xffff >> (16 - header.numchan)) << (16 - header.numchan);
+	nop = t / header.numchan;
+	restartpos = 0;
+
+	// flags
+	flags = Faust;
+
+	rewind(0);
+
+	return true;
+}
+
+float CfmcLoader::getrefresh()
+{
+	return 50.0f;
+}
+
+std::string CfmcLoader::gettype()
+{
+	return std::string("Faust Music Creator");
+}
+
+std::string CfmcLoader::gettitle()
+{
+	return std::string(header.title);
+}
+
+std::string CfmcLoader::getinstrument(unsigned int n)
+{
+	return std::string(instruments[n].name);
+}
+
+unsigned int CfmcLoader::getinstruments()
+{
+	return 32;
+}
+
+/* -------- Private Methods ------------------------------- */
+
+void CfmcLoader::buildinst(unsigned char i)
+{
+	inst[i].data[0]   = ((instruments[i].synthesis & 1) ^ 1);
+	inst[i].data[0]  |= ((instruments[i].feedback & 7) << 1);
+
+	inst[i].data[3]   = ((instruments[i].mod_attack & 15) << 4);
+	inst[i].data[3]  |=  (instruments[i].mod_decay & 15);
+	inst[i].data[5]   = ((15 - (instruments[i].mod_sustain & 15)) << 4);
+	inst[i].data[5]  |=  (instruments[i].mod_release & 15);
+	inst[i].data[9]   =  (63 - (instruments[i].mod_volume & 63));
+	inst[i].data[9]  |= ((instruments[i].mod_ksl & 3) << 6);
+	inst[i].data[1]   =  (instruments[i].mod_freq_multi & 15);
+	inst[i].data[7]   =  (instruments[i].mod_waveform & 3);
+	inst[i].data[1]  |= ((instruments[i].mod_sustain_sound & 1) << 5);
+	inst[i].data[1]  |= ((instruments[i].mod_ksr & 1) << 4);
+	inst[i].data[1]  |= ((instruments[i].mod_vibrato & 1) << 6);
+	inst[i].data[1]  |= ((instruments[i].mod_tremolo & 1) << 7);
+
+	inst[i].data[4]   = ((instruments[i].car_attack & 15) << 4);
+	inst[i].data[4]  |=  (instruments[i].car_decay & 15);
+	inst[i].data[6]   = ((15 - (instruments[i].car_sustain & 15)) << 4);
+	inst[i].data[6]  |=  (instruments[i].car_release & 15);
+	inst[i].data[10]  =  (63 - (instruments[i].car_volume & 63));
+	inst[i].data[10] |= ((instruments[i].car_ksl & 3) << 6);
+	inst[i].data[2]   =  (instruments[i].car_freq_multi & 15);
+	inst[i].data[8]   =  (instruments[i].car_waveform & 3);
+	inst[i].data[2]  |= ((instruments[i].car_sustain_sound & 1) << 5);
+	inst[i].data[2]  |= ((instruments[i].car_ksr & 1) << 4);
+	inst[i].data[2]  |= ((instruments[i].car_vibrato & 1) << 6);
+	inst[i].data[2]  |= ((instruments[i].car_tremolo & 1) << 7);
+
+	inst[i].slide     =   instruments[i].pitch_shift;
+}