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