1 tcl/tk interface to audio library
3 easily reconfigure user interface for other different audio servers
4 audio error handler / io error handler
6 set aud [audio openserver server]
15 $au server connectionnumber
17 $au server vendorrelease
23 $au device id valuemask
24 $au device id changablemask
25 $au device id identifier
29 $au device id numtracks
31 $au device id description
32 $au device id minsamplerate
33 $au device id maxsamplerate
34 $au device id location
36 $au device id linemode
37 $au device id numchildren
38 $au device id children
42 set id [$au bucket create format tracks access rate samples description]
44 $au bucket id valuemask
45 $au bucket id changablemask
46 $au bucket id identifier
50 $au bucket id numtracks
52 $au bucket id description
53 $au bucket id samplerate
54 $au bucket id numsamples
55 set flow [$au bucket id play dev start samples volume done]
56 set flow [$au bucket id record dev start samples volume done]
58 $au flow id volume percent