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.
146 Commits
1 Branch
1.8MB
Tree: ecab653ae2
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'ecab653ae2'
${ noResults }
spiralsynthmodular/SpiralSound/Plugins/EnvelopePlugin/EnvelopePluginGUI.C

292 lines
8.8KB
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 "EnvelopePluginGUI.h"

  20. #include <FL/fl_draw.h>

  21. #include <FL/fl_draw.H>

  22. 

  23. static const int GUI_COLOUR = 179;

  24. static const int GUIBG_COLOUR = 144;

  25. static const int GUIBG2_COLOUR = 145;

  26. static const float TIMED_SLIDER_MAX = 3.0f;

  27. 

  28. ////////////////////////////////////////////

  29. 

  30. EnvelopePluginGUI::EnvelopePluginGUI(int w, int h,EnvelopePlugin *o,ChannelHandler *ch,const HostInfo *Info) :

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

  32. {		

  33. 	Thresh = new Fl_Slider(10, 20, 20, 70, "T");

  34. 	Thresh->type(4);

  35. 	Thresh->selection_color(GUI_COLOUR);

  36.     Thresh->labelsize(10);

  37. 	Thresh->maximum(1.0);

  38.     Thresh->step(0.01);

  39.     Thresh->value(0.99f);

  40.     Thresh->callback((Fl_Callback*)cb_Thresh);

  41. 	add(Thresh);

  42. 	

  43. 	Attack = new Fl_Slider(30, 20, 20, 70, "A");

  44. 	Attack->type(4);

  45. 	Attack->selection_color(GUI_COLOUR);

  46.     Attack->labelsize(10);

  47. 	Attack->maximum(TIMED_SLIDER_MAX);

  48.     Attack->step(0.01);

  49.     Attack->value(3.0f);

  50.     Attack->callback((Fl_Callback*)cb_Attack);

  51. 	add(Attack);

  52. 	

  53. 	Decay = new Fl_Slider(50, 20, 20, 70, "D");

  54. 	Decay->type(4);

  55. 	Decay->selection_color(GUI_COLOUR);

  56.     Decay->labelsize(10);

  57. 	Decay->maximum(TIMED_SLIDER_MAX);

  58.     Decay->step(0.01);

  59.     Decay->value(2.29);

  60.     Decay->callback((Fl_Callback*)cb_Decay);

  61. 	add(Decay);

  62. 	

  63. 	Sustain = new Fl_Slider(70, 20, 20, 70, "S");

  64. 	Sustain->type(4);	  

  65. 	Sustain->selection_color(GUI_COLOUR);

  66.     Sustain->labelsize(10);

  67. 	Sustain->maximum(1);

  68.     Sustain->step(0.01);

  69.     Sustain->value(0.0);

  70.     Sustain->callback((Fl_Callback*)cb_Sustain);

  71. 	add(Sustain);

  72. 		 

  73. 	Release = new Fl_Slider(90, 20, 20, 70, "R");

  74. 	Release->type(4);

  75. 	Release->selection_color(GUI_COLOUR);

  76.     Release->labelsize(10);

  77. 	Release->maximum(TIMED_SLIDER_MAX);

  78.     Release->step(0.01);

  79.     Release->value(2.0);

  80.     Release->callback((Fl_Callback*)cb_Release);	  

  81. 	add(Release);

  82. 	      

  83. 	Volume = new Fl_Slider(110, 20, 20, 70, "V");

  84. 	Volume->type(4);

  85. 	Volume->selection_color(GUI_COLOUR);

  86.     Volume->labelsize(10);

  87. 	Volume->maximum(1);

  88.     Volume->step(0.01);

  89.     Volume->value(0.5f);

  90.     Volume->callback((Fl_Callback*)cb_Volume);

  91. 	add(Volume);

  92. 		

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

  94.     m_pop->type(1);

  95.     m_pop->box(FL_FLAT_BOX);

  96.     m_pop->down_box(FL_FLAT_BOX);

  97.     m_pop->labeltype(FL_SYMBOL_LABEL);

  98.     m_pop->labelsize(10);

  99.     m_pop->labelcolor(25);

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

  101. 	

  102. 	m_out_thresh = new Fl_Output(15,h+5, 48, 15, "T");

  103.     m_out_thresh->box(FL_ENGRAVED_BOX);

  104.     m_out_thresh->color(16);

  105.     m_out_thresh->labelsize(10);

  106.     m_out_thresh->textsize(10);

  107. 	m_out_thresh->hide();

  108. 	m_out_thresh->set_output();

  109. 	

  110. 	m_out_attack = new Fl_Output(15,h+22, 48, 15, "A");

  111.     m_out_attack->box(FL_ENGRAVED_BOX);

  112.     m_out_attack->color(16);

  113.     m_out_attack->labelsize(10);

  114.     m_out_attack->textsize(10);

  115. 	m_out_attack->hide();

  116. 	m_out_attack->set_output();

  117. 	

  118. 	m_out_decay = new Fl_Output(15,h+39, 48, 15, "D");

  119.     m_out_decay->box(FL_ENGRAVED_BOX);

  120.     m_out_decay->color(16);

  121.     m_out_decay->labelsize(10);

  122.     m_out_decay->textsize(10);	

  123. 	m_out_decay->hide();

  124. 	m_out_decay->set_output();

  125. 	

  126. 	m_out_sustain = new Fl_Output(87,h+5, 48, 15, "S");

  127.     m_out_sustain->box(FL_ENGRAVED_BOX);

  128.     m_out_sustain->color(16);

  129.     m_out_sustain->labelsize(10);

  130.     m_out_sustain->textsize(10);

  131. 	m_out_sustain->hide();

  132. 	m_out_sustain->set_output();

  133. 	

  134. 	m_out_release = new Fl_Output(87,h+22, 48, 15, "R");

  135.     m_out_release->box(FL_ENGRAVED_BOX);

  136.     m_out_release->color(16);

  137.     m_out_release->labelsize(10);

  138.     m_out_release->textsize(10);

  139. 	m_out_release->hide();

  140. 	m_out_release->set_output();

  141. 	

  142. 	m_out_volume = new Fl_Output(87,h+39, 48, 15, "V");

  143.     m_out_volume->box(FL_ENGRAVED_BOX);

  144.     m_out_volume->color(16);

  145.     m_out_volume->labelsize(10);

  146.     m_out_volume->textsize(10);

  147. 	m_out_volume->hide();

  148. 	m_out_volume->set_output();

  149. 	

  150. 	end();

  151. }

  152. 

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

  154. 

  155. void EnvelopePluginGUI::UpdateValues(SpiralPlugin *o)

  156. {

  157. 	EnvelopePlugin *Plugin = (EnvelopePlugin*)o;

  158. 

  159. 	Thresh->value(1.0f-Plugin->GetTrigThresh());

  160. 	Attack->value(TIMED_SLIDER_MAX-sqrt(Plugin->GetAttack()));

  161. 	Decay->value(TIMED_SLIDER_MAX-sqrt(Plugin->GetDecay()));

  162. 	Sustain->value(1.0f-Plugin->GetSustain());

  163. 	Release->value(TIMED_SLIDER_MAX-sqrt(Plugin->GetRelease()));

  164. 	Volume->value(1.0f-Plugin->GetVolume());

  165. 	char str[10];

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

  167. 	m_out_thresh->value(str);

  168. 	sprintf(str,"%5.3f s", Plugin->GetAttack());

  169. 	m_out_attack->value(str); 

  170. 	sprintf(str,"%5.3f s", Plugin->GetDecay());

  171. 	m_out_decay->value(str); 

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

  173. 	m_out_sustain->value(str); 

  174. 	sprintf(str,"%5.3f s", Plugin->GetRelease());

  175. 	m_out_release->value(str); 

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

  177. 	m_out_volume->value(str); 

  178. }

  179. 

  180. 

  181. inline void EnvelopePluginGUI::cb_Thresh_i(Fl_Slider* o, void* v) 

  182. { 

  183. char str[10];

  184. 	m_GUICH->Set("Trig",(float)(1.0f-o->value())); 

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

  186. 	m_out_thresh->value(str); 

  187. }

  188. 

  189. void EnvelopePluginGUI::cb_Thresh(Fl_Slider* o, void* v) 

  190. { ((EnvelopePluginGUI*)(o->parent()))->cb_Thresh_i(o,v); }

  191. 	

  192. inline void EnvelopePluginGUI::cb_Attack_i(Fl_Slider* o, void* v) 

  193. { 

  194. char str[10];

  195. 	float value=TIMED_SLIDER_MAX-o->value();

  196. 	m_GUICH->Set("Attack",value*value); 

  197. 	sprintf(str,"%5.3f s", value*value);

  198. 	m_out_attack->value(str);

  199. }

  200. void EnvelopePluginGUI::cb_Attack(Fl_Slider* o, void* v) 

  201. { ((EnvelopePluginGUI*)(o->parent()))->cb_Attack_i(o,v); }

  202. 

  203. inline void EnvelopePluginGUI::cb_Decay_i(Fl_Slider* o, void* v) 

  204. { 

  205. char str[10];

  206. 	float value=TIMED_SLIDER_MAX-o->value();

  207. 	m_GUICH->Set("Decay",value*value);  

  208. 	sprintf(str,"%5.3f s", value*value);

  209. 	m_out_decay->value(str);

  210. }

  211. void EnvelopePluginGUI::cb_Decay(Fl_Slider* o, void* v) 

  212. { ((EnvelopePluginGUI*)(o->parent()))->cb_Decay_i(o,v); }

  213. 

  214. inline void EnvelopePluginGUI::cb_Sustain_i(Fl_Slider* o, void* v) 

  215. {

  216. char str[10];

  217. 	m_GUICH->Set("Sustain",(float)(1.0f-o->value()));

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

  219. 	m_out_sustain->value(str); 

  220. }

  221. 		

  222. void EnvelopePluginGUI::cb_Sustain(Fl_Slider* o, void* v) 

  223. { ((EnvelopePluginGUI*)(o->parent()))->cb_Sustain_i(o,v); }

  224. 

  225. inline void EnvelopePluginGUI::cb_Release_i(Fl_Slider* o, void* v) 

  226. { 

  227. char str[10];

  228. 	float value=TIMED_SLIDER_MAX-o->value();

  229. 	m_GUICH->Set("Release",value*value); 

  230. 	sprintf(str,"%5.3f s", value*value);

  231. 		m_out_release->value(str);

  232. }

  233. void EnvelopePluginGUI::cb_Release(Fl_Slider* o, void* v) 

  234. { ((EnvelopePluginGUI*)(o->parent()))->cb_Release_i(o,v); }

  235. 

  236. inline void EnvelopePluginGUI::cb_Volume_i(Fl_Slider* o, void* v) 

  237. {

  238. char str[10];

  239. 

  240. 	m_GUICH->Set("Volume",(float)(1.0f-o->value()));

  241. 	sprintf(str,"%4.0f %%", (float)(100.0f*(1.0f-o->value())));

  242. 	m_out_volume->value(str); 

  243. }

  244. 

  245. void EnvelopePluginGUI::cb_Volume(Fl_Slider* o, void* v) 

  246. { ((EnvelopePluginGUI*)(o->parent()))->cb_Volume_i(o,v); }

  247. 

  248. 

  249. inline void EnvelopePluginGUI::cb_pop_i(Fl_Button *o, void*) {

  250.   if (o->value())

  251.   	{

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

  253. 		m_out_thresh->show();

  254. 		m_out_attack->show();

  255. 		m_out_decay->show();

  256. 		m_out_sustain->show();

  257. 		m_out_release->show();

  258. 		redraw();

  259. 	}

  260. 	else 

  261. 	{

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

  263. 		m_out_thresh->hide();

  264. 		m_out_attack->hide();

  265. 		m_out_decay->hide();

  266. 		m_out_sustain->hide();

  267. 		m_out_release->hide();

  268. 		redraw();

  269. 		parent()->redraw();

  270. 	}

  271. }

  272. void EnvelopePluginGUI::cb_pop(Fl_Button* o, void* v) {

  273.   ((EnvelopePluginGUI*)(o->parent()))->cb_pop_i(o,v);

  274. }

  275. 

  276. const string EnvelopePluginGUI::GetHelpText(const string &loc){

  277.     return string("")

  278.     + "An ADSR envelope. This plugin also has a built in\n"

  279.     + "amplifier for signals, so data fed through the Input\n"

  280.     + "and Output are amplified according to the envelope value.\n"

  281.     + "The envelope is triggered with an input CV, and the output\n"

  282.     + "CV is the value of the envelope at that time. The signal\n"

  283.     + "level needed to trigger the envelope can be set using\n"

  284.     + "the \"T\" slider, also the volume level of the output can\n"

  285.     + "be set with the \"V\" slider.\n\n"

  286.     + "This envelope can be used to mimic audio triggered effects\n"

  287.     + "units, by feeding the audio signal into the trigger CV.\n"

  288.     + "In fact, the envelope plugin itself can be made into a\n"

  289.     + "compressor, by feeding the audio signal into both inputs,\n"

  290.     + "and tweaking the ADSR values. \n";

  291. }