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

500 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 "../../NoteTable.h"

  23. 

  24. using namespace std;

  25. 

  26. extern "C" {

  27. SpiralPlugin* SpiralPlugin_CreateInstance()

  28. {

  29. 	return new MatrixPlugin;

  30. }

  31. 

  32. char** SpiralPlugin_GetIcon()

  33. {

  34. 	return SpiralIcon_xpm;

  35. }

  36. 

  37. int SpiralPlugin_GetID()

  38. {

  39. 	return 0x0012;

  40. }

  41. 

  42. string SpiralPlugin_GetGroupName()

  43. {

  44. 	return "Sequencing";

  45. }

  46. }

  47. 

  48. ///////////////////////////////////////////////////////

  49. 

  50. MatrixPlugin::MatrixPlugin() :

  51. m_TickTime(1.0f),

  52. m_StepTime(1.0f),

  53. m_Time(0.0f),

  54. m_Step(0),

  55. m_Loop(true),

  56. m_NoteCut(false),

  57. m_Current(0),

  58. m_GUICurrent(0),

  59. m_CurPatSeq(0),

  60. m_CurrentNoteCV(0),

  61. m_CurrentTriggerCV(0),

  62. m_Triggered(false),

  63. m_ClockHigh(false),

  64. m_CopyPattern(0),

  65. m_PatAdvance(false),

  66. m_PatReset(false)

  67. {

  68. 	m_Version=4;

  69. 

  70. 	m_PluginInfo.Name="Matrix";

  71. 	m_PluginInfo.Width=600;

  72. 	m_PluginInfo.Height=270;

  73. 	m_PluginInfo.NumInputs=5;

  74. 	m_PluginInfo.NumOutputs=19;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  101. 		

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

  103. 	{

  104. 		m_Matrix[n].Length=64;

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

  106. 		m_Matrix[n].Octave=0;

  107. 		

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

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

  110. 		{

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

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

  113. 		}

  114. 

  115. 		m_TriggerLevel[n]=0;

  116. 	}

  117. 

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

  119. 	{

  120. 		m_PatSeq[n]=0;

  121. 	}

  122. 

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  137. }

  138. 

  139. MatrixPlugin::~MatrixPlugin()

  140. {

  141. }

  142. 

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

  144. {	

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

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

  147. 	return Info;

  148. }

  149. 

  150. SpiralGUIType *MatrixPlugin::CreateGUI()

  151. {

  152. 	return new MatrixPluginGUI(m_PluginInfo.Width,

  153. 								  	    m_PluginInfo.Height,

  154. 										this,m_AudioCH,m_HostInfo);

  155. }

  156. 

  157. void MatrixPlugin::Execute()

  158. {	

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

  160. 	{

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

  162. 		

  163. 		// inc time 

  164. 		m_Time+=m_TickTime;

  165. 		

  166. 		SetOutputPitch(0,n,m_CurrentNoteCV);

  167. 		SetOutput(1,n,m_CurrentTriggerCV);

  168.                 

  169. 		// clear the pattern sync

  170.         SetOutput(18, n, 0);

  171. 		

  172. 		bool ExternalClock = InputExists(4);

  173. 		bool ExternalClockTriggered=false;

  174. 		 

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

  176. 		{

  177. 			if (!m_Triggered)

  178. 			{

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

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

  181. 				// No other notes catered for

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

  183. 				{

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

  185. 					{						

  186. 						m_Current=i;

  187. 						break;

  188. 					}

  189. 				}

  190. 				

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

  192. 				// will be the first one								

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

  194. 				m_Step=-1;

  195. 				ExternalClockTriggered=true;

  196. 				m_Triggered=true;

  197. 			}

  198. 		}

  199. 		else

  200. 		{

  201. 			m_Triggered=false;

  202. 		}

  203. 

  204. 

  205. 		// set the individual triggers

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

  207. 		

  208. 		if (ExternalClock)

  209. 		{

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

  211. 			{

  212. 				if(!m_ClockHigh)

  213. 				{

  214. 					m_ClockHigh=true;

  215. 					ExternalClockTriggered=true;

  216. 				}

  217. 			}

  218. 			else

  219. 			{

  220. 				if (m_ClockHigh)

  221. 				{

  222. 					m_ClockHigh=false;

  223. 					ExternalClockTriggered=true;

  224. 				}

  225. 			}

  226. 			

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

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

  229. 			{

  230. 				m_Step=-1;

  231. 				ExternalClockTriggered=true;

  232. 				m_CurPatSeq++;

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

  234. 				m_Current=m_PatSeq[m_CurPatSeq];

  235. 			}

  236. 		}

  237. 

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

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

  240. 			(ExternalClock && ExternalClockTriggered))

  241. 		{

  242. 			m_Time=0;

  243. 			m_Step++;

  244. 

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

  246. 			{

  247. 				SetOutput(18, n, 1);

  248. 				m_Step=0;

  249. 				m_CurPatSeq++;

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

  251. 				m_Current=m_PatSeq[m_CurPatSeq];

  252. 			}

  253. 

  254. 			// Reset the values

  255. 			m_CurrentTriggerCV=0;

  256. 			if (m_NoteCut) m_CurrentNoteCV=0;

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

  258. 			{

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

  260. 				m_TriggerLevel[t]=0;

  261. 			}

  262. 

  263. 			// Scan the matrix at current time

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

  265. 			{

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

  267. 				{

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

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

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

  271. 				}

  272. 			}

  273. 

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

  275. 			// otherwise consecutive events wont get triggered

  276. 			SetOutput(1,n,0);

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

  278. 		}

  279. 	}

  280. }

  281. 

  282. void MatrixPlugin::ExecuteCommands()

  283. {

  284. 	if (m_AudioCH->IsCommandWaiting())

  285. 	{

  286. 		switch (m_AudioCH->GetCommand())

  287. 		{

  288. 			case MAT_LENGTH   :

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

  290. 			break;

  291. 

  292. 			case MAT_SPEED    :

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

  294. 			break;

  295. 

  296. 			case MAT_ACTIVATE :

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

  298. 			break;

  299. 

  300. 			case MAT_DEACTIVATE :

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

  302. 			break;

  303. 			case MAT_OCTAVE :

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

  305. 			break;

  306. 			case COPY :

  307.                                 m_CopyPattern = m_GUICurrent;

  308. 			break;

  309. 			case PASTE :

  310. 				PastePattern();

  311. 			break;

  312. 			case CLEAR :

  313. 				ClearPattern();

  314. 			break;

  315. 			case TUP :

  316. 				if (CanTransposeUp()) TransposeUp();

  317. 			break;

  318. 			case TDOWN :

  319. 				if (CanTransposeDown()) TransposeDown();

  320. 			break;

  321. 			case MAT_VOLUME :

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

  323. 			break;

  324. 			case SET_CURRENT :

  325. 				m_Current=m_GUIArgs.Num;

  326. 			break;

  327. 			case SET_PATSEQ :

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

  329. 			break;

  330. 		}

  331. 	}

  332. }

  333. 

  334. void MatrixPlugin::PastePattern() {

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

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

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

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

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

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

  341.          }

  342.      }

  343. }

  344. 

  345. void MatrixPlugin::ClearPattern() {

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

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

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

  349.          }

  350.      }

  351. }

  352. 

  353. void MatrixPlugin::TransposeUp() {

  354.      int x, y;

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

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

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

  358.          }

  359.      }

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

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

  362.      }

  363. }

  364. 

  365. void MatrixPlugin::TransposeDown()

  366. {

  367.     int x, y;

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

  369. 	{

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

  371. 		{

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

  373.         }

  374.     }

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

  376. 	{

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

  378.     }

  379. }

  380. 

  381. bool MatrixPlugin::CanTransposeDown()

  382. {

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

  384.     return true;

  385. }

  386. 

  387. bool MatrixPlugin::CanTransposeUp()

  388. {

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

  390.      return true;

  391. }

  392. 

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

  394. {

  395. 	s<<m_Version<<" ";

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

  397. 

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

  399. 	{

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

  401. 

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

  403. 		{

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

  405. 			{

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

  407. 			}

  408. 		}

  409. 		s<<"-1 ";

  410. 	}

  411. 	s<<endl;

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

  413. 	{

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

  415. 	}

  416. 

  417. }

  418. 

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

  420. {

  421. 	int version;

  422. 	s>>version;

  423. 

  424. 	switch (version)

  425. 	{

  426. 		case 1:

  427. 		{

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

  429. 

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

  431. 			{	

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

  433. 		

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

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

  436. 				{

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

  438. 				}

  439. 			}

  440. 		} break;

  441. 	

  442. 		case 2:

  443. 		{

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

  445. 	

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

  447. 			{	

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

  449. 		

  450. 				int x=0,y=0;

  451. 				while(x!=-1)

  452. 				{

  453. 					s>>x;

  454. 					if (x!=-1)

  455. 					{						

  456. 						s>>y;

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

  458. 					}

  459. 				}

  460. 			}

  461. 		} break;

  462. 		

  463. 		case 3:

  464. 		case 4:

  465. 		{

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

  467. 	

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

  469. 			{	

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

  471. 		

  472. 				int x=0,y=0;

  473. 				float v;

  474. 				while(x!=-1)

  475. 				{

  476. 					s>>x;

  477. 					if (x!=-1)

  478. 					{						

  479. 						s>>y>>v;

  480. 						if (y!=-1) 

  481. 						{

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

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

  484. 						}

  485. 					}

  486. 				}

  487. 			}

  488. 			

  489. 			if (version>3)

  490. 			{

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

  492. 				{

  493. 					s>>m_PatSeq[n];

  494. 				}

  495. 			}

  496. 			

  497. 		} break;

  498. 	}

  499. }