diff options
author | olipet <olpc@localhost.localdomain> | 2007-01-15 10:57:47 (GMT) |
---|---|---|
committer | olipet <olpc@localhost.localdomain> | 2007-01-15 10:57:47 (GMT) |
commit | d94ce096e869d1802f709c64fbc0fc70ab143fbf (patch) | |
tree | 74700e715aac246d574ec0f3c60bae09042c5b4a /Resources | |
parent | 914c1970b36e4ada1b9af2baa90804a27096c608 (diff) |
mic recording fix
Diffstat (limited to 'Resources')
-rw-r--r-- | Resources/univorc.csd | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/Resources/univorc.csd b/Resources/univorc.csd index 4c7fafa..2778ab5 100644 --- a/Resources/univorc.csd +++ b/Resources/univorc.csd @@ -408,18 +408,29 @@ ain inch 1 adel delay ain, .01 Sname sprintf "/home/olpc/.sugar/default/tamtam/mic%d", int(p4)-6 +ihandle fiopen Sname, 2 +event "i", 5212, 1 , .01, p4 + fout Sname, 2, adel*kenv adel = 0 endin /**************************************************************** +Audio input recording ( closing file ) +****************************************************************/ +instr 5212 +Sname sprintf "/home/olpc/.sugar/default/tamtam/mic%d", int(p4)-6 +ficlose Sname +endin + +/**************************************************************** SynthLab input recording ****************************************************************/ instr 5204 ain = gasynth*4 -Sname sprintf "/home/olpc/.sugar/default/tamtam/lab%d", int(p4)-85 -fout Sname, 2, ain +Sname2 sprintf "/home/olpc/.sugar/default/tamtam/lab%d", int(p4)-85 +fout Sname2, 2, ain gasynth = 0 endin |