< input soundfile is "maracaroll.wav"  from /sflib/perc
< p4 (positive) specifies "soundin.13", which points to maracaroll.wav
   < possible p12 functions :
* f52 0 65 7 0 32 1. 32 0;   < linear: p9->p10->p9  the default
* f50 0 65 7 0 64 1.;            < linear: p9->p10
* f60 0 65 5 .01 64 1.;	         < exponential: p9->p10->p9 
* f62 0 65 5 .01 32 1. 32 .01;   < exponential pyramid :p9->p10->p9
* f54 0 65 9 .25 1 0;	         < 1st quarter of sine wave p9->p10
* f55 0 65 9 .5 1 0;	         < 1st half of sine wave p9->p10->p9

SFPAN 0 0 3;                      < mono input; 2 channel pan output
p3 4.0; 
du  303.22; 
p4 13 ;  < soundfile "maracaroll.wav"
p5 nu .25 / .9/ .5;                    < ampfac : soft - loud - medium
p6                                    < duration skipped from front of sf
p7 nu .5/ 0 // ;                      < fade in time
p8 nu .5/ 0 // ;                      < fade out time

< pan between a1 (L. C.) and a2 (R. C.)
 < 1st note pans twice, exponentially, between left channel and center
 < 2nd note pans linearly between right chan. & left center
 < twice per second
 < 3rd note pans left -> right -> left following sine wave curve
p9  nu .99/ .01/.95;                < 1st decimal % to a1 (.01-.99)   
p10 nu .5 / .68 /.05;                < 2nd  "     "     "    "    "    
< p11 = Rate of change: 0 = 1/p3; >100 = (val.-100)/p3 ; negative = actual dur.
p11 nu 102. / 2.0/ 0;                                                          
p12  nu 62/ 52/ 55;                  < function number for change  
p13  0;                              < starting phase (0 -1.)
end;  <<<>>>>>>>>>>
