diff options
author | Oli <olivier.belanger@umontreal.ca> | 2008-04-10 03:30:59 (GMT) |
---|---|---|
committer | Oli <olivier.belanger@umontreal.ca> | 2008-04-10 03:30:59 (GMT) |
commit | 2fa8060b7fd790b3260e65d225a4eca5080683a7 (patch) | |
tree | becc0461cffa308ecf5f77acb9ee130ada0a728c /common/Resources/crop.csd | |
parent | 957af9bf585d58518bb275ec4926ed11bbd3285e (diff) |
On the way to respect security policy
Diffstat (limited to 'common/Resources/crop.csd')
-rw-r--r-- | common/Resources/crop.csd | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/common/Resources/crop.csd b/common/Resources/crop.csd index 03b10a5..483e578 100644 --- a/common/Resources/crop.csd +++ b/common/Resources/crop.csd @@ -14,8 +14,9 @@ nchnls=1 Playing temp file ****************************************************************/ instr 1 - -asig diskin "/home/olpc/.sugar/default/tamtam/snds/tempMic.wav", 1 +Spath strget 999 +Stempfile strcat Spath, "/tempMic.wav" +asig diskin Stempfile, 1 gasig dcblock asig endin @@ -45,9 +46,12 @@ kenv adsr 0.01, 0.05, .9, 0.01 adel delay gasig, .005 -ihandle fiopen "/home/olpc/.sugar/default/tamtam/snds/micTemp", 2 +Spath strget 999 +Sfile strcat Spath, "/micTemp.wav" + +ihandle fiopen Sfile, 2 -fout "/home/olpc/.sugar/default/tamtam/snds/micTemp", 2, adel*kenv +fout Sfile, 2, adel*kenv ;out adel*kenv adel = 0 @@ -57,7 +61,9 @@ endin Audio input recording ( closing file ) ****************************************************************/ instr 4 -ficlose "/home/olpc/.sugar/default/tamtam/snds/micTemp" +Spath strget 999 +Sfile strcat Spath, "/micTemp.wav" +ficlose Sfile endin |