hsc3-0.16: Help/UGen/sinOsc.help.lhs
> Sound.SC3.UGen.Help.viewSC3Help "SinOsc"
> Sound.SC3.UGen.DB.ugenSummary "SinOsc"
> import Sound.SC3 {- hsc3 -}
Fixed frequency
> g_01 = sinOsc AR (midiCPS 69) 0 * 0.25
Modulate freq
> g_02 = sinOsc AR (xLine KR 2000 200 9 RemoveSynth) 0 * 0.5
Modulate freq
> g_03 =
> let f = sinOsc AR (xLine KR 1 1000 9 RemoveSynth) 0 * 200 + 800
> in sinOsc AR f 0 * 0.1
Modulate phase
> g_04 =
> let ph = sinOsc AR (xLine KR 20 8000 10 RemoveSynth) 0 * 2 * pi
> in sinOsc AR 800 ph * 0.1
Mouse control
> g_05 =
> let x = mouseX KR 40 10000 Exponential 0.2
> y = mouseY KR 0.01 0.25 Exponential 0.2
> in sinOsc AR x 0 * y
Simple bell-like tone.
> g_06 =
> let f = mce [0.5,1,1.19,1.56,2,2.51,2.66,3.01,4.1]
> a = mce [0.25,1,0.8,0.5,0.9,0.4,0.3,0.6,0.1]
> o = sinOsc AR (500 * f) 0 * a
> e = envGen KR 1 0.1 0 1 RemoveSynth (envPerc 0.01 10)
> in mix o * e
"When two pure tones of slightly different frequency are superposed,
our ears perceive audible beats at a rate given by the difference of
the two frequencies."
> g_07 =
> let f0 = 220
> f1 = 221.25
> d = abs (f1 - f0)
> in sinOsc AR (mce2 f0 f1) 0 * 0.1 + impulse AR d 0 * 0.25
"When two tones are sounded together, a tone of lower frequency is
frequently heard. Such a tone is called a combination tone. The most
commonly heard combination tone occurs at a frequency f2 - f1."
> g_08 =
> let f1 = 300
> f2 = 300 * (3/2)
> f = mce2 (mce2 f1 f2) (abs (f2 - f1))
> a = mce2 0.1 (max (sinOsc KR 0.05 0 * 0.1) 0)
> in sinOsc AR f 0 * a