Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/TamTamSynthLab.activity/common/Resources/crop.csd
diff options
context:
space:
mode:
Diffstat (limited to 'TamTamSynthLab.activity/common/Resources/crop.csd')
-rw-r--r--TamTamSynthLab.activity/common/Resources/crop.csd78
1 files changed, 0 insertions, 78 deletions
diff --git a/TamTamSynthLab.activity/common/Resources/crop.csd b/TamTamSynthLab.activity/common/Resources/crop.csd
deleted file mode 100644
index 483e578..0000000
--- a/TamTamSynthLab.activity/common/Resources/crop.csd
+++ /dev/null
@@ -1,78 +0,0 @@
-<CsoundSynthesizer>
-
-<CsOptions>
--W -d -n
-</CsOptions>
-
-<CsInstruments>
-
-sr=16000
-ksmps=64
-nchnls=1
-
-/****************************************************************
-Playing temp file
-****************************************************************/
-instr 1
-Spath strget 999
-Stempfile strcat Spath, "/tempMic.wav"
-asig diskin Stempfile, 1
-gasig dcblock asig
-
-endin
-
-/****************************************************************
-Crop silence at the beginning
-****************************************************************/
-instr 2
-ktimer timeinstk
-ain = gasig
-krms rms ain
-if ktimer > 40 then
- ktrig trigger krms, 1500, 0
- if ktrig == 1 then
- event "i", 3, 0, 2
- event "i", 4, 2, 0.01
- turnoff
- endif
-endif
-endin
-
-/****************************************************************
-recording
-****************************************************************/
-instr 3
-kenv adsr 0.01, 0.05, .9, 0.01
-
-adel delay gasig, .005
-
-Spath strget 999
-Sfile strcat Spath, "/micTemp.wav"
-
-ihandle fiopen Sfile, 2
-
-fout Sfile, 2, adel*kenv
-
-;out adel*kenv
-adel = 0
-endin
-
-/****************************************************************
-Audio input recording ( closing file )
-****************************************************************/
-instr 4
-Spath strget 999
-Sfile strcat Spath, "/micTemp.wav"
-ficlose Sfile
-endin
-
-
-</CsInstruments>
-
-<CsScore>
-f1 0 8192 10 1
-i1 0 4
-i2 0 4
-</CsScore>
-
-</CsoundSynthesizer>