通过Supercollider

时间:2018-02-22 18:00:44

标签: supercollider

我试图遍历一个缓冲区数组,每个缓冲区包含从磁盘读取的声音样本,但是我在让SynthDef重置其指向缓冲区的指针时遇到了问题。

我做了以下事情:

  1. 假设我有一个声音文件夹,我已将它们全部读入一个名为"〜缓冲区"

  2. 的缓冲区数组中
  3. 我只想按顺序浏览数组,背对背播放样本并在最后一个之后停止。

  4. 我定义了一个简单的SynthDef,然后把调用它的Synth放到例程中:

    (
     SynthDef(\playBuffer,{arg out = 0, buf;
             var sig;
             sig = PlayBuf.ar(2, buf, doneAction: Done.freeSelf); 
             Out.ar(out, sig);
             }).add
    
     ~routine = Routine({
                ~buffers.do({
                    arg item;
                    var synth;
                    synth = Synth(\playBuffer, [\buf, item]);
                    item.duration.wait;
                    synth.free;
                 });
               });
    ~routine.play;   
    )    
    
  5. 它没有按预期工作---合成器总是播放相同的声音,第一个,尽管对应于不同的样本的持续时间。

    我认为问题可能是我的\ playbuffer SynthDef中的函数(至少根据帮助文件)没有用循环内的不同bufnum参数重新评估。

    事实上,如果我使用Buffer.play来循环创建合成器和Synth,我可以遍历缓冲区。使用此代码替换我的例程有效:

           (
            ~routine2 = Routine({
                         ~buffers.do({
                          arg item;
                          item.play;
                          item.duration.wait;
                        });
                     });
             ~routine2.play;
            )
    

    但是:它非常粗糙,因为除了通过Buffer.play的mul参数改变幅度之外,我不能操纵缓冲器输出。 我想做的是复制Buffer.play的行为---在我自己的代码中动态创建SynthDef和Synth。但我没有运气。事实上,我不知道从哪里开始,可能是因为我没有完全掌握SuperCollider服务器的功能处理。我应该制作一个Synth制作函数并在例程循环中使用它吗?或者我应该在循环内移动SynthDef的定义(看起来相当)?我尝试了后者,但仍然播放相同的声音。

    也许我会以错误的方式走这条路 - 我对SuperCollider非常陌生。

2 个答案:

答案 0 :(得分:1)

第一个示例中的代码是正确的。如果我用这样的缓冲区填充:

(
s.makeBundle(nil, {
    ~buffers = [1, 2, 3, 4, 5].collect {
        |i|
        var b;
        b = Buffer.alloc(s, 44100, 1);
        b.sine3([100, 150, 175] * i, 0.25);
    };
})
)

然后使用您的代码示例播放它们:

(
SynthDef(\playBuffer,{arg out = 0, buf;
    var sig;
    sig = PlayBuf.ar(1, buf, doneAction: Done.freeSelf); 
    Out.ar(out, sig);
}).add;

~routine = Routine({
    ~buffers.do({
        arg item;
        Synth(\playBuffer, [\buf, item]);
        item.duration.wait;
    });
});
~routine.play;   
) 

这很好用,我听到提升的音调。 (我将您的示例更改为单通道缓冲区,并删除了.free,因为您已经在执行Done.freeSelf)。如果您每次都听到相同的声音播放,则问题可能出在您正在加载缓冲区而不是播放的代码中。

一个问题:缓冲区的duration属性在加载后立即无法使用 - 读取音频文件是异步的,并且SC在加载之前不知道持续时间。如果你在比赛前立即Buffer.read,那么你的持续时间可能是0nil会导致意外结果。

答案 1 :(得分:0)

我在一个任务中尝试过,但我认为它就像你在日常工作中所做的那样。 你必须把缓冲区放在数组中。 像缓冲区=[1,2,3,4,5] 但最好以这种方式编码。 \buffer=[a.bufnum,b.bufnum,c.bufnum,d.bufnum] 并在 SynthDef 中 PlayBuf 的第二个参数中设置缓冲区变量。 因为你可能会在你的服务器中加载其他缓冲区,如果你把缓冲区的编号放在数组中,它通常会播放你不想播放的错误缓冲区。