V 10
1
LANG:1 0 
PANEL,-1 -1 152 90 N "_3DFace" 1
"$1"
E E E E E 1 -1 -1 0  10 10
""0  1
E E 2
"CBRef" "1"
"EClose" E
""
DISPLAY_LAYER, 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0
LAYER, 0 
1
LANG:1 0 
13 0
"PUSH_BUTTON1"
""
1 10 10 E E E 1 E 1 E N "_ButtonText" E N "_Button" E E
 E E
0 0 0 0 0 0
E E E
0
1
LANG:1 0 

0
1
LANG:1 98 -*-MS Shell Dlg-*-r-normal-*-11-*-100-100-*-*-iso8859-1|-11,0,0,0,505,0,0,0,0,0,0,0,0,MS Shell Dlg
0 ""
 8 8 152 32

T 
1
LANG:1 12 PUSH_BUTTON1
"main()
{
  //All list of button names
  //Plan is like this;
  //If Upper is green, kill under graph. otherwise, kill upper.
  
  //Define system name and Prefix.
  string sys = \"dcs_gas:ALITRD_\";
  
  //Make Button list. Very important to sink the script behind
  //State dialog.
  dyn_string ButList = makeDynString(//for Exhaust 4 list start at 0
                                     \"[Output flow]\",\"Buffer pressure\",\"Circulation pressure\",
                                     \"[Circulation flow]\"
                                     //for Mixer 6 list start at 5
                                     ,\"Output pressure\",\"Total Flow\"                                     
                                     ,\"Line 1 low flow MFC\",\"Line 1 high flow MFC\",\"Line 2 low flow MFC\"
                                     ,\"Line 2 high flow MFC\"
                                     );
  int i,position,BB,GB;
  
  
  string color,upcol,Bcolor,WhoIsOn;
  getValue(\"Upper\",\"backCol\",upcol);
  
  //Now determine What is this button
  //And which is Blue button or Green Button
  getValue(\"GasOnOff\",\"backCol\",WhoIsOn);
  getValue(\"ExhaOnOff\",\"backCol\",WhoIsOn);
  if(WhoIsOn==\"green\")
  {
    for(i=1;i<=4;i++)
     {
       if(ButList[i]==$1)
       {position = i;}
       getValue(ButList[i],\"backCol\",Bcolor);
       if(Bcolor==\"green\")
       {GB = i;}
       else if(Bcolor == \"blue\")
       {BB = i;}
     }
  }
  getValue(\"MixerOnOff\",\"backCol\",WhoIsOn);
  if(WhoIsOn==\"green\")
  {
    for(i=5;i<=10;i++)
     {
       if(ButList[i]==$1)
       {position = i;}
       getValue(ButList[i],\"backCol\",Bcolor);
       if(Bcolor==\"green\")
       {GB = i;}
       else if(Bcolor == \"blue\")
       {BB = i;}
     }
  }
  /*
  getValue(\"DistOnOff\",\"backCol\",WhoIsOn);
  if(WhoIsOn==\"green\")
  {
    for(i=12;i<=14;i++)
     {
       if(ButList[i]==$1)
       {position = i;}
       getValue(ButList[i],\"backCol\",Bcolor);
       if(Bcolor==\"green\")
       {GB = i;}
       else if(Bcolor == \"blue\")
       {BB = i;}
     }
  }
  getValue(\"PumpOnOff\",\"backCol\",WhoIsOn);
  getValue(\"PuriOnOff\",\"backCol\",WhoIsOn);
  getValue(\"ColAOnOff\",\"backCol\",WhoIsOn);
  getValue(\"ColBOnOff\",\"backCol\",WhoIsOn);
  getValue(\"AnaOnOff\",\"backCol\",WhoIsOn);
  if(WhoIsOn==\"green\")
  {
    for(i=19;i<=26;i++)
     {
       if(ButList[i]==$1)
       {position = i;}
       getValue(ButList[i],\"backCol\",Bcolor);
       if(Bcolor==\"green\")
       {GB = i;}
     }
  }
  */
  
  
  
  
  //Now define action for buttons
  switch(position)
  {
    case 1://\"[Output flow]\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to200.pnl\",\"gra2\",
                makeDynString(sys+\"Xh_XMFC5002FlF.Value\",\"[Output flow]\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to200.pnl\",\"gra1\",
                makeDynString(sys+\"Xh_XMFC5002FlF.Value\",\"[Output flow]\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 2://\"Buffer pressure\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to10.pnl\",\"gra2\",
                makeDynString(sys+\"Xh_PT5005.Value\",\"Buffer pressure\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to10.pnl\",\"gra1\",
                makeDynString(sys+\"Xh_PT5005.Value\",\"Buffer pressure\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 3://\"Circulation pressure\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to10.pnl\",\"gra2\",
                makeDynString(sys+\"Xh_PT5011.Value\",\"Circulation pressure\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to10.pnl\",\"gra1\",
                makeDynString(sys+\"Xh_PT5011.Value\",\"Circulation pressure\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 4://\"[Circulation flow]\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to25000.pnl\",\"gra2\",
                makeDynString(sys+\"Xh_FIT5010.Value\",\"Circulation flow\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to25000.pnl\",\"gra1\",
                makeDynString(sys+\"Xh_FIT5010.Value\",\"Circulation flow\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 5://Output pressure
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to10.pnl\",\"gra2\",
            makeDynString(sys+\"Mx_PT1009.Value\",\"Output Pressure\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to10.pnl\",\"gra1\",
            makeDynString(sys+\"Mx_PT1009.Value\",\"Output Pressure\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 6://\"Total Flow\"                                    
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to5000.pnl\",\"gra2\",
            makeDynString(sys+\"Mx_TotalFlowAS.Value\",\"TotalFlow\"
                          ,\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to5000.pnl\",\"gra1\",
            makeDynString(sys+\"Mx_TotalFlowAS.Value\",\"TotalFlow\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 7://\"Line 1 low flow MFC\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to100.pnl\",\"gra2\",
            makeDynString(sys+\"Mx_XMFC1106FlF.Value\",\"Line 1 low flow MFC mesured flow\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to100.pnl\",\"gra1\",
            makeDynString(sys+\"Mx_XMFC1106FlF.Value\",\"Line 1 low flow MFC mesured flow\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 8://\"Line 1 high flow MFC\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to5000.pnl\",\"gra2\",
            makeDynString(sys+\"Mx_XMFC1109FlF.Value\",\"Line 1 high flow MFC mesured flow\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to5000.pnl\",\"gra1\",
            makeDynString(sys+\"Mx_XMFC1109FlF.Value\",\"Line 1 high flow MFC mesured flow\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 9://\"Line 2 low flow MFC\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to50.pnl\",\"gra2\",
            makeDynString(sys+\"Mx_XMFC1206FlF.Value\",\"Line 2 low flow MFC mesured flow\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to50.pnl\",\"gra1\",
            makeDynString(sys+\"Mx_XMFC1206FlF.Value\",\"Line 2 low flow MFC mesured flow\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
    case 10://\"Line 2 high flow MFC\"
      getValue(ButList[position],\"backCol\",color);
      if(color == \"red\")
      {
        if(upcol==\"green\")//DrawLower
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra2\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to5000.pnl\",\"gra2\",
            makeDynString(sys+\"Mx_XMFC1209FlF.Value\",\"Line 2 high flow MFC mesured flow\",\"gra2\"),150,370,0,1,1);
          setValue(\"Upper\",\"backCol\",\"red\");
          setValue(ButList[BB],\"backCol\",\"red\");
          this.backCol = \"blue\";
        }else//DrawHigher
        {
          removeSymbol(myModuleName(),myPanelName(),\"gra1\");
          addSymbol(myModuleName(),myPanelName(),\"trd_gas/leeTPC_graph0to5000.pnl\",\"gra1\",
            makeDynString(sys+\"Mx_XMFC1209FlF.Value\",\"Line 2 high flow MFC mesured flow\",\"gra1\"),150,70,0,1,1);
          setValue(\"Upper\",\"backCol\",\"green\");
          setValue(ButList[GB],\"backCol\",\"red\");
          this.backCol = \"green\";}
      }
      break;
  }
}" 0
 E E "main()
{
  this.name = $1;
  this.text = $1;
}" 0

0
LAYER, 1 
1
LANG:1 0 
0
LAYER, 2 
1
LANG:1 0 
0
LAYER, 3 
1
LANG:1 0 
0
LAYER, 4 
1
LANG:1 0 
0
LAYER, 5 
1
LANG:1 0 
0
LAYER, 6 
1
LANG:1 0 
0
LAYER, 7 
1
LANG:1 0 
0
0