d5a5c1975c07f2a19278297e3f5f222a801a0623
[Faustine.git] / 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.;