ݺߣ

ݺߣShare a Scribd company logo
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
Sbaw090929
//
s.boot;

//
{SinOsc.ar(440)}.play;

//             ...
{ 	 	 	 //
   	
	 SinOsc	 //Sin
	 .ar	 	 //
	 (440) 	 //      440Hz
} 	 	 	 //
   	
.play;	 	 //
//
//
{ }
//1.           2.
( )
//1.       (            ) 2.
[ ]

//
((1+2)*3).value;
{ (1+2)*3 }.value;
{ [1, 2, 3].size }.value;
{ [1, 2, 3].wrapAt(1) }.value;
{ var a=1, b=2; (a+b)*3 }.value;

//     (       ) arg:
f = {	arg a, b; (a+b)*3 };
f.value(1, 2).postln;
f.value(3, 4).postln;
//         1
{
	 SinOsc.ar(440, 0, 0.2);
}.play;

//          2
//
{
	 var a1, a2;
	 a1 = SinOsc.ar(440, 0, 0.2);
	 a2 = SinOsc.ar(660, 0, 0.2);
	 a1 + a2;
}.play;
//   Sin
{
	 var freq=440, detune=1, a1, a2;
	 a1 = SinOsc.ar(freq, 0, 0.2);
	 a2 = SinOsc.ar(freq + detune, 0, 0.2);
	 [a1, a2];
}.play;

//
{
	 var freq=440, detune=1, a1, a2;
	 a1 = SinOsc.ar([freq, freq+detune], 0, 0.2);
	 freq = freq * 1.5;
	 a2 = SinOsc.ar([freq, freq+detune], 0, 0.2);
	 a1+a2;
}.play;
//                                           !!
//        
//SynthDef             !!!
SynthDef("           ", {              }).send(        );


//             Sin          SynthDef
SynthDef("unari", {
	 arg freq=440, detune=1, amp=0.2;
	 var a1, a2;
	 a1 = SinOsc.ar([freq, freq+detune], 0, amp);
	 freq = freq * 1.5;
	 a2 = SinOsc.ar([freq, freq+detune], 0, amp);
	 //               Out.ar(      ,        );
	 Out.ar(0, a1+a2);
}).send(s);
//
s.sendMsg("/s_new", "unari", x = s.nextNodeID, 0, 1);
//   (arg)
s.sendMsg("/n_set", x, "freq", 110);
s.sendMsg("/n_set", x, "freq", 80);
//
s.sendMsg("/n_free", x);

//        OSC!!!
// OSC
s.dumpOSC(1);
// OSC
s.dumpOSC(0);
Sbaw090929
//
SynthDef("unari", {
	 arg freq=440, detune=1, amp=0.2;
	 var a1, a2;
	 a1 = SinOsc.ar([freq, freq+detune], 0, amp);
	 freq = freq * 1.5;
	 a2 = SinOsc.ar([freq, freq+detune], 0, amp);
	 //               Out.ar(      ,        );
	 Out.ar(0, a1+a2);
}).send(s);
Sbaw090929
Sbaw090929
//
SynthDef("unari", {
	 arg freq=440, detune=1, amp=0.2;
	 var a1, a2;
	 a1 = SinOsc.ar([freq, freq+detune], 0, amp);
	 freq = freq * 1.5;
	 a2 = SinOsc.ar([freq, freq+detune], 0, amp);
	 //               Out.ar(      ,        );
	 Out.ar(0, a1+a2);
}).send(s);
// "/s_start"
o = OSCresponderNode(nil, '/s_start', {
	 s.sendMsg("/s_new", "unari", x = s.nextNodeID, 0, 1);
}).add;

