lag.help.lhs

> import Sound.SC3 {- hsc3 -}

> g_01 =
>     let x = mouseX KR 220 440 Linear 0.2
>     in sinOsc AR (mce [x, lag x 1]) 0 * 0.1

> g_02 =
>     let n = lfNoise0 'α' KR 0.5
>     in sinOsc AR (220 + (lag n 1 * 220)) 0 * (lag n 2 * 0.1)

> g_03 = lag (impulse AR 100 0) (mouseX KR 0.0 0.01 Linear 0.2)

> g_04 = lag (lfPulse AR 50 0 0.5) (mouseX KR 0.0 (1/50) Linear 0.2) * 0.2

> g_05 =
>   let s = sinOsc AR 0.05 0.0
>       f1 = linLin s (-1.0) 1.0 220.0 440.0
>       o1 = sinOsc AR f1 0.0
>       f2 = lag f1 1.0
>       o2 = sinOsc AR f2 0.0
>   in mce2 (o1 * 0.2) (o2 * 0.2)