> 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)