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

501 lines
12KB
Raw Blame History 

  1. /*  SpiralSound

  2.  *  Copyleft (C) 2001 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. #include "MatrixPlugin.h"

  19. #include "MatrixPluginGUI.h"

  20. #include <FL/Fl_Button.h>

  21. #include "SpiralIcon.xpm"

  22. #include "../../RiffWav.h"

  23. #include "../../NoteTable.h"

  24. 

  25. using namespace std;

  26. 

  27. extern "C" {

  28. SpiralPlugin* SpiralPlugin_CreateInstance()

  29. {

  30. 	return new MatrixPlugin;

  31. }

  32. 

  33. char** SpiralPlugin_GetIcon()

  34. {

  35. 	return SpiralIcon_xpm;

  36. }

  37. 

  38. int SpiralPlugin_GetID()

  39. {

  40. 	return 0x0012;

  41. }

  42. 

  43. string SpiralPlugin_GetGroupName()

  44. {

  45. 	return "Sequencing";

  46. }

  47. }

  48. 

  49. ///////////////////////////////////////////////////////

  50. 

  51. MatrixPlugin::MatrixPlugin() :

  52. m_TickTime(1.0f),

  53. m_StepTime(1.0f),

  54. m_Time(0.0f),

  55. m_Step(0),

  56. m_Loop(true),

  57. m_NoteCut(false),

  58. m_Current(0),

  59. m_GUICurrent(0),

  60. m_CurPatSeq(0),

  61. m_CurrentNoteCV(0),

  62. m_CurrentTriggerCV(0),

  63. m_Triggered(false),

  64. m_ClockHigh(false),

  65. m_CopyPattern(0),

  66. m_PatAdvance(false),

  67. m_PatReset(false)

  68. {

  69. 	m_Version=4;

  70. 

  71. 	m_PluginInfo.Name="Matrix";

  72. 	m_PluginInfo.Width=600;

  73. 	m_PluginInfo.Height=270;

  74. 	m_PluginInfo.NumInputs=5;

  75. 	m_PluginInfo.NumOutputs=19;

  76. 	m_PluginInfo.PortTips.push_back("Play Trigger");	

  77. 	m_PluginInfo.PortTips.push_back("StepTime CV");	

  78. 	m_PluginInfo.PortTips.push_back("Input Pitch CV");	

  79. 	m_PluginInfo.PortTips.push_back("Input Trigger CV");

  80. 	m_PluginInfo.PortTips.push_back("External Clock");

  81. 	//m_PluginInfo.PortTips.push_back("Pattern Advance");

  82. 	//m_PluginInfo.PortTips.push_back("Pattern Reset");

  83. 	m_PluginInfo.PortTips.push_back("Output Pitch");	

  84. 	m_PluginInfo.PortTips.push_back("Output Trigger");

  85. 	m_PluginInfo.PortTips.push_back("Trigger 1");

  86. 	m_PluginInfo.PortTips.push_back("Trigger 2");

  87. 	m_PluginInfo.PortTips.push_back("Trigger 3");

  88. 	m_PluginInfo.PortTips.push_back("Trigger 4");

  89. 	m_PluginInfo.PortTips.push_back("Trigger 5");

  90. 	m_PluginInfo.PortTips.push_back("Trigger 6");

  91. 	m_PluginInfo.PortTips.push_back("Trigger 7");

  92. 	m_PluginInfo.PortTips.push_back("Trigger 8");

  93. 	m_PluginInfo.PortTips.push_back("Trigger 9");

  94. 	m_PluginInfo.PortTips.push_back("Trigger 10");

  95. 	m_PluginInfo.PortTips.push_back("Trigger 11");

  96. 	m_PluginInfo.PortTips.push_back("Trigger 12");

  97. 	m_PluginInfo.PortTips.push_back("Trigger 13");

  98. 	m_PluginInfo.PortTips.push_back("Trigger 14");

  99. 	m_PluginInfo.PortTips.push_back("Trigger 15");

  100. 	m_PluginInfo.PortTips.push_back("Trigger 16");

  101. 	m_PluginInfo.PortTips.push_back("Reset Trigger");	

  102. 		

  103. 	for (int n=0; n<NUM_PATTERNS; n++)

  104. 	{

  105. 		m_Matrix[n].Length=64;

  106. 		m_Matrix[n].Speed=1.0f;

  107. 		m_Matrix[n].Octave=0;

  108. 		

  109. 		for (int x=0; x<MATX; x++)

  110. 		for (int y=0; y<MATY; y++)

  111. 		{

  112. 			m_Matrix[n].Matrix[x][y]=false;

  113. 			m_Matrix[n].Volume[x][y]=1;

  114. 		}

  115. 

  116. 		m_TriggerLevel[n]=0;

  117. 	}

  118. 

  119. 	for (int n=0; n<NUM_PATSEQ; n++)

  120. 	{

  121. 		m_PatSeq[n]=0;

  122. 	}

  123. 

  124. 	m_AudioCH->Register("NoteCut",&m_NoteCut,ChannelHandler::INPUT);

  125. 	m_AudioCH->Register("Volume",&m_GUIArgs.Volume,ChannelHandler::INPUT);

  126. 	m_AudioCH->Register("Current",&m_GUICurrent,ChannelHandler::INPUT);

  127. 	m_AudioCH->Register("StepTime",&m_StepTime,ChannelHandler::INPUT);

  128. 	m_AudioCH->Register("Num",&m_GUIArgs.Num,ChannelHandler::INPUT);

  129. 	m_AudioCH->Register("Length",&m_GUIArgs.Length,ChannelHandler::INPUT);

  130. 	m_AudioCH->Register("Speed",&m_GUIArgs.Speed,ChannelHandler::INPUT);

  131. 	m_AudioCH->Register("X",&m_GUIArgs.X,ChannelHandler::INPUT);

  132. 	m_AudioCH->Register("Y",&m_GUIArgs.Y,ChannelHandler::INPUT);

  133. 	m_AudioCH->Register("Octave",&m_GUIArgs.Octave,ChannelHandler::INPUT);

  134. 	m_AudioCH->Register("Step",&m_Step,ChannelHandler::OUTPUT);

  135. 	m_AudioCH->Register("PatSeqStep",&m_CurPatSeq,ChannelHandler::OUTPUT);

  136. 	m_AudioCH->Register("EchoCur", &m_Current, ChannelHandler::OUTPUT);

  137. 	m_AudioCH->RegisterData("Matrix",ChannelHandler::OUTPUT_REQUEST,&m_Matrix,sizeof(m_Matrix));

  138. }

  139. 

  140. MatrixPlugin::~MatrixPlugin()

  141. {

  142. }

  143. 

  144. PluginInfo &MatrixPlugin::Initialise(const HostInfo *Host)

  145. {	

  146. 	PluginInfo& Info = SpiralPlugin::Initialise(Host);

  147. 	m_TickTime = 1.0f/(float)m_HostInfo->SAMPLERATE;

  148. 	return Info;

  149. }

  150. 

  151. SpiralGUIType *MatrixPlugin::CreateGUI()

  152. {

  153. 	return new MatrixPluginGUI(m_PluginInfo.Width,

  154. 								  	    m_PluginInfo.Height,

  155. 										this,m_AudioCH,m_HostInfo);

  156. }

  157. 

  158. void MatrixPlugin::Execute()

  159. {	

  160. 	for (int n=0; n<m_HostInfo->BUFSIZE; n++)

  161. 	{

  162. 		if (InputExists(1)) m_StepTime = GetInput(1,n);

  163. 		

  164. 		// inc time 

  165. 		m_Time+=m_TickTime;

  166. 		

  167. 		SetOutputPitch(0,n,m_CurrentNoteCV);

  168. 		SetOutput(1,n,m_CurrentTriggerCV);

  169.                 

  170. 		// clear the pattern sync

  171.         SetOutput(18, n, 0);

  172. 		

  173. 		bool ExternalClock = InputExists(4);

  174. 		bool ExternalClockTriggered=false;

  175. 		 

  176. 		if (GetInputPitch(0,n)>0) 

  177. 		{

  178. 			if (!m_Triggered)

  179. 			{

  180. 				float Freq=GetInputPitch(0,n);

  181. 				// Notes 0 to 16 trigger patterns 0 to 16

  182. 				// No other notes catered for

  183. 				for (int i=0; i<NUM_PATTERNS; i++)

  184. 				{

  185. 					if (feq(Freq,NoteTable[i],0.01f))

  186. 					{						

  187. 						m_Current=i;

  188. 						break;

  189. 					}

  190. 				}

  191. 				

  192. 				// make it so the next note to trigger

  193. 				// will be the first one								

  194. 				m_Time=m_StepTime*(1/m_Matrix[m_Current].Speed);

  195. 				m_Step=-1;

  196. 				ExternalClockTriggered=true;

  197. 				m_Triggered=true;

  198. 			}

  199. 		}

  200. 		else

  201. 		{

  202. 			m_Triggered=false;

  203. 		}

  204. 

  205. 

  206. 		// set the individual triggers

  207. 		for (int t=0; t<NUM_PATTERNS; t++) SetOutput(t+2,n,m_TriggerLevel[t]);

  208. 		

  209. 		if (ExternalClock)

  210. 		{

  211. 			if (GetInput(4,n)>0)

  212. 			{

  213. 				if(!m_ClockHigh)

  214. 				{

  215. 					m_ClockHigh=true;

  216. 					ExternalClockTriggered=true;

  217. 				}

  218. 			}

  219. 			else

  220. 			{

  221. 				if (m_ClockHigh)

  222. 				{

  223. 					m_ClockHigh=false;

  224. 					ExternalClockTriggered=true;

  225. 				}

  226. 			}

  227. 			

  228. 			// reset the position on a signal from input 1

  229. 			if (InputExists(0) && GetInput(0,n)!=0)

  230. 			{

  231. 				m_Step=-1;

  232. 				ExternalClockTriggered=true;

  233. 				m_CurPatSeq++;

  234. 				if (m_PatSeq[m_CurPatSeq]==-1 || m_CurPatSeq==NUM_PATSEQ) m_CurPatSeq=0;

  235. 				m_Current=m_PatSeq[m_CurPatSeq];

  236. 			}

  237. 		}

  238. 

  239. 		// An external clock pulse overrides the internal timing

  240. 		if ((!ExternalClock && m_Time>=m_StepTime*(1/m_Matrix[m_Current].Speed)) ||

  241. 			(ExternalClock && ExternalClockTriggered))

  242. 		{

  243. 			m_Time=0;

  244. 			m_Step++;

  245. 

  246. 			if (m_Step >= m_Matrix[m_Current].Length)

  247. 			{

  248. 				SetOutput(18, n, 1);

  249. 				m_Step=0;

  250. 				m_CurPatSeq++;

  251. 				if (m_PatSeq[m_CurPatSeq]==-1 || m_CurPatSeq==NUM_PATSEQ) m_CurPatSeq=0;

  252. 				m_Current=m_PatSeq[m_CurPatSeq];

  253. 			}

  254. 

  255. 			// Reset the values

  256. 			m_CurrentTriggerCV=0;

  257. 			if (m_NoteCut) m_CurrentNoteCV=0;

  258. 			for (int t=0; t<NUM_PATTERNS; t++)

  259. 			{

  260. 				SetOutput(t+2,n,0);

  261. 				m_TriggerLevel[t]=0;

  262. 			}

  263. 

  264. 			// Scan the matrix at current time

  265. 			for (int i=0; i<MATY; i++)

  266. 			{

  267. 				if (m_Matrix[m_Current].Matrix[m_Step][i])

  268. 				{

  269. 					m_CurrentNoteCV=NoteTable[i+m_Matrix[m_Current].Octave*12];

  270. 					m_CurrentTriggerCV=m_Matrix[m_Current].Volume[m_Step][i];

  271. 					m_TriggerLevel[i]=m_Matrix[m_Current].Volume[m_Step][i];

  272. 				}

  273. 			}

  274. 

  275. 			// reset the triggers between steps to clear them

  276. 			// otherwise consecutive events wont get triggered

  277. 			SetOutput(1,n,0);

  278. 			for (int t=0; t<NUM_PATTERNS; t++) SetOutput(t+2,n,0);

  279. 		}

  280. 	}

  281. }

  282. 

  283. void MatrixPlugin::ExecuteCommands()

  284. {

  285. 	if (m_AudioCH->IsCommandWaiting())

  286. 	{

  287. 		switch (m_AudioCH->GetCommand())

  288. 		{

  289. 			case MAT_LENGTH   :

  290. 				m_Matrix[m_GUICurrent].Length=m_GUIArgs.Length;

  291. 			break;

  292. 

  293. 			case MAT_SPEED    :

  294. 				m_Matrix[m_GUICurrent].Speed=m_GUIArgs.Speed;

  295. 			break;

  296. 

  297. 			case MAT_ACTIVATE :

  298. 				m_Matrix[m_GUICurrent].Matrix[m_GUIArgs.X][m_GUIArgs.Y]=true;

  299. 			break;

  300. 

  301. 			case MAT_DEACTIVATE :

  302. 				m_Matrix[m_GUICurrent].Matrix[m_GUIArgs.X][m_GUIArgs.Y]=false;

  303. 			break;

  304. 			case MAT_OCTAVE :

  305. 				m_Matrix[m_GUICurrent].Octave=m_GUIArgs.Octave;

  306. 			break;

  307. 			case COPY :

  308.                                 m_CopyPattern = m_GUICurrent;

  309. 			break;

  310. 			case PASTE :

  311. 				PastePattern();

  312. 			break;

  313. 			case CLEAR :

  314. 				ClearPattern();

  315. 			break;

  316. 			case TUP :

  317. 				if (CanTransposeUp()) TransposeUp();

  318. 			break;

  319. 			case TDOWN :

  320. 				if (CanTransposeDown()) TransposeDown();

  321. 			break;

  322. 			case MAT_VOLUME :

  323. 				m_Matrix[m_GUICurrent].Volume[m_GUIArgs.X][m_GUIArgs.Y]=m_GUIArgs.Volume;

  324. 			break;

  325. 			case SET_CURRENT :

  326. 				m_Current=m_GUIArgs.Num;

  327. 			break;

  328. 			case SET_PATSEQ :

  329. 				m_PatSeq[m_GUIArgs.Y]=m_GUIArgs.Num;

  330. 			break;

  331. 		}

  332. 	}

  333. }

  334. 

  335. void MatrixPlugin::PastePattern() {

  336.      m_Matrix[m_GUICurrent].Length = m_Matrix[m_CopyPattern].Length;

  337.      m_Matrix[m_GUICurrent].Speed = m_Matrix[m_CopyPattern].Speed;

  338.      m_Matrix[m_GUICurrent].Octave = m_Matrix[m_CopyPattern].Octave;

  339.      for (int y=0; y<MATY; y++) {

  340.          for (int x=0; x<MATX; x++) {

  341.              m_Matrix[m_GUICurrent].Matrix[x][y] = m_Matrix[m_CopyPattern].Matrix[x][y];

  342.          }

  343.      }

  344. }

  345. 

  346. void MatrixPlugin::ClearPattern() {

  347.      for (int y=0; y<MATY; y++) {

  348.          for (int x=0; x<MATX; x++) {

  349.              m_Matrix[m_GUICurrent].Matrix[x][y] = 0;

  350.          }

  351.      }

  352. }

  353. 

  354. void MatrixPlugin::TransposeUp() {

  355.      int x, y;

  356.      for (y=MATY-1; y>=0; y--) {

  357.          for (x=0; x<MATX; x++) {

  358.              m_Matrix[m_GUICurrent].Matrix[x][y] = m_Matrix[m_GUICurrent].Matrix[x][y-1];

  359.          }

  360.      }

  361.      for (x=0; x<MATX; x++) {

  362.          m_Matrix[m_GUICurrent].Matrix[x][0] = 0;

  363.      }

  364. }

  365. 

  366. void MatrixPlugin::TransposeDown()

  367. {

  368.     int x, y;

  369.     for (y=0; y<MATY-1; y++)

  370. 	{

  371.         for (x=0; x<MATX; x++)

  372. 		{

  373.             m_Matrix[m_GUICurrent].Matrix[x][y] = m_Matrix[m_GUICurrent].Matrix[x][y+1];

  374.         }

  375.     }

  376.     for (x=0; x<MATX; x++)

  377. 	{

  378.     	m_Matrix[m_GUICurrent].Matrix[x][MATY-1] = 0;

  379.     }

  380. }

  381. 

  382. bool MatrixPlugin::CanTransposeDown()

  383. {

  384.     for (int x=0; x<MATX; x++) if (m_Matrix[m_GUICurrent].Matrix[x][0]) return false;

  385.     return true;

  386. }

  387. 

  388. bool MatrixPlugin::CanTransposeUp()

  389. {

  390.      for (int x=0; x<MATX; x++) if (m_Matrix[m_Current].Matrix[x][MATY-1]) return false;

  391.      return true;

  392. }

  393. 

  394. void MatrixPlugin::StreamOut(ostream &s)

  395. {

  396. 	s<<m_Version<<" ";

  397. 	s<<m_Current<<" "<<m_Time<<" "<<m_Step<<" "<<m_Loop<<" "<<m_NoteCut<<" "<<endl;

  398. 

  399. 	for (int n=0; n<NUM_PATTERNS; n++)

  400. 	{

  401. 		s<<m_Matrix[n].Length<<" "<<m_Matrix[n].Speed<<" "<<m_Matrix[n].Octave<<endl;

  402. 

  403. 		for (int y=0; y<MATY; y++)

  404. 		{

  405. 			for (int x=0; x<MATX; x++)

  406. 			{

  407. 				if (m_Matrix[n].Matrix[x][y]) s<<x<<" "<<y<<"  "<<m_Matrix[n].Volume[x][y]<<" ";

  408. 			}

  409. 		}

  410. 		s<<"-1 ";

  411. 	}

  412. 	s<<endl;

  413. 	for (int n=0; n<NUM_PATSEQ; n++)

  414. 	{

  415. 		s<<m_PatSeq[n]<<" ";

  416. 	}

  417. 

  418. }

  419. 

  420. void MatrixPlugin::StreamIn(istream &s)

  421. {

  422. 	int version;

  423. 	s>>version;

  424. 

  425. 	switch (version)

  426. 	{

  427. 		case 1:

  428. 		{

  429. 			s>>m_Current>>m_Time>>m_Step>>m_Loop>>m_NoteCut;

  430. 

  431. 			for (int n=0; n<NUM_PATTERNS; n++)

  432. 			{	

  433. 				s>>m_Matrix[n].Length>>m_Matrix[n].Speed>>m_Matrix[n].Octave;

  434. 		

  435. 				for (int y=0; y<MATY; y++)

  436. 				for (int x=0; x<MATX; x++)

  437. 				{

  438. 					s>>m_Matrix[n].Matrix[x][y];

  439. 				}

  440. 			}

  441. 		} break;

  442. 	

  443. 		case 2:

  444. 		{

  445. 			s>>m_Current>>m_Time>>m_Step>>m_Loop>>m_NoteCut;

  446. 	

  447. 			for (int n=0; n<NUM_PATTERNS; n++)	

  448. 			{	

  449. 				s>>m_Matrix[n].Length>>m_Matrix[n].Speed>>m_Matrix[n].Octave;

  450. 		

  451. 				int x=0,y=0;

  452. 				while(x!=-1)

  453. 				{

  454. 					s>>x;

  455. 					if (x!=-1)

  456. 					{						

  457. 						s>>y;

  458. 						if (y!=-1) m_Matrix[n].Matrix[x][y]=true;

  459. 					}

  460. 				}

  461. 			}

  462. 		} break;

  463. 		

  464. 		case 3:

  465. 		case 4:

  466. 		{

  467. 			s>>m_Current>>m_Time>>m_Step>>m_Loop>>m_NoteCut;

  468. 	

  469. 			for (int n=0; n<NUM_PATTERNS; n++)	

  470. 			{	

  471. 				s>>m_Matrix[n].Length>>m_Matrix[n].Speed>>m_Matrix[n].Octave;

  472. 		

  473. 				int x=0,y=0;

  474. 				float v;

  475. 				while(x!=-1)

  476. 				{

  477. 					s>>x;

  478. 					if (x!=-1)

  479. 					{						

  480. 						s>>y>>v;

  481. 						if (y!=-1) 

  482. 						{

  483. 							m_Matrix[n].Matrix[x][y]=true;

  484. 							m_Matrix[n].Volume[x][y]=v;

  485. 						}

  486. 					}

  487. 				}

  488. 			}

  489. 			

  490. 			if (version>3)

  491. 			{

  492. 				for (int n=0; n<NUM_PATSEQ; n++)	

  493. 				{

  494. 					s>>m_PatSeq[n];

  495. 				}

  496. 			}

  497. 			

  498. 		} break;

  499. 	}

  500. }