Taichi Arai ALOUT

[0,4,7] // M [0,3,7] // m [0,4,7,10] // 7 [0,4,7,11] // M7 [0,3,7,10] // m7 [0,3,7,11] // mM7 [0,4,8] // aug [0,3,6,9] // dim [0,5,7] // sus4 [0,5,7,10] // 7sus4


	(
	SynthDef("testSynth", {\|amp=1.0, freq=440, decay=0.2\|
	var out;
	out = SinOsc.ar(freq);
	out = out * Line.kr(amp, 0, decay, doneAction:2);
	out = out + DelayC.ar(out, 10.0,1.2, 1.0);
	out = Pan2.ar(out);
	out = out * 1.5;
	Out.ar(0, out);

	(
	SynthDef("testSynth", {\|amp=1.0, freq=440, decay=0.2\|
	var out;
	out = SinOsc.ar(freq);
	out = out * Line.kr(amp, 0, decay, doneAction:2);
	out = Pan2.ar(out);
	Out.ar(0, out);
	}).send(s);

	SynthDef("hat", {

	SynthDef("Bass", {

	arg amp=0.7, freq=0, gate=1;
	var out,env,sweep;

	sweep = Impulse.kr(4).round;
	out = SinOsc.ar(freq,(Sweep.ar(sweep, 2pi * [52.8, 200]) + (pi/6)).wrap(-pi, pi), [1, 0.1]).mean.tanh;
	env = EnvGen.kr(
	Env([0.1, 0.5, 0.4, 0], [0, 0.2, 0.1], -5),
	gate,

	b = Buffer.read(s, "/Applications/SuperCollider/sounds/fools_gold.wav");

	SynthDef("grain1", {
	arg outBus= 0, gate = 1, amp = 0.5, pan = 0, sndbuf, envbuf = -1;
	var env, freqdev, grain, out;

	env = EnvGen.kr(
	Env.linen(0, 0.1, 1/8, 0.3, \sine),
	gate,
	doneAction:2);

	// @phrontist
	// https://soundcloud.com/phrontist/lazy-amen-break-glitches

	s.reboot;
	s.stop;

	~amen = Buffer.readChannel(s,"/Applications/SuperCollider/sounds/fools_gold.wav", channels:[0,0]);

	SynthDef(\loop, {\| out = 0, bufnum = 0, gate = 1, pos = 0, speed = 1, freq = 0, endfreq = 0.001, sustain, wobble = 1, boost = 1\|

	s = Server.default;
	s.waitForBoot{
	s.recChannels_(2);
	s.recHeaderFormat_('WAV');
	s.recSampleFormat_('float');
	s.prepareForRecord("/Users/kinksaiz/Desktop/multi.wav");
	s.sync;
	s.record;
	};

	(
	SynthDef(\mdapiano1, { \|out=0, freq=440, gate=1\|
	var son = MdaPiano.ar(freq, gate, release: 0.9, stereo: 0.3, sustain: 0);
	DetectSilence.ar(son, 0.01, doneAction:2);
	Out.ar(out, son * 0.1);
	}).add;
	)

	TempoClock.default.tempo = 0.8;

	MixerChannelDef(\mix1x4, 1, 4,
	SynthDef(\mix1x4, { \|busin, busout, xpos, ypos, level\|
	var sig = In.ar(busin, 1);
	sig = Pan4.ar(sig, xpos, ypos, level);
	Out.ar(busout, sig);
	ReplaceOut.ar(busin, sig);
	}),
	controls: (xpos: \bipolar,
	ypos: \bipolar,
	level: (value: 0.75, spec: \amp))