// autoUi
// v1.0
// March 10 2000
// Soren 'kurgan' Jacobsen
// kurgan@kurgan.dk  (suggestions/bugreports welcome)
// http://www.kurgan.dk/
//

global proc bioImport()
{
string $list[]= `ls -sl`;
string$current;
string $Attr;

string $inFile = `fileDialog`;
$fileId=`fopen $inFile "r"`;

string $nextWord = `fgetword $fileId`;
while ( size( $nextWord ) > 0 ) {
      print ( $nextWord + "\n" );
      $nextWord = `fgetword $fileId`;
      }
fclose $fileId;

window -title "Auto UI";
scrollLayout;
gridLayout -nc 2 -cw 400;
text -l "Keyable Attributes";
text -l " ";
for($current in $list)
{
string $attrLST[]= `listAttr -k $current`;
separator -w 400 -style "out";
text -l " ";
text -l $current;
text -l " ";
for($Attr in $attrLST)
{
attrFieldSliderGrp -min -20 -max 20
-at ($current + "." + $Attr);
button -l "keyframe" -w 70 
-c ("setKeyframe " + $current + "." + $Attr);
}
};
showWindow;
}