/usr/lib/pd/extra/fftease/codepend~-help.pd is in pd-fftease 2.5.2.git20121005-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 | #N canvas 281 24 668 454 10;
#X obj 167 237 *~ 1;
#X obj 167 289 dac~;
#X floatatom 190 218 5 0 0 0 - centerring-gain -;
#X msg 333 284 \; pd dsp \$1;
#X obj 333 267 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 17 207 hsl 128 15 0 4 0 0 centerring-gain empty output_gain
-2 -6 0 8 -79789 -1 -1 317 1;
#N canvas 0 22 519 354 messages 0;
#X obj 132 268 outlet;
#X text 30 194 turn on invert;
#X msg 132 175 pad \$1;
#X obj 132 146 ampdb;
#X floatatom 132 116 5 -200 -12 0 - - -;
#X text 221 177 is turned on;
#X obj 9 195 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 9 217 invert \$1;
#X text 221 163 pad affects the gain only when "invert";
#X obj 184 233 fftease-system;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 4 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 0 0;
#X connect 9 0 0 0;
#X restore 448 167 pd messages;
#X obj 18 240 hsl 128 15 0.15 1 0 0 cod-scaling-exponent empty scaling_exponent
-2 -6 0 8 -88868 -1 -1 2241 1;
#N canvas 376 316 470 320 codepend-block 0;
#X obj 233 219 block~ 256;
#X obj 163 185 outlet~;
#X obj 163 38 inlet~;
#X obj 269 107 inlet;
#X obj 201 81 inlet;
#X obj 221 98 inlet;
#X obj 163 128 codepend~;
#X obj 182 65 inlet~;
#X connect 2 0 6 0;
#X connect 3 0 6 0;
#X connect 4 0 6 2;
#X connect 5 0 6 3;
#X connect 6 0 1 0;
#X connect 7 0 6 1;
#X restore 167 183 pd codepend-block;
#X obj 252 142 ampdb;
#X floatatom 252 122 5 0 0 0 - cod-inverse-threshold -;
#X floatatom 252 164 5 0 0 0 - - -;
#N canvas 990 218 504 393 playsound1 0;
#X obj 31 194 soundfiler;
#X obj 31 160 openpanel;
#X msg 31 177 read -resize \$1 codepend-sound1;
#N canvas 0 22 450 300 graph1 0;
#X array codepend-sound1 501762 float 2;
#X coords 0 1 501761 -1 200 140 1;
#X restore 237 13 graph;
#X msg 31 131 bang;
#X obj 227 284 outlet~;
#X obj 227 268 tabplay~ codepend-sound1;
#X msg 227 244 bang;
#X obj 348 228 spigot;
#X obj 385 205 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X text 63 132 open the sound;
#X text 133 244 then play it;
#X text 304 190 loop if you like;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 4 0 1 0;
#X connect 6 0 5 0;
#X connect 6 1 8 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 9 0 8 1;
#X restore 167 22 pd playsound1;
#N canvas 990 218 508 397 playsound2 0;
#X obj 31 194 soundfiler;
#X obj 31 160 openpanel;
#X msg 31 131 bang;
#X obj 227 284 outlet~;
#X msg 227 244 bang;
#X obj 348 228 spigot;
#X obj 385 205 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X text 63 132 open the sound;
#X text 133 244 then play it;
#X text 304 190 loop if you like;
#X text 316 205 comment;
#X msg 31 177 read -resize \$1 codepend-sound2;
#N canvas 0 22 450 300 graph2 0;
#X array codepend-sound2 4e+06 float 2;
#X coords 0 1 4e+06 -1 200 140 1;
#X restore 216 15 graph;
#X obj 227 268 tabplay~ codepend-sound2;
#X connect 1 0 11 0;
#X connect 2 0 1 0;
#X connect 4 0 13 0;
#X connect 5 0 4 0;
#X connect 6 0 5 1;
#X connect 11 0 0 0;
#X connect 13 0 3 0;
#X connect 13 1 5 0;
#X restore 195 40 pd playsound2;
#X floatatom 224 90 5 0 0 0 - cod-scaling-exponent -;
#X obj 19 278 hsl 128 15 -90 0 0 0 cod-inverse-threshold empty inverse_threshold
-2 -6 0 8 -88868 -1 -1 7620 1;
#X text 296 137 but only when "invert" is turned on);
#X text 224 72 scaling exponent (lower values increase distortion)
;
#X text 294 31 <- load and loop two soundfiles to hear effect;
#X msg 14 123 0.1 0.3 -36;
#X obj 14 139 unpack f f f;
#X obj 14 107 loadbang;
#X text 293 121 inverse threshold (lower values intensify effect;
#X text 31 316 codepend~ is a classic "block convolution" processor.
It performs a complex multiply upon the spectra of two input signals.
Multiplication of spectra can cause significant drops in the amplitude
of the output signal. The invert message causes codepend~ to perform
complex division of the input spectra rather than multiplication. This
can cause huge amplitude gains. A "pad" message is provided to allow
for empirical amplitude balancing between the normal and "invert" states.
;
#X connect 0 0 1 0;
#X connect 0 0 1 1;
#X connect 2 0 0 1;
#X connect 4 0 3 0;
#X connect 6 0 8 4;
#X connect 8 0 0 0;
#X connect 9 0 11 0;
#X connect 10 0 9 0;
#X connect 11 0 8 3;
#X connect 12 0 8 0;
#X connect 13 0 8 1;
#X connect 14 0 8 2;
#X connect 19 0 20 0;
#X connect 20 0 5 0;
#X connect 20 1 7 0;
#X connect 20 2 15 0;
#X connect 21 0 19 0;
|