interpretor/faust-0.9.47mr3/tools/faust2pd/examples/synth/faust-control.pd

   1 #N canvas 284 268 574 422 10;
   2 #X obj 29 62 unpack s f;
   3 #X obj 29 123 list trim;
   4 #X obj 29 223 list append;
   5 #X obj 29 197 list prepend;
   6 #X obj 29 90 t s b;
   7 #X obj 108 91 t s b;
   8 #X obj 108 62 unpack s;
   9 #X msg 108 123 w;
  10 #X msg 138 123 r;
  11 #X obj 29 33 list split 2;
  12 #X obj 29 276 route w r;
  13 #X obj 29 250 list trim;
  14 #X obj 29 306 unpack s f f;
  15 #X obj 125 306 unpack s f f;
  16 #X obj 29 332 pack s f;
  17 #X obj 125 332 pack s f;
  18 #X obj 29 366 list trim;
  19 #X obj 29 6 inlet;
  20 #X obj 29 394 outlet;
  21 #X text 153 175 Control decoding logic. Normalizes the control name
  22 and retrieves the current value. The inlet is the incoming message
  23 \, the outlet returns the decoded message. The creation argument must
  24 be the \$0 of the parent patch. In the parent patch \, the receiver
  25 \$0-in and the sender \$0-out must be connected to the first inlet
  26 and the first outlet of the target Faust DSP \, respectively.;
  27 #X obj 29 147 s \$1-in;
  28 #X obj 29 172 r \$1-out;
  29 #X connect 0 0 4 0;
  30 #X connect 0 1 2 1;
  31 #X connect 1 0 20 0;
  32 #X connect 2 0 11 0;
  33 #X connect 3 0 2 0;
  34 #X connect 4 0 1 0;
  35 #X connect 4 1 7 0;
  36 #X connect 5 0 1 0;
  37 #X connect 5 1 8 0;
  38 #X connect 6 0 5 0;
  39 #X connect 7 0 3 1;
  40 #X connect 8 0 3 1;
  41 #X connect 9 0 0 0;
  42 #X connect 9 2 6 0;
  43 #X connect 10 0 12 0;
  44 #X connect 10 1 13 0;
  45 #X connect 11 0 10 0;
  46 #X connect 12 0 14 0;
  47 #X connect 12 2 14 1;
  48 #X connect 13 0 15 0;
  49 #X connect 13 1 15 1;
  50 #X connect 14 0 16 0;
  51 #X connect 15 0 16 0;
  52 #X connect 16 0 18 0;
  53 #X connect 17 0 9 0;
  54 #X connect 21 0 3 0;