«Spacescape» by arkovm
on 25 Mar'13 17:25 in1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
( { var sig, freqenv1, freqenv2, panenv; freqenv1 = EnvGen.kr(Env.new([100, 10000, 200], [0.5, 5])); freqenv2 = EnvGen.kr(Env.new([100, 10000, 200], [0.44, 5.8])); //panenv = EnvGen.kr(Env.new([-1, 1, -0.25, 0.25, 1, -1], [5.5, 0.3, 1, 3, 2])); sig = (LFSaw.ar([freqenv1*0.7, freqenv2*0.68], 3.5pi, 0.5) + LFSaw.ar([freqenv1*0.71, freqenv2*0.699], 1.25pi, 0.5))*SinOsc.ar(TIRand.kr(0.1, 1, Impulse.kr(1.5))); sig = DFM1.ar(sig, TIRand.kr(100, 5000, Impulse.kr(2)), 0.75, 1, 0) + (SinOsc.ar([100, 100.2], 0, 0.25) + SinOsc.ar([100.22, 100.24], 0, 0.25)); sig = DelayL.ar(sig, 0.1, 0.1, 1); 4.do({ sig = AllpassN.ar(sig, 0.15, 0.15, 8, 1)}); sig = sig * EnvGen.kr(Env.new([0, 1, 1, 0], [0.1, 7, 15])); //sig = Mix(sig); //sig = Pan2.ar(sig, panenv); sig = Limiter.ar(sig, 0.75); sig; }.play; )
comments