«Quadriphonic Isochronic and Binaural Brainwave Machine» by maszkowicz

on 08 Oct'18 12:15 in binauralquadriphonicbrainwaveisochronicmystic solfeggio

This synth is a mix between isochronic and binaural braiwave entrainment. If you run it in a stereo speaker (or headphone), it will work fine but you will only hear half of the channels. Once you run it, you can scroll your mouse in both XY directions for generating different effects: X is the frequency of the isochronic tone, Y is the depth of the isochronic pulse. Feel free to modify the effect, or plug your favorite midi controller.

The Synth has two beat parameters for the binaural beat frequencies, each of the four channels has a different frequency inducing several effects in the acoustic space. Feel free to modify the \beat1 and \beat2 parameters.

The choice of frequencies follows the "Mystic Solfeggio" which is meant to bring a positive vibration to the body and spirit. One thing is for sure, they are very adictive and watch out their psychoactive effect!

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
//Synth definition
(
SynthDef(
	\isochronic,
	{
		arg freq1=97.94, freq2=136.1, freq3=174, freq4=285, freq5=396, freq6=417,
		freq7=432, freq8=528, freq9=639, freq10=741, freq11=852, freq12=963, beat1=2.6, beat2=3.9,
		amp1=0.0, amp2=0.0, amp3=0.0, amp4=0.0, amp5=0.0, amp6=0.0, amp7=0.0, amp8=0.0,
		amp9=0.0, amp10=0.0, amp11=0.0, amp12=0.0, amp=0.0, out=0, isofreq=1, width=0.5;
		var sin1, sin2, sin3, sin4, sin5, sin6, sin7, sin8, sin9, sin10, sin11, sin12, brainmix, isochronic;
		sin1=SinOsc.ar([freq1-(beat1/2),freq1-beat1,freq1+(beat1/2),freq1+beat1],
			0,amp1,0);
		sin2=SinOsc.ar([freq2-(beat2/2),freq2-beat2,freq2+(beat2/2),freq2+beat2],
			0,amp2,0);
		sin3=SinOsc.ar([freq3-(beat1/2),freq3-beat1,freq3+(beat1/2),freq3+beat1],
			0,amp3,0);
		sin4=SinOsc.ar([freq4-(beat2/2),freq4-beat2,freq4+(beat2/2),freq4+beat2],
			0,amp4,0);
		sin5=SinOsc.ar([freq5-(beat1/2),freq5-beat1,freq5+(beat1/2),freq5+beat1],
			0,amp5,0);
		sin6=SinOsc.ar([freq6-(beat2/2),freq6-beat2,freq6+(beat2/2),freq6+beat2],
			0,amp6,0);
		sin7=SinOsc.ar([freq7-(beat1/2),freq7-beat1,freq7+(beat1/2),freq7+beat1],
			0,amp7,0);
		sin8=SinOsc.ar([freq8-(beat2/2),freq8-beat2,freq8+(beat2/2),freq8+beat2],
			0,amp8,0);
		sin9=SinOsc.ar([freq9-(beat1/2),freq9-beat1,freq9+(beat1/2),freq9+beat1],
			0,amp9,0);
		sin10=SinOsc.ar([freq10-(beat2/2),freq10-beat2,freq10+(beat2/2),freq10+beat2],
			0,amp10,0);
		sin11=SinOsc.ar([freq11-(beat1/2),freq11-beat1,freq11+(beat1/2),freq11+beat1],
			0,amp11,0);
		sin12=SinOsc.ar([freq12-(beat2/2),freq12-beat2,freq12+(beat2/2),freq12+beat2],
			0,amp12,0);
		isochronic=LFPulse.ar(MouseX.kr(1,60,'linear'),0,MouseY.kr(0.01,1,'linear'),amp,0).lag(0.01);
		//isochronic=LFPulse.ar(isofreq,0,width,amp,0).lag(0.001);
		brainmix=Mix.new([sin1, sin2, sin3, sin4, sin5, sin6, sin7, sin8, sin9, sin10, sin11, sin12]*isochronic);
		Out.ar(out,brainmix, 0, 1);
	}
).add
)

//Run Synth
~isobrainmachine = Synth(\isochronic,[\out,0,\amp,0.5, \amp1,0.24, \amp2,0.22, \amp3,0.20, \amp4,0.18, \amp5,0.17, \amp6,0.16, \amp7,0.14, \amp8,0.13, \amp9,0.12, \amp10,0.11, \amp11,0.1, \amp12,0.1,\beat1,2.6,\beat2,3.9]);

//Modify parameter
~isobrainmachine.set(\beat1,1.3);

//Stop Synth
~isobrainmachine.free;
raw 2265 chars (focus & ctrl+a+c to copy)
reception
comments