Csound Csound-dev Csound-tekno Search About

[Csnd] More Noise Grains

Date2011-11-29 05:11
FromHans and Laurel Mikelson
Subject[Csnd] More Noise Grains
Attachmentsnoise_grains2.csd  
Some more noise with filtering.

Hans Mikelson


Send bugs reports to the Sourceforge bug tracker
            https://sourceforge.net/tracker/?group_id=81968&atid=564599
Discussions of bugs and features can be posted here
To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"


Date2011-11-29 16:32
From"Dr. Richard Boulanger"
SubjectRe: [Csnd] More Noise Grains
With the filters.... some nice touches at the end now.  WOW.  
Hans... your instruments are a constant source of inspiration.
Thanks for creating and sharing them with all of us.

Best,

Dr. B.

___________________________________

Dr. Richard Boulanger, Ph.D.

Professor of Electronic Production and Design
Professional Writing and Music Technology Division
Berklee College of Music
1140 Boylston Street
Boston, MA 02215-3693

617-747-2485 (office)
774-488-9166 (cell)

____________________________________

____________________________________

____________________________________

On Nov 29, 2011, at 12:11 AM, Hans and Laurel Mikelson wrote:

Some more noise with filtering.

Hans Mikelson


Send bugs reports to the Sourceforge bug tracker
           https://sourceforge.net/tracker/?group_id=81968&atid=564599
Discussions of bugs and features can be posted here
To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"

<noise_grains2.csd>


Date2011-11-30 15:58
Frompeiman khosravi
SubjectRe: [Csnd] More Noise Grains
While on the subject of noise, here's a simple instrument I'm working on.


P






-odac



sr     = 44100
ksmps  = 1
nchnls = 2

	instr 1

kfreqmult	linseg  1, p3/1.5, 1, p3/3, 0

kline		linseg  .01, p3/2, 1, p3/2, 0

kfreq = 1000*kfreqmult

krange = kfreq*kline

kgauss1 gauss  krange
kgauss2 gauss  krange

ares1	mpulse	2000, 1/(kfreq+kgauss1)
ares2	mpulse	2000, 1/(kfreq+kgauss2)

outs	ares1, ares2

	endin




f 1 0 0 1 "/Users/peiman/Documents/impulse.aif" 0 6 0

i1 0 30





On 29 November 2011 16:32, Dr. Richard Boulanger  wrote:
> With the filters.... some nice touches at the end now.  WOW.
> Hans... your instruments are a constant source of inspiration.
> Thanks for creating and sharing them with all of us.
>
> Best,
>
> Dr. B.
>
> ___________________________________
>
> Dr. Richard Boulanger, Ph.D.
>
> Professor of Electronic Production and Design
> Professional Writing and Music Technology Division
> Berklee College of Music
> 1140 Boylston Street
> Boston, MA 02215-3693
>
> 617-747-2485 (office)
> 774-488-9166 (cell)
>
> rboulanger@berklee.edu
> http://csounds.com/boulanger
> ____________________________________
>
> http://csounds.com
> http://csoundforlive.com
> ____________________________________
>
> http://csounds.com/mathews
> ____________________________________
>
> On Nov 29, 2011, at 12:11 AM, Hans and Laurel Mikelson wrote:
>
> Some more noise with filtering.
>
> Hans Mikelson
>
>
> Send bugs reports to the Sourceforge bug tracker
>            https://sourceforge.net/tracker/?group_id=81968&atid=564599
> Discussions of bugs and features can be posted here
> To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe
> csound"
>
> 
>
>


Send bugs reports to the Sourceforge bug tracker
            https://sourceforge.net/tracker/?group_id=81968&atid=564599
Discussions of bugs and features can be posted here
To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"


Date2011-12-01 03:13
FromHans and Laurel Mikelson
SubjectRe: [Csnd] More Noise Grains
Love it.

Hans Mikelson

On Nov 30, 2011, at 9:58 AM, peiman khosravi wrote:

> While on the subject of noise, here's a simple instrument I'm working on.
> 
> 
> P
> 
> 
> 
> 
> 
> 
> -odac
> 
> 
> 
> sr     = 44100
> ksmps  = 1
> nchnls = 2
> 
> 	instr 1
> 
> kfreqmult	linseg  1, p3/1.5, 1, p3/3, 0
> 
> kline		linseg  .01, p3/2, 1, p3/2, 0
> 
> kfreq = 1000*kfreqmult
> 
> krange = kfreq*kline
> 
> kgauss1 gauss  krange
> kgauss2 gauss  krange
> 
> ares1	mpulse	2000, 1/(kfreq+kgauss1)
> ares2	mpulse	2000, 1/(kfreq+kgauss2)
> 
> outs	ares1, ares2
> 
> 	endin
> 
> 
> 
> 
> f 1 0 0 1 "/Users/peiman/Documents/impulse.aif" 0 6 0
> 
> i1 0 30
> 
> 
> 
> 
> 



Send bugs reports to the Sourceforge bug tracker
            https://sourceforge.net/tracker/?group_id=81968&atid=564599
Discussions of bugs and features can be posted here
To unsubscribe, send email sympa@lists.bath.ac.uk with body "unsubscribe csound"