interpretor/faust-0.9.47mr3/examples/faust-stk/pd-patches/fancy/what-a-friend/piano.pd

   1 #N canvas 0 0 450 300 10;
   2 #X obj 10 330 inlet;
   3 #X obj 130 330 inlet;
   4 #X obj 190 330 r \$0-read;
   5 #X obj 130 360 r \$0-all;
   6 #X obj 190 360 faust-control \$0;
   7 #X obj 190 390 s \$0-write;
   8 #X obj 130 390 r \$0-in;
   9 #X obj 130 660 s \$0-out;
  10 #X obj 10 420 faust-gate 1;
  11 #X obj 130 420 piano~;
  12 #X obj 10 450 faust-gate 2;
  13 #X obj 130 450 piano~;
  14 #X obj 10 480 faust-gate 3;
  15 #X obj 130 480 piano~;
  16 #X obj 10 510 faust-gate 4;
  17 #X obj 130 510 piano~;
  18 #X obj 10 540 faust-gate 5;
  19 #X obj 130 540 piano~;
  20 #X obj 10 570 faust-gate 6;
  21 #X obj 130 570 piano~;
  22 #X obj 10 600 faust-gate 7;
  23 #X obj 130 600 piano~;
  24 #X obj 10 630 faust-gate 8;
  25 #X obj 130 630 piano~;
  26 #X obj 130 690 outlet~;
  27 #X obj 190 690 outlet~;
  28 #X obj 10 690 outlet;
  29 #X connect 1 0 4 0;
  30 #X connect 2 0 4 0;
  31 #X connect 4 0 5 0;
  32 #X connect 1 0 26 0;
  33 #X connect 6 0 9 0;
  34 #X connect 9 0 7 0;
  35 #X connect 0 0 8 0;
  36 #X connect 8 0 9 0;
  37 #X connect 3 0 9 0;
  38 #X connect 0 0 10 0;
  39 #X connect 10 0 11 0;
  40 #X connect 3 0 11 0;
  41 #X connect 0 0 12 0;
  42 #X connect 12 0 13 0;
  43 #X connect 3 0 13 0;
  44 #X connect 0 0 14 0;
  45 #X connect 14 0 15 0;
  46 #X connect 3 0 15 0;
  47 #X connect 0 0 16 0;
  48 #X connect 16 0 17 0;
  49 #X connect 3 0 17 0;
  50 #X connect 0 0 18 0;
  51 #X connect 18 0 19 0;
  52 #X connect 3 0 19 0;
  53 #X connect 0 0 20 0;
  54 #X connect 20 0 21 0;
  55 #X connect 3 0 21 0;
  56 #X connect 0 0 22 0;
  57 #X connect 22 0 23 0;
  58 #X connect 3 0 23 0;
  59 #X connect 9 1 24 0;
  60 #X connect 9 2 25 0;
  61 #X connect 11 1 24 0;
  62 #X connect 11 2 25 0;
  63 #X connect 13 1 24 0;
  64 #X connect 13 2 25 0;
  65 #X connect 15 1 24 0;
  66 #X connect 15 2 25 0;
  67 #X connect 17 1 24 0;
  68 #X connect 17 2 25 0;
  69 #X connect 19 1 24 0;
  70 #X connect 19 2 25 0;
  71 #X connect 21 1 24 0;
  72 #X connect 21 2 25 0;
  73 #X connect 23 1 24 0;
  74 #X connect 23 2 25 0;
  75 #X obj 10 30 hsl 128 15 0 1 0 0 \$0-piano/Physical-Parameters/Brightness-Factor \$0-piano/Physical-Parameters/Brightness-Factor Brightness-Factor -2 -6 0 10 -262144 -1 -1 0 1;
  76 #X obj 160 30 nbx 5 14 0 1 0 0 \$0-piano/Physical-Parameters/Brightness-Factor \$0-piano/Physical-Parameters/Brightness-Factor empty 0 -6 0 10 -262144 -1 -1 256;
  77 #X obj 10 60 hsl 128 15 0 1 0 0 \$0-piano/Physical-Parameters/Detuning-Factor \$0-piano/Physical-Parameters/Detuning-Factor Detuning-Factor -2 -6 0 10 -262144 -1 -1 0 1;
  78 #X obj 160 60 nbx 5 14 0 1 0 0 \$0-piano/Physical-Parameters/Detuning-Factor \$0-piano/Physical-Parameters/Detuning-Factor empty 0 -6 0 10 -262144 -1 -1 256;
  79 #X obj 10 90 hsl 128 15 0 1 0 0 \$0-piano/Physical-Parameters/Hammer-Hardness \$0-piano/Physical-Parameters/Hammer-Hardness Hammer-Hardness -2 -6 0 10 -262144 -1 -1 0 1;
  80 #X obj 160 90 nbx 5 14 0 1 0 0 \$0-piano/Physical-Parameters/Hammer-Hardness \$0-piano/Physical-Parameters/Hammer-Hardness empty 0 -6 0 10 -262144 -1 -1 256;
  81 #X obj 10 120 hsl 128 15 0 1 0 0 \$0-piano/Physical-Parameters/Stiffness-Factor \$0-piano/Physical-Parameters/Stiffness-Factor Stiffness-Factor -2 -6 0 10 -262144 -1 -1 0 1;
  82 #X obj 160 120 nbx 5 14 0 1 0 0 \$0-piano/Physical-Parameters/Stiffness-Factor \$0-piano/Physical-Parameters/Stiffness-Factor empty 0 -6 0 10 -262144 -1 -1 256;
  83 #X obj 10 150 hsl 128 15 0 1 0 0 \$0-piano/Reverb/reverbGain \$0-piano/Reverb/reverbGain reverbGain -2 -6 0 10 -262144 -1 -1 0 1;
  84 #X obj 160 150 nbx 5 14 0 1 0 0 \$0-piano/Reverb/reverbGain \$0-piano/Reverb/reverbGain empty 0 -6 0 10 -262144 -1 -1 256;
  85 #X obj 10 180 hsl 128 15 0.01 2 0 0 \$0-piano/Reverb/roomSize \$0-piano/Reverb/roomSize roomSize -2 -6 0 10 -262144 -1 -1 0 1;
  86 #X obj 160 180 nbx 5 14 0.01 2 0 0 \$0-piano/Reverb/roomSize \$0-piano/Reverb/roomSize empty 0 -6 0 10 -262144 -1 -1 256;
  87 #X obj 10 210 hsl 128 15 0 1 0 0 \$0-piano/Spat/pan-angle \$0-piano/Spat/pan-angle pan-angle -2 -6 0 10 -262144 -1 -1 0 1;
  88 #X obj 160 210 nbx 5 14 0 1 0 0 \$0-piano/Spat/pan-angle \$0-piano/Spat/pan-angle empty 0 -6 0 10 -262144 -1 -1 256;
  89 #X obj 10 240 hsl 128 15 0 1 0 0 \$0-piano/Spat/spatial-width \$0-piano/Spat/spatial-width spatial-width -2 -6 0 10 -262144 -1 -1 0 1;
  90 #X obj 160 240 nbx 5 14 0 1 0 0 \$0-piano/Spat/spatial-width \$0-piano/Spat/spatial-width empty 0 -6 0 10 -262144 -1 -1 256;
  91 #X obj 197 3 bng 15 250 50 1 \$0-init \$0-ignore empty 0 -6 0 10 -262144 -1 -1;
  92 #X obj 217 3 tgl 15 1 \$0-active \$0-active empty 0 -6 0 10 -262144 -1 -1 1 1;
  93 #X obj 450 10 r \$0-init;
  94 #X obj 858 10 s \$0-all;
  95 #X obj 1062 10 s \$0-read;
  96 #X obj 1266 10 r \$0-write;
  97 #X msg 450 30 1;
  98 #X obj 450 50 s \$0-active;
  99 #X connect 49 0 50 0;
 100 #X obj 858 30 r \$0-active;
 101 #X msg 858 50 active \$1;
 102 #X connect 51 0 52 0;
 103 #X connect 52 0 46 0;
 104 #X obj 1266 30 route active;
 105 #X obj 1266 50 s \$0-active;
 106 #X connect 48 0 53 0;
 107 #X connect 53 0 54 0;
 108 #X msg 450 70 0;
 109 #X obj 450 90 s \$0-piano/Physical-Parameters/Brightness-Factor;
 110 #X connect 45 0 55 0;
 111 #X connect 55 0 56 0;
 112 #X obj 858 70 r \$0-piano/Physical-Parameters/Brightness-Factor;
 113 #X msg 858 90 /piano/Physical-Parameters/Brightness-Factor \$1;
 114 #X connect 57 0 58 0;
 115 #X connect 58 0 46 0;
 116 #X obj 1266 70 route /piano/Physical-Parameters/Brightness-Factor;
 117 #X obj 1266 90 s \$0-piano/Physical-Parameters/Brightness-Factor;
 118 #X connect 53 1 59 0;
 119 #X connect 59 0 60 0;
 120 #X msg 450 110 0.1;
 121 #X obj 450 130 s \$0-piano/Physical-Parameters/Detuning-Factor;
 122 #X connect 45 0 61 0;
 123 #X connect 61 0 62 0;
 124 #X obj 858 110 r \$0-piano/Physical-Parameters/Detuning-Factor;
 125 #X msg 858 130 /piano/Physical-Parameters/Detuning-Factor \$1;
 126 #X connect 63 0 64 0;
 127 #X connect 64 0 46 0;
 128 #X obj 1266 110 route /piano/Physical-Parameters/Detuning-Factor;
 129 #X obj 1266 130 s \$0-piano/Physical-Parameters/Detuning-Factor;
 130 #X connect 59 1 65 0;
 131 #X connect 65 0 66 0;
 132 #X msg 450 150 0.1;
 133 #X obj 450 170 s \$0-piano/Physical-Parameters/Hammer-Hardness;
 134 #X connect 45 0 67 0;
 135 #X connect 67 0 68 0;
 136 #X obj 858 150 r \$0-piano/Physical-Parameters/Hammer-Hardness;
 137 #X msg 858 170 /piano/Physical-Parameters/Hammer-Hardness \$1;
 138 #X connect 69 0 70 0;
 139 #X connect 70 0 46 0;
 140 #X obj 1266 150 route /piano/Physical-Parameters/Hammer-Hardness;
 141 #X obj 1266 170 s \$0-piano/Physical-Parameters/Hammer-Hardness;
 142 #X connect 65 1 71 0;
 143 #X connect 71 0 72 0;
 144 #X msg 450 190 0.28;
 145 #X obj 450 210 s \$0-piano/Physical-Parameters/Stiffness-Factor;
 146 #X connect 45 0 73 0;
 147 #X connect 73 0 74 0;
 148 #X obj 858 190 r \$0-piano/Physical-Parameters/Stiffness-Factor;
 149 #X msg 858 210 /piano/Physical-Parameters/Stiffness-Factor \$1;
 150 #X connect 75 0 76 0;
 151 #X connect 76 0 46 0;
 152 #X obj 1266 190 route /piano/Physical-Parameters/Stiffness-Factor;
 153 #X obj 1266 210 s \$0-piano/Physical-Parameters/Stiffness-Factor;
 154 #X connect 71 1 77 0;
 155 #X connect 77 0 78 0;
 156 #X msg 450 230 0.137;
 157 #X obj 450 250 s \$0-piano/Reverb/reverbGain;
 158 #X connect 45 0 79 0;
 159 #X connect 79 0 80 0;
 160 #X obj 858 230 r \$0-piano/Reverb/reverbGain;
 161 #X msg 858 250 /piano/Reverb/reverbGain \$1;
 162 #X connect 81 0 82 0;
 163 #X connect 82 0 46 0;
 164 #X obj 1266 230 route /piano/Reverb/reverbGain;
 165 #X obj 1266 250 s \$0-piano/Reverb/reverbGain;
 166 #X connect 77 1 83 0;
 167 #X connect 83 0 84 0;
 168 #X msg 450 270 0.72;
 169 #X obj 450 290 s \$0-piano/Reverb/roomSize;
 170 #X connect 45 0 85 0;
 171 #X connect 85 0 86 0;
 172 #X obj 858 270 r \$0-piano/Reverb/roomSize;
 173 #X msg 858 290 /piano/Reverb/roomSize \$1;
 174 #X connect 87 0 88 0;
 175 #X connect 88 0 46 0;
 176 #X obj 1266 270 route /piano/Reverb/roomSize;
 177 #X obj 1266 290 s \$0-piano/Reverb/roomSize;
 178 #X connect 83 1 89 0;
 179 #X connect 89 0 90 0;
 180 #X msg 450 310 0.6;
 181 #X obj 450 330 s \$0-piano/Spat/pan-angle;
 182 #X connect 45 0 91 0;
 183 #X connect 91 0 92 0;
 184 #X obj 858 310 r \$0-piano/Spat/pan-angle;
 185 #X msg 858 330 /piano/Spat/pan-angle \$1;
 186 #X connect 93 0 94 0;
 187 #X connect 94 0 46 0;
 188 #X obj 1266 310 route /piano/Spat/pan-angle;
 189 #X obj 1266 330 s \$0-piano/Spat/pan-angle;
 190 #X connect 89 1 95 0;
 191 #X connect 95 0 96 0;
 192 #X msg 450 350 0.5;
 193 #X obj 450 370 s \$0-piano/Spat/spatial-width;
 194 #X connect 45 0 97 0;
 195 #X connect 97 0 98 0;
 196 #X obj 858 350 r \$0-piano/Spat/spatial-width;
 197 #X msg 858 370 /piano/Spat/spatial-width \$1;
 198 #X connect 99 0 100 0;
 199 #X connect 100 0 46 0;
 200 #X obj 1266 350 route /piano/Spat/spatial-width;
 201 #X obj 1266 370 s \$0-piano/Spat/spatial-width;
 202 #X connect 95 1 101 0;
 203 #X connect 101 0 102 0;
 204 #X coords 0 -1 1 1 235 260 1 0 0;
 205 #X text 0 280 Generated Fri Sep 16 14:36:27 2011 by faust2pd v2.2. See http://faust.grame.fr and http://pure-lang.googlecode.com.;