< COMMENT  rapid notes ; cps input to p4 ; p11 varies
< Function needed:  100
* f100 0 1024 10 1.;
CELESTA 0 3; 
rd .008;   
<p11=flag for duration; if 0,dur.=p3; if 1  detached,short note;if2,pedal
p11 .25 1 1 .50 2 2 .25 0 0;
< p3 mo 2 .2 .12 .1 .14/1 1;
p3 mo 2 .22 .13 .11 .16/1 1;
du 305.5;                                 <if p11 = 1,use 301.5; 
p4 mo 1 210 170 600 1000/1 430 720 4000 2600/1 220;      
p5 1. 9000 12000;                     
p6 1. .015 .021;                          < c. .01-.04

p7 1. .95 1.15;                           < Attack hardness                  
p8 1. 1.15 .9;                            < Brightness
p9 1. .07 .09;                             < % tremolo
p10 1. 4.2 4.5;                           < Tremolo rate
  p12       < a detuning p-field generally used only in chorused scores
end;    <<<>>>>>>>>>>>
