< source soundfile: /sflib/x/voicetest.wav (22k sr)
<  Notes 2 & 3  transpose the pitch up a fourth, then down a fourth
<  Notes 4 & 5 shift the formants up (a perfect 5th) then down (a perfect 4th)

    < functions 96 & 97 are optional, if tables are used for begin & end times
    < f96 specifies times to begin reading lp.m file; start with 2nd location
    < f97 specifies times to end reading lp.m file ; start with 2nd location
< *f96 0 size -2 0 
< *f97 0 size -2 0 
* f1 0 8193 10 1;     < Sine Wave for Buzz

RESYN 0 0 5;
p3 3.5; 
du  303.28;
p4 2;        < lp.m number
p5         < ampfac (default "0" or "1" = no change)
      < p6 = time in lp.m file to BEGIN reading
p6  
    < p7 = time in lp.m file to END reading;if neg. = index to f96 & f97
p7  
  < p8 = number of harmonics for buzz: if negative = actual number of harmonics
p8 -16;  < if pos. = cps or pch of highest fundamental pitch
     < PITCH : p9 is a flag ; if p9 = 0, p10 = multiplier for original 
     < pitch from  ptrack analysis file; 
     < if p9 = 1, p10 is transposition (in semitones) of orig. pitch from ptrack
     < if p9 = 2, p10 = new pitch (cps or pch) & ptrack analysis is NOT USED
p9  nu 0/ 1// 0//;
p10 nu 0/ 5. /-5. / 0//;   < pitch transposition or new pitch
     < Formant shifting : if p11 = 0 same transposition (if any) as p10
     < else p11 = multiplier for original formants
     < but if p9 = 2 and p11 = 0, no Formant_Shift
< OPTIONAL P-FIELDS:
p11 nu 0/// .75/ 1.5;  < multiplier for formant_shifting
p12   < fade-in time (0 ok)
p13   < fade-out time (0 ok)
     < p14 brightness: 0 = no change; range +1 (brightest) to -1 (least bright)
p14  .15;
     < p15 modifies % noise ; if p15 = 0 default % noise signal
     < if p15 is positive, increasing % noise up to max. 1 (all noise)
     < if p15 -s negative, decreasing % noise down to minimum -1 (no noise)
p15  
< User-added parameters:
end;   <<<<end of score>>>>>>>>>>>>>

