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

367 lines
11KB
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 "../GUI/WaveChooser.h"

  23. 

  24. using namespace std;

  25. 

  26. ////////////////////////////////////////////

  27. 

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

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

  30. m_Playing (false),

  31. m_PitchValue (1.0f)

  32. {

  33.         strcpy (m_TextBuf, "");

  34.         // 7 seg displays

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

  36.             m_Display[dis] = new Fl_SevenSeg (5 + 28*dis, 15, 28, 38);

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

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

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

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

  41.             add (m_Display[dis]);

  42.         }

  43.         UpdateTime (0.0);

  44.         // volume control

  45.         m_Volume = new Fl_Knob (180, 10, 50, 50, "Volume");

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

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

  48.         m_Volume->labelsize (10);

  49.         m_Volume->maximum (2);

  50.         m_Volume->step (0.001);

  51.         m_Volume->value (1);

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

  53. 	add (m_Volume);

  54.         // filename display

  55.         m_FileName = new Fl_Input (5, 55, 170, 20, "");

  56.         m_FileName->type (FL_NORMAL_OUTPUT);

  57.         m_FileName->textsize (8);

  58.         m_FileName->box (FL_PLASTIC_UP_BOX);

  59.         m_FileName->value ("Nothing Loaded");

  60.         m_FileName->tooltip (m_TextBuf);

  61.         // pitch indicator

  62. 	m_Pitch = new Fl_Slider (5, 78, 235, 20, "");

  63.         m_Pitch->type (FL_HORIZONTAL);

  64.         m_Pitch->labelsize (10);

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

  66.         m_Pitch->label (m_PitchLabel);

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

  68.         m_Pitch->box (FL_PLASTIC_DOWN_BOX);

  69. 	m_Pitch->maximum (20);

  70.         m_Pitch->step (0.001);

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

  72.         add (m_Pitch);

  73.         // position indicator

  74. 	m_Pos = new Fl_Slider (5, 100, 235, 20, "");

  75. 	m_Pos->type (FL_HORIZONTAL);

  76.         m_Pos->box (FL_PLASTIC_DOWN_BOX);

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

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

  79. 	m_Pos->maximum (1);

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

  81. 	add (m_Pos);

  82.         // load btn

  83.         m_Load = new Fl_Button (2, 124, 30, 30, "Load");

  84.         m_Load->labelsize (9);

  85.         m_Load->box (FL_PLASTIC_UP_BOX);

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

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

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

  89. 	add (m_Load);

  90.         // reset btn

  91. 	m_ToStart = new Fl_Button (32, 124, 30, 30, "@|<");

  92.         m_ToStart->labelsize (10);

  93. 	m_ToStart->labeltype (FL_SYMBOL_LABEL);

  94.         m_ToStart->box (FL_PLASTIC_UP_BOX);

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

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

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

  98. 	add (m_ToStart);

  99.         // play btn

  100. 	m_Play = new Fl_Button (62, 124, 30, 30, "@>");

  101.         m_Play->labelsize (10);

  102. 	m_Play->labeltype (FL_SYMBOL_LABEL);

  103.         m_Play->box (FL_PLASTIC_UP_BOX);

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

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

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

  107. 	add (m_Play);

  108.         // normal speed btn

  109. 	m_Reset = new Fl_Button (92, 124, 30, 30, "Reset");

  110.         m_Reset->labelsize (9);

  111.         m_Reset->box (FL_PLASTIC_UP_BOX);

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

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

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

  115. 	add (m_Reset);

  116.         // Reverse Button

  117.         m_Rev = new  Fl_Button (122, 124, 30, 30, "@<-");

  118.         m_Rev->labelsize (10);

  119. 	m_Rev->labeltype (FL_SYMBOL_LABEL);

  120.         m_Rev->box (FL_PLASTIC_UP_BOX);

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

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

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

  124. 	add (m_Rev);

  125.         // 1/2 speed btn

  126. 	m_Div = new Fl_Button (152, 124, 30, 30, "/2");

  127.         m_Div->labelsize (9);

  128.         m_Div->box (FL_PLASTIC_UP_BOX);

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

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

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

  132. 	add (m_Div);

  133.         // dbl speed btn

  134. 	m_Dbl = new Fl_Button (182, 124, 30, 30, "X2");

  135.         m_Dbl->labelsize (9);

  136.         m_Dbl->box (FL_PLASTIC_UP_BOX);

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

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

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

  140. 	add (m_Dbl);

  141.         // nudge btn

  142. 	m_Nudge = new Fl_Repeat_Button (212, 124, 30, 30, "Nudge");

  143.         m_Nudge->labelsize (9);

  144.         m_Nudge->box (FL_PLASTIC_UP_BOX);

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

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

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

  148. 	add (m_Nudge);

  149.         end ();

  150.         UpdatePitch (true, false, false);

  151. }

  152. 

  153. StreamPluginGUI::~StreamPluginGUI() {

  154. }

  155. 

  156. void StreamPluginGUI::UpdateTime (float t) {

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

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

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

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

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

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

  163.      redraw();

  164. }

  165. 

  166. // Update signalled from plugin

  167. 

  168. void StreamPluginGUI::Update() {

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

  170.      if (t != m_Pos->value()) {

  171.         m_Pos->value (t);

  172.         UpdateTime(t);

  173.      }

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

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

  176.      m_GUICH->GetData ("EchoFileName", (void*)m_TextBuf);

  177.      if (*m_TextBuf == 0) {

  178.         m_FileName->value ("Nothing Loaded");

  179.         m_FileName->position (0);

  180.      }

  181.      else {

  182.         m_FileName->value (m_TextBuf);

  183.         m_FileName->position (strlen (m_TextBuf)-1);

  184.      }

  185. }

  186. 

  187. // Update GUI on load

  188. 

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

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

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

  192.      m_PitchValue = Plugin->GetPitch();

  193.      UpdateTime (0.0);

  194.      UpdatePitch (true, true, false);

  195. }

  196. 

  197. // volume

  198. 

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

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

  201. }

  202. 

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

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

  205. }

  206. 

  207. // pitch

  208. 

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

  210.      if (m_PitchValue<0) {

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

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

  213.      }

  214.      else {

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

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

  217.      }

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

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

  220.      if (DrawIt) redraw();

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

  222. }

  223. 

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

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

  226.        UpdatePitch (false, false);

  227. }

  228. 

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

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

  231. }

  232. 

  233. // position

  234. 

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

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

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

  238. }

  239. 

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

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

  242. }

  243. 

  244. // load

  245. 

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

  247.        char *fn=WaveFileName ();

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

  249.           strcpy (m_TextBuf, fn);

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

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

  252. 	  m_GUICH->Wait();

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

  254. 	}

  255. }

  256. 

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

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

  259. }

  260. 

  261. // restart

  262. 

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

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

  265. }

  266. 

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

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

  269. }

  270. 

  271. // play

  272. 

  273. void StreamPluginGUI::UpdatePlayStatus (void) {

  274.        m_Playing = ! m_Playing;

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

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

  277. }

  278. 

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

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

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

  282. }

  283. 

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

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

  286. }

  287. 

  288. // reset

  289. 

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

  291.        m_PitchValue = 1.0f;

  292.        UpdatePitch ();

  293. }

  294. 

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

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

  297. }

  298. 

  299. // Rev

  300. 

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

  302.        m_PitchValue = -m_PitchValue;

  303.        UpdatePitch ();

  304. }

  305. 

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

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

  308. }

  309. 

  310. // div 2

  311. 

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

  313.        m_PitchValue /= 2.0f;

  314.        UpdatePitch ();

  315. }

  316. 

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

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

  319. }

  320. 

  321. // mul 2

  322. 

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

  324.        m_PitchValue *= 2.0f;

  325.        UpdatePitch ();

  326. }

  327. 

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

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

  330. }

  331. 

  332. //nudge

  333. 

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

  335.        int NudgeSize = 1;

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

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

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

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

  340.        m_Pos->value (P);

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

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

  343. }

  344. 

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

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

  347. }

  348. 

  349. // help text

  350. 

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

  352.     return string("")

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

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

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

  356. 	+ "Operates pretty much like a media player such as XMMS.\n\n"

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

  358.         + "once.\n\n"

  359.         + "The playing trigger is 'on' whilst the wave is actually playing\n"

  360.         + "and 'off' when it's not.\n\n"

  361.         + "The Position CV outputs 0 when not playing or at the start of the\n"

  362.         + "wave, and slowly increments up to 1 as the wave plays.\n\n"

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

  364. 	+ "alsaplayer.";

  365. }