Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/Resources
diff options
context:
space:
mode:
authorOli <olivier.belanger@umontreal.ca>2007-06-29 17:09:26 (GMT)
committer Oli <olivier.belanger@umontreal.ca>2007-06-29 17:09:26 (GMT)
commit2b828ce6da77ca5cfb76a0c85c0afebb2e740451 (patch)
tree9476e17150a6a89ddeaad517ac69da3153b4c25b /Resources
parent31439b2c751605fcde26cee101b18d96bec0fa81 (diff)
mic recording
Diffstat (limited to 'Resources')
-rw-r--r--Resources/crop.csd18
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