hsc3-graphs-0.11: src/red-frik.scd

{ var red = { arg tr, n
            ; var r1 = TRand.kr(0.3, 3, tr)
            ; var r2 = TRand.kr(0.3, 5, tr)
            ; var r3 = TRand.kr(0, 0.5, tr)
            ; var r4 = TRand.kr(0.49, 0.56, tr)
            ; var r5 = TRand.kr(0.3, 0.6, tr)
            ; var r6 = TRand.kr(0.3, 0.5, tr)
            ; var o1 = FSinOsc.kr(r2, 0, r3, r4)
            ; var o2 = FSinOsc.kr(o1, r5, r6)
            ; RHPF.ar(n, r1, o2) }
; var n = [BrownNoise.ar, BrownNoise.ar]
; var tr = Impulse.kr(0.1, 0)
; Out.ar(0, red.value(tr, n)) }.play