Re: [linux-audio-dev] Snack Audio

Yosvany Llerena Rodríguez ha scritto:
> Hi All. I'm using Snack Audio 2.2 and Tcl/Tk to develop some
> application, I need to record a few seconds of voice but it's
> impossible y record an empty file.
>
> -- Snack Audio
> -- vtcl(GUI for Tcl/tk)
> -- Suse Linux 10.1
>
>
> I use this Tcl code.
>
> package require snack
>
> snack :: sound s
>
> proc ::Record {} {
> global widget
>
> snack::sound s
>
> proc sstop {} {
> s stop
> set filename "tmpwave.wav"
> s write $filename
> s destroy
> // Extract
> }
>
> after 5000 sstop
> s record
>
>
> best regards
> Yosvany
>

Some things relate to the tcl-language not much clear :)

This is a code that would work as you want:

#start example
package require snack

snack::sound s

proc Record {} {
s record
after 5000 sstop
}
proc sstop {} {
     s stop
     set filename "tmpwave.wav"
     s write $filename
     s destroy
puts "this goes well"
exit
}
Record
#end example

hope help

--
Lazzaro