diff options
author | Oli <olivier.belanger@umontreal.ca> | 2007-06-29 17:09:26 (GMT) |
---|---|---|
committer | Oli <olivier.belanger@umontreal.ca> | 2007-06-29 17:09:26 (GMT) |
commit | 2b828ce6da77ca5cfb76a0c85c0afebb2e740451 (patch) | |
tree | 9476e17150a6a89ddeaad517ac69da3153b4c25b /Resources | |
parent | 31439b2c751605fcde26cee101b18d96bec0fa81 (diff) |
mic recording
Diffstat (limited to 'Resources')
-rw-r--r-- | Resources/crop.csd | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/Resources/crop.csd b/Resources/crop.csd index 4ec8e03..aeb9819 100644 --- a/Resources/crop.csd +++ b/Resources/crop.csd @@ -1,7 +1,7 @@ <CsoundSynthesizer> <CsOptions> --o /home/olpc/.sugar/tamtam/mic1 -W -d +-o /home/olpc/.sugar/default/tamtam/mic1 -W -d </CsOptions> <CsInstruments> @@ -15,7 +15,7 @@ Playing temp file ****************************************************************/ instr 1 -gasig diskin "/home/olpc/.sugar/default/tamtam/tempMic.wav, 1 +gasig diskin "/home/olpc/.sugar/default/tamtam/tempMic.wav", 1 endin @@ -25,20 +25,20 @@ Crop silence at the beginning instr 2 itab = 1 -gain = gasig -krms rms gain +ain = gasig +krms rms ain ktrig trigger krms, 1500, 0 ;if ktrig == 1 then -event "i", 5, 0 , 4, itab -;turnoff +event "i", 5, 0 , 4 +turnoff ;endif - +endin instr 5 kenv adsr 0.005, 0.05, .9, 0.01 -adel delay gain, .01 +adel delay gasig, .01 out adel*kenv adel = 0 @@ -51,7 +51,7 @@ Audio input recording instr 3 kenv adsr 0.005, 0.05, .9, 0.01 -adel delay gain, .01 +adel delay gasig, .01 Sname sprintf "/home/olpc/.sugar/default/tamtam/mic%d", int(p4)-6 ihandle fiopen Sname, 2 |