/*  This file downloaded from Highend3d.com
''  
''  Highend3d.com File Information:
''  
''    Script Name: HairStrokes v1.0
''    Author: Dai Sato
''    Last Updated: April 11, 2004
''    Update/Change this file at:
''    http://www.highend3d.com/maya/mel/?section=paintfx#2873
''  
''  Please do not alter any information above this line
''  it is generated dynamically by Highend3d.com and will
''  be changed automatically on any updates.
*/

//HairStrokes
//
// Date: 2004/04/09
// Author: Dai Sato   dstruevision@dstruevision.com    http://www.dstruevision.com
// Procedure Name: HairStrokes
// 
// Description: This scripts simple script list all strokes in your scene and
// change sample density of all selected strokes in a list.



global proc displaySliderChange(){
      float $sliderValue = `floatSlider -q -v displaySlider`;
      floatField -edit -v $sliderValue displayField; 
      string $selectedList[] = `textScrollList -q -si strokeList`; 

    for($i=0;$i<size($selectedList);$i++) {
                            float $value = `floatField -q -v displayField`;
                            setAttr ($selectedList[$i]+".displayPercent") $sliderValue;
                                           }

}



global proc sampleSliderChange(){
      float $sliderValue = `floatSlider -q -v sampleSlider`;
      floatField -edit -v $sliderValue sampleField; 
       string $selectedList[] = `textScrollList -q -si strokeList`;

    for($i=0;$i<size($selectedList);$i++) {
                            float $value = `floatField -q -v sampleField`;
                            setAttr ($selectedList[$i]+".sampleDensity") $sliderValue;
                                           }

}


global proc tubesSliderChange(){
      float $sliderValue = `floatSlider -q -v tubesSlider`;
      floatField -edit -v $sliderValue tubesField; 
      string $selectedList[] = `textScrollList -q -si strokeList`;    

     for($i=0;$i<size($selectedList);$i++) {
              string $myHistory[] = `listHistory $selectedList[$i]`;
              string $tmpHisotry;
                    for ($tmpHistory in $myHistory) { 
                                 string $tmpType = `nodeType $tmpHistory`; 
                                 if($tmpType=="brush") {
                                 setAttr ($tmpHistory+".tubesPerStep") $sliderValue;
                                                        }
                                                   }
                                           }    


}




global proc string[] collectStrokes (){
   string $sceneStrokes[] = `ls -type stroke`; 
   return $sceneStrokes;
}




global proc myAddStrokes (){
    textScrollList -edit -ra strokeList;
    int $strokesNumber = size(collectStrokes());
    string $allStrokes[] = collectStrokes();

             for($i=0;$i<$strokesNumber;$i++) {
              textScrollList -edit -append $allStrokes[$i] strokeList;
                                         }

                         }

global proc myAddBrushes (){
    string $selectedTab = `tabLayout -q	-st hairStrokeTab` ;
    textScrollList -edit -ra brushList;
    textScrollList -edit -ra brushList2;
    string $currentSelection[] = `ls -sl`; 

     for($i=0;$i<size($currentSelection);$i++) {
              string $myHistory[] = `listHistory $currentSelection[$i]`;
              string $tmpHisotry;
                    for ($tmpHistory in $myHistory) { 
                                 string $tmpType = `nodeType $tmpHistory`; 
                                 if($tmpType=="brush") {
                              switch($selectedTab) {
                                case "brushes":
                                 textScrollList -edit -append $tmpHistory brushList;
                                 break;
                                case "shadow":
                                 textScrollList -edit -append $tmpHistory brushList2;
                                 break;
                                 default:
                                    break;
                                                    }
                                                        }
                                                   }
                                           }    
}



global proc whenStrokeSelected () {
   string $selection[] = `textScrollList -q -si strokeList`;
   select $selection;
}



global proc whenBrushSelected () {
   string $selection[] = `textScrollList -q -si brushList`;
   select $selection;
}

global proc whenBrushSelected2 () {
   string $selection[] = `textScrollList -q -si brushList2`;
   select $selection;
}



global proc HairStrokeTabChanged() {

   string $selectedTab = `tabLayout -q	-st hairStrokeTab` ;
   myAddStrokes();
   myAddBrushes();

   switch ($selectedTab) {
    case "strokes":
        window -e -width 180 -height 470 HairStrokes;
        break;
    case "brushes":
        window -e -width 360 -height 470 HairStrokes;
        break;
    case "shadow":
        window -e -width 360 -height 470 HairStrokes;
        break;
    default:
        break;
                        }

 
}



