| 
							- /*  SpiralPlugin
 -  *  Copyleft (C) 2000 David Griffiths <dave@pawfal.org>
 -  *
 -  *  This program is free software; you can redistribute it and/or modify
 -  *  it under the terms of the GNU General Public License as published by
 -  *  the Free Software Foundation; either version 2 of the License, or
 -  *  (at your option) any later version.
 -  *
 -  *  This program 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 General Public License for more details.
 -  *
 -  *  You should have received a copy of the GNU General Public License
 -  *  along with this program; if not, write to the Free Software
 -  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 - */ 
 - 
 - #include "OscillatorPluginGUI.h"
 - #include <FL/fl_draw.h>
 - #include <FL/fl_draw.H>
 - 
 - static const int GUI_COLOUR = 179;
 - static const int GUIBG_COLOUR = 144;
 - static const int GUIBG2_COLOUR = 145;
 - 
 - static unsigned char *image_Square[] = {
 - (unsigned char*)"20 20 2 1",
 - (unsigned char*)" \tc None",
 - (unsigned char*)".\tc #000000",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"     ......         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"     .    .         ",
 - (unsigned char*)"   ...    .    ...  ",
 - (unsigned char*)"          .    .    ",
 - (unsigned char*)"          .    .    ",
 - (unsigned char*)"          .    .    ",
 - (unsigned char*)"          .    .    ",
 - (unsigned char*)"          .    .    ",
 - (unsigned char*)"          .    .    ",
 - (unsigned char*)"          ......    ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    "};
 - 
 - static unsigned char *image_Noise[] = {
 - (unsigned char*)"20 20 2 1",
 - (unsigned char*)" \tc None",
 - (unsigned char*)".\tc #000000",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"            .       ",
 - (unsigned char*)"        .   .       ",
 - (unsigned char*)"        .  . .      ",
 - (unsigned char*)"        .  . .      ",
 - (unsigned char*)"       . . .  .     ",
 - (unsigned char*)"       . . .  .     ",
 - (unsigned char*)"   ... . . .  . ..  ",
 - (unsigned char*)"     . . . .  ..    ",
 - (unsigned char*)"     . . . .  .     ",
 - (unsigned char*)"     . .  .         ",
 - (unsigned char*)"      .   .         ",
 - (unsigned char*)"      .   .         ",
 - (unsigned char*)"      .   .         ",
 - (unsigned char*)"          .         ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    "};
 - 
 - static unsigned char *image_Saw[] = {
 - (unsigned char*)"20 20 2 1",
 - (unsigned char*)" \tc None",
 - (unsigned char*)".\tc #000000",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"         ..         ",
 - (unsigned char*)"         ..         ",
 - (unsigned char*)"        . .         ",
 - (unsigned char*)"        . .         ",
 - (unsigned char*)"       .  .         ",
 - (unsigned char*)"       .  .         ",
 - (unsigned char*)"      .   .         ",
 - (unsigned char*)"      .   .         ",
 - (unsigned char*)"   ...    .   ....  ",
 - (unsigned char*)"          .   .     ",
 - (unsigned char*)"          .  .      ",
 - (unsigned char*)"          .  .      ",
 - (unsigned char*)"          . .       ",
 - (unsigned char*)"          . .       ",
 - (unsigned char*)"          ..        ",
 - (unsigned char*)"          ..        ",
 - (unsigned char*)"                    ",
 - (unsigned char*)"                    "};
 - 
 - 
 - OscillatorPluginGUI::OscillatorPluginGUI(int w, int h,OscillatorPlugin *o,ChannelHandler *ch,const HostInfo *Info) :
 - SpiralPluginGUI(w,h,o,ch),
 - pixmap_Square(image_Square),
 - pixmap_Noise(image_Noise),
 - pixmap_Saw(image_Saw),
 - m_FineFreq(0),
 - m_Octave(0)
 - {	
 -     ShapeSquare = new Fl_Check_Button(5, 15, 55, 30);
 -     ShapeSquare->type(102);
 -     ShapeSquare->down_box(FL_DIAMOND_DOWN_BOX);
 -     ShapeSquare->selection_color(GUI_COLOUR);
 -     ShapeSquare->set();
 -     pixmap_Square.label(ShapeSquare);
 - 	ShapeSquare->callback((Fl_Callback*)cb_Square);
 - 	              
 - 	ShapeNoise = new Fl_Check_Button(5, 65, 55, 30);
 -     ShapeNoise->type(102);
 -     ShapeNoise->down_box(FL_DIAMOND_DOWN_BOX);
 -     ShapeNoise->selection_color(GUI_COLOUR);
 -     pixmap_Noise.label(ShapeNoise);      
 -     ShapeNoise->callback((Fl_Callback*)cb_Noise);
 - 	  
 - 	ShapeSaw = new Fl_Check_Button(5, 40, 55, 30);
 -     ShapeSaw->type(102);
 -     ShapeSaw->down_box(FL_DIAMOND_DOWN_BOX);
 -     ShapeSaw->selection_color(GUI_COLOUR);
 -     pixmap_Saw.label(ShapeSaw);      
 -     ShapeSaw->callback((Fl_Callback*)cb_Saw);
 - 	  	   
 - 	Freq = new Fl_Knob(188, 2, 40, 40, "Octave");
 -     Freq->color(GUI_COLOUR);
 - 	Freq->type(Fl_Knob::LINELIN);
 -     Freq->labelsize(10);
 -     Freq->maximum(6);
 -     Freq->step(1);
 -     Freq->value(3);   
 - 	Freq->scaleticks(6);
 - 	Freq->cursor(50);
 - 	Freq->callback((Fl_Callback*)cb_Freq);
 - 	  
 -     FineTune = new Fl_Knob(112, 22, 65, 65, "Fine Tune");
 -     FineTune->color(GUI_COLOUR);
 - 	FineTune->type(Fl_Knob::LINELIN);
 -     FineTune->labelsize(10);
 -     FineTune->scaleticks(20);
 -     FineTune->maximum(1.414);
 -     FineTune->step(0.000001);
 -     FineTune->value(1);  
 - 	FineTune->callback((Fl_Callback*)cb_FineTune);
 -       
 - 	ModAmount = new Fl_Knob(188, 54, 40, 40, "Mod Depth");
 -     ModAmount->color(GUI_COLOUR);
 - 	ModAmount->type(Fl_Knob::LINELIN);
 - 	ModAmount->labelsize(10);
 -     ModAmount->maximum(2.0f);
 -     ModAmount->step(0.001);
 -     ModAmount->value(1.0);
 -     ModAmount->callback((Fl_Callback*)cb_ModAmount);
 -              
 - 	PulseWidth = new Fl_Slider(60, 20, 20, 70, "PW");
 - 	PulseWidth->type(4);
 - 	PulseWidth->selection_color(GUI_COLOUR);
 -     PulseWidth->labelsize(10);
 - 	PulseWidth->maximum(1);
 -     PulseWidth->step(0.01);
 -     PulseWidth->value(0.5);
 -     PulseWidth->callback((Fl_Callback*)cb_PulseWidth);
 - 	  
 - 	SHLen = new Fl_Slider(80, 20, 20, 70, "SH");
 - 	SHLen->type(4);
 - 	SHLen->selection_color(GUI_COLOUR);
 -     SHLen->labelsize(10);
 - 	SHLen->maximum(0.2);
 -     SHLen->step(0.001);
 -     SHLen->value(0.1);
 -     SHLen->callback((Fl_Callback*)cb_SHLen);
 - 	
 - 	m_pop = new Fl_Button(1,h-14, 13, 13, "@>");
 -     m_pop->type(1);
 -     m_pop->box(FL_FLAT_BOX);
 -     m_pop->down_box(FL_FLAT_BOX);
 -     m_pop->labeltype(FL_SYMBOL_LABEL);
 -     m_pop->labelsize(10);
 -     m_pop->labelcolor(25);
 -     m_pop->callback((Fl_Callback*)cb_pop);
 - 	
 - 	m_out_freq = new Fl_Output(65,h+5, 58, 15, "Frequency");
 -     m_out_freq->box(FL_ENGRAVED_BOX);
 -     m_out_freq->color(16);
 -     m_out_freq->labelsize(10);
 -     m_out_freq->textsize(10);
 - 	m_out_freq->hide();
 - 	m_out_freq->set_output();
 - 	
 - 	m_out_mod = new Fl_Output(65,h+22, 48, 15, "Modulation");
 -     m_out_mod->box(FL_ENGRAVED_BOX);
 -     m_out_mod->color(16);
 -     m_out_mod->labelsize(10);
 -     m_out_mod->textsize(10);	
 - 	m_out_mod->hide();
 - 	m_out_mod->set_output();
 - 	
 - 	m_out_pulseW = new Fl_Output(190,h+5, 48, 15, "Pulse width");
 -     m_out_pulseW->box(FL_ENGRAVED_BOX);
 -     m_out_pulseW->color(16);
 -     m_out_pulseW->labelsize(10);
 -     m_out_pulseW->textsize(10);
 - 	m_out_pulseW->hide();
 - 	m_out_pulseW->set_output();
 - 	
 - 	m_out_SHlen = new Fl_Output(190,h+22, 48, 15, "Sampling");
 -     m_out_SHlen->box(FL_ENGRAVED_BOX);
 -     m_out_SHlen->color(16);
 -     m_out_SHlen->labelsize(10);
 -     m_out_SHlen->textsize(10);	  	   
 - 	m_out_SHlen->hide();
 - 	m_out_SHlen->set_output();
 - 	
 - 	end();
 - }
 - 
 - extern "C" int sprintf(char *,const char *,...);	
 - 
 - void OscillatorPluginGUI::UpdateValues(SpiralPlugin *o)
 - {
 - 	OscillatorPlugin *Plugin = (OscillatorPlugin*)o;
 - 
 - 	ShapeSquare->value(0);
 - 	ShapeNoise->value(0);
 - 	ShapeSaw->value(0);
 - 
 - 	switch (Plugin->GetType())
 - 	{
 - 		case OscillatorPlugin::SQUARE : ShapeSquare->value(1); break;
 - 		case OscillatorPlugin::NOISE  : ShapeNoise->value(1); break;
 - 		case OscillatorPlugin::SAW    : ShapeSaw->value(1); break;
 - 		case OscillatorPlugin::NONE   : break;
 - 	}
 - 
 - 	Freq->value(Plugin->GetOctave()+3);
 - 	ModAmount->value(Plugin->GetModAmount());
 - 	FineTune->value(sqrt(Plugin->GetFineFreq()));
 - 	PulseWidth->value(Plugin->GetPulseWidth());
 - 	
 - 	SHLen->value(0.2f-Plugin->GetSHLen());
 - 	
 - 	char str[10];
 - 	float fr = 110.0f * Plugin->GetFineFreq();
 - 	m_FineFreq=Plugin->GetFineFreq();
 - 	int oc = Plugin->GetOctave();
 - 	m_Octave = oc;
 - 	if (oc > 0) fr *= 1 << oc;
 - 	if (oc < 0) fr /= 1 << (-oc);
 -   	sprintf(str,"%4.1f Hz", fr);
 -   	m_out_freq->value(str); 
 - 	sprintf(str,"%4.0f %%", 100*Plugin->GetPulseWidth());
 - 	m_out_pulseW->value(str); 
 - 	sprintf(str,"%4.0f %%", 100*Plugin->GetModAmount());
 - 	m_out_mod->value(str);
 - 	sprintf(str,"%4.3f s", Plugin->GetSHLen());
 - 	m_out_SHlen->value(str);
 - }
 - 	
 - 
 - //// Callbacks ////
 - 
 - inline void OscillatorPluginGUI::cb_Freq_i(Fl_Knob* o, void* v) 
 - {
 - char str[10]; 
 -  	m_GUICH->Set("Octave",(int)o->value()-3);
 - 	m_Octave = (int)o->value()-3;
 - 	float fr = 110.0f * m_FineFreq;
 - 	int oc = m_Octave;
 - 	if (oc > 0) fr *= 1 << oc;
 - 	if (oc < 0) fr /= 1 << (-oc);
 -   	sprintf(str,"%4.1f Hz", fr);
 -     m_out_freq->value(str); 
 - }
 -   
 - void OscillatorPluginGUI::cb_Freq(Fl_Knob* o, void* v) 
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_Freq_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_FineTune_i(Fl_Knob* o, void* v) 
 - {
 - 	char str[10]; 
 -  	m_GUICH->Set("FineFreq",(float)(o->value()*o->value()));
 - 	m_FineFreq=(float)(o->value()*o->value());
 - 	float fr = 110.0f * m_FineFreq;
 - 	int oc = m_Octave;
 - 	if (oc > 0) fr *= 1 << oc;
 - 	if (oc < 0) fr /= 1 << (-oc);
 -   	sprintf(str,"%4.1f Hz", fr);
 - 	m_out_freq->value(str);
 - }
 -   
 - void OscillatorPluginGUI::cb_FineTune(Fl_Knob* o, void* v) 
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_FineTune_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_PulseWidth_i(Fl_Slider* o, void* v) 
 - {
 - 	char str[10]; 
 - 	m_GUICH->Set("PulseWidth",(float)o->value());
 - 	sprintf(str,"%4.0f %%",(float)(100*o->value()));
 - 	m_out_pulseW->value(str); 
 - }
 - 
 - void OscillatorPluginGUI::cb_PulseWidth(Fl_Slider* o, void* v) 
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_PulseWidth_i(o,v);}
 - 
 - inline void OscillatorPluginGUI::cb_Square_i(Fl_Check_Button* o, void* v)
 - { m_GUICH->Set("Type",(char)OscillatorPlugin::SQUARE); }
 - void OscillatorPluginGUI::cb_Square(Fl_Check_Button* o, void* v)
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_Square_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_Saw_i(Fl_Check_Button* o, void* v)
 - { m_GUICH->Set("Type",(char)OscillatorPlugin::SAW); }
 - void OscillatorPluginGUI::cb_Saw(Fl_Check_Button* o, void* v)
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_Saw_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_Noise_i(Fl_Check_Button* o, void* v)
 - { m_GUICH->Set("Type",(char)OscillatorPlugin::NOISE); }
 - void OscillatorPluginGUI::cb_Noise(Fl_Check_Button* o, void* v)
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_Noise_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_SHLen_i(Fl_Slider* o, void* v)
 - {
 - 	char str[10]; 
 - 	m_GUICH->Set("SHLen",(float)(0.2f-o->value())); 
 - 	sprintf(str,"%4.3f s", 0.2f-o->value());
 - 	m_out_SHlen->value(str);
 - }
 - 
 - void OscillatorPluginGUI::cb_SHLen(Fl_Slider* o, void* v)
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_SHLen_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_ModAmount_i(Fl_Knob* o, void* v)
 - {
 - 	char str[10];
 - 	m_GUICH->Set("ModAmount",(float)o->value());
 - 	sprintf(str,"%4.0f %%", 100*o->value());
 - 	m_out_mod->value(str); 
 - }
 - 
 - void OscillatorPluginGUI::cb_ModAmount(Fl_Knob* o, void* v)
 - { ((OscillatorPluginGUI*)(o->parent()))->cb_ModAmount_i(o,v); }
 - 
 - inline void OscillatorPluginGUI::cb_pop_i(Fl_Button *o, void*) {
 -   if (o->value())
 -   	{
 -   		o->label("@2>");
 - 		m_out_freq->show();
 - 		m_out_mod->show();
 - 		m_out_SHlen->show();
 - 		m_out_pulseW->show();
 - 		redraw();
 - 	}
 - 	else 
 - 	{
 - 		o->label("@>");
 - 		m_out_freq->hide();
 - 		m_out_mod->hide();
 - 		m_out_SHlen->hide();
 - 		m_out_pulseW->hide();
 - 		redraw();
 - 		parent()->redraw();
 - 	}
 - }
 - void OscillatorPluginGUI::cb_pop(Fl_Button* o, void* v) {
 -   ((OscillatorPluginGUI*)(o->parent()))->cb_pop_i(o,v);
 - }
 - 
 - const string OscillatorPluginGUI::GetHelpText(const string &loc){
 -     return string("") 
 - 	+ "The Oscillator generates raw waveforms from CV controls. Three wave \n"
 - 	+ "shapes are included, Square wave, Triangle wave and white noise.\n\n"
 - 	+ "In the square and triangle shapes, the Frequency CV controls the pitch \n"
 - 	+ "of the signal generated, and the pulsewidth turns the squarewave into \n"
 - 	+ "a pulse wave of varying harmonics, and the triangle wave into a sawtooth,\n" 
 - 	+ "or reverse sawtooth wave.\n\n"
 - 	+ "The sample & hold CV changes the time between samples with the white noise.\n" 
 - 	+ "This is usful for making the Oscillator into a random CV generator.\n\n"
 - 	+ "The plugin window allows you to select the wave shape, set the octave and\n" 
 - 	+ "fine tune the frequency. There are also controls to set the pulsewidth,\n" 
 - 	+ "sample and hold manually, and control the modulation depth of the input CV's.\n\n"
 - 	+ "The frequency can be set extremely low on this oscillator, so you can use\n" 
 - 	+ "it as an LFO for controlling other plugins.";
 - }
 
 
  |