pv_HainsworthFoote.help.lhs

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

> import Sound.SC3 {- hsc3 -}

> g_01 =
>     let i = soundIn 0
>         b = localBuf 'α' 2048 1
>         f = fft' b i
>         x = mouseX KR 0.5 1.25 Linear 0.2
>         h = pv_HainsworthFoote f 1 0 x 0.04
>         o = sinOsc AR (mrg2 440 445) 0 * decay (h * 0.1) 0.1 * 0.1
>     in o + i

spot note transitions

> g_02 =
>     let s = lfSaw AR (lfNoise0 'β' KR 1 * 90 + 400) 0 * 0.5
>         b = localBuf 'γ' 2048 1
>         f = fft' b s
>         d = pv_HainsworthFoote f 1.0 0.0 0.9 0.5
>         t = sinOsc AR 440 0 * decay (d * 0.1) 0.1
>     in mce2 (s * 0.2) t