hsc3-0.11: Help/UGen/External/dfm1.help.lhs
> Sound.SC3.UGen.Help.viewSC3Help "DFM1"
> Sound.SC3.UGen.DB.ugenSummary "DFM1"
> import Sound.SC3.ID
Play it with the mouse
> let { n = pinkNoise 'a' AR * 0.5
> ; x = mouseX' KR 80 5000 Exponential 0.1
> ; y = mouseX' KR 0.1 1.2 Linear 0.1 }
> in audition (out 0 (dfm1 n x y 1 0 3e-4))
Bass
> let { i = pulse AR 100 0.5 * 0.4 + pulse AR 100.1 0.5 * 0.4
> ; f = range 80 2000 (sinOsc KR (range 0.2 5 (sinOsc KR 0.3 0)) 0)
> ; s = dfm1 i f 1.1 2 0 3e-4 * 0.1 }
> in audition (out 0 (mce2 s s))