HelpSource/Classes/PingPong.schelp

   1 class:: PingPong
   2 summary:: Stereo ping-pong delay.
   3 related:: Classes/SinOsc
   4 categories::  UGens>Delays>Buffer
   5
   6
   7 Description::
   8
   9 Bounces sound between two outputs…  Like a ping-pong ball. PingPong is
  10 actually a compound built upon  link::Classes/RecordBuf::  and
  11 link::Classes/PlayBuf:: .
  12
  13
  14 classmethods::
  15
  16 method::ar
  17
  18 argument::bufnum
  19 First index of a multi channel buffer.
  20
  21 argument::inputs
  22 An array of audio inputs, the same size as your buffer.
  23
  24 argument::delayTime
  25 Delay time in seconds.
  26
  27 argument::feedback
  28 Feedback coefficient.
  29
  30 argument::rotate
  31
  32 Which rotates the inputArray by one step. (left → right, right →
  33 left). Rotation of 0 (or 2) would result in no rotation to the
  34 inputArray.
  35
  36
  37 Examples::
  38
  39 code::
  40
  41 (
  42 s = Server.local;
  43 s.waitForBoot({
  44
  45 b = Buffer.alloc(s,44100 * 2, 2);
  46
  47 SynthDef("help-PingPong",{ arg out=0,bufnum=0,feedback=0.5,delayTime=0.2;
  48         var left, right;
  49         left = Decay2.ar(Impulse.ar(0.7, 0.25), 0.01, 0.25,
  50                 SinOsc.ar(SinOsc.kr(3.7,0,200,500)));
  51         right = Decay2.ar(Impulse.ar(0.5, 0.25), 0.01, 0.25,
  52                 Resonz.ar(PinkNoise.ar(4), SinOsc.kr(2.7,0,1000,2500), 0.2));
  53
  54         Out.ar(0,
  55                 PingPong.ar(bufnum, [left,right], delayTime, feedback, 1)
  56         )
  57 }).play(s,[\out, 0, \bufnum, b.bufnum,\feedback,0.5,\delayTime,0.1]);
  58 });
  59 )
  60
  61
  62 (
  63 s = Server.local;
  64 s.waitForBoot({
  65
  66 b = Buffer.alloc(s,44100 * 2, 2);
  67
  68 SynthDef("help-PingPong",{ arg out=0,bufnum=0;
  69         var left, right;
  70         left = Decay2.ar(Impulse.ar(0.7, 0.25), 0.01, 0.25,
  71                 SinOsc.ar(SinOsc.kr(3.7,0,200,500)));
  72         right = Decay2.ar(Impulse.ar(0.5, 0.25), 0.01, 0.25,
  73                 Resonz.ar(PinkNoise.ar(4), SinOsc.kr(2.7,0,1000,2500),
  74 0.2));
  75
  76         Out.ar(0,
  77                 PingPong.ar(bufnum, [left,right] *  EnvGen.kr(Env([1, 1, 0], [2, 0.1])),
  78                         0.1, 0.8, 1)
  79         )
  80 }).play(s,[\out, 0, \bufnum, b.bufnum]);
  81 });
  82 )
  83
  84
  85
  86
  87
  88 (
  89
  90 Patch({ arg buffer,feedback=0.5,delayTime=0.2;
  91         var left, right;
  92         left = Decay2.ar(Impulse.ar(0.7, 0.25), 0.01, 0.25,
  93                 SinOsc.ar(SinOsc.kr(3.7,0,200,500)));
  94         right = Decay2.ar(Impulse.ar(0.5, 0.25), 0.01, 0.25,
  95                 Resonz.ar(PinkNoise.ar(4), SinOsc.kr(2.7,0,1000,2500), 0.2));
  96
  97         PingPong.ar(buffer.bufnumIr, [left,right], delayTime, feedback, 1)
  98
  99 }).gui
 100
 101 )
 102
 103 ::
 104