* f100 0 1024 10 1.;			< SINE WAVE
* f31 0 8 7 -1 6 1 2 -1;		<in between triangle & sawtooth
* f32 0 64 10 1. 0 .33 .1 .2 .11 .14 .07 .09; < most common drum function
* f33 0 64 7 1. 16 1. 0 -1. 32 -1. 0 1. 16 1.   ;<square wave,straight sides
<funcs. 50-69 control shapes :
< comment out unneeded functions; remove comments from needed functions
* f50 0 65 7 0 64 1.;                   < linear up 
* f51 0 65 7 1. 64 0;                   < linear down 
* f52 0 65 7 0 32 1. 32 0;              < linear pyramid: up-down 
< * f53 0 65 7 1. 32 0 32 1.;             < inverted liner pyramid: down-up 
< * f54 0 65 9 .25 1 0;		      < rise (1st quarter of sine wave)
< * f55 0 65 9 .25 1 90;		      < fall (1st quarter of cosine)
< * f56 0 65 9 .5 1 0;		      < rise & fall (1st half of sine wave)
* f60 0 65 5 .01 64 1.;	                <exponential up      
* f61 0 65 5 1. 64 .01;	                <exponential down
* f62 0 65 5 .01 32 1. 32 .01;         <expo. pyramid (up,down)

DRUMS 0 2;
rd  .008;
p3 rh 32*8/4;              
du 520;                                 < 520 ord; range 480-580 or so)
p4 mx 1. 100 800/1. 60;                 < can be given in cps or in pch (notes)
p5 mx 1. 6000 18000/1. 22000;           < amplitude            
< Attack  p6-p8
p6 1. .002 .007;                        < Attack time: ord: 1. .002 .005
p7 mx 1. .85 1.2/1. 1.3;		< attack hardness (1. ord; range .8-1.4)
p8 mo 1. .2 .45/1. .3;         	        <% attack noise(.33 ord; range .2-.5)

< FM p9-p11
p9  1. 1. 1.7;  			< mod. index(ord: 1. 1. 1.7;)
p10 1. 1.25 1.55;       		< c:m (ord: 1. 1.25 1.55)
< p11 = waveshape func. for mod. oscillators; ord:32; 100 & 31 hollower;33 is
p11 mo 1 31 33 32/1 32;     	< the brightest & buzziest           

p12 mo 1. .9 1.15/1. 1.2;       	< brightness(1. ord;  range:.7-1.4)
p13 52;                        < func. for"pan"btw high & low sidebands; 52 ord)
< Tremolo : p14-p16
p14 1. .08 .15;         		< % tremolo  (1. .1 .18)
p15 1. 4.5 9.;  			< for tremolo rate (1. 4. 9.)
p16 1. 60 62;        	     < func for change in tremolo rate(ord: 60,50 or 52)
< Pitch bend : p17-p19
p17 nu .06*8/.13;       	<% pitch bend(<.08 barely audible,.15 = gliss)
p18 mo 60 61;                   < func. for pitch bend (ord: 60,61,50,62)
p19 1. .13 .21;          	< pitch bend time delay(% p3)(1. .12 .2)
p20       < a detuning p-field generally used only in chorused scores
< Optional additional parameters
end;   <>>>>>>>>>>>
