Hi Peiman, I notice a few things:

1) your soundfile is being truncated to 4000000 samples

2) you're loading the left channel of your stereo file into both arrays

3) after calculating the correct frequency for phasor~ to play at normal speed, you're multiplying by zero.

With 3), maybe you have that there so you can scale the playback speed with a control later. But re: 1 & 2, try a message to soundfiler like this:

read -maxsize 6.24e+06 -resize $1 test_L test_R

That will increase soundfiler's default maxsize so your complete sample can be loaded. Also note that with the "read" command you can list 2 tables to load to with stereo audio files. You had those tables listed in separate messages…with 2 separate "read" calls, soundfiler is starting over each time and has no way of knowing that you want to continue where you left off.

I didn't listen carefully with headphones, but after those changes I didn't hear an obvious difference between tabread4~'s playback of your file vs. my web browser's.


Hope that helps,
William



On Sun, Oct 27, 2013 at 9:23 AM, peiman khosravi <peimankhosravi@gmail.com> wrote:
Attached is a simple patch that reads sound file data from an array with tabread4~. 

Does someone know why the result is so noisy? Please try with this sound file (96k 24bit): https://dl.dropboxusercontent.com/u/47945259/test.aif.

It sounds like some sort of extreme quantisation noise. But maybe I've missed something in the patch. 

I'm on the latest version of pd vanilla on os x 10.7.5.  

Many Thanks
Peiman


#N canvas 439 22 536 684 10;
#X obj 77 213 soundfiler;
#X obj 77 113 openpanel;
#X obj 62 414 *~;
#X obj -8 305 /;
#X obj 77 95 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 0 22 450 278 (subpatch) 0;
#X array test_R 4e+06 float 2;
#X coords 0 1 4e+06 -1 200 140 1 0 0;
#X restore 214 -69 graph;
#X obj 59 549 dac~;
#X obj -8 368 phasor~;
#X obj 7 248 t b f;
#X msg 31 334 0;
#X obj -8 281 pack 96000 f;
#X obj 16 474 tabread4~ test_L;
#X obj 120 474 tabread4~ test_R;
#X msg 219 152 read -resize \$1 test_R;
#X msg 77 152 read -resize \$1 test_L;
#N canvas 0 22 450 278 (subpatch) 0;
#X array test_L 4e+06 float 2;
#X coords 0 1 4e+06 -1 200 140 1 0 0;
#X restore 8 -68 graph;
#X obj -8 343 * 0;
#X text 28 321 restart;
#X connect 0 0 2 1;
#X connect 0 0 8 0;
#X connect 1 0 14 0;
#X connect 1 0 13 0;
#X connect 2 0 11 0;
#X connect 2 0 12 0;
#X connect 3 0 16 0;
#X connect 4 0 1 0;
#X connect 7 0 2 0;
#X connect 8 0 10 0;
#X connect 8 1 10 1;
#X connect 9 0 7 1;
#X connect 10 0 3 0;
#X connect 11 0 6 0;
#X connect 12 0 6 1;
#X connect 13 0 0 0;
#X connect 14 0 0 0;
#X connect 16 0 7 0;




_______________________________________________
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management -> http://lists.puredata.info/listinfo/pd-list




--
William Brent
www.williambrent.com

“Great minds flock together”
Conflations: conversational idiom for the 21st century

www.conflations.com