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

355 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.         // volume control

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

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

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

  47.         m_Volume->labelsize (10);

  48.         m_Volume->maximum (2);

  49.         m_Volume->step (0.001);

  50.         m_Volume->value (1);

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

  52. 	add (m_Volume);

  53.         // filename display

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

  55.         m_FileName->type (FL_NORMAL_OUTPUT);

  56.         m_FileName->textsize (8);

  57.         m_FileName->box (FL_PLASTIC_UP_BOX);

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

  59.         m_FileName->tooltip (m_TextBuf);

  60.         // pitch indicator

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

  62.         m_Pitch->type (FL_HORIZONTAL);

  63.         m_Pitch->labelsize (10);

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

  65.         m_Pitch->label (m_PitchLabel);

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

  67.         m_Pitch->box (FL_PLASTIC_DOWN_BOX);

  68. 	m_Pitch->maximum (20);

  69.         m_Pitch->step (0.001);

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

  71.         add (m_Pitch);

  72.         // position indicator

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

  74. 	m_Pos->type (FL_HORIZONTAL);

  75.         m_Pos->box (FL_PLASTIC_DOWN_BOX);

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

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

  78. 	m_Pos->maximum (1);

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

  80. 	add (m_Pos);

  81.         // load btn

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

  83.         m_Load->labelsize (9);

  84.         m_Load->box (FL_PLASTIC_UP_BOX);

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

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

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

  88. 	add (m_Load);

  89.         // reset btn

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

  91.         m_ToStart->labelsize (10);

  92. 	m_ToStart->labeltype (FL_SYMBOL_LABEL);

  93.         m_ToStart->box (FL_PLASTIC_UP_BOX);

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

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

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

  97. 	add (m_ToStart);

  98.         // play btn

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

  100.         m_Play->labelsize (10);

  101. 	m_Play->labeltype (FL_SYMBOL_LABEL);

  102.         m_Play->box (FL_PLASTIC_UP_BOX);

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

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

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

  106. 	add (m_Play);

  107.         // normal speed btn

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

  109.         m_Reset->labelsize (9);

  110.         m_Reset->box (FL_PLASTIC_UP_BOX);

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

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

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

  114. 	add (m_Reset);

  115.         // Reverse Button

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

  117.         m_Rev->labelsize (10);

  118. 	m_Rev->labeltype (FL_SYMBOL_LABEL);

  119.         m_Rev->box (FL_PLASTIC_UP_BOX);

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

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

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

  123. 	add (m_Rev);

  124.         // 1/2 speed btn

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

  126.         m_Div->labelsize (9);

  127.         m_Div->box (FL_PLASTIC_UP_BOX);

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

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

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

  131. 	add (m_Div);

  132.         // dbl speed btn

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

  134.         m_Dbl->labelsize (9);

  135.         m_Dbl->box (FL_PLASTIC_UP_BOX);

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

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

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

  139. 	add (m_Dbl);

  140.         // nudge btn

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

  142.         m_Nudge->labelsize (9);

  143.         m_Nudge->box (FL_PLASTIC_UP_BOX);

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

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

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

  147. 	add (m_Nudge);

  148.         end ();

  149.         UpdatePitch (true, false, false);

  150. }

  151. 

  152. StreamPluginGUI::~StreamPluginGUI () {

  153. }

  154. 

  155. // Update signalled from plugin

  156. 

  157. void StreamPluginGUI::Update() {

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

  159.      m_Pos->value (t);

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

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

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

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

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

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

  166.      redraw();

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

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

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

  170.      if (*m_TextBuf == 0) {

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

  172.         m_FileName->position (0);

  173.      }

  174.      else {

  175.         m_FileName->value (m_TextBuf);

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

  177.      }

  178. }

  179. 

  180. // Update GUI on load

  181. 

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

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

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

  185.      m_PitchValue = Plugin->GetPitch();

  186.      UpdatePitch (true, true, false);

  187. }

  188. 

  189. // volume

  190. 

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

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

  193. }

  194. 

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

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

  197. }

  198. 

  199. // pitch

  200. 

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

  202.      if (m_PitchValue<0) {

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

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

  205.      }

  206.      else {

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

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

  209.      }

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

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

  212.      if (DrawIt) redraw();

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

  214. }

  215. 

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

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

  218.        UpdatePitch (false, false);

  219. }

  220. 

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

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

  223. }

  224. 

  225. // position

  226. 

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

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

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

  230. }

  231. 

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

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

  234. }

  235. 

  236. // load

  237. 

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

  239.        char *fn=WaveFileName ();

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

  241.           strcpy (m_TextBuf, fn);

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

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

  244. 	  m_GUICH->Wait();

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

  246. 	}

  247. }

  248. 

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

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

  251. }

  252. 

  253. // restart

  254. 

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

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

  257. }

  258. 

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

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

  261. }

  262. 

  263. // play

  264. 

  265. void StreamPluginGUI::UpdatePlayStatus (void) {

  266.        m_Playing = ! m_Playing;

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

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

  269. }

  270. 

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

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

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

  274. }

  275. 

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

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

  278. }

  279. 

  280. // reset

  281. 

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

  283.        m_PitchValue = 1.0f;

  284.        UpdatePitch ();

  285. }

  286. 

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

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

  289. }

  290. 

  291. // Rev

  292. 

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

  294.        m_PitchValue = -m_PitchValue;

  295.        UpdatePitch ();

  296. }

  297. 

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

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

  300. }

  301. 

  302. // div 2

  303. 

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

  305.        m_PitchValue /= 2.0f;

  306.        UpdatePitch ();

  307. }

  308. 

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

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

  311. }

  312. 

  313. // mul 2

  314. 

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

  316.        m_PitchValue *= 2.0f;

  317.        UpdatePitch ();

  318. }

  319. 

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

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

  322. }

  323. 

  324. //nudge

  325. 

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

  327.        int NudgeSize = 1;

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

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

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

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

  332.        m_Pos->value (P);

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

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

  335. }

  336. 

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

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

  339. }

  340. 

  341. // help text

  342. 

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

  344.     return string("")

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

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

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

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

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

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

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

  352. 	+ "alsaplayer.";

  353. }