global proc mySliderChange(int $flag) {

  int $intValue; 
  float $floatValue;
  int $typeFlag;
  string $changeAttribute;

  switch ($flag) {
    case 1:
        float $sliderValue = `floatSlider -q -v tubeRandSlider`;
        floatField -edit -v $sliderValue tubeRandField;
        $floatValue = $sliderValue; 
        $changeAttribute = ".tubeRand";
        $typeFlag = 0;
        break;
    case 2:
        int $intSliderValue = `intSlider -q -v segmentsSlider`;
        intField -edit -v $intSliderValue segmentsField;
        $intValue = $intSliderValue; 
        $changeAttribute = ".segments";
        $typeFlag = 1;
        break;
    case 3:
        float $sliderValue = `floatSlider -q -v lengthMinSlider`;
        floatField -edit -v $sliderValue lengthMinField;
        $floatValue = $sliderValue; 
        $changeAttribute = ".lengthMin";
        $typeFlag = 0;
        break;
    case 4:
        float $floatSliderValue = `floatSlider -q -v lengthMaxSlider`;
        floatField -edit -v $floatSliderValue lengthMaxField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".lengthMax";
        $typeFlag = 0;
        break;
     case 5:
        float $floatSliderValue = `floatSlider -q -v pathFollowSlider`;
        floatField -edit -v $floatSliderValue pathFollowField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".pathFollow";
        $typeFlag = 0;
        break;
     case 6:
        float $floatSliderValue = `floatSlider -q -v pathAttractSlider`;
        floatField -edit -v $floatSliderValue pathAttractField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".pathAttract";
        $typeFlag = 0;
        break;
    case 7:
        float $floatSliderValue = `floatSlider -q -v curveFollowSlider`;
        floatField -edit -v $floatSliderValue curveFollowField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".curveFollow";
        $typeFlag = 0;
        break;
    case 8:
        float $floatSliderValue = `floatSlider -q -v curveAttractSlider`;
        floatField -edit -v $floatSliderValue curveAttractField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".curveAttract";
        $typeFlag = 0;
        break;
    case 9:
        float $floatSliderValue = `floatSlider -q -v curveMaxDistSlider`;
        floatField -edit -v $floatSliderValue curveMaxDistField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".curveMaxDist";
        $typeFlag = 0;
        break;
    case 10:
        float $floatSliderValue = `floatSlider -q -v gravitySlider`;
        floatField -edit -v $floatSliderValue gravityField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".gravity";
        $typeFlag = 0;
        break;
    case 11:
        float $floatSliderValue = `floatSlider -q -v lengthFlexSlider`;
        floatField -edit -v $floatSliderValue lengthFlexField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".lengthFlex";
        $typeFlag = 0;
        break;

    default:
        break;
                 }

     string $selectedList[] = `textScrollList -q -si brushList`;    

     for($i=0;$i<size($selectedList);$i++) {
              string $myHistory[] = `listHistory $selectedList[$i]`;
              string $tmpHisotry;
                    for ($tmpHistory in $myHistory) { 
                                 string $tmpType = `nodeType $tmpHistory`; 
                                    if($tmpType=="brush") {
                                      if($typeFlag==0)     {
                                             eval setAttr ($tmpHistory+$changeAttribute) $floatValue;
                                                  }
                                              else{
                                              eval setAttr ($tmpHistory+$changeAttribute) $intValue;         
                                                   }
                                                           }
                                                   }
                                           }    
}



global proc mySliderChange2(int $flag) {

  float $floatValue;
  string $changeAttribute;

  switch ($flag) {
    case 1:
        float $sliderValue = `floatSlider -q -v backShadowSlider`;
        floatField -edit -v $sliderValue backShadowField;
        $floatValue = $sliderValue; 
        $changeAttribute = ".backShadow";
        break;
    case 2:
        float $sliderValue = `floatSlider -q -v centerShadowSlider`;
        floatField -edit -v $sliderValue centerShadowField;
        $floatValue = $sliderValue; 
        $changeAttribute = ".centerShadow";
        break;
    case 3:
        float $sliderValue = `floatSlider -q -v depthShadowSlider`;
        floatField -edit -v $sliderValue depthShadowField;
        $floatValue = $sliderValue; 
        $changeAttribute = ".depthShadow";
        break;
    case 4:
        float $floatSliderValue = `floatSlider -q -v depthShadowDepthSlider`;
        floatField -edit -v $floatSliderValue depthShadowDepthField;
        $floatValue = $floatSliderValue; 
        $changeAttribute = ".depthShadowDepth";
        break;
    default:
        break;
                 }

     string $selectedList[] = `textScrollList -q -si brushList2`;    

     for($i=0;$i<size($selectedList);$i++){
                 eval setAttr ($selectedList[$i]+$changeAttribute) $floatValue;
                                          }    
}


