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

498 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. extern "C" {

  26. SpiralPlugin* CreateInstance()

  27. {

  28. 	return new MatrixPlugin;

  29. }

  30. 

  31. char** GetIcon()

  32. {

  33. 	return SpiralIcon_xpm;

  34. }

  35. 

  36. int GetID()

  37. {

  38. 	return 0x0012;

  39. }

  40. 

  41. string GetGroupName()

  42. {

  43. 	return "SpiralSound";

  44. }

  45. }

  46. 

  47. ///////////////////////////////////////////////////////

  48. 

  49. MatrixPlugin::MatrixPlugin() :

  50. m_TickTime(1.0f),

  51. m_StepTime(1.0f),

  52. m_Time(0.0f),

  53. m_Step(0),

  54. m_Loop(true),

  55. m_NoteCut(false),

  56. m_Current(0),

  57. m_GUICurrent(0),

  58. m_CurPatSeq(0),

  59. m_CurrentNoteCV(0),

  60. m_CurrentTriggerCV(0),

  61. m_Triggered(false),

  62. m_ClockHigh(false),

  63. m_CopyPattern(0),

  64. m_PatAdvance(false),

  65. m_PatReset(false)

  66. {

  67. 	m_Version=4;

  68. 

  69. 	m_PluginInfo.Name="Matrix";

  70. 	m_PluginInfo.Width=600;

  71. 	m_PluginInfo.Height=270;

  72. 	m_PluginInfo.NumInputs=5;

  73. 	m_PluginInfo.NumOutputs=19;		

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  100. 		

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

  102. 	{

  103. 		m_Matrix[n].Length=64;

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

  105. 		m_Matrix[n].Octave=0;

  106. 		

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

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

  109. 		{

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

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

  112. 		}

  113. 		

  114. 		m_TriggerLevel[n]=0;

  115. 	}

  116. 	

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

  118. 	{

  119. 		m_PatSeq[n]=0;

  120. 	}

  121. 	

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

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

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

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

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

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

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

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

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

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

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

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

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

  135. }

  136. 

  137. MatrixPlugin::~MatrixPlugin()

  138. {

  139. }

  140. 

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

  142. {	

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

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

  145. 	return Info;

  146. }

  147. 

  148. SpiralGUIType *MatrixPlugin::CreateGUI()

  149. {

  150. 	return new MatrixPluginGUI(m_PluginInfo.Width,

  151. 								  	    m_PluginInfo.Height,

  152. 										this,m_AudioCH,m_HostInfo);

  153. }

  154. 

  155. void MatrixPlugin::Execute()

  156. {	

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

  158. 	{

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

  160. 		

  161. 		// inc time 

  162. 		m_Time+=m_TickTime;

  163. 		

  164. 		SetOutputPitch(0,n,m_CurrentNoteCV);

  165. 		SetOutput(1,n,m_CurrentTriggerCV);

  166.                 

  167. 		// clear the pattern sync

  168.         SetOutput(18, n, 0);

  169. 		

  170. 		bool ExternalClock = InputExists(4);

  171. 		bool ExternalClockTriggered=false;

  172. 		 

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

  174. 		{

  175. 			if (!m_Triggered)

  176. 			{

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

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

  179. 				// No other notes catered for

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

  181. 				{

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

  183. 					{						

  184. 						m_Current=i;

  185. 						break;

  186. 					}

  187. 				}

  188. 				

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

  190. 				// will be the first one								

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

  192. 				m_Step=-1;

  193. 				ExternalClockTriggered=true;

  194. 				m_Triggered=true;

  195. 			}

  196. 		}

  197. 		else

  198. 		{

  199. 			m_Triggered=false;

  200. 		}

  201. 

  202. 

  203. 		// set the individual triggers

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

  205. 		

  206. 		if (ExternalClock)

  207. 		{

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

  209. 			{

  210. 				if(!m_ClockHigh)

  211. 				{

  212. 					m_ClockHigh=true;

  213. 					ExternalClockTriggered=true;

  214. 				}

  215. 			}

  216. 			else

  217. 			{

  218. 				if (m_ClockHigh)

  219. 				{

  220. 					m_ClockHigh=false;

  221. 					ExternalClockTriggered=true;

  222. 				}

  223. 			}

  224. 			

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

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

  227. 			{

  228. 				m_Step=-1;

  229. 				ExternalClockTriggered=true;

  230. 				m_CurPatSeq++;

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

  232. 				m_Current=m_PatSeq[m_CurPatSeq];

  233. 			}

  234. 		}

  235. 	

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

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

  238. 			(ExternalClock && ExternalClockTriggered)) 

  239. 		{		

  240. 			m_Time=0;

  241. 			m_Step++;

  242. 			

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

  244. 			{

  245. 				SetOutput(18, n, 1);

  246. 				m_Step=0;

  247. 				m_CurPatSeq++;

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

  249. 				m_Current=m_PatSeq[m_CurPatSeq];

  250. 			}

  251. 						

  252. 			// Reset the values

  253. 			m_CurrentTriggerCV=0;

  254. 			if (m_NoteCut) m_CurrentNoteCV=0;

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

  256. 			{

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

  258. 				m_TriggerLevel[t]=0;

  259. 			}

  260. 			

  261. 			// Scan the matrix at current time 

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

  263. 			{

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

  265. 				{

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

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

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

  269. 				}

  270. 			}

  271. 			

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

  273. 			// otherwise consecutive events wont get triggered

  274. 			SetOutput(1,n,0);

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

  276. 		}

  277. 	}

  278. }

  279. 

  280. void MatrixPlugin::ExecuteCommands()

  281. {

  282. 	if (m_AudioCH->IsCommandWaiting())

  283. 	{

  284. 		switch (m_AudioCH->GetCommand())

  285. 		{

  286. 			case MAT_LENGTH   :

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

  288. 			break;

  289. 			

  290. 			case MAT_SPEED    : 

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

  292. 			break;		

  293. 			

  294. 			case MAT_ACTIVATE : 

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

  296. 			break;		

  297. 			

  298. 			case MAT_DEACTIVATE : 

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

  300. 			break;

  301. 			case MAT_OCTAVE : 

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

  303. 			break;

  304. 			case COPY : 

  305. 				CopyPattern(); 

  306. 			break;

  307. 			case PASTE : 

  308. 				PastePattern(); 

  309. 			break;

  310. 			case CLEAR : 

  311. 				ClearPattern(); 

  312. 			break;

  313. 			case TUP : 

  314. 				if (CanTransposeUp()) TransposeUp(); 

  315. 			break;

  316. 			case TDOWN : 

  317. 				if (CanTransposeDown()) TransposeDown(); 

  318. 			break;

  319. 			case MAT_VOLUME : 

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

  321. 			break;

  322. 			case SET_CURRENT : 

  323. 				m_Current=m_GUIArgs.Num; 

  324. 			break;

  325. 			case SET_PATSEQ : 

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

  327. 			break;

  328. 		}

  329. 	}

  330. }

  331. 

  332. void MatrixPlugin::PastePattern() {

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

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

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

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

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

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

  339.          }

  340.      }

  341. }

  342. 

  343. void MatrixPlugin::ClearPattern() {

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

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

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

  347.          }

  348.      }

  349. }

  350. 

  351. void MatrixPlugin::TransposeUp() {

  352.      int x, y;

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

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

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

  356.          }

  357.      }

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

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

  360.      }

  361. }

  362. 

  363. void MatrixPlugin::TransposeDown() 

  364. {

  365.     int x, y;

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

  367. 	{

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

  369. 		{

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

  371.         }

  372.     }

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

  374. 	{

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

  376.     }

  377. }

  378. 

  379. bool MatrixPlugin::CanTransposeDown() 

  380. {

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

  382.     return True;

  383. }

  384. 

  385. bool MatrixPlugin::CanTransposeUp() 

  386. {

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

  388.      return True;

  389. }

  390. 

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

  392. {

  393. 	s<<m_Version<<" ";

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

  395. 	

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

  397. 	{

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

  399. 		

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

  401. 		{

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

  403. 			{

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

  405. 			}

  406. 		}

  407. 		s<<"-1 ";

  408. 	}

  409. 	s<<endl;

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

  411. 	{

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

  413. 	}

  414. 

  415. }

  416. 

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

  418. {

  419. 	int version;

  420. 	s>>version;

  421. 	

  422. 	switch (version)

  423. 	{

  424. 		case 1:

  425. 		{

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

  427. 	

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

  429. 			{	

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

  431. 		

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

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

  434. 				{

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

  436. 				}

  437. 			}

  438. 		} break;

  439. 	

  440. 		case 2:

  441. 		{

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

  443. 	

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

  445. 			{	

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

  447. 		

  448. 				int x=0,y=0;

  449. 				while(x!=-1)

  450. 				{

  451. 					s>>x;

  452. 					if (x!=-1)

  453. 					{						

  454. 						s>>y;

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

  456. 					}

  457. 				}

  458. 			}

  459. 		} break;

  460. 		

  461. 		case 3:

  462. 		case 4:

  463. 		{

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

  465. 	

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

  467. 			{	

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

  469. 		

  470. 				int x=0,y=0;

  471. 				float v;

  472. 				while(x!=-1)

  473. 				{

  474. 					s>>x;

  475. 					if (x!=-1)

  476. 					{						

  477. 						s>>y>>v;

  478. 						if (y!=-1) 

  479. 						{

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

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

  482. 						}

  483. 					}

  484. 				}

  485. 			}

  486. 			

  487. 			if (version>3)

  488. 			{

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

  490. 				{

  491. 					s>>m_PatSeq[n];

  492. 				}

  493. 			}

  494. 			

  495. 		} break;

  496. 	}

  497. }