[PD] soundfiler error?

[Romain Vuillet]

Hi, i'm using pd 0.40.1 on Linux and your patch is working fine...
to improve your sampler:
if you want to have a constant amplitude for the whole chunk , you 
should try to multiply your cos~ by *~ 10 and then a "clip~ -1 1" object 
: This causes no glitch but a quasi-constant amplitude...

Romain V

David Powers a écrit :
> Hi,
>
> Is it possible to load up files "on the fly" to use in a sampler. When
> I try to do this with [openpanel] and [soundfiler] it crashes PD.
> Once, it crashed before anything was even playing. Is this any kind of
> known bug? Maybe an [openpanel] problem?
>
> I need to do be able to load samples on the fly, for improvising with
> an electroacoustic ensemble... I'm using one of the extended test
> versions of PD, 0.39.2, WinXP.
>
> Attached is the patch I'm working on. It's just a simple variation of
> one of Miller's test things. Also, if anyone knows ways I might extend
> it to make a better sampler that would be great... I basically want to
> play small bits of sample files, at random, without glitching when I
> shift the read point. I don't think this is the best way to do it, but
> DSP is not my forte...
>
> Oh, I've never gotten the new GOP feature to work right, either. How
> the hell do I change the position of the red rectangle???
>
> ~David
> ------------------------------------------------------------------------
>
> #N canvas 177 116 944 642 12;
> #N canvas 0 0 450 300 graph1 0;
> #X array table20 341508 float 0;
> #X coords 0 1.02 341507 -1.02 200 130 1;
> #X restore 153 439 graph;
> #X obj 13 425 hip~ 5;
> #X floatatom 87 28 0 0 0 0 - - -;
> #X text 126 27 <-- frequency (Hz.);
> #X floatatom 150 108 0 0 0 0 - - -;
> #X obj 50 220 +~ 1;
> #X obj 87 73 phasor~ 0;
> #X text 189 107 <-- chunk size (100ths of a second);
> #X obj 13 401 *~;
> #X obj 72 308 line~;
> #X floatatom 149 218 0 0 0 0 - - -;
> #X obj 72 284 pack 0 100;
> #X obj 51 356 +~;
> #X obj 72 332 samphold~;
> #X obj 74 170 samphold~;
> #X obj 51 196 *~;
> #X obj 693 109 soundfiler;
> #X obj 12 103 -~ 0.5;
> #X obj 12 127 *~ 0.5;
> #X obj 12 150 cos~;
> #X obj 51 381 tabread4~ table20;
> #X obj 691 54 openpanel;
> #X obj 683 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
> -1;
> #X msg 692 85 read -resize \$1 table20;
> #X obj 651 363 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
> 1;
> #X obj 759 349 hsl 128 15 0 500 0 0 empty empty empty -2 -6 0 8 -262144
> -1 -1 0 1;
> #X obj 175 185 random 100;
> #X obj 271 74 random 20;
> #X obj 656 386 metro 1000;
> #X floatatom 698 161 12 0 0 0 - - -;
> #X text 187 219 <-- read point in 100ths of a second;
> #X obj 148 242 * 441;
> #X obj 150 133 * 441;
> #X obj 701 198 / 441;
> #X obj 702 282 / 10;
> #X obj 195 81 + 3;
> #X obj 700 240 t f f;
> #X obj 654 420 t b b;
> #N canvas 0 0 462 312 output~ 0;
> #X obj 365 493 t b;
> #X obj 365 440 f;
> #X obj 365 518 f;
> #X msg 479 517 0;
> #X obj 365 470 moses 1;
> #X obj 479 489 t b f;
> #X obj 445 450 moses 1;
> #X obj 41 100 dbtorms;
> #X obj 97 173 inlet~;
> #X msg 311 313 \; pd dsp 1;
> #X obj 41 173 line~;
> #X obj 76 245 *~;
> #X obj 76 275 dac~;
> #X obj 41 130 pack 0 50;
> #X text 133 149 audio in;
> #X text 150 467 test if less than 1 -->;
> #X text 116 494 if true convert to bang -->;
> #X text 114 98 <-- convert from dB to linear units;
> #X floatatom 335 222 3 0 100 0 dB - -;
> #X obj 362 243 bng 15 250 50 0 empty empty mute -38 7 0 12 -262144
> -1 -1;
> #X text 130 129 <-- make a ramp to avoid clicks or zipper noise;
> #X obj 160 173 inlet~;
> #X obj 166 244 *~;
> #X text 385 381 MUTE logic:;
> #X obj 335 177 r \$0-master-lvl;
> #X obj 365 544 s \$0-master-lvl;
> #X obj 335 282 s \$0-master-out;
> #X obj 41 74 r \$0-master-out;
> #X obj 445 421 r \$0-master-out;
> #X text 72 13 Level control abstraction \, used in many of the Pd example
> patches. The "level" and "mute" controls show up on the parent \, calling
> patch.;
> #X text 78 520 previous nonzero master-lvl -->;
> #X text 150 424 recall previous;
> #X text 150 442 value of master-lvl -->;
> #X text 51 322 automatically start DSP -->;
> #X obj 97 195 hip~ 3;
> #X obj 159 195 hip~ 3;
> #X connect 0 0 2 0;
> #X connect 1 0 4 0;
> #X connect 2 0 25 0;
> #X connect 3 0 25 0;
> #X connect 4 0 0 0;
> #X connect 4 1 5 0;
> #X connect 5 0 3 0;
> #X connect 6 1 2 1;
> #X connect 7 0 13 0;
> #X connect 8 0 34 0;
> #X connect 10 0 22 0;
> #X connect 10 0 11 0;
> #X connect 11 0 12 0;
> #X connect 13 0 10 0;
> #X connect 18 0 9 0;
> #X connect 18 0 26 0;
> #X connect 19 0 1 0;
> #X connect 21 0 35 0;
> #X connect 22 0 12 1;
> #X connect 24 0 18 0;
> #X connect 27 0 7 0;
> #X connect 28 0 1 1;
> #X connect 28 0 6 0;
> #X connect 34 0 11 1;
> #X connect 35 0 22 1;
> #X coords 0 -1 1 1 85 60 1 100 100;
> #X restore 12 462 pd output~;
> #X connect 1 0 38 0;
> #X connect 1 0 38 1;
> #X connect 2 0 6 0;
> #X connect 4 0 32 0;
> #X connect 5 0 12 0;
> #X connect 6 0 13 1;
> #X connect 6 0 14 1;
> #X connect 6 0 15 0;
> #X connect 6 0 17 0;
> #X connect 8 0 1 0;
> #X connect 9 0 13 0;
> #X connect 10 0 31 0;
> #X connect 11 0 9 0;
> #X connect 12 0 20 0;
> #X connect 13 0 12 1;
> #X connect 14 0 15 1;
> #X connect 15 0 5 0;
> #X connect 16 0 29 0;
> #X connect 17 0 18 0;
> #X connect 18 0 19 0;
> #X connect 19 0 8 0;
> #X connect 20 0 8 1;
> #X connect 21 0 23 0;
> #X connect 22 0 21 0;
> #X connect 23 0 16 0;
> #X connect 24 0 28 0;
> #X connect 25 0 28 1;
> #X connect 26 0 10 0;
> #X connect 27 0 35 0;
> #X connect 28 0 37 0;
> #X connect 29 0 33 0;
> #X connect 31 0 11 0;
> #X connect 32 0 14 0;
> #X connect 33 0 36 0;
> #X connect 34 0 27 1;
> #X connect 35 0 4 0;
> #X connect 36 0 34 0;
> #X connect 36 1 26 1;
> #X connect 37 0 26 0;
> #X connect 37 1 27 0;
>   
> ------------------------------------------------------------------------
>
> _______________________________________________
> PD-list at iem.at mailing list
> UNSUBSCRIBE and account-management -> http://lists.puredata.info/listinfo/pd-list
>