// "/s_stop"
p = OSCresponderNode(nil, '/s_stop', {
	 	     s.sendMsg("n_free", x);
}).add;
Sbaw090929
//   /tr/osc 1             /tr/osc 0
(
q = OSCresponderNode(nil, '/tr/osc', {
	   arg time,responder,msg;
	   if(msg[1] == 1,
	   {s.sendMsg("/s_new", "unari", x = s.nextNodeID, 0, 1)},
	   { s.sendMsg("n_free", x)}
	   );
}).add;

// SynthDef             Responder
//
r = OSCresponderNode(nil, '/set/osc', {
	   arg time,responder,msg;
	   s.sendMsg("/n_set", x, "freq", msg[1]);
	   }).add;
)
Sbaw090929
// FM
(
SynthDef("fm", {
	 arg bus = 0, freq = 110,
	 carPartial = 0.5, modPartial = 0.5,
	 detune=2.0, index = 3, mul = 0.2, ts = 1;

	 var mod;
	 var car;
	
	 mod = SinOsc.ar(freq* modPartial, 0,
freq*index*LFNoise1.kr(5.reciprocal).abs);
	 car = SinOsc.ar([(freq*carPartial)+mod,(freq+detune*carPartial)+mod] ,
0, mul);
	 car = FreeVerb.ar(car, 0.5, 0.8, 0.2, 1.0);
	 Out.ar(bus, car);
}).load(s);
//       ON/OFF
t = OSCresponderNode(nil, '/tr/fm', {
	 arg time,responder,msg;
	 if(msg[1] == 1,
	 	 { s.sendMsg("/s_new", "fm", x = s.nextNodeID, 0, 1)},
	 	 { s.sendMsg("n_free", x)}
	 	 );
}).add;
 	
// SynthDef             Responder
//
u = OSCresponderNode(nil, '/set/fm', {
	 arg time,responder,msg;
	 s.sendMsg("/n_set", x, "carPartial", msg[1], "modPartial", msg[2],
"index", msg[3]);
}).add;

More Related Content

What's hot (19)

PDF
processoperatorcertificate
Scott Smith
?
PDF
Solucionario2
Rodolfo Carrillo Velsquez
?
PDF
bil. kompleks
dela1311
?
PPTX
The Flavor of TypeScript
Dmitry Sheiko
?
PDF
Coordenadas fiduciales corregidas por mtodo afn y correccin por distorsin
Fernando Pez
?
PDF
Clustering with Node.js
Michiel De Mey
?
PDF
Img 20190402 0002
gkaur2018
?
PDF
MATLAB: Output Voltage of Series RC Circuit utilizing Euler Approximations
Katrina Little
?
PDF
Sol pau calculo diferencial
alfonnavarro
?
PDF
Solucion 14 t
Rodolfo Carrillo Velsquez
?
PDF
Solucion 10 t
Rodolfo Carrillo Velsquez
?
PDF
Matematika dopunski
savic95
?
PDF
Nodejs party-socket demo
Sky Wang
?
KEY
Sbaw090526
Atsushi Tadokoro
?
KEY
ɵĤΑBĤ - SFC}jԤȥ쥯`
Atsushi Tadokoro
?
PDF
Solucion7 trig
Rodolfo Carrillo Velsquez
?
PDF
fungsi bilangan
niaagustinapolman
?
processoperatorcertificate
Scott Smith
?
bil. kompleks
dela1311
?
The Flavor of TypeScript
Dmitry Sheiko
?
Coordenadas fiduciales corregidas por mtodo afn y correccin por distorsin
Fernando Pez
?
Clustering with Node.js
Michiel De Mey
?
Img 20190402 0002
gkaur2018
?
MATLAB: Output Voltage of Series RC Circuit utilizing Euler Approximations
Katrina Little
?
Sol pau calculo diferencial
alfonnavarro
?
Matematika dopunski
savic95
?
Nodejs party-socket demo
Sky Wang
?
Sbaw090526
Atsushi Tadokoro
?
ɵĤΑBĤ - SFC}jԤȥ쥯`
Atsushi Tadokoro
?
fungsi bilangan
niaagustinapolman
?

More from Atsushi Tadokoro (20)

