non
/
spiralsynthmodular
mirror of https://github.com/original-male/spiralsynthmodular
1
0
Fork 0
Code Releases 0 Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
173 Commits
1 Branch
1.8MB
Tree: d84fc76c3c
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'd84fc76c3c'
${ noResults }
spiralsynthmodular/SpiralSound/Plugins/OscillatorPlugin/OscillatorPluginGUI.C

387 lines
13KB
Raw Blame History 

  1. /*  SpiralPlugin

  2.  *  Copyleft (C) 2000 David Griffiths <dave@pawfal.org>

  3.  *

  4.  *  This program is free software; you can redistribute it and/or modify

  5.  *  it under the terms of the GNU General Public License as published by

  6.  *  the Free Software Foundation; either version 2 of the License, or

  7.  *  (at your option) any later version.

  8.  *

  9.  *  This program is distributed in the hope that it will be useful,

  10.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of

  11.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

  12.  *  GNU General Public License for more details.

  13.  *

  14.  *  You should have received a copy of the GNU General Public License

  15.  *  along with this program; if not, write to the Free Software

  16.  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

  17. */ 

  18. 

  19. #include "OscillatorPluginGUI.h"

  20. #include <FL/fl_draw.h>

  21. #include <FL/fl_draw.H>

  22. 

  23. static unsigned char *image_Square[] = {

  24. (unsigned char*)"20 20 2 1",

  25. (unsigned char*)" \tc None",

  26. (unsigned char*)".\tc #000000",

  27. (unsigned char*)"                    ",

  28. (unsigned char*)"                    ",

  29. (unsigned char*)"     ......         ",

  30. (unsigned char*)"     .    .         ",

  31. (unsigned char*)"     .    .         ",

  32. (unsigned char*)"     .    .         ",

  33. (unsigned char*)"     .    .         ",

  34. (unsigned char*)"     .    .         ",

  35. (unsigned char*)"     .    .         ",

  36. (unsigned char*)"     .    .         ",

  37. (unsigned char*)"   ...    .    ...  ",

  38. (unsigned char*)"          .    .    ",

  39. (unsigned char*)"          .    .    ",

  40. (unsigned char*)"          .    .    ",

  41. (unsigned char*)"          .    .    ",

  42. (unsigned char*)"          .    .    ",

  43. (unsigned char*)"          .    .    ",

  44. (unsigned char*)"          ......    ",

  45. (unsigned char*)"                    ",

  46. (unsigned char*)"                    "};

  47. 

  48. static unsigned char *image_Noise[] = {

  49. (unsigned char*)"20 20 2 1",

  50. (unsigned char*)" \tc None",

  51. (unsigned char*)".\tc #000000",

  52. (unsigned char*)"                    ",

  53. (unsigned char*)"                    ",

  54. (unsigned char*)"                    ",

  55. (unsigned char*)"                    ",

  56. (unsigned char*)"            .       ",

  57. (unsigned char*)"        .   .       ",

  58. (unsigned char*)"        .  . .      ",

  59. (unsigned char*)"        .  . .      ",

  60. (unsigned char*)"       . . .  .     ",

  61. (unsigned char*)"       . . .  .     ",

  62. (unsigned char*)"   ... . . .  . ..  ",

  63. (unsigned char*)"     . . . .  ..    ",

  64. (unsigned char*)"     . . . .  .     ",

  65. (unsigned char*)"     . .  .         ",

  66. (unsigned char*)"      .   .         ",

  67. (unsigned char*)"      .   .         ",

  68. (unsigned char*)"      .   .         ",

  69. (unsigned char*)"          .         ",

  70. (unsigned char*)"                    ",

  71. (unsigned char*)"                    "};

  72. 

  73. static unsigned char *image_Saw[] = {

  74. (unsigned char*)"20 20 2 1",

  75. (unsigned char*)" \tc None",

  76. (unsigned char*)".\tc #000000",

  77. (unsigned char*)"                    ",

  78. (unsigned char*)"                    ",

  79. (unsigned char*)"         ..         ",

  80. (unsigned char*)"         ..         ",

  81. (unsigned char*)"        . .         ",

  82. (unsigned char*)"        . .         ",

  83. (unsigned char*)"       .  .         ",

  84. (unsigned char*)"       .  .         ",

  85. (unsigned char*)"      .   .         ",

  86. (unsigned char*)"      .   .         ",

  87. (unsigned char*)"   ...    .   ....  ",

  88. (unsigned char*)"          .   .     ",

  89. (unsigned char*)"          .  .      ",

  90. (unsigned char*)"          .  .      ",

  91. (unsigned char*)"          . .       ",

  92. (unsigned char*)"          . .       ",

  93. (unsigned char*)"          ..        ",

  94. (unsigned char*)"          ..        ",

  95. (unsigned char*)"                    ",

  96. (unsigned char*)"                    "};

  97. 

  98. 

  99. OscillatorPluginGUI::OscillatorPluginGUI(int w, int h,OscillatorPlugin *o,ChannelHandler *ch,const HostInfo *Info) :

  100. SpiralPluginGUI(w,h,o,ch),

  101. pixmap_Square(image_Square),

  102. pixmap_Noise(image_Noise),

  103. pixmap_Saw(image_Saw),

  104. m_FineFreq(0),

  105. m_Octave(0)

  106. {	

  107.     ShapeSquare = new Fl_Check_Button(5, 15, 55, 30);

  108.     ShapeSquare->type(102);

  109.     ShapeSquare->down_box(FL_DIAMOND_DOWN_BOX);

  110.     ShapeSquare->selection_color(Info->GUI_COLOUR);

  111.     ShapeSquare->set();

  112.     pixmap_Square.label(ShapeSquare);

  113. 	ShapeSquare->callback((Fl_Callback*)cb_Square);

  114. 	              

  115. 	ShapeNoise = new Fl_Check_Button(5, 65, 55, 30);

  116.     ShapeNoise->type(102);

  117.     ShapeNoise->down_box(FL_DIAMOND_DOWN_BOX);

  118.     ShapeNoise->selection_color(Info->GUI_COLOUR);

  119.     pixmap_Noise.label(ShapeNoise);      

  120.     ShapeNoise->callback((Fl_Callback*)cb_Noise);

  121. 	  

  122. 	ShapeSaw = new Fl_Check_Button(5, 40, 55, 30);

  123.     ShapeSaw->type(102);

  124.     ShapeSaw->down_box(FL_DIAMOND_DOWN_BOX);

  125.     ShapeSaw->selection_color(Info->GUI_COLOUR);

  126.     pixmap_Saw.label(ShapeSaw);      

  127.     ShapeSaw->callback((Fl_Callback*)cb_Saw);

  128. 	  	   

  129. 	Freq = new Fl_Knob(188, 2, 40, 40, "Octave");

  130.     Freq->color(Info->GUI_COLOUR);

  131. 	Freq->type(Fl_Knob::LINELIN);

  132.     Freq->labelsize(10);

  133.     Freq->maximum(6);

  134.     Freq->step(1);

  135.     Freq->value(3);   

  136. 	Freq->scaleticks(6);

  137. 	Freq->cursor(50);

  138. 	Freq->callback((Fl_Callback*)cb_Freq);

  139. 	  

  140.     FineTune = new Fl_Knob(112, 22, 65, 65, "Fine Tune");

  141.     FineTune->color(Info->GUI_COLOUR);

  142. 	FineTune->type(Fl_Knob::LINELIN);

  143.     FineTune->labelsize(10);

  144.     FineTune->scaleticks(20);

  145.     FineTune->maximum(1.414);

  146.     FineTune->step(0.000001);

  147.     FineTune->value(1);  

  148. 	FineTune->callback((Fl_Callback*)cb_FineTune);

  149.       

  150. 	ModAmount = new Fl_Knob(188, 54, 40, 40, "Mod Depth");

  151.     ModAmount->color(Info->GUI_COLOUR);

  152. 	ModAmount->type(Fl_Knob::LINELIN);

  153. 	ModAmount->labelsize(10);

  154.     ModAmount->maximum(2.0f);

  155.     ModAmount->step(0.001);

  156.     ModAmount->value(1.0);

  157.     ModAmount->callback((Fl_Callback*)cb_ModAmount);

  158.              

  159. 	PulseWidth = new Fl_Slider(60, 20, 20, 70, "PW");

  160. 	PulseWidth->type(4);

  161. 	PulseWidth->selection_color(Info->GUI_COLOUR);

  162.     PulseWidth->labelsize(10);

  163. 	PulseWidth->maximum(1);

  164.     PulseWidth->step(0.01);

  165.     PulseWidth->value(0.5);

  166.     PulseWidth->callback((Fl_Callback*)cb_PulseWidth);

  167. 	  

  168. 	SHLen = new Fl_Slider(80, 20, 20, 70, "SH");

  169. 	SHLen->type(4);

  170. 	SHLen->selection_color(Info->GUI_COLOUR);

  171.     SHLen->labelsize(10);

  172. 	SHLen->maximum(0.2);

  173.     SHLen->step(0.001);

  174.     SHLen->value(0.1);

  175.     SHLen->callback((Fl_Callback*)cb_SHLen);

  176. 	

  177. 	m_pop = new Fl_Button(1,h-14, 13, 13, "@>");

  178.     m_pop->type(1);

  179.     m_pop->box(FL_FLAT_BOX);

  180.     m_pop->down_box(FL_FLAT_BOX);

  181.     m_pop->labeltype(FL_SYMBOL_LABEL);

  182.     m_pop->labelsize(10);

  183.     m_pop->labelcolor(25);

  184.     m_pop->callback((Fl_Callback*)cb_pop);

  185. 	

  186. 	m_out_freq = new Fl_Output(65,h+5, 58, 15, "Frequency");

  187.     m_out_freq->box(FL_ENGRAVED_BOX);

  188.     m_out_freq->color(16);

  189.     m_out_freq->labelsize(10);

  190.     m_out_freq->textsize(10);

  191. 	m_out_freq->hide();

  192. 	m_out_freq->set_output();

  193. 	

  194. 	m_out_mod = new Fl_Output(65,h+22, 48, 15, "Modulation");

  195.     m_out_mod->box(FL_ENGRAVED_BOX);

  196.     m_out_mod->color(16);

  197.     m_out_mod->labelsize(10);

  198.     m_out_mod->textsize(10);	

  199. 	m_out_mod->hide();

  200. 	m_out_mod->set_output();

  201. 	

  202. 	m_out_pulseW = new Fl_Output(190,h+5, 48, 15, "Pulse width");

  203.     m_out_pulseW->box(FL_ENGRAVED_BOX);

  204.     m_out_pulseW->color(16);

  205.     m_out_pulseW->labelsize(10);

  206.     m_out_pulseW->textsize(10);

  207. 	m_out_pulseW->hide();

  208. 	m_out_pulseW->set_output();

  209. 	

  210. 	m_out_SHlen = new Fl_Output(190,h+22, 48, 15, "Sampling");

  211.     m_out_SHlen->box(FL_ENGRAVED_BOX);

  212.     m_out_SHlen->color(16);

  213.     m_out_SHlen->labelsize(10);

  214.     m_out_SHlen->textsize(10);	  	   

  215. 	m_out_SHlen->hide();

  216. 	m_out_SHlen->set_output();

  217. 	

  218. 	end();

  219. }

  220. 

  221. extern "C" int sprintf(char *,const char *,...);	

  222. 

  223. void OscillatorPluginGUI::UpdateValues(SpiralPlugin *o)

  224. {

  225. 	OscillatorPlugin *Plugin = (OscillatorPlugin*)o;

  226. 

  227. 	ShapeSquare->value(0);

  228. 	ShapeNoise->value(0);

  229. 	ShapeSaw->value(0);

  230. 

  231. 	switch (Plugin->GetType())

  232. 	{

  233. 		case OscillatorPlugin::SQUARE : ShapeSquare->value(1); break;

  234. 		case OscillatorPlugin::NOISE  : ShapeNoise->value(1); break;

  235. 		case OscillatorPlugin::SAW    : ShapeSaw->value(1); break;

  236. 		case OscillatorPlugin::NONE   : break;

  237. 	}

  238. 

  239. 	Freq->value(Plugin->GetOctave()+3);

  240. 	ModAmount->value(Plugin->GetModAmount());

  241. 	FineTune->value(sqrt(Plugin->GetFineFreq()));

  242. 	PulseWidth->value(Plugin->GetPulseWidth());

  243. 	

  244. 	SHLen->value(0.2f-Plugin->GetSHLen());

  245. 	

  246. 	char str[10];

  247. 	float fr = 110.0f * Plugin->GetFineFreq();

  248. 	m_FineFreq=Plugin->GetFineFreq();

  249. 	int oc = Plugin->GetOctave();

  250. 	m_Octave = oc;

  251. 	if (oc > 0) fr *= 1 << oc;

  252. 	if (oc < 0) fr /= 1 << (-oc);

  253.   	sprintf(str,"%4.1f Hz", fr);

  254.   	m_out_freq->value(str); 

  255. 	sprintf(str,"%4.0f %%", 100*Plugin->GetPulseWidth());

  256. 	m_out_pulseW->value(str); 

  257. 	sprintf(str,"%4.0f %%", 100*Plugin->GetModAmount());

  258. 	m_out_mod->value(str);

  259. 	sprintf(str,"%4.3f s", Plugin->GetSHLen());

  260. 	m_out_SHlen->value(str);

  261. }

  262. 	

  263. 

  264. //// Callbacks ////

  265. 

  266. inline void OscillatorPluginGUI::cb_Freq_i(Fl_Knob* o, void* v) 

  267. {

  268. char str[10]; 

  269.  	m_GUICH->Set("Octave",(int)o->value()-3);

  270. 	m_Octave = (int)o->value()-3;

  271. 	float fr = 110.0f * m_FineFreq;

  272. 	int oc = m_Octave;

  273. 	if (oc > 0) fr *= 1 << oc;

  274. 	if (oc < 0) fr /= 1 << (-oc);

  275.   	sprintf(str,"%4.1f Hz", fr);

  276.     m_out_freq->value(str); 

  277. }

  278.   

  279. void OscillatorPluginGUI::cb_Freq(Fl_Knob* o, void* v) 

  280. { ((OscillatorPluginGUI*)(o->parent()))->cb_Freq_i(o,v); }

  281. 

  282. inline void OscillatorPluginGUI::cb_FineTune_i(Fl_Knob* o, void* v) 

  283. {

  284. 	char str[10]; 

  285.  	m_GUICH->Set("FineFreq",(float)(o->value()*o->value()));

  286. 	m_FineFreq=(float)(o->value()*o->value());

  287. 	float fr = 110.0f * m_FineFreq;

  288. 	int oc = m_Octave;

  289. 	if (oc > 0) fr *= 1 << oc;

  290. 	if (oc < 0) fr /= 1 << (-oc);

  291.   	sprintf(str,"%4.1f Hz", fr);

  292. 	m_out_freq->value(str);

  293. }

  294.   

  295. void OscillatorPluginGUI::cb_FineTune(Fl_Knob* o, void* v) 

  296. { ((OscillatorPluginGUI*)(o->parent()))->cb_FineTune_i(o,v); }

  297. 

  298. inline void OscillatorPluginGUI::cb_PulseWidth_i(Fl_Slider* o, void* v) 

  299. {

  300. 	char str[10]; 

  301. 	m_GUICH->Set("PulseWidth",(float)o->value());

  302. 	sprintf(str,"%4.0f %%",(float)(100*o->value()));

  303. 	m_out_pulseW->value(str); 

  304. }

  305. 

  306. void OscillatorPluginGUI::cb_PulseWidth(Fl_Slider* o, void* v) 

  307. { ((OscillatorPluginGUI*)(o->parent()))->cb_PulseWidth_i(o,v);}

  308. 

  309. inline void OscillatorPluginGUI::cb_Square_i(Fl_Check_Button* o, void* v)

  310. { m_GUICH->Set("Type",(char)OscillatorPlugin::SQUARE); }

  311. void OscillatorPluginGUI::cb_Square(Fl_Check_Button* o, void* v)

  312. { ((OscillatorPluginGUI*)(o->parent()))->cb_Square_i(o,v); }

  313. 

  314. inline void OscillatorPluginGUI::cb_Saw_i(Fl_Check_Button* o, void* v)

  315. { m_GUICH->Set("Type",(char)OscillatorPlugin::SAW); }

  316. void OscillatorPluginGUI::cb_Saw(Fl_Check_Button* o, void* v)

  317. { ((OscillatorPluginGUI*)(o->parent()))->cb_Saw_i(o,v); }

  318. 

  319. inline void OscillatorPluginGUI::cb_Noise_i(Fl_Check_Button* o, void* v)

  320. { m_GUICH->Set("Type",(char)OscillatorPlugin::NOISE); }

  321. void OscillatorPluginGUI::cb_Noise(Fl_Check_Button* o, void* v)

  322. { ((OscillatorPluginGUI*)(o->parent()))->cb_Noise_i(o,v); }

  323. 

  324. inline void OscillatorPluginGUI::cb_SHLen_i(Fl_Slider* o, void* v)

  325. {

  326. 	char str[10]; 

  327. 	m_GUICH->Set("SHLen",(float)(0.2f-o->value())); 

  328. 	sprintf(str,"%4.3f s", 0.2f-o->value());

  329. 	m_out_SHlen->value(str);

  330. }

  331. 

  332. void OscillatorPluginGUI::cb_SHLen(Fl_Slider* o, void* v)

  333. { ((OscillatorPluginGUI*)(o->parent()))->cb_SHLen_i(o,v); }

  334. 

  335. inline void OscillatorPluginGUI::cb_ModAmount_i(Fl_Knob* o, void* v)

  336. {

  337. 	char str[10];

  338. 	m_GUICH->Set("ModAmount",(float)o->value());

  339. 	sprintf(str,"%4.0f %%", 100*o->value());

  340. 	m_out_mod->value(str); 

  341. }

  342. 

  343. void OscillatorPluginGUI::cb_ModAmount(Fl_Knob* o, void* v)

  344. { ((OscillatorPluginGUI*)(o->parent()))->cb_ModAmount_i(o,v); }

  345. 

  346. inline void OscillatorPluginGUI::cb_pop_i(Fl_Button *o, void*) {

  347.   if (o->value())

  348.   	{

  349.   		o->label("@2>");

  350. 		m_out_freq->show();

  351. 		m_out_mod->show();

  352. 		m_out_SHlen->show();

  353. 		m_out_pulseW->show();

  354. 		redraw();

  355. 	}

  356. 	else 

  357. 	{

  358. 		o->label("@>");

  359. 		m_out_freq->hide();

  360. 		m_out_mod->hide();

  361. 		m_out_SHlen->hide();

  362. 		m_out_pulseW->hide();

  363. 		redraw();

  364. 		parent()->redraw();

  365. 	}

  366. }

  367. void OscillatorPluginGUI::cb_pop(Fl_Button* o, void* v) {

  368.   ((OscillatorPluginGUI*)(o->parent()))->cb_pop_i(o,v);

  369. }

  370. 

  371. const string OscillatorPluginGUI::GetHelpText(const string &loc){

  372.     return string("") 

  373. 	+ "The Oscillator generates raw waveforms from CV controls. Three wave \n"

  374. 	+ "shapes are included, Square wave, Triangle wave and white noise.\n\n"

  375. 	+ "In the square and triangle shapes, the Frequency CV controls the pitch \n"

  376. 	+ "of the signal generated, and the pulsewidth turns the squarewave into \n"

  377. 	+ "a pulse wave of varying harmonics, and the triangle wave into a sawtooth,\n" 

  378. 	+ "or reverse sawtooth wave.\n\n"

  379. 	+ "The sample & hold CV changes the time between samples with the white noise.\n" 

  380. 	+ "This is usful for making the Oscillator into a random CV generator.\n\n"

  381. 	+ "The plugin window allows you to select the wave shape, set the octave and\n" 

  382. 	+ "fine tune the frequency. There are also controls to set the pulsewidth,\n" 

  383. 	+ "sample and hold manually, and control the modulation depth of the input CV's.\n\n"

  384. 	+ "The frequency can be set extremely low on this oscillator, so you can use\n" 

  385. 	+ "it as an LFO for controlling other plugins.";

  386. }