int main(int argc, char *argv[])
{
#if defined(USE_MSXML)
CoInitialize(0);
#endif
const char *fname = "data.xml";
if (argc > 1)
fname = argv[1];
InitSynthesizer();
mix.SetChannels(2);
mix.MasterVolume(1.0, 1.0);
mix.ChannelOn(0, 1);
mix.ChannelOn(1, 1);
mix.ChannelVolume(0, 1.0);
mix.ChannelVolume(1, 1.0);
#ifdef ADD_REVERB
mix.SetFxChannels(1);
mix.FxInit(0, &rvrb, 0.1);
mix.FxLevel(0, 0, 0.2);
mix.FxLevel(0, 1, 0.2);
rvrb.InitReverb(1.0, 2.0);
#endif
inMgr.Init(&mix, &wvf);
inMgr.AddType("Tone", ToneInstr::ToneFactory, ToneInstr::ToneEventFactory);
inMgr.AddType("ToneFM", ToneFM::ToneFMFactory, ToneFM::ToneFMEventFactory);
inMgr.AddType("AddSynth", AddSynth::AddSynthFactory, AddSynth::AddSynthEventFactory);
inMgr.AddType("SubSynth", SubSynth::SubSynthFactory, SubSynth::SubSynthEventFactory);
inMgr.AddType("FMSynth", FMSynth::FMSynthFactory, FMSynth::FMSynthEventFactory);
inMgr.AddType("MatrixSynth", MatrixSynth::MatrixSynthFactory, MatrixSynth::MatrixSynthEventFactory);
inMgr.AddType("WFSynth", WFSynth::WFSynthFactory, WFSynth::WFSynthEventFactory);
inMgr.AddType("Chuffer", Chuffer::ChufferFactory, Chuffer::ChufferEventFactory);
inMgr.AddType("ModSynth", ModSynth::ModSynthFactory, ModSynth::ModSynthEventFactory);
inMgr.AddType("BuzzSynth", BuzzSynth::InstrFactory, BuzzSynth::EventFactory);
InstrMapEntry *ime = 0;
while ((ime = inMgr.EnumType(ime)) != 0)
ime->dumpTmplt = DestroyTemplate;
XmlSynthDoc doc;
XmlSynthElem rootNode(&doc);
if (!doc.Open(fname, &rootNode))
{
printf("Cannot open file %s\n", fname);
exit(1);
}
// Optional: use LoadInstrLib(inMgr, fname)
// but we want to discover the inum values
// and add sequences programaticaly...
XmlSynthElem elem(&doc);
XmlSynthElem *inst = rootNode.FirstChild(&elem);
while (inst != NULL)
{
if (inst->TagMatch("instr"))
{
InstrConfig *ent = inMgr.LoadInstr(inst);
if (strcmp(ent->instrType->GetType(), "WFSynth") == 0)
AddEvent(ent->inum, 48, 1.0);
else
AddSequence(ent->inum, 0.25);
}
inst = elem.NextSibling(&elem);
}
doc.Close();
if (wvf.OpenWaveFile("example10.wav", 2))
{
printf("Cannot open wavefile for output\n");
exit(1);
}
seq.Sequence(inMgr);
#ifdef ADD_REVERB
// drain the reverb...
AmpValue lv;
AmpValue rv;
long n = synthParams.isampleRate;
while (n-- > 0)
{
mix.Out(&lv, &rv);
wvf.Output2(lv, rv);
}
#endif
wvf.CloseWaveFile();
///////////////////////////////////////////////////////////////
// Code to test instrument save functions...
#define TEST_SAVE_INSTR 1
#ifdef TEST_SAVE_INSTR
doc.NewDoc("instrlib", &rootNode);
InstrConfig *inc = inMgr.EnumInstr(0);
while (inc)
{
InstrMapEntry *ime = inc->instrType;
Instrument *ip = (Instrument *)inc->instrTmplt;
if (ip)
{
rootNode.AddChild("instr", &elem);
elem.SetAttribute("id", inc->inum);
elem.SetAttribute("type", ime->itype);
elem.SetAttribute("name", inc->GetName());
elem.SetAttribute("desc", inc->GetDesc());
ip->Save(&elem);
}
inc = inMgr.EnumInstr(inc);
}
bsString outxml(fname);
bsString outbase;
bsString outfile;
outxml.SplitPath(outbase, outfile, 1);
outxml = outbase;
outxml += '_';
outxml += outfile;
doc.Save(outxml);
#endif
///////////////////////////////////////////////////////////////
return 0;
}
int main(int argc, char *argv[])
{
InitSynthesizer();
long n;
int pitch = 48;
FrqValue duration = 2.75;
AmpValue value1, value2;
if (argc > 1)
duration = atof(argv[1]);
if (argc > 2)
pitch = atoi(argv[2]);
FrqValue frequency = synthParams.GetFrequency(pitch);
if (wvf.OpenWaveFile("example07b.wav", 2))
{
printf("Cannot open wavefile for output\n");
exit(1);
}
GenWaveFM wv;
wv.InitFM(frequency, 1, 2, WT_SIN);
EnvGen eg;
eg.InitEG(0.5f, duration, 0.5f, 0.5f);
long totalSamples = (long) ((duration * synthParams.sampleRate) + 0.5);
// reference sound.
for (n = 0; n < totalSamples; n++)
{
value2 = (eg.Gen() * wv.Gen());
wvf.Output1(value2);
}
Silence(0.25);
// Flanger #1 varies from 0 to 5ms
Flanger flng1;
flng1.InitFlanger(0.5, 0.5, 0, 0.0025, 0.005, 0.15);
// Flanger #2 varies from 45 to 50ms
Flanger flng2;
flng2.InitFlanger(0.5, 0.5, 0, 0.0042, 0.005, 0.15);
// Flanger #3 is set for a chorus effect
Flanger flng3;
flng3.InitFlanger(0.5, 0.5, 0.5, 0.100, 0.001, 0.8);
for (float snd = 0.5; snd <= 1; snd += 0.5)
{
wv.InitFM(frequency*snd, 1, 2, WT_SIN);
eg.Reset();
flng1.Clear();
for (n = 0; n < totalSamples; n++)
{
value1 = (eg.Gen() * wv.Gen());
value2 = flng1.Sample(value1);
wvf.Output2(value2, value2);
}
Silence(0.25);
eg.Reset();
flng2.Clear();
for (n = 0; n < totalSamples; n++)
{
value1 = (eg.Gen() * wv.Gen());
value2 = flng2.Sample(value1);
wvf.Output2(value2, value2);
}
Silence(0.25);
eg.Reset();
flng3.Clear();
for (n = 0; n < totalSamples; n++)
{
value1 = (eg.Gen() * wv.Gen());
value2 = flng3.Sample(value1);
wvf.Output2(value2, value2);
}
Silence(0.25);
}
wvf.CloseWaveFile();
return 0;
}
