phoenics_ses (phoenics_ses) wrote,
phoenics_ses
phoenics_ses

Написала вот кодом океанские волны для своей инсталляции. Это, кстати, наверное первый мой абсолютно самостоятельно написанный (и при этом работающий!) код. Хотя и простой, конечно. Судя по глубине вложенности объектов, покурила я тогда нормально.
Инсталляция не факт что состоится, зато вот может кто-нибудь порадуется таким чудным разнообразным (в отличие от статично сгенерированных) волнам, я сегодня прочитала, что многим под такой звук засыпать легче. И детей им усыплять можно.


s.boot
(
SynthDef(\waves, {|amp= 0.1, amp0= 0.005, pitch0= 10000, pitch1= 10500, pitch2= 12000, pitch3= 13000, amp_lpf= 0.4, cutoff= 700, gate= 1, rel = 5|
var wave= BPF.ar(LFNoise1.ar(pitch0, SinOsc.ar(Dust.ar(0.2), -1, amp0)), pitch1);
var wave2= LFNoise2.ar(pitch2, SinOsc.ar(0.033, 0, amp/2));
var wave3= LFNoise2.ar(pitch3, SinOsc.ar(0.033, 1, amp/3));
var env= EnvGen.ar(Env.adsr(2, 5, 6, rel, 0.4, 0.5), gate, doneAction: 2);
var lpf= LPF.ar(wave, cutoff, amp_lpf);
Out.ar([0, 1], wave+wave2+wave3+lpf*env)}).send(s);
)

Synth(\waves)
a= Synth(\waves, [\amp, 0.01, \amp_lpf, 0.06])
a.set(\amp_lpf, 0.001, \cutoff, 800, \amp, 0.005, \pitch0, 1300, \gate, 1, \rel, 15, \amp0, 0.1);
a.set(\gate, 0)

//
Tags: supercollider
Subscribe
  • Post a new comment

    Error

    Anonymous comments are disabled in this journal

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

  • 0 comments