packages feed

hsc3-0.17: Help/UGen/membraneCircle.help.lhs

    Sound.SC3.UGen.Help.viewSC3Help "MembraneCircle"
    Sound.SC3.UGen.DB.ugenSummary "MembraneCircle"

> import Sound.SC3 {- hsc3 -}
> import Sound.SC3.UGen.Bindings.DB.External {- hsc3 -}

Excite the mesh with some pink noise, triggered by an
impulse generator.  mouseX is tension and impulse frequency,
mouseY is duration of excitation, release-time and amplitude.

> g_01 =
>   let x = mouseX KR 0 1 Linear 0.2
>       y = mouseY KR 1e-9 1 Exponential 0.2
>       loss = linLin y 0 1 0.999999 0.999
>       wobble = sinOsc KR 2 0
>       tension = linLin x 0 1 0.01 0.1 + (wobble * 0.0001)
>       p = envPerc 0.0001 y
>       tr = impulse KR (linLin x 0 1 3 9) 0
>       e = envGen KR tr (linLin y 0 1 0.05 0.25) 0 0.1 DoNothing p
>   in membraneCircle AR (pinkNoise 'α' AR * e) tension loss