Skip to content

Commit af17579

Browse files
solipdsolipd
committed
added equal power xfade
1 parent 64eb4e5 commit af17579

File tree

4 files changed

+391
-165
lines changed

4 files changed

+391
-165
lines changed

‎pp.xfade-st~-help.pd

Lines changed: 34 additions & 27 deletions
Original file line numberDiff line numberDiff line change
@@ -1,16 +1,16 @@
1-
#N canvas 192 278 746 311 10;
2-
#X obj 390 243 pp.out~;
1+
#N canvas 187 459 746 311 10;
2+
#X obj 450 241 pp.out~;
33
#A saved;
4-
#X obj 1 2 cnv 15 380 300 empty empty empty 20 12 0 14 #e0e0e0 #404040 0;
4+
#X obj 1 2 cnv 15 420 300 empty empty empty 20 12 0 14 #e0e0e0 #404040 0;
55
#X text 46 126 Inlets:;
66
#X text 45 223 Outlets:;
77
#X obj 12 20 cnv 15 10 10 empty empty pp.xfade-st~ 0 0 2 16 #e0e0e0 #fcfcfc 0;
88
#N canvas 997 287 503 292 message-out 0;
99
#X obj 30 33 inlet;
10-
#X msg 30 60 mix -1 \,;
10+
#X msg 30 60 mix 0.0576923 \, lin \,;
1111
#X connect 0 0 1 0;
12-
#X restore 539 210 pd message-out;
13-
#X obj 539 141 cnv 15 118 17 empty empty empty 20 12 0 14 #fc8000 #404040 0;
12+
#X restore 599 208 pd message-out;
13+
#X obj 599 139 cnv 15 118 17 empty empty empty 20 12 0 14 #fc8000 #404040 0;
1414
#N canvas 1023 138 330 209 control-messages 0;
1515
#X obj 54 180 outlet;
1616
#X obj 101 147 cnv 16 87 16 empty empty empty 20 12 0 14 #fc8000 #404040 0;
@@ -40,21 +40,25 @@
4040
#X connect 11 0 12 0;
4141
#X connect 12 0 0 0;
4242
#X restore 101 146 pd save&recall;
43-
#X floatatom 54 46 5 0 0 0 - - - 0;
44-
#X msg 54 68 mix \$1;
45-
#X text 94 44 -1 sig 1 \, 1 sig 2;
43+
#X floatatom 54 23 5 0 0 0 - - - 0;
44+
#X msg 54 45 mix \$1;
45+
#X text 94 21 -1 sig 1 \, 1 sig 2;
46+
#X msg 85 80 lin;
47+
#X text 114 79 linear crossfade;
48+
#X msg 100 108 sqrt;
49+
#X text 132 108 equal power crossfade;
4650
#X connect 2 0 0 0;
4751
#X connect 3 0 4 0;
4852
#X connect 4 0 0 0;
49-
#X restore 539 141 pd control-messages;
50-
#X obj 449 51 osc~ 440;
51-
#X floatatom 509 70 5 0 0 0 - - - 0;
52-
#X obj 509 92 / 100;
53-
#X obj 509 115 sig~;
54-
#X text 30 70 Creation arguments: \$1 mix (-1 \, 1) \, default 0;
55-
#X text 31 40 linear crossfade;
56-
#X obj 391 18 osc~ 220;
57-
#X obj 391 164 pp.xfade-st~;
53+
#X connect 6 0 0 0;
54+
#X connect 8 0 0 0;
55+
#X restore 599 139 pd control-messages;
56+
#X obj 509 49 osc~ 440;
57+
#X floatatom 569 68 5 0 0 0 - - - 0;
58+
#X obj 569 90 / 100;
59+
#X obj 569 113 sig~;
60+
#X obj 451 16 osc~ 220;
61+
#X obj 451 162 pp.xfade-st~;
5862
#A saved empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \; empty_slot \;;
5963
#X text 104 125 1:(~)signal 1 left;
6064
#X text 104 139 2:(~)signal 1 right;
@@ -65,14 +69,17 @@
6569
#X text 103 223 1:(~)mixed signal left;
6670
#X text 103 239 2:(~)mixed signal right;
6771
#X text 103 254 3:message;
68-
#X connect 7 0 15 5;
69-
#X connect 8 0 15 2;
70-
#X connect 8 0 15 3;
72+
#X text 30 70 Creation arguments: \$1: mix (-1 \, 1) \, default 0;
73+
#X text 149 88 \$2: power function (lin \, sqrt) \, default lin;
74+
#X text 23 39 crossfade between 2 stereo signals;
75+
#X connect 7 0 13 5;
76+
#X connect 8 0 13 2;
77+
#X connect 8 0 13 3;
7178
#X connect 9 0 10 0;
7279
#X connect 10 0 11 0;
73-
#X connect 11 0 15 4;
74-
#X connect 14 0 15 0;
75-
#X connect 14 0 15 1;
76-
#X connect 15 0 0 0;
77-
#X connect 15 1 0 1;
78-
#X connect 15 2 5 0;
80+
#X connect 11 0 13 4;
81+
#X connect 12 0 13 0;
82+
#X connect 12 0 13 1;
83+
#X connect 13 0 0 0;
84+
#X connect 13 1 0 1;
85+
#X connect 13 2 5 0;

