< Score file used to create "ex6-1" :
* f1 0 524288 -1 "/sflib/voice/sop1.b3.wav" 0 0 0 ; < dur = 6.37
* f2 0 262144 -1 "/sflib/string/vln.b3.wav" 0 0 0 ; < dur = 3.62
* f3 0 524288 -1 "/sflib/wind/trp.b3.wav" 0 0 0 ; < dur = 6.31

i1 0 0 3;   < create 3 output "notes"
p3 4;               
du 303;        < each output note lasts 3 seconds
p4 nu 1/2/3;   < gen 1 func number of input soundfile : sop/vln/trp
< p5,6,7 : amplitude envelope
p5 nu .6/.4//;         < input amplitude multiplier
p6 0 ;         < optional fade-in time
p7 .2;         < optional fade-out time
<
p8 no b3;      < base pitch of input soundfile in pch or cps
p9 no b3//c4;      < output pitch in pch or cps

< harmonizer p-fields:
p10 no a3;  < iminfrq , in cps or as % of p9 base pitch
p11 .5; < .3; < .2;     < kmaxvar : fraction
p12  1;     < imode : if 0, p13 & p14 are ratios * p8 pitch
 < IMPORTANT: p12 & p13 cannot BOTH be > p8
p13   no gs3;       < harmonizer output note or ratio 1
p14 no  cs4;         < harmonizer output note or ratio 2
p15 .04; < iprd : normally between .02 & .05
< source/harmopnizer output mix
p16 nu .5/0/.2;      < amp. multiplier for source signal output
p17 nu 1;          < amp. multiplier for harmonizer output

end;

