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.
198 Commits
1 Branch
1.8MB
Tree: 516ef96633
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '516ef96633'
${ noResults }
spiralsynthmodular/SpiralSound/Plugins/StreamPlugin/StreamPluginGUI.C

336 lines
10KB
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 "StreamPluginGUI.h"

  20. #include <FL/fl_draw.h>

  21. #include <FL/fl_draw.H>

  22. #include <FL/fl_file_chooser.h>

  23. 

  24. ////////////////////////////////////////////

  25. 

  26. StreamPluginGUI::StreamPluginGUI(int w, int h,StreamPlugin *o,ChannelHandler *ch,const HostInfo *Info) :

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

  28. m_Playing (false),

  29. m_PitchValue (1.0f)

  30. {

  31.         // 7 seg displays

  32.         for (int dis=0; dis<6; dis++) {

  33.             m_Display[dis] = new Fl_SevenSeg (5 + 28*dis, 20, 28, 60);

  34.             m_Display[dis] -> bar_width (4);

  35.             m_Display[dis] -> color (Info->SCOPE_FG_COLOUR);

  36. 	    m_Display[dis] -> color2 (Info->SCOPE_BG_COLOUR);

  37.             if (dis > 0 && dis % 2 == 0) m_Display[dis] -> dp (colon);

  38.             add (m_Display[dis]);

  39.         }

  40.         // volume control

  41.         m_Volume = new Fl_Knob (180, 15, 50, 50, "Volume");

  42.         m_Volume->color (Info->GUI_COLOUR);

  43. 	m_Volume->type (Fl_Knob::LINELIN);

  44.         m_Volume->labelsize (10);

  45.         m_Volume->maximum (2);

  46.         m_Volume->step (0.001);

  47.         m_Volume->value (1);

  48. 	m_Volume->callback ((Fl_Callback*)cb_Volume);

  49. 	add (m_Volume);

  50.         // pitch indicator

  51. 	m_Pitch = new Fl_Slider (5, 85, 235, 20, "");

  52.         m_Pitch->type (FL_HORIZONTAL);

  53.         m_Pitch->labelsize (10);

  54. 	m_Pitch->labelcolor (Info->GUI_COLOUR);

  55.         m_Pitch->label (m_PitchLabel);

  56. 	m_Pitch->selection_color (Info->GUI_COLOUR);

  57.         m_Pitch->box (FL_PLASTIC_DOWN_BOX);

  58. 	m_Pitch->maximum (20);

  59.         m_Pitch->step (0.001);

  60.         m_Pitch->callback ((Fl_Callback*)cb_Pitch);

  61.         add (m_Pitch);

  62.         // position indicator

  63. 	m_Pos = new Fl_Slider (5, 108, 235, 20, "");

  64. 	m_Pos->type (FL_HORIZONTAL);

  65.         m_Pos->box (FL_PLASTIC_DOWN_BOX);

  66. 	m_Pos->labelcolor (Info->GUI_COLOUR);

  67. 	m_Pos->selection_color (Info->GUI_COLOUR);

  68. 	m_Pos->maximum (1);

  69. 	m_Pos->callback ((Fl_Callback*)cb_Pos);

  70. 	add (m_Pos);

  71.         // load btn

  72.         m_Load = new Fl_Button (2, 130, 30, 30, "Load");

  73.         m_Load->labelsize (9);

  74.         m_Load->box (FL_PLASTIC_UP_BOX);

  75. 	m_Load->color (Info->GUI_COLOUR);

  76. 	m_Load->selection_color (Info->GUI_COLOUR);

  77. 	m_Load->callback ((Fl_Callback*)cb_Load);

  78. 	add (m_Load);

  79.         // reset btn

  80. 	m_ToStart = new Fl_Button (32, 130, 30, 30, "@|<");

  81.         m_ToStart->labelsize (10);

  82. 	m_ToStart->labeltype (FL_SYMBOL_LABEL);

  83.         m_ToStart->box (FL_PLASTIC_UP_BOX);

  84. 	m_ToStart->color (Info->GUI_COLOUR);

  85. 	m_ToStart->selection_color (Info->GUI_COLOUR);

  86. 	m_ToStart->callback ((Fl_Callback*)cb_ToStart);

  87. 	add (m_ToStart);

  88.         // play btn

  89. 	m_Play = new Fl_Button (62, 130, 30, 30, "@>");

  90.         m_Play->labelsize (10);

  91. 	m_Play->labeltype (FL_SYMBOL_LABEL);

  92.         m_Play->box (FL_PLASTIC_UP_BOX);

  93. 	m_Play->color (Info->GUI_COLOUR);

  94. 	m_Play->selection_color (Info->GUI_COLOUR);

  95. 	m_Play->callback ((Fl_Callback*)cb_Play);

  96. 	add (m_Play);

  97.         // normal speed btn

  98. 	m_Reset = new Fl_Button (92, 130, 30, 30, "Reset");

  99.         m_Reset->labelsize (9);

  100.         m_Reset->box (FL_PLASTIC_UP_BOX);

  101. 	m_Reset->color (Info->GUI_COLOUR);

  102. 	m_Reset->selection_color (Info->GUI_COLOUR);

  103. 	m_Reset->callback ((Fl_Callback*)cb_Reset);

  104. 	add (m_Reset);

  105.         // Reverse Button

  106.         m_Rev = new  Fl_Button (122, 130, 30, 30, "@<-");

  107.         m_Rev->labelsize (10);

  108. 	m_Rev->labeltype (FL_SYMBOL_LABEL);

  109.         m_Rev->box (FL_PLASTIC_UP_BOX);

  110. 	m_Rev->color (Info->GUI_COLOUR);

  111. 	m_Rev->selection_color (Info->GUI_COLOUR);

  112. 	m_Rev->callback ((Fl_Callback*)cb_Rev);

  113. 	add (m_Rev);

  114.         // 1/2 speed btn

  115. 	m_Div = new Fl_Button (152, 130, 30, 30, "/2");

  116.         m_Div->labelsize (9);

  117.         m_Div->box (FL_PLASTIC_UP_BOX);

  118. 	m_Div->color (Info->GUI_COLOUR);

  119. 	m_Div->selection_color (Info->GUI_COLOUR);

  120. 	m_Div->callback ((Fl_Callback*)cb_Div);

  121. 	add (m_Div);

  122.         // dbl speed btn

  123. 	m_Dbl = new Fl_Button (182, 130, 30, 30, "X2");

  124.         m_Dbl->labelsize (9);

  125.         m_Dbl->box (FL_PLASTIC_UP_BOX);

  126. 	m_Dbl->color (Info->GUI_COLOUR);

  127. 	m_Dbl->selection_color (Info->GUI_COLOUR);

  128. 	m_Dbl->callback ((Fl_Callback*)cb_Dbl);

  129. 	add (m_Dbl);

  130.         // nudge btn

  131. 	m_Nudge = new Fl_Repeat_Button (212, 130, 30, 30, "Nudge");

  132.         m_Nudge->labelsize (9);

  133.         m_Nudge->box (FL_PLASTIC_UP_BOX);

  134.        	m_Nudge->color (Info->GUI_COLOUR);

  135. 	m_Nudge->selection_color (Info->GUI_COLOUR);

  136.         m_Nudge->callback ((Fl_Callback*)cb_Nudge);

  137. 	add (m_Nudge);

  138.         end ();

  139.         UpdatePitch (true, false, false);

  140. }

  141. 

  142. StreamPluginGUI::~StreamPluginGUI () {

  143. }

  144. 

  145. // Update signalled from plugin

  146. 

  147. void StreamPluginGUI::Update() {

  148.      float t=m_GUICH->GetFloat ("TimeOut");

  149.      m_Pos->value (t);

  150.      m_Display[5]->value ((int)(t*100) % 10);

  151.      m_Display[4]->value ((int)(t*10) % 10);

  152.      m_Display[3]->value ((int)t % 10);

  153.      m_Display[2]->value ((int)(t/10) % 6);

  154.      m_Display[1]->value ((int)(t/60) % 10);

  155.      m_Display[0]->value ((int)(t/600) % 10);

  156.      redraw();

  157.      SetMaxTime (m_GUICH->GetFloat ("MaxTime"));

  158.      if (m_Playing != m_GUICH->GetBool ("Playing")) UpdatePlayStatus ();

  159. }

  160. 

  161. // Update GUI on load

  162. 

  163. void StreamPluginGUI::UpdateValues (SpiralPlugin *o) {

  164.      StreamPlugin *Plugin = (StreamPlugin*)o;

  165.      m_Volume->value (Plugin->GetVolume());

  166.      m_PitchValue = Plugin->GetPitch();

  167.      UpdatePitch (true, true, false);

  168. }

  169. 

  170. // volume

  171. 

  172. inline void StreamPluginGUI::cb_Volume_i (Fl_Knob* o, void* v) {

  173.        m_GUICH->Set ("Volume", (float)o->value ());

  174. }

  175. 

  176. void StreamPluginGUI::cb_Volume (Fl_Knob* o, void* v) {

  177.      ((StreamPluginGUI*)(o->parent ()))->cb_Volume_i (o, v);

  178. }

  179. 

  180. // pitch

  181. 

  182. void StreamPluginGUI::UpdatePitch (bool UpdateIt, bool DrawIt, bool SendIt) {

  183.      if (m_PitchValue<0) {

  184.         m_Pitch->align (FL_ALIGN_INSIDE | FL_ALIGN_LEFT);

  185.         m_Rev->label ("@->");

  186.      }

  187.      else {

  188.         m_Pitch->align (FL_ALIGN_INSIDE | FL_ALIGN_RIGHT);

  189.         m_Rev->label ("@<-");

  190.      }

  191.      sprintf (m_PitchLabel, "    %1.3f   ", m_PitchValue);

  192.      if (UpdateIt) m_Pitch->value (m_PitchValue+10);

  193.      if (DrawIt) redraw();

  194.      if (SendIt) m_GUICH->Set ("Pitch", m_PitchValue);

  195. }

  196. 

  197. inline void StreamPluginGUI::cb_Pitch_i (Fl_Slider* o, void* v) {

  198.        m_PitchValue=o->value()-10;

  199.        UpdatePitch (false, false);

  200. }

  201. 

  202. void StreamPluginGUI::cb_Pitch (Fl_Slider* o, void* v) {

  203.      ((StreamPluginGUI*)(o->parent ()))->cb_Pitch_i(o,v);

  204. }

  205. 

  206. // position

  207. 

  208. inline void StreamPluginGUI::cb_Pos_i (Fl_Slider* o, void* v) {

  209.        m_GUICH->Set ("Time",(float)o->value());

  210.        m_GUICH->SetCommand (StreamPlugin::SET_TIME);

  211. }

  212. 

  213. void StreamPluginGUI::cb_Pos (Fl_Slider* o, void* v) {

  214.      ((StreamPluginGUI*)(o->parent ()))->cb_Pos_i (o, v);

  215. }

  216. 

  217. // load

  218. 

  219. inline void StreamPluginGUI::cb_Load_i (Fl_Button* o, void* v) {

  220.        char *fn=fl_file_chooser("Load a sample", "{*.wav,*.WAV}", NULL);

  221.        if (fn && fn!='\0') {

  222.           strcpy (m_TextBuf, fn);

  223. 	  m_GUICH->SetData ("FileName", (void*)m_TextBuf);

  224. 	  m_GUICH->SetCommand (StreamPlugin::LOAD);

  225. 	  m_GUICH->Wait();

  226. 	  SetMaxTime (m_GUICH->GetFloat ("MaxTime"));

  227. 	}

  228. }

  229. 

  230. void StreamPluginGUI::cb_Load (Fl_Button* o, void* v) {

  231.      ((StreamPluginGUI*)(o->parent ()))->cb_Load_i (o, v);

  232. }

  233. 

  234. // restart

  235. 

  236. inline void StreamPluginGUI::cb_ToStart_i (Fl_Button* o, void* v) {

  237.        m_GUICH->SetCommand (StreamPlugin::RESTART);

  238. }

  239. 

  240. void StreamPluginGUI::cb_ToStart (Fl_Button* o, void* v) {

  241.      ((StreamPluginGUI*)(o->parent ()))->cb_ToStart_i (o, v);

  242. }

  243. 

  244. // play

  245. 

  246. void StreamPluginGUI::UpdatePlayStatus (void) {

  247.        m_Playing = ! m_Playing;

  248.        if (m_Playing) m_Play->label ("@||");

  249.        else m_Play->label ("@>");

  250. }

  251. 

  252. inline void StreamPluginGUI::cb_Play_i (Fl_Button* o, void* v) {

  253.        if (m_Playing) m_GUICH->SetCommand (StreamPlugin::STOP);

  254.        else m_GUICH->SetCommand (StreamPlugin::PLAY);

  255. }

  256. 

  257. void StreamPluginGUI::cb_Play (Fl_Button* o, void* v) {

  258.      ((StreamPluginGUI*)(o->parent ()))->cb_Play_i (o, v);

  259. }

  260. 

  261. // reset

  262. 

  263. inline void StreamPluginGUI::cb_Reset_i (Fl_Button* o, void* v) {

  264.        m_PitchValue = 1.0f;

  265.        UpdatePitch ();

  266. }

  267. 

  268. void StreamPluginGUI::cb_Reset (Fl_Button* o, void* v) {

  269.      ((StreamPluginGUI*)(o->parent ()))->cb_Reset_i (o, v);

  270. }

  271. 

  272. // Rev

  273. 

  274. inline void StreamPluginGUI::cb_Rev_i (Fl_Button* o, void* v) {

  275.        m_PitchValue = -m_PitchValue;

  276.        UpdatePitch ();

  277. }

  278. 

  279. void StreamPluginGUI::cb_Rev (Fl_Button* o, void* v) {

  280.      ((StreamPluginGUI*)(o->parent ()))->cb_Rev_i (o, v);

  281. }

  282. 

  283. // div 2

  284. 

  285. inline void StreamPluginGUI::cb_Div_i (Fl_Button* o, void* v) {

  286.        m_PitchValue /= 2.0f;

  287.        UpdatePitch ();

  288. }

  289. 

  290. void StreamPluginGUI::cb_Div (Fl_Button* o, void* v) {

  291.      ((StreamPluginGUI*)(o->parent()))->cb_Div_i (o, v);

  292. }

  293. 

  294. // mul 2

  295. 

  296. inline void StreamPluginGUI::cb_Dbl_i (Fl_Button* o, void* v) {

  297.        m_PitchValue *= 2.0f;

  298.        UpdatePitch ();

  299. }

  300. 

  301. void StreamPluginGUI::cb_Dbl (Fl_Button* o, void* v) {

  302.      ((StreamPluginGUI*)(o->parent ()))->cb_Dbl_i (o, v);

  303. }

  304. 

  305. //nudge

  306. 

  307. inline void StreamPluginGUI::cb_Nudge_i (Fl_Button* o, void* v) {

  308.        int NudgeSize = 1;

  309.        if (m_PitchValue < 0) NudgeSize = -NudgeSize;

  310.        float P = m_Pos->value() + NudgeSize;

  311.        if (P < 0) P = 0;

  312.        if (P > m_Pos->maximum()) P = m_Pos->maximum();

  313.        m_Pos->value (P);

  314.        m_GUICH->Set ("Time", P);

  315.        m_GUICH->SetCommand (StreamPlugin::SET_TIME);

  316. }

  317. 

  318. void StreamPluginGUI::cb_Nudge (Fl_Button* o, void* v) {

  319.      ((StreamPluginGUI*)(o->parent ()))->cb_Nudge_i (o, v);

  320. }

  321. 

  322. // help text

  323. 

  324. const string StreamPluginGUI::GetHelpText (const string &loc){

  325.     return string("")

  326. 	+ "If you want to mix whole tracks and add effects etc, then this is the\n"

  327. 	+ "way to do it. The StreamPlugin loads a wav in bit by bit, so it doesn't\n"

  328. 	+ "use much memory. The track can be pitched for mixing.\n"

  329. 	+ "Operates pretty much like a media player such as XMMS (only wav\n"

  330. 	+ "format though).\n\n"

  331.         + "Connect the finish trigger to the stop trigger to play the wav only\nonce.\n\n"

  332. 	+ "Note: Not realtime safe, if you're using JACK, use a client such as\n"

  333. 	+ "alsaplayer.";

  334. }