#N canvas 228 22 544 508 10; #X obj -112 -350 cnv 15 15 15 empty empty ExMM23f-FFTConvolution1Modif2.pd 0 8 1 14 -262144 -66577 0; #X obj -59 -284 switch~; #N canvas 608 166 228 173 ARGOnOff 0; #X obj 100 100 tgl 18 1 \$0-SendOnOff \$0-ReceiveOnOff On/Off 20 11 1 14 -4033 -1 -1 1 1; #X obj 99 10 loadbang; #X msg 99 33 \; pd dsp 1; #X obj 100 129 outlet; #X text -50 99 Audio On/Off du patch ->; #X text -22 45 Audio General On ->; #X text 107 82 17 3 2010; #X connect 0 0 3 0; #X connect 1 0 2 0; #X coords 0 -1 1 1 65 18 2 100 100; #X restore -59 -302 pd ARGOnOff; #N canvas 413 140 402 279 ARGO 0; #X obj 101 101 cnv 10 95 41 \$0-A \$0-B empty 20 12 0 14 -1 -1 1.04858e+06 ; #X obj 101 109 nbx 4 12 0 1e+37 0 0 \$0 \$0-ReceiveCpuPeak CPUPeak 45 7 1 11 -24198 -1 -24198 36 256; #X obj 101 122 nbx 4 12 0 1e+37 0 0 \$0 \$0-ReceiveCpuMean CPUMean 45 7 1 11 -24198 -1 -24198 34.49 256; #X obj 145 -55 cputime; #X obj 145 -76 t b b; #X text 188 24 (c) musil@iem.kug.ac.at; #X text 230 37 IEM KUG; #X text 78 18 CPU-load; #X obj 144 -125 loadbang; #X text 205 48 graz \, austria 2001; #X obj 145 -100 metro 500; #X obj 145 -34 * 0.2; #X text 237 -88 -dsp-load in %; #X text 228 -101 measure average- and peak-; #X obj 37 18 * 100; #X obj 37 63 int; #X obj 37 41 + 0.499; #X obj 37 86 * 0.01; #N canvas 524 162 422 273 1p1zmodif 0; #X text 134 89 (c) musil@iem.kug.ac.at; #X text 179 99 IEM KUG; #X obj 14 195 +; #X text 151 108 graz \, austria 2001; #X text 135 71 y[n] = a0*x[n] + a1*x[n-1] + b1*y[n-1]; #X text 18 13 x[n]; #X text 16 244 y[n]; #X text 84 111 y[n-1]; #X text 134 56 control-IIR-filter 1.order; #X obj 15 28 inlet; #X obj 14 228 outlet; #X obj 15 112 * 0.1; #X obj 59 156 * 0.9; #X text 139 144 a1 = 0; #X text 139 155 b1 = 0.9; #X text 139 133 a0 = 0.1; #X obj 15 50 t f b; #X text 135 40 Inspiré de 1p1z; #X obj 59 112 f 0; #X connect 2 0 10 0; #X connect 2 0 18 1; #X connect 9 0 16 0; #X connect 11 0 2 0; #X connect 12 0 2 1; #X connect 16 0 11 0; #X connect 16 1 18 0; #X connect 18 0 12 0; #X restore 37 -8 pd 1p1zmodif; #X text 146 9 Inspiré de 5.reference/iemabs/help-dsp.pd; #X text 141 83 25 3 2010; #X connect 3 0 11 0; #X connect 4 0 3 0; #X connect 4 1 3 1; #X connect 8 0 10 0; #X connect 10 0 4 0; #X connect 11 0 18 0; #X connect 11 0 1 0; #X connect 14 0 16 0; #X connect 15 0 17 0; #X connect 16 0 15 0; #X connect 17 0 2 0; #X connect 18 0 14 0; #X coords 0 -1 1 1 97 43 1 100 100; #X restore 314 -248 pd ARGO; #X text -61 -336 On/Off patch; #X text -49 -318 V; #X text -49 -325 |; #X text 288 -300 <- FFT size; #X text 288 -311 <- Taille de la FFT; #N canvas 305 72 638 521 ARGO 0; #X obj 101 101 cnv 10 228 22 empty ColorForm Init-FFT 2 9 1 14 -188398 -1 1.04858e+06; #X obj 155 100 hradio 12 1 1 11 \$0-A ColorForm empty 0 -8 0 10 -188398 -1 -1 5; #X obj 287 100 nbx 5 12 1 99999 0 1 \$0-A ColorForm empty 0 0 1 9 -188398 -1 -1 2048 256; #N canvas 0 22 450 300 (subpatch) 0; #X array \$0-hann 2048 float 0; #X coords 0 0 2047 1 300 100 0; #X restore 50 89 graph; #X obj 158 359 osc~; #X obj 157 380 *~ -0.5; #X obj 157 402 +~ 0.5; #X obj 90 437 tabwrite~ \$0-hann; #X obj 173 230 samplerate~; #X obj 155 255 swap; #X obj 155 279 /; #X obj 155 206 t f b f; #X msg 362 408 resize \$1; #X obj 334 437 s \$0-hann; #X msg 215 327 0; #X text 249 189 64..65536; #X obj 231 378 phasor~; #N canvas 9 234 450 300 (subpatch) 0; #X array \$0-FFTIndex 2048 float 0; #X coords 0 0 2047 1 300 100 0; #X restore 49 117 graph; #X obj 200 437 tabwrite~ \$0-FFTIndex; #X obj 396 437 s \$0-FFTIndex; #X obj 8 437 s \$0-FFTSize; #X obj 191 112 hradio 12 1 1 4 \$0-A ColorForm Overlap -33 6 1 9 -188398 -1 -1 2; #X obj 239 112 nbx 1 12 1 99999 0 1 \$0-A ColorForm empty 0 0 1 9 -188398 -1 -1 4 256; #X obj 482 436 s \$0-FFTOverlap; #X msg 90 385 stop; #X obj 155 302 t b b b b b f; #X obj 155 48 r \$0-SendOnOff; #X obj 155 77 sel 1; #X text 279 82 2 6 2011; #X obj 90 331 delay 2000; #X obj 583 424 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 587 431 pd ??; #X obj 155 138 expr (pow(2 \, $f1 + 6)); #X obj 190 163 expr (pow(2 \, $f1)); #X text 239 208 -> Overlap 1 2 4 8; #X text 161 188 -> window-size; #X obj 48 156 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 399 94 413 273 Help 0; #X obj 8 85 cnv 15 400 80 empty empty empty 20 12 0 14 -233017 -66577 0; #X text 12 87 Citation; #X text 22 2 Init-FFT; #X text 29 106 calculate Hann window table (variable window size); #X text 23 29 Voir Pd-0.42.5-extended ->; #X text 24 41 Pure Data/3.audio.examples/I05.compressor.pd ->; #X text 23 53 pd hann-window; #X text 24 168 L'array \$0-FFTIndex n'est utilise que dans le MM FFT-BrickWallFilter ; #X text 20 216 Si le son d'un MiniModule FFT est haché \, avec Init-FFT grand (65536...) -> Pd-extended -> Preferences -> Audio Settings... -> delay (msec) -> Augmenter; #X restore 55 162 pd Help; #X text 333 106 <- FFT size; #X text 333 95 <- Taille de la FFT; #X obj 92 -54 cnv 15 360 95 empty empty empty 20 12 0 14 -24198 -66577 0; #X text 100 -52 ATTENTION: il faut placer un et un seul MiniModule "Init-FFT" dans un patch contenant 1 ou plusieurs MiniModules FFT. ; #X text 99 -6 CAUTION: it is necessary to place one and only one MiniModule "Init-FFT" in a patch containing 1 or several MiniModules FFT.; #X connect 1 0 32 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 8 0 9 1; #X connect 9 0 10 0; #X connect 9 1 10 1; #X connect 10 0 25 0; #X connect 11 0 9 0; #X connect 11 1 8 0; #X connect 11 2 12 0; #X connect 12 0 13 0; #X connect 12 0 19 0; #X connect 14 0 4 1; #X connect 14 0 16 1; #X connect 16 0 18 0; #X connect 21 0 33 0; #X connect 24 0 18 0; #X connect 24 0 7 0; #X connect 25 0 29 0; #X connect 25 2 7 0; #X connect 25 3 18 0; #X connect 25 4 14 0; #X connect 25 5 16 0; #X connect 25 5 4 0; #X connect 26 0 27 0; #X connect 27 0 1 0; #X connect 29 0 24 0; #X connect 32 0 2 0; #X connect 32 0 20 0; #X connect 32 0 11 0; #X connect 33 0 22 0; #X connect 33 0 23 0; #X coords 0 -1 1 1 230 24 1 100 100; #X restore 57 -303 pd ARGO; #X obj 138 126 dac~ 1 2; #X obj 359 93 cnv 15 48 25 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ??? 0; #X obj -6 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -6 10 cnv 18 300 70 empty empty ARGOPdMiniModules 3 10 1 14 -4033 -1 1.04858e+06; #X obj 13 31 cnv 10 10 10 empty empty Gerard 0 5 1 11 -4033 -1 1.04858e+06 ; #X obj 55 30 cnv 10 10 10 empty empty Paresys 0 5 1 11 -4033 -1 1.04858e+06 ; #X text -1 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 6 43 pddp/pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/ ; #X obj 6 58 pddp/pddplink http://gerard.paresys.free.fr/ARGOPd/; #X obj 46 105 pddp/pddplink http://puredata.info/downloads; #X restore 363 97 pd ???; #N canvas 324 59 331 313 ARGO 0; #X obj 101 101 cnv 20 104 34 empty ColorAmpli empty 20 12 0 14 -261299 -1 1.04858e+06; #X obj 85 285 outlet~; #X obj 134 104 cnv 10 20 10 empty ColorAmpli Ampli 1 5 1 14 -261299 -1 1.04858e+06; #X obj 85 72 inlet~; #X obj 85 260 *~; #X obj 103 118 hsl 101 12 -80 20 0 1 \$0-A ColorAmpli 0 0 7 1 9 -261299 -1 -1 0 0; #X msg -24 161 label \$1; #X obj -25 138 tosymbol; #X obj -25 103 sprintf %ddB; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 131 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X text -16 120 -> -80dB..20dB; #X text 106 182 -> 0.0001..10 = -80dB..20dB; #X text 209 97 5 5 2011; #X obj 100 163 expr (pow(10 \, $f1 / 20)); #X text 107 140 -> -80..20; #X obj 227 270 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 231 277 pd ??; #X obj 100 206 sel 0.0001; #X msg 100 234 0; #X connect 3 0 4 0; #X connect 4 0 1 0; #X connect 5 0 8 0; #X connect 5 0 14 0; #X connect 6 0 5 0; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 14 0 18 0; #X connect 18 0 19 0; #X connect 18 1 4 1; #X connect 19 0 4 1; #X connect 19 0 7 0; #X coords 0 -1 1 1 106 36 1 100 100; #X restore 115 -91 pd ARGO; #N canvas 432 42 314 359 ARGO 0; #X obj 101 101 cnv 30 37 130 empty ColorAmpli empty 20 12 0 14 -1 -258113 0; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 102 108 vu 8 120 \$0-B empty 0 0 1 11 -1 -4034 1 0; #X obj 42 -112 inlet~; #X obj 35 -87 *~; #X obj 35 3 snapshot~; #X obj 35 26 sqrt; #X obj 35 -24 lop~ 10; #X obj 35 50 rmstodb; #X obj 98 -111 loadbang; #X obj 35 73 - 100; #X obj 171 26 sqrt; #X obj 172 50 rmstodb; #X obj 172 73 - 100; #X obj 97 -23 metro 200; #X obj 236 -97 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 300 65 442 264 Help 0; #X obj 12 48 cnv 15 400 150 empty empty empty 20 12 0 14 -233017 -66577 0; #X text 16 50 Citation; #X text 28 67 peakamp~ tracks and outputs the absolute value of the peak amplitude of the incoming signal. It outputs when banged or using its own internal clock. The peak value is reset each time peakamp~ outputs a value.; #X text 17 214 par rapport à la version précédente du MM-Vumetre env~ est remplacé par square~ + lop~ + snapshot~ + sqrt + rmstodb car env~ consomme beaucoup CPU.; #X text 29 123 cyclone library; #X text 28 135 http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html ; #X text 29 155 Voir doc Max/MSP MSP46ReferenceManual.pdf; #X text 18 14 MM-Vumetre; #X restore 243 -91 pd Help; #X obj 261 199 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 265 206 pd ??; #X obj 158 -111 r SendFluid; #X obj 171 -50 cyclone/peakamp~ 1000; #X text 145 106 13 2 2011; #X connect 3 0 4 0; #X connect 3 0 4 1; #X connect 4 0 7 0; #X connect 4 0 20 0; #X connect 5 0 6 0; #X connect 6 0 8 0; #X connect 7 0 5 0; #X connect 8 0 10 0; #X connect 9 0 14 0; #X connect 10 0 2 0; #X connect 11 0 12 0; #X connect 12 0 13 0; #X connect 13 0 2 1; #X connect 14 0 5 0; #X connect 19 0 14 1; #X connect 20 0 11 0; #X coords 0 -1 1 1 39 132 2 100 100; #X restore 230 9 pd ARGO; #N canvas 324 59 331 313 ARGO 0; #X obj 101 101 cnv 20 104 34 empty ColorAmpli empty 20 12 0 14 -261299 -1 1.04858e+06; #X obj 85 285 outlet~; #X obj 134 104 cnv 10 20 10 empty ColorAmpli Ampli 1 5 1 14 -261299 -1 1.04858e+06; #X obj 85 72 inlet~; #X obj 85 260 *~; #X obj 103 118 hsl 101 12 -80 20 0 1 \$0-A ColorAmpli 0 0 7 1 9 -261299 -1 -1 0 0; #X msg -24 161 label \$1; #X obj -25 138 tosymbol; #X obj -25 103 sprintf %ddB; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 131 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X text -16 120 -> -80dB..20dB; #X text 106 182 -> 0.0001..10 = -80dB..20dB; #X text 209 97 5 5 2011; #X obj 100 163 expr (pow(10 \, $f1 / 20)); #X text 107 140 -> -80..20; #X obj 227 270 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 231 277 pd ??; #X obj 100 206 sel 0.0001; #X msg 100 234 0; #X connect 3 0 4 0; #X connect 4 0 1 0; #X connect 5 0 8 0; #X connect 5 0 14 0; #X connect 6 0 5 0; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 14 0 18 0; #X connect 18 0 19 0; #X connect 18 1 4 1; #X connect 19 0 4 1; #X connect 19 0 7 0; #X coords 0 -1 1 1 106 36 1 100 100; #X restore 235 -92 pd ARGO; #N canvas 324 59 331 313 ARGO 0; #X obj 101 101 cnv 20 104 34 empty ColorAmpli empty 20 12 0 14 -261299 -1 1.04858e+06; #X obj 85 285 outlet~; #X obj 134 104 cnv 10 20 10 empty ColorAmpli Ampli 1 5 1 14 -261299 -1 1.04858e+06; #X obj 85 72 inlet~; #X obj 85 260 *~; #X obj 103 118 hsl 101 12 -80 20 0 1 \$0-A ColorAmpli 0 0 7 1 9 -261299 -1 -1 0 0; #X msg -24 161 label \$1; #X obj -25 138 tosymbol; #X obj -25 103 sprintf %ddB; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 131 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X text -16 120 -> -80dB..20dB; #X text 106 182 -> 0.0001..10 = -80dB..20dB; #X text 209 97 5 5 2011; #X obj 100 163 expr (pow(10 \, $f1 / 20)); #X text 107 140 -> -80..20; #X obj 227 270 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 231 277 pd ??; #X obj 100 206 sel 0.0001; #X msg 100 234 0; #X connect 3 0 4 0; #X connect 4 0 1 0; #X connect 5 0 8 0; #X connect 5 0 14 0; #X connect 6 0 5 0; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 14 0 18 0; #X connect 18 0 19 0; #X connect 18 1 4 1; #X connect 19 0 4 1; #X connect 19 0 7 0; #X coords 0 -1 1 1 106 36 1 100 100; #X restore -110 -95 pd ARGO; #X obj 249 -249 adc~ 1 2; #N canvas 434 93 718 469 ARGO 0; #X obj 368 103 cnv 10 20 10 empty empty Play 1 5 1 14 -262144 -1 1.04858e+06 ; #X obj 101 130 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 82 450 outlet~; #X obj -13 64 openpanel; #X msg 212 378 1; #X msg 137 330 0; #X msg 34 115 set \$1; #X msg 58 379 open \$1; #X obj 197 291 t b b; #X msg 167 378 set 0; #X obj 175 233 sel 1 0; #X obj 246 258 sel 1; #X msg 117 379 set 1; #X obj 251 6 key; #X obj 251 58 select 32; #X obj 42 7 loadbang; #X obj 168 410 readsf~ 2; #X obj 151 100 tgl 12 1 \$0-A \$0-B Play(Space) 14 6 1 9 -262144 -1 -1 0 1; #X obj 311 100 bng 12 250 50 0 \$0-A \$0-B Stop 14 6 1 9 -262144 -1 -1; #X obj 249 100 tgl 12 1 \$0-A \$0-B Loop 15 6 1 9 -262144 -1 -1 0 1 ; #X obj 54 236 list2symbol; #X obj 100 100 bng 12 250 50 0 \$0-A \$0-B empty 14 6 1 9 -262144 -1 -1; #X obj 196 330 delay 5; #X obj 101 6 inlet~; #X obj 101 58 threshold~ 0.5 5 0.49 5; #X obj 101 100 cnv 2 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 102 101 cnv 2 8 2 empty empty empty 20 12 0 14 -262144 -66577 0; #X text 75 81 Trig Decl; #X obj 106 113 hradio 14 1 0 20 empty empty empty 0 6 0 8 -260097 -260097 -260097 0; #X obj -13 42 bang; #X text 401 110 <- Click the name to change; #X symbolatom 101 113 49 0 0 0 - - -; #X obj 49 170 cnv 15 400 50 empty empty empty 20 12 0 14 -260097 -66577 0; #X text 51 169 Nom du fichier / File name; #X text 451 178 <- Ajouter ../ devant le nom du fichier \; pour remonter d'un dossier; #X obj 570 45 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 309 46 564 575 Help 0; #X obj 9 -296 cnv 15 400 100 empty empty empty 20 12 0 14 -233017 -66577 0; #X text 12 -297 Citation; #X obj 8 -51 cnv 15 550 310 empty empty empty 20 12 0 14 -258113 -66577 0; #X text 20 -44 - Ne lit pas un fichier au format mp3 \, SoundDesigner II (.SDII ou .SD2); #X text 23 56 Solution: ouvrir puis sauver le fichier au format aiff avec Audacity; #X text 36 43 error: dsp: xxx.aiff: unknown or bad header format; #X text 31 -281 READSF~ - read a soundfile; #X text 30 -263 The wave \, aiff \, and nextstep formats are parsed automatically \, although only 2- 3- and 4- byte samples are accepted (4 bytes implies floating point and is not available in aiff format.) ; #X text 13 -189 - Si le Patch est sauvé avec 1 Player contenant un nom de fichier Audio \, ce fichier sera lu automatiquement à la prochaine ouverture s'il n'a pas changé d'emplacement.; #X text 191 206 If the sample rate of pd is set to 44100 \, files having the sample rates of 44100 are correctly played \, other files will be transposed.; #X text 193 179 WARNING The sample rate of the output depends on the system sample rate of pd:; #X text 21 95 - ATTENTION Le taux d'échantillonnage de la lecture du fichier dépends du taux d'échantillonnage de Pd.; #X text 33 122 Si le taux d'échantillonnage de Pd est de 44100 (Menu Preferences -> Audio Settings...) \, les fichiers échantillonnés à 44100 Hz sont lus correctement \, sinon ils sont transposés.; #X text 12 -143 - Peut Ouvrir automatiquement 1 fichier qui se trouve dans le même dossier que lui \, quelquesoit l'emplacement du dossier. Pour cela ouvrir le module et taper le nom du fichier (sans chemin d'accés) dans le message. Le dossier contenant le patch et le fichier Audio est ainsi transportable.; #X text 21 4 - Ne lit pas un fichier au format aiff "Entier petit boutien" comme les pistes d'un CD Audio copiées avec le finder du Mac. Le message d'erreur s'affichent:; #X text 8 -434 MM Audio-Play; #X text 18 -404 Le canal 2 d'un fichier Audio Stereo est mélangé au canal 1; #X text 18 -390 Les canaux 3 \, 4... d'un fichier Audio de plus de 2 canaux ne sont pas lus.; #X text 197 -328 Channels 3 \, 4... of an Audio file of more than 2 channels are not read.; #X text 197 -342 Channel 2 of a Stereo Audio file is mixed with channel 1; #X text 19 -418 Lit un fichier Audio Mono (1 canal) au format aiff \, wav.; #X text 198 -357 Reads a Mono Audio file (1 channel) with aiff \, wav format..; #X restore 577 51 pd Help; #X obj 639 434 cnv 15 48 25 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ??? 0; #X obj -6 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -6 10 cnv 18 300 70 empty empty ARGOPdMiniModules 3 10 1 14 -4033 -1 1.04858e+06; #X obj 13 31 cnv 10 10 10 empty empty Gerard 0 5 1 11 -4033 -1 1.04858e+06 ; #X obj 55 30 cnv 10 10 10 empty empty Paresys 0 5 1 11 -4033 -1 1.04858e+06 ; #X text -1 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 6 43 pddp/pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/ ; #X obj 6 58 pddp/pddplink http://gerard.paresys.free.fr/ARGOPd/; #X obj 46 105 pddp/pddplink http://puredata.info/downloads; #X restore 643 438 pd ???; #X obj 246 232 f; #X obj 174 142 f; #X obj -12 84 t b b s; #X obj 388 122 bng 12 50 20 0 \$0-A \$0-B empty 14 6 1 9 -262144 -1 -1; #X obj 389 130 cnv 4 10 4 empty empty empty 20 12 0 14 -260097 -66577 0; #X obj 383 434 cnv 15 240 24 empty empty empty 20 12 0 14 -261682 -66577 0; #X text 433 432 -> Bang à la fin du fichier; #X text 434 442 -> Bang at the end of the file; #X obj 388 438 outlet; #X text 340 83 4 11 2011; #X msg 53 188 /Fichier/UPA/Sillon-Vinyl-RepRap-2012/17-4-2013/Son8.wav ; #X connect 3 0 41 0; #X connect 4 0 16 0; #X connect 5 0 16 0; #X connect 6 0 49 0; #X connect 7 0 16 0; #X connect 8 0 22 0; #X connect 8 1 49 0; #X connect 9 0 17 0; #X connect 10 0 8 0; #X connect 10 1 9 0; #X connect 10 1 5 0; #X connect 11 0 21 0; #X connect 12 0 17 0; #X connect 13 0 14 0; #X connect 14 0 17 0; #X connect 15 0 49 0; #X connect 16 0 2 0; #X connect 16 1 2 0; #X connect 16 2 9 0; #X connect 16 2 39 0; #X connect 16 2 42 0; #X connect 17 0 40 0; #X connect 18 0 5 0; #X connect 18 0 9 0; #X connect 19 0 39 1; #X connect 20 0 31 0; #X connect 20 0 7 0; #X connect 21 0 8 0; #X connect 22 0 4 0; #X connect 22 0 12 0; #X connect 23 0 24 0; #X connect 24 0 21 0; #X connect 28 0 29 0; #X connect 29 0 3 0; #X connect 39 0 11 0; #X connect 40 0 10 0; #X connect 41 0 40 0; #X connect 41 1 49 0; #X connect 41 2 6 0; #X connect 42 0 47 0; #X connect 49 0 20 0; #X coords 0 -1 1 1 300 35 2 100 100; #X restore -65 -266 pd ARGO; #N canvas 416 45 303 292 ARGO 0; #X obj 84 251 outlet~; #X obj 84 56 inlet~; #X obj 101 101 cnv 12 93 15 empty ColorAmpli Tanh 48 9 1 14 -261299 -1 1.04858e+06; #X obj 101 112 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 84 204 cyclone/tanh~; #X obj 14 57 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 265 68 411 318 Help 0; #X obj -4 -8 cnv 15 400 290 empty empty empty 20 12 0 14 -233017 -66577 0; #X text -1 -9 Citation; #X text 15 17 cyclone library; #X text 15 29 calculate hyperbolic tangent function; #X text 15 6 tanh~; #X obj 15 129 pddplink http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html ; #X text 15 151 cf doc Max/MSP -> MSP46ReferenceManual.pdf; #X text 15 77 outputs signal values always between -1 and 1; #X text 15 97 turn a sine wave into a square wave by cranking up the volume!; #X text 15 46 can be used to simulate analog distortion \, and is much "smoother" than using clip~; #X restore 21 63 pd Help; #X obj 184 112 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 184 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 177 251 outlet~; #X obj 177 56 inlet~; #X obj 177 204 cyclone/tanh~; #X obj 241 256 cnv 15 48 25 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ??? 0; #X obj -6 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -6 10 cnv 18 300 70 empty empty ARGOPdMiniModules 3 10 1 14 -4033 -1 1.04858e+06; #X obj 13 31 cnv 10 10 10 empty empty Gerard 0 5 1 11 -4033 -1 1.04858e+06 ; #X obj 55 30 cnv 10 10 10 empty empty Paresys 0 5 1 11 -4033 -1 1.04858e+06 ; #X text -1 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 6 43 pddp/pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/ ; #X obj 6 58 pddp/pddplink http://gerard.paresys.free.fr/ARGOPd/; #X obj 46 105 pddp/pddplink http://puredata.info/downloads; #X restore 245 260 pd ???; #X text 205 100 25 1 2012; #X obj 84 178 *~; #X obj 116 103 tgl 12 1 \$0-A \$0-B On 15 6 1 10 -262144 -1 -1 1 1 ; #X obj 117 143 == 0; #X obj 177 179 *~; #X obj 56 178 *~; #X obj 209 180 *~; #X connect 1 0 16 0; #X connect 1 0 20 0; #X connect 5 0 0 0; #X connect 11 0 19 0; #X connect 11 0 21 0; #X connect 12 0 10 0; #X connect 16 0 5 0; #X connect 17 0 16 1; #X connect 17 0 18 0; #X connect 17 0 19 1; #X connect 18 0 20 1; #X connect 18 0 21 1; #X connect 19 0 12 0; #X connect 20 0 0 0; #X connect 21 0 10 0; #X coords 0 -1 1 1 95 17 2 100 100; #X restore 143 -9 pd ARGO; #N canvas 432 42 314 359 ARGO 0; #X obj 101 101 cnv 30 37 130 empty ColorAmpli empty 20 12 0 14 -1 -258113 0; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 102 108 vu 8 120 \$0-B empty 0 0 1 11 -1 -4034 1 0; #X obj 42 -112 inlet~; #X obj 35 -87 *~; #X obj 35 3 snapshot~; #X obj 35 26 sqrt; #X obj 35 -24 lop~ 10; #X obj 35 50 rmstodb; #X obj 98 -111 loadbang; #X obj 35 73 - 100; #X obj 171 26 sqrt; #X obj 172 50 rmstodb; #X obj 172 73 - 100; #X obj 97 -23 metro 200; #X obj 236 -97 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 300 65 442 264 Help 0; #X obj 12 48 cnv 15 400 150 empty empty empty 20 12 0 14 -233017 -66577 0; #X text 16 50 Citation; #X text 28 67 peakamp~ tracks and outputs the absolute value of the peak amplitude of the incoming signal. It outputs when banged or using its own internal clock. The peak value is reset each time peakamp~ outputs a value.; #X text 17 214 par rapport à la version précédente du MM-Vumetre env~ est remplacé par square~ + lop~ + snapshot~ + sqrt + rmstodb car env~ consomme beaucoup CPU.; #X text 29 123 cyclone library; #X text 28 135 http://suita.chopin.edu.pl/~czaja/miXed/externs/cyclone.html ; #X text 29 155 Voir doc Max/MSP MSP46ReferenceManual.pdf; #X text 18 14 MM-Vumetre; #X restore 243 -91 pd Help; #X obj 261 199 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 265 206 pd ??; #X obj 158 -111 r SendFluid; #X obj 171 -50 cyclone/peakamp~ 1000; #X text 145 106 13 2 2011; #X connect 3 0 4 0; #X connect 3 0 4 1; #X connect 4 0 7 0; #X connect 4 0 20 0; #X connect 5 0 6 0; #X connect 6 0 8 0; #X connect 7 0 5 0; #X connect 8 0 10 0; #X connect 9 0 14 0; #X connect 10 0 2 0; #X connect 11 0 12 0; #X connect 12 0 13 0; #X connect 13 0 2 1; #X connect 14 0 5 0; #X connect 19 0 14 1; #X connect 20 0 11 0; #X coords 0 -1 1 1 39 132 2 100 100; #X restore 242 9 pd ARGO; #N canvas 324 59 331 313 ARGO 0; #X obj 101 101 cnv 20 104 34 empty ColorAmpli empty 20 12 0 14 -261299 -1 1.04858e+06; #X obj 85 285 outlet~; #X obj 134 104 cnv 10 20 10 empty ColorAmpli Ampli 1 5 1 14 -261299 -1 1.04858e+06; #X obj 85 72 inlet~; #X obj 85 260 *~; #X obj 103 118 hsl 101 12 -80 20 0 1 \$0-A ColorAmpli 0 0 7 1 9 -261299 -1 -1 0 0; #X msg -24 161 label \$1; #X obj -25 138 tosymbol; #X obj -25 103 sprintf %ddB; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 131 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X text -16 120 -> -80dB..20dB; #X text 106 182 -> 0.0001..10 = -80dB..20dB; #X text 209 97 5 5 2011; #X obj 100 163 expr (pow(10 \, $f1 / 20)); #X text 107 140 -> -80..20; #X obj 227 270 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 231 277 pd ??; #X obj 100 206 sel 0.0001; #X msg 100 234 0; #X connect 3 0 4 0; #X connect 4 0 1 0; #X connect 5 0 8 0; #X connect 5 0 14 0; #X connect 6 0 5 0; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 14 0 18 0; #X connect 18 0 19 0; #X connect 18 1 4 1; #X connect 19 0 4 1; #X connect 19 0 7 0; #X coords 0 -1 1 1 106 36 1 100 100; #X restore 3 -92 pd ARGO; #N canvas 409 92 382 253 ARGO 0; #X obj 101 101 cnv 10 164 34 empty ColorForm FFT-Morphing 62 9 1 14 -188398 -1 1.04858e+06; #X obj 101 131 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 103 118 hsl 161 12 0 100 0 1 \$0-A ColorTime 0 0 7 1 9 -208064 -1 -1 0 0; #X msg 10 157 label \$1; #X obj 10 134 tosymbol; #X obj 10 111 sprintf %d; #X obj 87 55 inlet~; #X obj 86 190 outlet~; #X obj 13 -37 cnv 15 360 70 empty empty empty 20 12 0 14 -24198 -66577 0; #X obj 11 56 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 473 261 414 317 Help 0; #X obj 5 60 cnv 15 400 200 empty empty empty 20 12 0 14 -233017 -66577 0; #X text 9 62 Citation; #X text 19 140 fft a and b. overwrite the amp/phase pairs of the source (a) with the pairs of the destination (b) where the amplitude is lower than the threshhold (...higher if method "mfirst" is used.). ifft; #X text 160 95 4/2011 martin brinkmann; #X text 25 77 spectral-xfade effect (same as my vstplugin with the same name); #X text 9 0 Reference & inspiration: Martin Brinkmann; #X obj 27 14 pddp/pddplink http://www.martin-brinkmann.de/pd-patches.html ; #X text 41 27 -> my instruments (09/2011) -> morf2.pd; #X text 87 -15 = Effet de fondu entre 2 spectres; #X text 21 116 spectral morphing (mixing) effect; #X text 9 -28 FFT-Morphing = Spectral-xfade effect; #X restore 18 62 pd Help; #X obj 124 106 tgl 12 1 \$0-A \$0-B <-> 15 6 1 12 -208064 -1 -1 0 1 ; #X obj 245 53 inlet~; #X obj 255 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 312 178 cnv 15 48 25 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ??? 0; #X obj -6 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -6 10 cnv 18 300 70 empty empty ARGOPdMiniModules 3 10 1 14 -4033 -1 1.04858e+06; #X obj 13 31 cnv 10 10 10 empty empty Gerard 0 5 1 11 -4033 -1 1.04858e+06 ; #X obj 55 30 cnv 10 10 10 empty empty Paresys 0 5 1 11 -4033 -1 1.04858e+06 ; #X text -1 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 6 43 pddp/pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/ ; #X obj 6 58 pddp/pddplink http://gerard.paresys.free.fr/ARGOPd/; #X obj 46 105 pddp/pddplink http://puredata.info/downloads; #X restore 316 182 pd ???; #X text 19 -33 ATTENTION: Ce MiniModule FFT ne fonctionne que si un miniModule Init-FFT est présent dans le même patch; #X text 20 -3 WARNING: this MiniModule FFT functions only if a miniModule Init-FFT is present in the same patch; #X text 271 110 17 1 2012; #N canvas 190 22 623 540 FFT-Morphing 0; #X obj -173 78 *~; #X obj -172 32 inlet~; #X obj -160 468 *~; #X obj -160 517 outlet~; #X obj -126 33 tabreceive~ \$0-hann; #X obj -160 492 *~; #X text -132 492 Normalize; #X obj 272 514 switch~ 1024 4 1; #X msg 364 285 0; #X msg 225 284 1; #X text 224 16 64..65536; #X obj 225 32 r \$0-FFTSize; #X obj 246 201 /; #X obj 225 142 t b b f f f b; #X obj 313 33 r \$0-FFTOverlap; #X text 330 15 1 2 4 8; #X obj 283 240 pack 1 2; #X msg 272 284 set \$1 \$2 1; #X obj 313 142 t b b f b; #X msg 232 175 1; #X obj 56 32 inlet; #X obj -175 201 rfft~; #X obj -52 192 rfft~; #X obj -160 443 rifft~; #X obj -206 356 *~; #X obj -169 233 abs~; #X obj -78 364 *~; #X obj -38 298 abs~; #X obj -156 351 *~; #X obj -20 362 *~; #X obj 140 31 inlet; #X obj -39 327 expr~ (($v1<$v2)*$f3)+(($v1>$v2)*$f4); #X obj 118 154 == 0; #X text 56 3 xfade; #X obj -170 262 expr~ (($v1>$v2)*$f3)+(($v1<$v2)*$f4); #X text 119 14 method (0/1); #X obj -28 81 *~; #X obj -2 33 inlet~; #X obj 3 80 expr (pow(10000 \, $f1/100)-1)/10; #X text 53 14 0..100; #X text -157 16 a; #X text 13 16 b; #X connect 0 0 21 0; #X connect 1 0 0 0; #X connect 2 0 5 0; #X connect 4 0 0 1; #X connect 4 0 36 1; #X connect 4 0 2 1; #X connect 5 0 3 0; #X connect 8 0 7 0; #X connect 9 0 7 0; #X connect 11 0 13 0; #X connect 12 0 5 1; #X connect 13 0 9 0; #X connect 13 1 19 0; #X connect 13 2 12 1; #X connect 13 4 16 0; #X connect 13 5 8 0; #X connect 14 0 18 0; #X connect 16 0 17 0; #X connect 17 0 7 0; #X connect 18 0 9 0; #X connect 18 1 16 0; #X connect 18 2 16 1; #X connect 18 3 8 0; #X connect 19 0 12 0; #X connect 20 0 38 0; #X connect 21 0 24 0; #X connect 21 0 25 0; #X connect 21 1 28 0; #X connect 22 0 27 0; #X connect 22 0 26 0; #X connect 22 1 29 0; #X connect 23 0 2 0; #X connect 24 0 23 0; #X connect 25 0 34 0; #X connect 26 0 23 0; #X connect 27 0 31 0; #X connect 28 0 23 1; #X connect 29 0 23 1; #X connect 30 0 32 0; #X connect 30 0 31 3; #X connect 30 0 34 3; #X connect 31 0 26 1; #X connect 31 0 29 1; #X connect 32 0 34 2; #X connect 32 0 31 2; #X connect 34 0 24 1; #X connect 34 0 28 1; #X connect 36 0 22 0; #X connect 37 0 36 0; #X connect 38 0 31 1; #X connect 38 0 34 1; #X restore 86 157 pd FFT-Morphing; #X connect 3 0 6 0; #X connect 3 0 20 2; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 7 0 20 0; #X connect 12 0 20 3; #X connect 13 0 20 1; #X connect 20 0 8 0; #X coords 0 -1 1 1 166 36 1 100 100; #X restore 75 -206 pd ARGO; #N canvas 362 47 318 207 ARGO 0; #X obj 101 101 cnv 20 148 46 empty ColorForm PitchShift 50 9 1 14 -188398 -1 1.04858e+06; #X obj 101 143 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 90 50 inlet~; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 90 184 outlet~; #X obj 19 112 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 345 36 418 512 Help 0; #X obj 8 36 cnv 15 400 360 empty empty empty 20 12 0 14 -233017 -66577 0; #X text 11 38 Citation; #X text 310 10 = Transposition; #X text 8 13 PitchShift = Pitch shifting = Décalage en hauteur; #X text 28 54 Voir: /doc/3.audio.examples/G09.pitchshift.pd; #X text 26 314 The Theory and Technique of Electronic Music; #X text 26 303 Voir:; #X text 27 327 Miller Puckette; #X text 48 341 7.9 Pitchshifting page 202; #X text 71 353 Pitch shifter page 218; #X obj 27 368 pddplink http://crca.ucsd.edu/%7Emsp/techniques/latest/book.pdf ; #X text 26 71 This is a classic rotating-tape-head style pitch shifter using the vd~ variable delay object. Ther are two moving tape heads \, each of which is loudest at the middle of its trajectory \, and enveloped out at the moment it has to jump back (or forward) to start another scratch. Most of the brain work is in computing how fast the tape heads have to move to get the desired transposition.; #X text 25 170 The "window size" is the total trajectory of the read points in the delay line \, in milliseconds. The delay times are controlled by a phasor~ object. The second delay time \, 180 degrees out of phase from the first one \, is computed using the "wrap" object.; #X text 25 243 The cos~ objects compute the fadein and fadeout of the two delay line outputs. They each traverse the positive half of the cosine waveform (phase -0.25 to +0.25) over the time the phase goes from one end to the other.; #X text 7 431 Cela evite de devoir nommer la "delay line".; #X text 6 448 Le MiniModule est ainsi duplicable et peux être présent à 2 exemplaires dans un même patch.; #X text 7 400 (delwrite~ G09-del 5000) + (vd~ G09-del) est remplacé par (cyclone/comb~ 5000 0 0 1 0).; #X restore 26 118 pd Help; #X obj 249 164 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 392 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 253 171 pd ??; #X obj 103 118 hsl 145 12 -36 36 0 1 \$0-A ColorTime 0semitone 0 7 1 9 -208064 -1728 -1 7200 0; #X obj 239 101 cnv 4 10 4 empty empty empty 20 12 0 14 -260097 -66577 0; #N canvas 484 315 248 174 label 0; #X obj 46 76 outlet; #X obj 46 -70 inlet; #X msg 46 42 label \$1; #X obj 46 20 tosymbol; #X obj 46 -14 sprintf %ssemitone; #X obj 46 -43 expr (int(100 * $f1) / 100) \;; #X connect 1 0 5 0; #X connect 2 0 0 0; #X connect 3 0 2 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X restore 257 108 pd label; #X obj 149 47 cnv 15 100 24 empty empty empty 20 12 0 14 -261682 -66577 0; #X text 149 44 Nombre ->; #X text 149 54 Number ->; #X obj 209 50 inlet; #X obj 103 130 hsl 145 12 1 1000 1 1 \$0-A ColorTime 31ms 0 7 1 9 -208064 -1728 -1 7200 0; #N canvas 795 278 161 155 label 0; #X obj 46 76 outlet; #X obj 46 -43 inlet; #X msg 46 42 label \$1; #X obj 46 20 tosymbol; #X obj 46 -14 sprintf %dms; #X connect 1 0 4 0; #X connect 2 0 0 0; #X connect 3 0 2 0; #X connect 4 0 3 0; #X restore 257 138 pd label; #N canvas 339 115 459 487 PitchShift 0; #X obj 44 35 inlet~; #X obj 164 460 outlet~; #X obj 109 32 inlet; #X obj 268 33 inlet; #X obj 89 324 *~; #X obj 268 159 line~; #X obj 268 133 pack 0 200; #X obj 109 75 exp; #X obj 71 192 /; #X obj 210 135 * 0.001; #X obj 7 398 cos~; #X obj 19 425 *~; #X obj 238 291 wrap~; #X obj 322 326 *~; #X obj 238 398 cos~; #X obj 250 425 *~; #X obj 210 162 t b f; #X obj 238 264 +~ 0.5; #X obj 7 341 -~ 0.5; #X obj 7 369 *~ 0.5; #X obj 238 334 -~ 0.5; #X obj 238 369 *~ 0.5; #X obj 71 139 - 1; #X obj 109 54 * 0.05776; #X obj 71 160 * -1; #X text 94 16 (halftones); #X text 106 185 tape head; #X obj 71 220 phasor~; #X obj 268 78 max 1; #X text 107 198 rotation freq; #X text 90 3 transposition; #X text 242 10 window (msec); #X msg 321 163 clear; #X obj 51 398 cyclone/comb~ 5000 0 0 1 0; #X obj 284 398 cyclone/comb~ 5000 0 0 1 0; #X text 111 91 <- speed change; #X obj 89 369 +~ 2; #X obj 322 369 +~ 2; #X connect 0 0 33 0; #X connect 0 0 34 0; #X connect 2 0 23 0; #X connect 3 0 28 0; #X connect 4 0 36 0; #X connect 5 0 4 1; #X connect 5 0 13 1; #X connect 6 0 5 0; #X connect 7 0 22 0; #X connect 8 0 27 0; #X connect 9 0 16 0; #X connect 10 0 11 0; #X connect 11 0 1 0; #X connect 12 0 13 0; #X connect 12 0 20 0; #X connect 13 0 37 0; #X connect 14 0 15 0; #X connect 15 0 1 0; #X connect 16 0 8 0; #X connect 16 1 8 1; #X connect 17 0 12 0; #X connect 18 0 19 0; #X connect 19 0 10 0; #X connect 20 0 21 0; #X connect 21 0 14 0; #X connect 22 0 24 0; #X connect 23 0 7 0; #X connect 24 0 8 0; #X connect 27 0 4 0; #X connect 27 0 18 0; #X connect 27 0 17 0; #X connect 28 0 9 0; #X connect 28 0 6 0; #X connect 32 0 33 0; #X connect 32 0 34 0; #X connect 33 0 11 1; #X connect 34 0 15 1; #X connect 36 0 33 1; #X connect 37 0 34 1; #X restore 90 156 pd PitchShift; #X text 181 29 -36..+36 semitones; #X text 122 82 11 5 2011; #X connect 2 0 18 0; #X connect 9 0 11 0; #X connect 9 0 18 1; #X connect 11 0 9 0; #X connect 15 0 9 0; #X connect 16 0 17 0; #X connect 16 0 18 2; #X connect 17 0 16 0; #X connect 18 0 4 0; #X coords 0 -1 1 1 150 48 1 100 100; #X restore 75 -164 pd ARGO; #N canvas 284 45 384 322 ARGO 0; #X obj 101 101 cnv 20 130 66 empty ColorForm empty 20 12 0 14 -188398 -1 1.04858e+06; #X obj 162 104 cnv 10 40 10 empty ColorForm Freeverb 1 5 1 14 -188398 -1 1.04858e+06; #X obj 101 163 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 221 163 cnv 4 10 4 empty empty empty 0 0 0 9 -1 -66577 0; #X obj 87 74 inlet~; #X obj 211 74 inlet~; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 89 296 outlet~; #X obj 188 295 outlet~; #X obj 221 101 cnv 4 10 4 empty empty empty 0 0 0 9 -1 -66577 0; #X obj 103 126 hsl 127 12 0 1 0 1 \$0-A ColorForm Brill 0 7 1 9 -188398 -1 -1 6700 0; #X obj 103 114 hsl 127 12 0 1 0 1 \$0-A ColorForm Size 0 7 1 9 -188398 -1 -1 10600 0; #X obj 103 150 hsl 127 12 0 1 0 1 \$0-A ColorAmpli Dir 0 7 1 9 -261299 -1 -1 6900 0; #X obj 103 138 hsl 127 12 0 1 0 1 \$0-A ColorAmpli Stereo 0 7 1 9 -261299 -1 -1 11100 0; #X obj 89 264 freeverb~; #X msg -120 188 roomsize \$1; #X msg -41 188 damping \$1; #X msg 31 188 width \$1; #X msg 100 187 wet \$1; #X msg 149 227 dry \$1; #X obj 148 187 - 1; #X obj 148 207 * -1; #X obj -120 145 * 1.1; #X obj -40 144 * -2.3; #X obj -40 165 + 2.3; #X msg 190 186 freeze \$1; #X obj 117 102 tgl 12 1 \$0-A \$0-B Freeze 14 7 1 9 -262144 -1 -1 0 1; #X obj -10 90 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 381 103 ? 0; #X obj 5 49 cnv 15 370 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X text 6 65 Voir/Look at: http://puredata.info/downloads; #X obj 4 12 cnv 18 370 30 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 7 31 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 38 31 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 175 20 cnv 10 10 10 empty empty http://pagesperso-orange.fr/Paresys/ARGOPd/ 0 5 1 9 -4033 -1 1.04858e+06; #X obj 175 31 cnv 10 10 10 empty empty http://gerard.paresys.free.fr/ARGOPd/ 0 5 1 9 -4033 -1 1.04858e+06; #X text 6 51 Construit sous / Build under Pd 0.41.4-extended; #X restore -3 96 pd ?; #X obj -82 89 cnv 15 60 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 584 107 469 218 Help 0; #X obj -164 -103 cnv 15 440 180 empty empty empty 20 12 0 14 -228856 -66577 0; #X text -161 -103 Citation; #X text -154 -13 "freeverb~ is a simple implementation of the standard Schroeder/Moorer reverb model. It uses 8 comb filters in parallel on both channels. It then feeds the result of the reverb through 4 allpass filters in series on both channels. These "smooth" the sound. The filters on the right channel are slightly detuned compared to the left channel in order to create a stereo effect."; #X text -155 -90 freeverb~ version 1.2 - reverb external for Pure Data and Max/MSP written by Olaf Matthes - based on Freeverb \, the free \, studio-quality reverb SOURCE CODE in the public domain. Written by Jezar at Dreampoint - http://www.dreampoint.co.uk This software is published under GPL terms \, see file LICENSE.; #X restore -75 96 pd Help; #X text 138 83 11 1 2010; #X connect 4 0 14 0; #X connect 5 0 14 1; #X connect 10 0 23 0; #X connect 11 0 22 0; #X connect 12 0 20 0; #X connect 12 0 18 0; #X connect 13 0 17 0; #X connect 14 0 7 0; #X connect 14 1 8 0; #X connect 15 0 14 0; #X connect 16 0 14 0; #X connect 17 0 14 0; #X connect 18 0 14 0; #X connect 19 0 14 0; #X connect 20 0 21 0; #X connect 21 0 19 0; #X connect 22 0 15 0; #X connect 23 0 24 0; #X connect 24 0 16 0; #X connect 25 0 14 0; #X connect 26 0 25 0; #X coords 0 -1 1 1 132 68 1 100 100; #X restore -38 -26 pd ARGO; #N canvas 286 45 604 224 ARGO 0; #X obj 239 36 inlet~; #X text 77 17 Left input; #X text 224 17 Right input; #X text -270 21 Stereo wav file format recorder; #X text -270 36 Enregistreur de fichier audio wav à 2 canaux (stereo) ; #X obj 88 36 inlet~; #X obj 171 198 writesf~ 2; #X text -270 51 L'extension .wav est ajoutée au nom du fichier automatiquement ; #X obj 103 100 hsl 161 17 0 127 0 0 \$0-A \$0-B Record 103 10 1 14 -261299 -261299 -1 0 1; #X obj 255 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 112 100 nbx 4 17 0 9999 0 0 \$0-A ColorTime sec 59 9 1 15 -208064 -1 -1 2091 256; #X obj 282 181 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 286 188 pd ??; #X text -271 87 Clic n'importe où pour commencer un enregistrement Audio -> Clic encore pour arrêter l'enregistrement; #X text -170 114 Click anywhere to start recording Audio ->; #X text -171 126 Click again to stop recording; #X text 121 122 Hslider caché transformé en bouton; #X text 160 81 6 2 2011; #N canvas 415 66 351 399 record2 0; #X obj 136 95 sel 0 1; #X msg 171 260 start; #X msg 107 259 stop; #X msg 155 150 open \$1; #X obj 155 126 savepanel; #X obj 165 203 delay 1000; #X obj 245 323 float; #X obj 291 322 + 1; #X obj 223 295 metro 1000; #X msg 291 296 -1; #X msg 11 257 0; #X msg 42 257 1; #X obj 66 210 t b b; #X obj 165 229 t b b b b; #N canvas 317 143 290 366 CouleurRecord2 0; #X obj 122 -19 +; #X obj 122 37 +; #X obj 61 -75 * -65536; #X obj 117 -75 * -256; #X obj 163 -77 * -1; #X obj 122 68 - 1; #X obj 115 -202 inlet; #X text 77 -97 R; #X text 123 -99 G; #X text 172 -98 B; #X obj 122 123 outlet; #X text 170 -169 Rouge; #X msg 134 -121 255; #X msg 167 -121 0; #X obj 115 -178 sel 0 1; #X text 56 -170 Rose; #X msg 73 -121 200; #X msg 40 -121 252; #X obj 134 -148 t b b b; #X msg 198 -121 0; #X msg 104 -121 200; #X obj 40 -148 t b b b; #X msg 122 96 color \$1 \$1 -1; #X connect 0 0 1 1; #X connect 1 0 5 0; #X connect 2 0 1 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 22 0; #X connect 6 0 14 0; #X connect 12 0 2 0; #X connect 13 0 3 0; #X connect 14 0 21 0; #X connect 14 1 18 0; #X connect 16 0 3 0; #X connect 17 0 2 0; #X connect 18 0 12 0; #X connect 18 1 13 0; #X connect 18 2 19 0; #X connect 19 0 4 0; #X connect 20 0 4 0; #X connect 21 0 17 0; #X connect 21 1 16 0; #X connect 21 2 20 0; #X connect 22 0 10 0; #X restore 25 326 pd CouleurRecord2; #X obj 136 75 tgl 15 0 \$0-A \$0-B empty 19 9 1 12 -262144 -258113 -1 0 1; #X obj 136 30 b; #X obj 136 52 delay 200; #X obj 136 8 inlet; #X obj 25 356 outlet; #X text 22 372 Couleur; #X obj 291 356 outlet; #X text 288 372 Compteur; #X obj 155 356 outlet; #X text 152 372 writesf; #X obj 199 176 t b b; #X msg 72 33 0; #X obj 72 8 loadbang; #X msg 260 124 set 0; #X msg 261 173 set 1; #X obj 261 149 b; #X connect 0 0 12 0; #X connect 0 1 4 0; #X connect 0 1 28 0; #X connect 1 0 23 0; #X connect 2 0 8 0; #X connect 2 0 23 0; #X connect 3 0 23 0; #X connect 3 0 25 0; #X connect 4 0 3 0; #X connect 4 0 30 0; #X connect 5 0 13 0; #X connect 6 0 7 0; #X connect 7 0 6 1; #X connect 7 0 21 0; #X connect 8 0 6 0; #X connect 9 0 7 0; #X connect 10 0 14 0; #X connect 11 0 14 0; #X connect 12 0 10 0; #X connect 12 1 2 0; #X connect 13 0 11 0; #X connect 13 1 1 0; #X connect 13 2 8 0; #X connect 13 3 9 0; #X connect 14 0 19 0; #X connect 15 0 0 0; #X connect 16 0 17 0; #X connect 17 0 15 0; #X connect 18 0 16 0; #X connect 25 0 5 0; #X connect 25 1 9 0; #X connect 26 0 15 0; #X connect 27 0 26 0; #X connect 28 0 15 0; #X connect 29 0 15 0; #X connect 30 0 29 0; #X restore 56 147 pd record2; #X connect 0 0 6 1; #X connect 5 0 6 0; #X connect 8 0 19 0; #X connect 19 0 8 0; #X connect 19 1 6 0; #X connect 19 2 11 0; #X coords 0 -1 1 1 166 17 1 100 100; #X restore -46 112 pd ARGO; #N canvas 324 59 331 313 ARGO 0; #X obj 101 101 cnv 20 104 34 empty ColorAmpli empty 20 12 0 14 -261299 -1 1.04858e+06; #X obj 85 285 outlet~; #X obj 134 104 cnv 10 20 10 empty ColorAmpli Ampli 1 5 1 14 -261299 -1 1.04858e+06; #X obj 85 72 inlet~; #X obj 85 260 *~; #X obj 103 118 hsl 101 12 -80 20 0 1 \$0-A ColorAmpli 16dB 0 7 1 9 -261299 -1 -1 9600 0; #X msg -24 161 label \$1; #X obj -25 138 tosymbol; #X obj -25 103 sprintf %ddB; #X obj 101 101 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X obj 101 131 cnv 4 10 4 empty empty empty 20 12 0 14 -1 -66577 0 ; #X text -16 120 -> -80dB..20dB; #X text 106 182 -> 0.0001..10 = -80dB..20dB; #X text 209 97 5 5 2011; #X obj 100 163 expr (pow(10 \, $f1 / 20)); #X text 107 140 -> -80..20; #X obj 227 270 cnv 15 41 30 empty empty empty 20 12 0 14 -24198 -66577 0; #N canvas 350 196 308 136 ?? 0; #X obj -9 87 cnv 15 300 38 empty empty empty 20 12 0 14 -224896 -66577 0; #X obj -9 10 cnv 18 300 70 empty empty ARGOPdMiniModules 1 10 1 14 -4033 -1 1.04858e+06; #X obj 9 29 cnv 10 10 10 empty empty Gerard 0 5 1 9 -4033 -1 1.04858e+06 ; #X obj 40 29 cnv 10 10 10 empty empty Paresys 0 5 1 9 -4033 -1 1.04858e+06 ; #X text -8 89 Construit sous / Build under Pd 0.42.5-extended; #X obj 39 105 pddplink http://puredata.info/downloads; #X obj 3 42 pddplink http://pagesperso-orange.fr/Paresys/ARGOPd/; #X obj 3 57 pddplink http://gerard.paresys.free.fr/ARGOPd/; #X restore 231 277 pd ??; #X obj 100 206 sel 0.0001; #X msg 100 234 0; #X connect 3 0 4 0; #X connect 4 0 1 0; #X connect 5 0 8 0; #X connect 5 0 14 0; #X connect 6 0 5 0; #X connect 7 0 6 0; #X connect 8 0 7 0; #X connect 14 0 18 0; #X connect 18 0 19 0; #X connect 18 1 4 1; #X connect 19 0 4 1; #X connect 19 0 7 0; #X coords 0 -1 1 1 106 36 1 100 100; #X restore 308 -184 pd ARGO; #X connect 2 0 1 0; #X connect 13 0 24 0; #X connect 13 0 24 1; #X connect 15 0 24 1; #X connect 16 0 24 0; #X connect 17 0 22 0; #X connect 17 0 21 0; #X connect 17 0 26 0; #X connect 17 1 15 0; #X connect 17 1 22 1; #X connect 18 0 21 0; #X connect 18 0 22 0; #X connect 19 0 10 0; #X connect 19 0 14 0; #X connect 19 0 25 0; #X connect 19 1 10 1; #X connect 19 1 20 0; #X connect 19 1 25 1; #X connect 21 0 24 0; #X connect 22 0 23 0; #X connect 23 0 13 0; #X connect 24 0 19 0; #X connect 24 1 19 1; #X connect 26 0 22 0;