‎pp.xfade-st~.pd

Lines changed: 193 additions & 64 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,10 @@
1-
#N canvas 339 167 993 538 10;
1+
#N canvas 772 302 993 538 10;
22
#X obj 103 115 hsl 105 15 -1 1 0 0 \$0-gui \$0-guir Mix 3 8 2 10 #e0e0e0 #000000 #000000 0 1;
33
#X obj 251 115 hsl 2 8 0 1 0 0 \$0-gui \$0-guir empty 3 8 2 10 #e0e0e0 #dcdcdc #000000 0 1;
44
#X obj 210 115 nbx 5 15 -1 1 0 0 \$0-mix \$0-mixr empty 0 -8 2 10 #dcdcdc #000000 #000000 0 256;
55
#X msg 164 157 set \$1;
6-
#X obj 811 142 loadbang;
7-
#X obj 802 418 outlet;
8-
#X obj 809 59 inlet;
6+
#X obj 673 417 outlet;
7+
#X obj 680 58 inlet;
98
#N canvas 165 118 567 472 outlet-message 0;
109
#X obj 215 336 list trim;
1110
#X msg 152 314 addcomma;
@@ -50,24 +49,40 @@
5049
#X connect 5 1 3 1;
5150
#X connect 6 0 5 0;
5251
#X restore 235 279 pd save;
53-
#X msg 196 230 mix \$1;
54-
#X obj 170 149 clip -1 1;
55-
#X obj 170 126 r \$0-mix;
52+
#X obj 170 110 clip -1 1;
53+
#X obj 170 87 r \$0-mix;
54+
#X obj 247 56 sel 0 1;
55+
#X obj 170 158 pack 0 s;
56+
#X msg 277 81 sqrt;
57+
#X obj 247 105 symbol;
58+
#X obj 247 128 t b s;
59+
#X msg 196 230 mix \$1 \, \$2;
60+
#X obj 247 33 r \$0-func;
61+
#X msg 247 81 lin;
5662
#X connect 0 0 4 0;
5763
#X connect 1 0 4 0;
5864
#X connect 2 0 4 0;
5965
#X connect 3 0 0 0;
6066
#X connect 5 0 4 0;
61-
#X connect 5 1 8 0;
67+
#X connect 5 1 15 0;
6268
#X connect 5 2 2 0;
6369
#X connect 6 0 1 0;
6470
#X connect 6 1 3 0;
6571
#X connect 6 2 7 0;
66-
#X connect 8 0 6 0;
67-
#X connect 9 0 5 0;
68-
#X connect 10 0 9 0;
69-
#X restore 802 368 pd outlet-message;
70-
#N canvas 852 271 335 295 in 0;
72+
#X connect 8 0 11 0;
73+
#X connect 9 0 8 0;
74+
#X connect 10 0 17 0;
75+
#X connect 10 1 12 0;
76+
#X connect 11 0 5 0;
77+
#X connect 12 0 13 0;
78+
#X connect 13 0 14 0;
79+
#X connect 14 0 11 0;
80+
#X connect 14 1 11 1;
81+
#X connect 15 0 6 0;
82+
#X connect 16 0 10 0;
83+
#X connect 17 0 13 0;
84+
#X restore 673 367 pd outlet-message;
85+
#N canvas 852 271 335 417 in 0;
7186
#X obj 30 14 inlet;
7287
#N canvas 698 516 200 251 route 0;
7388
#X obj 20 20 inlet;
@@ -177,64 +192,178 @@
177192
#X connect 19 0 20 1;
178193
#X connect 20 0 6 0;
179194
#X restore 48 79 pd recall;
180-
#X obj 30 250 s \$0-mixr;
181-
#X obj 30 204 route mix;
195+
#X obj 30 327 s \$0-mixr;
196+
#X obj 30 204 route mix lin sqrt;
197+
#X obj 65 228 t b;
198+
#X msg 65 251 0;
199+
#X msg 100 252 1;
200+
#X obj 100 229 t b;
201+
#X obj 65 279 s \$0-func;
202+
#X obj 135 82 loadbang;
203+
#X obj 64 179 list trim;
204+
#X obj 64 156 list;
205+
#X obj 63 134 symbol \$2;
206+
#X obj 174 130 f \$1;
207+
#X obj 174 152 s \$0-mixr;
208+
#X obj 135 105 t b b b;
182209
#X connect 0 0 1 0;
183210
#X connect 0 0 4 0;
184211
#X connect 2 0 4 0;
185212
#X connect 4 0 3 0;
186-
#X restore 809 84 pd in;
187-
#X obj 390 296 *~;
188-
#X obj 389 260 -~;
189-
#X obj 340 328 +~;
190-
#X obj 447 110 inlet~;
191-
#X obj 643 255 line~;
192-
#X obj 628 278 +~;
193-
#X obj 341 109 inlet~;
194-
#X obj 627 107 inlet~;
213+
#X connect 4 1 5 0;
214+
#X connect 4 2 8 0;
215+
#X connect 5 0 6 0;
216+
#X connect 6 0 9 0;
217+
#X connect 7 0 9 0;
218+
#X connect 8 0 7 0;
219+
#X connect 10 0 16 0;
220+
#X connect 11 0 4 0;
221+
#X connect 12 0 11 0;
222+
#X connect 13 0 12 0;
223+
#X connect 14 0 15 0;
224+
#X connect 16 0 13 0;
225+
#X connect 16 1 6 0;
226+
#X connect 16 2 14 0;
227+
#X restore 680 83 pd in;
228+
#X obj 390 74 inlet~;
229+
#X obj 612 217 line~;
230+
#X obj 597 240 +~;
231+
#X obj 341 73 inlet~;
232+
#X obj 596 69 inlet~;
195233
#X obj 340 366 outlet~;
196-
#X text 900 474 ps 24;
197-
#X obj 643 181 r \$0-mix;
198-
#X obj 811 164 f \$1;
199-
#X obj 811 186 s \$0-mixr;
200-
#X msg 643 228 \$1 20;
201-
#X obj 628 301 clip~ 0 1;
202-
#X obj 627 130 +~ 1;
203-
#X obj 627 153 *~ 0.5;
204-
#X obj 643 205 * 0.5;
205-
#X obj 506 295 *~;
206-
#X obj 505 259 -~;
207-
#X obj 456 327 +~;
208-
#X obj 505 110 inlet~;
209-
#X obj 393 110 inlet~;
210-
#X obj 456 365 outlet~;
234+
#X text 771 473 ps 24;
235+
#X obj 612 143 r \$0-mix;
236+
#X msg 612 190 \$1 20;
237+
#X obj 597 263 clip~ 0 1;
238+
#X obj 596 92 +~ 1;
239+
#X obj 596 115 *~ 0.5;
240+
#X obj 612 167 * 0.5;
241+
#N canvas 286 330 453 355 lin 0;
242+
#X obj 184 218 *~;
243+
#X obj 183 182 -~;
244+
#X obj 134 250 +~;
245+
#X obj 184 32 inlet~;
246+
#X obj 135 31 inlet~;
247+
#X obj 134 288 outlet~;
248+
#X obj 263 41 inlet~;
249+
#X obj 365 85 switch~ 1;
250+
#X obj 365 32 r \$0-func;
251+
#X obj 365 58 == 0;
252+
#X connect 0 0 2 1;
253+
#X connect 1 0 0 0;
254+
#X connect 2 0 5 0;
255+
#X connect 3 0 1 0;
256+
#X connect 4 0 2 0;
257+
#X connect 4 0 1 1;
258+
#X connect 6 0 0 1;
259+
#X connect 8 0 9 0;
260+
#X connect 9 0 7 0;
261+
#X restore 341 308 pd lin;
262+
#N canvas 448 359 450 300 sqrt 0;
263+
#X obj 93 31 inlet~;
264+
#X obj 180 32 inlet~;
265+
#X obj 252 30 inlet~;
266+
#X obj 93 157 *~;
267+
#X obj 108 78 sig~ 1;
268+
#X obj 108 101 -~;
269+
#X obj 108 124 sqrt~;
270+
#X obj 252 118 sqrt~;
271+
#X obj 180 157 *~;
272+
#X obj 92 242 outlet~;
273+
#X obj 363 72 switch~ 0;
274+
#X obj 363 21 r \$0-func;
275+
#X obj 363 47 == 1;
276+
#X connect 0 0 3 0;
277+
#X connect 1 0 8 0;
278+
#X connect 2 0 7 0;
279+
#X connect 2 0 5 1;
280+
#X connect 3 0 9 0;
281+
#X connect 4 0 5 0;
282+
#X connect 5 0 6 0;
283+
#X connect 6 0 3 1;
284+
#X connect 7 0 8 1;
285+
#X connect 8 0 9 0;
286+
#X connect 11 0 12 0;
287+
#X connect 12 0 10 0;
288+
#X restore 394 309 pd sqrt;
289+
#X obj 526 75 inlet~;
290+
#X obj 472 73 inlet~;
291+
#N canvas 286 330 453 355 lin 0;
292+
#X obj 184 218 *~;
293+
#X obj 183 182 -~;
294+
#X obj 134 250 +~;
295+
#X obj 184 32 inlet~;
296+
#X obj 135 31 inlet~;
297+
#X obj 134 288 outlet~;
298+
#X obj 263 41 inlet~;
299+
#X obj 365 85 switch~ 1;
300+
#X obj 365 32 r \$0-func;
301+
#X obj 365 58 == 0;
302+
#X connect 0 0 2 1;
303+
#X connect 1 0 0 0;
304+
#X connect 2 0 5 0;
305+
#X connect 3 0 1 0;
306+
#X connect 4 0 2 0;
307+
#X connect 4 0 1 1;
308+
#X connect 6 0 0 1;
309+
#X connect 8 0 9 0;
310+
#X connect 9 0 7 0;
311+
#X restore 455 308 pd lin;
312+
#N canvas 448 359 450 300 sqrt 0;
313+
#X obj 93 31 inlet~;
314+
#X obj 180 32 inlet~;
315+
#X obj 252 30 inlet~;
316+
#X obj 93 157 *~;
317+
#X obj 108 78 sig~ 1;
318+
#X obj 108 101 -~;
319+
#X obj 108 124 sqrt~;
320+
#X obj 252 118 sqrt~;
321+
#X obj 180 157 *~;
322+
#X obj 92 242 outlet~;
323+
#X obj 363 72 switch~ 0;
324+
#X obj 363 21 r \$0-func;
325+
#X obj 363 47 == 1;
326+
#X connect 0 0 3 0;
327+
#X connect 1 0 8 0;
328+
#X connect 2 0 7 0;
329+
#X connect 2 0 5 1;
330+
#X connect 3 0 9 0;
331+
#X connect 4 0 5 0;
332+
#X connect 5 0 6 0;
333+
#X connect 6 0 3 1;
334+
#X connect 7 0 8 1;
335+
#X connect 8 0 9 0;
336+
#X connect 11 0 12 0;
337+
#X connect 12 0 10 0;
338+
#X restore 508 309 pd sqrt;
339+
#X obj 454 365 outlet~;
211340
#X connect 0 0 2 0;
212341
#X connect 2 0 3 0;
213342
#X connect 3 0 0 0;
214-
#X connect 4 0 20 0;
215-
#X connect 6 0 8 0;
216-
#X connect 7 0 5 0;
217-
#X connect 9 0 11 1;
218-
#X connect 10 0 9 0;
219-
#X connect 11 0 17 0;
220-
#X connect 12 0 10 0;
221-
#X connect 13 0 14 1;
222-
#X connect 14 0 23 0;
223-
#X connect 15 0 11 0;
224-
#X connect 15 0 10 1;
225-
#X connect 16 0 24 0;
226-
#X connect 19 0 26 0;
227-
#X connect 20 0 21 0;
343+
#X connect 5 0 7 0;
344+
#X connect 6 0 4 0;
345+
#X connect 8 0 25 0;
346+
#X connect 8 0 26 0;
347+
#X connect 9 0 10 1;
348+
#X connect 10 0 17 0;
349+
#X connect 11 0 21 0;
350+
#X connect 11 0 22 0;
351+
#X connect 12 0 18 0;
352+
#X connect 15 0 20 0;
353+
#X connect 16 0 9 0;
354+
#X connect 17 0 21 2;
355+
#X connect 17 0 22 2;
356+
#X connect 17 0 26 2;
357+
#X connect 17 0 25 2;
358+
#X connect 18 0 19 0;
359+
#X connect 19 0 10 0;
360+
#X connect 20 0 16 0;
361+
#X connect 21 0 13 0;
228362
#X connect 22 0 13 0;
229-
#X connect 23 0 9 1;
230-
#X connect 23 0 27 1;
231-
#X connect 24 0 25 0;
232-
#X connect 25 0 14 0;
233-
#X connect 26 0 22 0;
234-
#X connect 27 0 29 1;
235-
#X connect 28 0 27 0;
236-
#X connect 29 0 32 0;
237-
#X connect 30 0 28 0;
238-
#X connect 31 0 29 0;
239-
#X connect 31 0 28 1;
363+
#X connect 23 0 25 1;
364+
#X connect 23 0 26 1;
365+
#X connect 24 0 21 1;
366+
#X connect 24 0 22 1;
367+
#X connect 25 0 27 0;
368+
#X connect 26 0 27 0;
240369
#X coords 0 -1 1 1 155 33 1 100 100;

0 commit comments

Comments
 (0)