PDF
ꥨƥ?ߥ`å?`ǥ󥰡- `ǥ?ӥ奢ƷΤΡ`ץ󥽩`ʥեȥ?ե``άF״չ
Atsushi Tadokoro
?
PDF
ץv - ǥܿgϤ褦
Atsushi Tadokoro
?
PDF
Interactive Music II ProcessingSuperColliderBЯ -2
Atsushi Tadokoro
?
PDF
coma Creators session vol.2
Atsushi Tadokoro
?
PDF
Interactive Music II ProcessingSuperColliderBЯ1
Atsushi Tadokoro
?
PDF
Interactive Music II Processingˤ륢˥`
Atsushi Tadokoro
?
PDF
Interactive Music II Processing
Atsushi Tadokoro
?
PDF
Interactive Music II SuperCollider 2 - SuperColliderPure DataBЯ
Atsushi Tadokoro
?
PDF
Media Art II openFrameworks ץgͨŤȥ󥸥֥ʥ󥿩`ե
Atsushi Tadokoro
?
PDF
Interactive Music II SuperCollider - SuperCollider OSC (Open Sound Control)
Atsushi Tadokoro
?
PDF
iTamabi 13 ARTSAT API g 5 - lǤ܉褯
Atsushi Tadokoro
?
PDF
ǥܿgA II 11أHTML5g FΤΘJavaScript饤֥
Atsushi Tadokoro
?
PDF
ܿgǥ(Web) 8: CSSե``ʹ
Atsushi Tadokoro
?
PDF
Interactive Music II SuperCollider JITLib - 饤֥`ǥ 2
Atsushi Tadokoro
?
PDF
iTamabi 139أARTSAT API g 3 `ǥ󥰤lǤλäȡ
Atsushi Tadokoro
?
PDF
Tamabi media131118
Atsushi Tadokoro
?
PDF
Webǥ 10أHTML5g Three.js3Dץߥ
Atsushi Tadokoro
?
PDF
Interactive Music II SuperCollider JITLib - 饤֥`ǥ 1
Atsushi Tadokoro
?
PDF
iTamabi 138أARTSAT API g 2 lǥץ󻭤
Atsushi Tadokoro
?
PDF
Media Art II openFrameworks }Υ`ι?椨
Atsushi Tadokoro
?
ꥨƥ?ߥ`å?`ǥ󥰡- `ǥ?ӥ奢ƷΤΡ`ץ󥽩`ʥեȥ?ե``άF״չ
Atsushi Tadokoro
?
ץv - ǥܿgϤ褦
Atsushi Tadokoro
?
Interactive Music II ProcessingSuperColliderBЯ -2
Atsushi Tadokoro
?
coma Creators session vol.2
Atsushi Tadokoro
?
Interactive Music II ProcessingSuperColliderBЯ1
Atsushi Tadokoro
?
Interactive Music II Processingˤ륢˥`
Atsushi Tadokoro
?
Interactive Music II Processing
Atsushi Tadokoro
?
Interactive Music II SuperCollider 2 - SuperColliderPure DataBЯ
Atsushi Tadokoro
?
Media Art II openFrameworks ץgͨŤȥ󥸥֥ʥ󥿩`ե
Atsushi Tadokoro
?
Interactive Music II SuperCollider - SuperCollider OSC (Open Sound Control)
Atsushi Tadokoro
?
iTamabi 13 ARTSAT API g 5 - lǤ܉褯
Atsushi Tadokoro
?
ǥܿgA II 11أHTML5g FΤΘJavaScript饤֥
Atsushi Tadokoro
?
ܿgǥ(Web) 8: CSSե``ʹ
Atsushi Tadokoro
?
Interactive Music II SuperCollider JITLib - 饤֥`ǥ 2
Atsushi Tadokoro
?
iTamabi 139أARTSAT API g 3 `ǥ󥰤lǤλäȡ
Atsushi Tadokoro
?
Tamabi media131118
Atsushi Tadokoro
?
Webǥ 10أHTML5g Three.js3Dץߥ
Atsushi Tadokoro
?
Interactive Music II SuperCollider JITLib - 饤֥`ǥ 1
Atsushi Tadokoro
?
iTamabi 138أARTSAT API g 2 lǥץ󻭤
Atsushi Tadokoro
?
Media Art II openFrameworks }Υ`ι?椨
Atsushi Tadokoro
?
Ad

