在Supercollider中,我需要选择Ndefs来播放并从列表中停止前一个

时间:2016-11-25 09:06:05

标签: function osc supercollider

我喜欢使用mindwave来控制OSC的一些Ndefs。我需要编写一个从列表中选择的函数(例如[x,f]),然后停止前一个。此外,我需要能够只播放第一个Ndef(例如x)而不播放第二个(例如f),直到我得到相应的消息(例如msg [3])并同时停止x。这是我的尝试,它不按预期工作:

(

OSCdef.new(
    \select,
    {
        arg msg, time, addr, port;
        [msg, time, addr, port].postln;


        if ((msg[3] > 200), {x.clear;} && {f.play;});





    },'/neurovals'
);



SynthDef.new(\Syn, { arg freq = 440,  amp = 1, sustain = 0.5;
    var sig, env, mod;
    env = EnvGen.kr(Env.linen(0.05, sustain, 0.5, 0.08), doneAction: 2);
    mod = Saw.ar(freq * 0.1) * LFNoise1.kr(2).range(10,800);
    sig = SinOsc.ar(freq + mod) * env;


    Out.ar(0, RLPF.ar(sig, freq, 1.7)).dup;

}).add;




x= Ndef(\blinkpat1, Pbind(
    \instrument, \Syn,
    \dur, 0.03,
    \freq, 440
));






OSCdef.new(
    \base,
    {
        arg msg, time, addr, port;
        [msg, time, addr, port].postln;



        if ((msg[1] == msg[1]),
            {x.set(\freq, msg[1].linlin(0, 100, 300, 1000);)});




    },'/neurovals'

);




SynthDef.new(\fmsyn, { arg freq = 440,  amp = 1, sustain = 1;
    var sig, env, mod;
    env = EnvGen.kr(Env.linen(0.05, sustain, 0.5, 0.08), doneAction: 2);
    mod = SinOsc.ar(freq * 0.5) * LFNoise1.kr(2).range(10,800);
    sig = SinOsc.ar(freq + mod) * env;


    Out.ar(0, RLPF.ar(sig, freq, 1.7)).dup;

}).add;




f = Ndef(\blinkpat2, Pbind(
    \instrument, \fmsyn,
    \freq, 440,
    \sustain, 2,
    \octave, 3,
    \amp, 0.4,
));





OSCdef.new(
    \base2,
    {
        arg msg, time, addr, port;
        [msg, time, addr, port].postln;

        if ((msg[1] == msg[1]),
            {f.set(\freq, msg[1].linlin(0, 100, 300, 1000);)});
        if ((msg[1] == msg[1]),
            {f.set(\sustain, msg[1].linlin(0, 100, 1, 2);)});





    },'/neurovals'

);
)

1 个答案:

答案 0 :(得分:0)

首先,这个if语句:

if ((msg[3] > 200), {x.clear;} && {f.play;});

很奇怪 - 它并不清楚试图与之相处,但它不太可能做你想做的事情。和&&是一个布尔运算符,所以一般的期望是左边和右边是真/假。在你的使用中,它实际上在左侧和右侧功能上执行功能组合,但鉴于你的功能,它仍然没有做任何连贯的事情。我想你可能想要的是:

if (msg[3] > 200) {
    x.clear;
    f.play;
}

....这将清除x并播放f。

您可以通过多种方式做我认为您正在尝试做的事情。这里有一个建议 - Pdef可以互相分配,并在播放过程中进行热插拔。这意味着,你可以这样做:

(  // set up \a, \b, and \player, and start playing \player
Pdef(\a, Pbind(
    \dur, 1/4,
    \degree, 0,
));

Pdef(\b, Pbind(
    \dur, 1/3,
    \degree, 2,
));

\\ Start playing an empty Pdef to use later.   
Pdef(\player).play;
)  

然后,您可以将\ player设置为\ a或\ b中的一个以透明地在它们之间切换:

// Assign Pdef(\a) to player, to start it playing
Pdef(\player, Pdef(\a));

// Assign Pdef(\b) to player, which starts \b and stops \a
Pdef(\player, Pdef(\b));