moxuse

(
Pbind(
\note,
Pseq([
\,4,9,12,11,4,11,14,12,16,8,16,9,4,9,12,11,4,11,14,12,9,
16,12,16,9,12,4,7,5,9,14,17,14,11,14,7,11,2,5,4,7,12,16,
12,9,12,5,14,11,7,11,4,12,9,5,9,2,11,12,7,12,16,14,7,14,17,16,19,11,19,
12,7,12,16,14,7,14,17,16,12,19,16,
24,21,16,21,12,16,9,12,14,18,21,24,
23,19,14,19,11,14,7,11,12,16,19,23,

moxuse

Tempo.bpm=144;
Pbind(\midinote,Pseq([
12,12,7,10,9,7,5,4,5,7,4,0,
12,12,7,10,9,7,5,4,5,7,4,0,
12,12,14,15,14,12,15,14,12,15,14,12,
12,12,7,10,9,7,5,4,5,7,4,0,
5,12,15,14,12,10,12,15,14,12,7,10,9,7,9,7
]+60,inf),
\dur,Pseq([
0.75,0.75,0.5,0.5,0.5,0.5,0.5,0.75,0.75,1,0.5,1,

moxuse

(
SynthDef("hh1",{|out=20,amp=1,rate=1|var src;
src=RLPF.ar(Pan2.ar(ClipNoise.ar(0.2)),LFNoise2.ar(0.1,6000,9000),0.3)*EnvGen.ar(Env.perc(0.01,0.07,amp,-6),doneAction:2);
Out.ar(20,src)
}).store;


SynthDef("snr",{|out=20,amp=1,rate=1,src,src2|
src=RHPF.ar(ClipNoise.ar(0.03),LFNoise2.ar(1,700,800),0.3)*EnvGen.ar(Env.perc(0.00,0.125,amp,-3),doneAction:2);
src2=SinOsc.ar(120,0,0.3)*EnvGen.ar(Env.perc(0.00,0.26,amp,-12),doneAction:2);Out.ar(out,(src+src2).dup);

moxuse

///////////////////////////////////////////////
////    ARTSAT PROJECT Dec. 20-21 2010    /////
////  Writen by Koichiro Mori moxus.org   /////
///////////////////////////////////////////////

#include <Ethernet.h>
#include "Dhcp.h"
#include <NunniMCAX.h>
#include <string.h>

moxuse

////gymnopedie////

(
//SynthDefs
SynthDef("osc1",{arg freq,amp;
	Out.ar(0,
		SinOsc.ar([freq,freq*1.01],0,SinOsc.ar(Pulse.ar(freq*2,0.1,freq),0,0.3))
		*EnvGen.ar(Env.perc(0.0,0.9,1,-4),doneAction:2)*amp
		)
	}).store;

moxuse

ProxySpace.push(s.boot);

~a.play;

(
~a.source={
AllpassC.ar(Mix.fill(12,{SinOsc.ar({[0,5,7,9,12,-12,17].choose+80}.midicps*{[1,0.5,2,0.666,0.75].choose},0.9.rand , LinCongC.ar(
	SampleRate.ir/2, 
	LFNoise0.kr(0.3, 0.1, 0.1), 
	LFNoise0.kr(0.4, 0.5, 0.1),

moxuse

(
Instr("convo",{arg amp=0,note=60;
	 var input, kernel;
		
	input=AudioIn.ar(1)*amp;	
	kernel= Mix.ar(LFSaw.ar([note,note+5,note+3,note+15].midicps,0,1.0));

	Out.ar(0,Convolution.ar(input,kernel, 1024, 0.5).dup);
},[\amp,[1,127,\linear,1]]).test;
)

moxuse

(
Task({
var array,rules;
	array = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxa";
	rules = [[//rule "Chell"
	"a>a>a" -> "x",
	"a>a>x" -> "a",
	"a>x>a" -> "x",
	"a>x>x" -> "a",
	"x>a>a" -> "a",

moxuse

////////2005_5 moxus/////////

(
	Pdef(\comp,
	Paddp(\ctranspose, Pseq([0,3,0,-5,0,-3,0,5], inf), 
		Ppar([
	
	Pbind(\instrument,"sin-f",\midinote,Prand([60,71,\], inf),
		\dur,Prand([4],inf),\amp,0.2),
		

moxuse

(
SynthDef("sinerl0",{arg amp=0.8,att,rel,note;
	var src,freq;
	src=Mix.fill(3,{freq=(note+[0,5,7,12,36,48].choose).midicps;SinOsc.ar([freq,freq+(5.rand)],0,0.2)*amp})
	*EnvGen.ar(Env.perc(att,rel,0.99,-3),doneAction:2);
	Out.ar(10,src);
}).store;

SynthDef("sinerl1",{arg amp,note;
	var src,freq;