global proc myCastShadow(string $flag){

 string $selectedList[] = `textScrollList -q -si brushList2`;   


 for($i=0;$i<size($selectedList);$i++){
               if($flag=="on")
                 eval setAttr ($selectedList[$i]+".castShadows") 1;
               else 
                 eval setAttr ($selectedList[$i]+".castShadows") 0;
                                      }    

}



global proc DepthCheck(string $flag){

  string $selectedList[] = `textScrollList -q -si brushList2`;    
  string $type;
  int $value;  

switch($flag){
  case "on1":
         checkBoxGrp -e -v2 false depthCheckBox;
         $type=".depthShadowType";
         $value=0;
         break;
  case "on2":
         checkBoxGrp -e -v1 false depthCheckBox;
         $type=".depthShadowType 1";
         $value=1;
         break;
  case "off1":
         checkBoxGrp -e -v2 true depthCheckBox;
         $type=".depthShadowType 1";
         $value=1;
         break;
  case "off2":
         checkBoxGrp -e -v1 true depthCheckBox;
         $type=".depthShadowType 0";
         $value=0;
         break;
  default:
          break;
 }

  for($i=0;$i<size($selectedList);$i++) {
     eval setAttr ($selectedList[$i]+$type) $value;
                                         }

}



global proc HairStrokes (){ 

global int $progressMax = 10;
string $nativeWD = `workspace -q -rd`;
string $currentWD = toNativePath($nativeWD);
string $defaultDir = $currentWD + "sourceimages";
workspace -dir $defaultDir;


if ((`window -ex HairStrokes`) == true) deleteUI HairStrokes;
window -t "HairStrokes" -s false -mnb true -mxb true -mb true HairStrokes;

tabLayout -cc "HairStrokeTabChanged()" hairStrokeTab;
columnLayout strokes;
   frameLayout -label "Strokes";
    columnLayout;
    textScrollList -allowMultiSelection true -w 150 -h 200 -sc " whenStrokeSelected()" strokeList;
    setParent strokes;
     
    columnLayout -rs 3;
    text -label "Display Percent";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 100.000 -value 100 -precision 3 displayField; 
          floatSlider -en true -w 120 -min 0.000 -max 100.000 -value 100 -step 1.0 -dc "displaySliderChange()" displaySlider;
    setParent strokes;
   
    columnLayout -rs 3;
    text -label "Sampling Density";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 2.000 -value 1.000 -precision 3 sampleField; 
          floatSlider -en true -w 120 -min 0.000 -max 2.000 -value 1.000 -step 0.1 -dc "sampleSliderChange()" sampleSlider;
    setParent strokes;

    columnLayout -rs 3;
    text -label "Tubes Per Step";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 200.000 -value 15.000 -precision 3 tubesField; 
          floatSlider -en true -w 120 -min 0.000 -max 50.000 -value 15.000 -step 1.0 -dc "tubesSliderChange()" tubesSlider;
    setParent strokes;
     
     button -label "Reload" -c "myAddStrokes()";
     button -label "Undo" -c "Undo";
     
setParent hairStrokeTab;

paneLayout -st 1 -configuration "quad" brushes;

 frameLayout -label "Brushes";
   columnLayout;
   textScrollList -allowMultiSelection true -w 150 -h 200 -sc "whenBrushSelected()" brushList;
   setParent brushes;

   columnLayout -rs 2 rightUpper;
    text -label " Tube Rand";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.126 -precision 3 tubeRandField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.126 -step 0.01 -dc "mySliderChange(1)" tubeRandSlider;
   setParent rightUpper; 
  
   columnLayout -rs 2;
    text -label " Segments";
     rowColumnLayout -numberOfRows 1;
          intField -en true -w 45 -min 0 -max 50 -value 10  segmentsField; 
          intSlider -en true -w 120 -min 0 -max 50 -value 10 -step 1 -dc "mySliderChange(2)" segmentsSlider;
   setParent rightUpper;

   columnLayout -rs 2;
    text -label " Length Min";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 10.000 -value 2.000 -precision 3 lengthMinField; 
          floatSlider -en true -w 120 -min 0.000 -max 10.000 -value 2.000 -step 0.1 -dc "mySliderChange(3)" lengthMinSlider;
  setParent rightUpper;

   columnLayout -rs 2;
    text -label " Length Max";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 10.000 -value 2.000 -precision 3 lengthMaxField; 
          floatSlider -en true -w 120 -min 0.000 -max 10.000 -value 2.000 -step 0.1 -dc "mySliderChange(4)" lengthMaxSlider;
    setParent brushes;

    columnLayout -rs 2 rightLower;
    text -label " Path Follow";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.262 -precision 3 pathFollowField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.262 -step 0.01 -dc "mySliderChange(5)" pathFollowSlider;
    setParent rightLower;

    columnLayout -rs 2;
    text -label " Path Attract";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.068 -precision 3 pathAttractField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.068 -step 0.01 -dc "mySliderChange(6)" pathAttractSlider;
    setParent rightLower;

    columnLayout -rs 2;
    text -label " Curve Follow";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 1.000 -precision 3 curveFollowField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 1.000 -step 0.01 -dc "mySliderChange(7)" curveFollowSlider;
    setParent rightLower;

    columnLayout -rs 2;
    text -label " Curve Attract";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.379 -precision 3 curveAttractField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.379 -step 0.01 -dc "mySliderChange(8)" curveAttractSlider;
    setParent brushes;


     columnLayout -rs 2 leftLower;
    text -label " Curve Max Dist";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 10.000 -value 3.000 -precision 3 curveMaxDistField; 
          floatSlider -en true -w 120 -min 0.000 -max 10.000 -value 3.000 -step 0.1 -dc "mySliderChange(9)" curveMaxDistSlider;
    setParent leftLower;

    columnLayout -rs 2;
    text -label " Gravity";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.078 -precision 3 gravityField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.078 -step 0.01 -dc "mySliderChange(10)" gravitySlider;
    setParent leftLower;

    columnLayout -rs 2;
    text -label " Length Flex";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.000 -precision 3 lengthFlexField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.000 -step 0.01 -dc "mySliderChange(11)" lengthFlexSlider;
    setParent leftLower;

setParent hairStrokeTab;

paneLayout -st 1 -configuration "quad" shadow;

 frameLayout -label "Brushes";
   columnLayout;
   textScrollList -allowMultiSelection true -w 150 -h 200 -sc "whenBrushSelected2()" brushList2;
   setParent shadow;

   columnLayout -rs 2 rightUpper2;
    text -label " Back Shadow";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.31 -precision 3 backShadowField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.31 -step 0.01 -dc "mySliderChange2(1)" backShadowSlider;
   setParent rightUpper2; 
  
   columnLayout -rs 2;
    text -label " Center Shadow";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.000 -precision 3 centerShadowField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.000 -step 0.01 -dc "mySliderChange2(2)" centerShadowSlider;
    setParent shadow;

    columnLayout -rs 2 rightLower;
    text -label " ";
    setParent shadow;

   
     columnLayout -rs 2 leftLower2;
    text -label " Depth Shadow Type";
     rowColumnLayout -numberOfRows 1;
         checkBoxGrp -v1 true
    		-numberOfCheckBoxes 2 -cw2 80 80 
    		-l1 "SurfDepth" -l2 "PathDist" -on1 "DepthCheck(\"on1\")" -on2 "DepthCheck(\"on2\")"
                -of1 "DepthCheck(\"off1\")" -of2 "DepthCheck(\"off2\")" depthCheckBox;
    setParent leftLower2;

    columnLayout -rs 2;
    text -label " Depth Shadow";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.583 -precision 3 depthShadowField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.583 -step 0.01 -dc "mySliderChange2(3)" depthShadowSlider;
    setParent leftLower2;

    columnLayout -rs 2;
    text -label " Depth Shadow Depth";
     rowColumnLayout -numberOfRows 1;
          floatField -en true -w 45 -min 0.000 -max 1.000 -value 0.311 -precision 3 depthShadowDepthField; 
          floatSlider -en true -w 120 -min 0.000 -max 1.000 -value 0.311 -step 0.01 -dc "mySliderChange2(4)" depthShadowDepthSlider;
    setParent leftLower2;

    columnLayout -rs 2 -cal "left";
       checkBoxGrp -v1 true -on1 "myCastShadow(\"on\")" -of1 "myCastShadow(\"off\")"
    		-numberOfCheckBoxes 1
    		-l1 "Cast Shadows" myCastShadow;

    setParent leftLower2;



setParent hairStrokeTab;


myAddStrokes();

    window -e -width 180 -height 470 HairStrokes;
    showWindow HairStrokes;
}