Name=Granulate
Maker=Rory Walsh
UniqueID=2019
Copyright=None
ControlPort=Freq|freq
Range=0|2
ControlPort=Grainsize|grainSize
Range=1|100
ControlPort=p-Rate|prate
Range=0|10
ControlPort=Density|dens
Range=0|100
sr = 44100
ksmps = 64
nchnls = 1
instr 1
kgr init 1
ims = 2
kfr chnget "freq" ;= 0.5
kgr chnget "grainSize" ;= 0.5
krate chnget "prate" ;= 0.5
kdens chnget "dens" ;= 10
iomax = 100
ain in;
awp phasor sr/ftlen(1)
awin tablei awp, 2, 1
tablew ain*awin, awp, 1, 1
asig syncgrain 1, kdens, kfr, kgr, krate,1, 3, iomax
outs asig
endin
f2 0 131072 7 0 36 1 131000 1 36 0
f3 0 16384 9 0.5 1 0
f1 0 131072 7 0 131072 0
f4 0 1024 10 1
i1 0 3600