+++ /dev/null
-/*
- Adplug - Replayer for many OPL2/OPL3 audio file formats.
- Copyright (C) 1999 - 2007 Simon Peter <dn.tlp@gmx.net>, 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
-
- fmc.cpp - FMC Loader by Riven the Mage <riven@ok.ru>
-*/
-
-#include <cstring>
-#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 = (0xffffffff >> (32 - header.numchan)) << (32 - 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;
-}