examples/pieces/RM-octaver.scd

   1 (
   2 /*
   3
   4 RM octaver
   5
   6 inSignal is RingModulated by a sinusoidal tone with half frequency.
   7 The resulting spectrum is given by all the components of inSignal with
   8 half freqs.
   9 This means that the new spectrum is a one 8ve below version of the input signal's one,
  10 with only odd partials.
  11 As a consequence, if inSignal is added again, even partials are
  12 recovered.
  13
  14 See:
  15 Miller Puckette, The Theory and Technique of Electronic Music, p. 126
  16 http://crca.ucsd.edu/~msp/techniques/latest/book.pdf
  17 http://crca.ucsd.edu/~msp/techniques/latest/book-html/node77.html#sect5.ringmod
  18
  19 andreavalle
  20
  21 */
  22
  23 s = Server.local.waitForBoot({
  24         SynthDef.new(\RmOctaver, { var in, out = 0, freq, hasFreq ;
  25                 in = SoundIn.ar(0) ;
  26                 # freq, hasFreq = Pitch.kr(in) ;
  27                 Out.ar(out, SinOsc.ar(freq: freq*0.5)*in+in);
  28         }).send(s) ;
  29 })
  30 )
  31
  32
  33 Synth.new(\RmOctaver) ;
  34
  35