Hi Peiman,

Just had a chance to listen to this, sounds great!  Thanks for sharing!

steven

On Mon, Oct 21, 2013 at 9:08 AM, peiman khosravi
 wrote:
> Nothing new, just a characteristic Risset sound.
>
> P
>
> www.peimankhosravi.co.uk || RSS Feed || Concert News
>
>
> 
> 
> -odac -d
> ;-o test.aif -d -A -3
> 
> ; ==============================================
> 
>
> sr = 96000
> ksmps = 10
> nchnls = 2
> 0dbfs = 1
>
> instr 1
> ifund = p4*p6
> kvib jitter 4, 6, 10
> kvib2 jitter 4, 3, 6
> kvib3 jitter 9, 1, 5
>
> iattackTime = p5
> aAttack1  expseg .0001, iattackTime*.5, 1, p3-iattackTime*.5, 0.0001
> ;exponential curve
> aAttack2  expseg .0001, iattackTime*.55, 1,p3-iattackTime*.55, 0.0001
> ;exponential curve
> aAttack3  expseg .0001, iattackTime*.6, 1,p3-iattackTime*.6, 0.0001
> ;exponential curve
> aAttack4  expseg .0001, iattackTime*.65, 1,p3-iattackTime*.65, 0.0001
> ;exponential curve
> aAttack5  expseg .0001, iattackTime*.7, 1,p3-iattackTime*.7, 0.0001
> ;exponential curve
> aAttack6  expseg .0001, iattackTime*.75, 1,p3-iattackTime*.75, 0.0001
> ;exponential curve
> aAttack7  expseg .0001, iattackTime*.8, 1,p3-iattackTime*.8, 0.0001
> ;exponential curve
> aAttack8  expseg .0001, iattackTime*.85, 1,p3-iattackTime*.85,
> 0.0001;exponential curve
> aAttack9  expseg .0001, iattackTime*.9, 1,p3-iattackTime*.9,
> 0.0001;exponential curve
> aAttack10  expseg .0001, iattackTime*.95, 1,p3-iattackTime*.95, 0.0001
> ;exponential curve
> aAttack11  expseg .0001, iattackTime, 1,p3-iattackTime, 0.0001  ;exponential
> curve
>
> asig1  oscil .1*aAttack1, ifund, 1
> asig2  oscil .05*aAttack2, ifund*2.5, 1
> asig3  oscil .2*aAttack3, ifund*1.2, 1
> asig4  oscil .1*aAttack4, ifund*2.9, 1
> asig5  oscil .1*aAttack5, ifund*3.66, 1
> asig6  oscil .122*aAttack6, ifund*3.2, 1
> asig7  oscil .13*aAttack7, ifund*4.43, 1
> asig8  oscil .02*aAttack8, ifund*5.487, 1
> asig9  oscil .04*aAttack9, ifund*5.6, 1
> asig10 oscil .01*aAttack10, ifund*6.32, 1
> asig11 oscil .015*aAttack11, ifund*6.9211, 1
>
> aFinalMixL = asig1+asig3+asig5+asig7+asig9+asig11
>
> aFinalMixR = asig2+asig4+asig6+asig8+asig10
>
>
> outs aFinalMixL*.4, aFinalMixR*.4
> endin
>
> 
> ; ==============================================
> 
> f1 0 [2^19] 10 1
>
> i1 .3 5 50 .05 4
> i1 .3 5 50.3 .05 4
> i1 .3 3 90 .02 4
> i1 .3 8 100 .01 4
> i1 .3 12 100.1 .02 4
>
>
> i1 0 10 50 3 4
> i1 0 9.5 50.5 2 4
> i1 0 8.9 50.4 4 4
> i1 0 9.8 50.2 3 4
> i1 0 10.2 50.1 3 4
> i1 0 11.5 100 4 4
> i1 0 7.9 100.3 3.15 4
> i1 0.2 10 30 1 4
>
> i1 1 9 150 3 4
> i1 1 9 200 5 4
> i1 1 10 300 6 4
>
>
> i1 .3 5 50 .05 1
> i1 .3 5 50.3 .05 1
> i1 .3 3 90 .02 1
> i1 .3 8 100 .01 1
> i1 .3 12 100.1 .02 1
>
> i1 0 10 50 3 2
> i1 0 9.5 50.5 2 2
> i1 0 8.9 50.4 4 2
> i1 0 9.8 50.2 3 2
> i1 0 10.2 50.1 3 2
> i1 0 11.5 100 4 2
> i1 0 7.9 100.3 3.15 2
> i1 0.2 10 30 1 2
>
> i1 0 9 150 3
> i1 0 9 200 5
> i1 0 10 300 6
>
>
>
> 
> 
>
>