Sbaw090929

  • 25. // s.boot; // {SinOsc.ar(440)}.play; // ... { // SinOsc //Sin .ar // (440) // 440Hz } // .play; //
  • 26. // // { } //1. 2. ( ) //1. ( ) 2. [ ] // ((1+2)*3).value; { (1+2)*3 }.value; { [1, 2, 3].size }.value; { [1, 2, 3].wrapAt(1) }.value; { var a=1, b=2; (a+b)*3 }.value; // ( ) arg: f = { arg a, b; (a+b)*3 }; f.value(1, 2).postln; f.value(3, 4).postln;
  • 27. // 1 { SinOsc.ar(440, 0, 0.2); }.play; // 2 // { var a1, a2; a1 = SinOsc.ar(440, 0, 0.2); a2 = SinOsc.ar(660, 0, 0.2); a1 + a2; }.play;
  • 28. // Sin { var freq=440, detune=1, a1, a2; a1 = SinOsc.ar(freq, 0, 0.2); a2 = SinOsc.ar(freq + detune, 0, 0.2); [a1, a2]; }.play; // { var freq=440, detune=1, a1, a2; a1 = SinOsc.ar([freq, freq+detune], 0, 0.2); freq = freq * 1.5; a2 = SinOsc.ar([freq, freq+detune], 0, 0.2); a1+a2; }.play;
  • 29. // !! // //SynthDef !!! SynthDef(" ", { }).send( ); // Sin SynthDef SynthDef("unari", { arg freq=440, detune=1, amp=0.2; var a1, a2; a1 = SinOsc.ar([freq, freq+detune], 0, amp); freq = freq * 1.5; a2 = SinOsc.ar([freq, freq+detune], 0, amp); // Out.ar( , ); Out.ar(0, a1+a2); }).send(s);
  • 30. // s.sendMsg("/s_new", "unari", x = s.nextNodeID, 0, 1); // (arg) s.sendMsg("/n_set", x, "freq", 110); s.sendMsg("/n_set", x, "freq", 80); // s.sendMsg("/n_free", x); // OSC!!! // OSC s.dumpOSC(1); // OSC s.dumpOSC(0);
  • 32. // SynthDef("unari", { arg freq=440, detune=1, amp=0.2; var a1, a2; a1 = SinOsc.ar([freq, freq+detune], 0, amp); freq = freq * 1.5; a2 = SinOsc.ar([freq, freq+detune], 0, amp); // Out.ar( , ); Out.ar(0, a1+a2); }).send(s);
  • 35. // SynthDef("unari", { arg freq=440, detune=1, amp=0.2; var a1, a2; a1 = SinOsc.ar([freq, freq+detune], 0, amp); freq = freq * 1.5; a2 = SinOsc.ar([freq, freq+detune], 0, amp); // Out.ar( , ); Out.ar(0, a1+a2); }).send(s);
  • 36. // "/s_start" o = OSCresponderNode(nil, '/s_start', { s.sendMsg("/s_new", "unari", x = s.nextNodeID, 0, 1); }).add; // "/s_stop" p = OSCresponderNode(nil, '/s_stop', { s.sendMsg("n_free", x); }).add;
  • 38. // /tr/osc 1 /tr/osc 0 ( q = OSCresponderNode(nil, '/tr/osc', { arg time,responder,msg; if(msg[1] == 1, {s.sendMsg("/s_new", "unari", x = s.nextNodeID, 0, 1)}, { s.sendMsg("n_free", x)} ); }).add; // SynthDef Responder // r = OSCresponderNode(nil, '/set/osc', { arg time,responder,msg; s.sendMsg("/n_set", x, "freq", msg[1]); }).add; )
  • 40. // FM ( SynthDef("fm", { arg bus = 0, freq = 110, carPartial = 0.5, modPartial = 0.5, detune=2.0, index = 3, mul = 0.2, ts = 1; var mod; var car; mod = SinOsc.ar(freq* modPartial, 0, freq*index*LFNoise1.kr(5.reciprocal).abs); car = SinOsc.ar([(freq*carPartial)+mod,(freq+detune*carPartial)+mod] , 0, mul); car = FreeVerb.ar(car, 0.5, 0.8, 0.2, 1.0); Out.ar(bus, car); }).load(s);
  • 41. // ON/OFF t = OSCresponderNode(nil, '/tr/fm', { arg time,responder,msg; if(msg[1] == 1, { s.sendMsg("/s_new", "fm", x = s.nextNodeID, 0, 1)}, { s.sendMsg("n_free", x)} ); }).add; // SynthDef Responder // u = OSCresponderNode(nil, '/set/fm', { arg time,responder,msg; s.sendMsg("/n_set", x, "carPartial", msg[1], "modPartial", msg[2], "index", msg[3]); }).add;