//-------------
bool Check_inside(double gia1,double pllineduoi,double pllinetren)
{
   double llineduoi = MathMin(pllineduoi,pllinetren);
    double  llinetren = MathMax(pllineduoi,pllinetren);

    if(   llineduoi <= gia1 && gia1 <= llinetren ){return (true);}
   else {return (false);}
}/*    ////////////========================

//=======================
double level1,level2,level3,level4;  int caynen_sup,caynen_dem;  
 
void GET_SD(string sym, int timefamre)// index 1 = highup.2= highdn,3 = lowup, 4 = lowdn
   {   
    string text;
      //-----
      for( int i =1;i< Bars;i++)
      {
         double  value =       iCustom(sym,timefamre,"SupplyDemand_chinhsua",2,i);//cay nen tren   
      if(value > 0 )
                  {
                    
                           level1 = iHigh(sym,timefamre,i);
                           level2 = MathMin(iClose(sym,timefamre,i),iOpen(sym,timefamre,i));
                                level2 = MathMax(level2,MathMax(iLow(sym,timefamre,i-1),iLow(sym,timefamre,i+1)));
                                level2 = MathMax(level2,MathMin(iOpen(sym,timefamre,i-1),iClose(sym,timefamre,i-1)));
                                 level2 = MathMax(level2,MathMin(iOpen(sym,timefamre,i+1),iClose(sym,timefamre,i+1)));
                              // if(khoang_cach == false){break;}  
                          //Comment(value +" i "+ i);
                           text += "cay nen up " +i;
                           caynen_sup = i;
                           
                      bool   next =false;
                         for(int j = i-1;j>=0;j--)
                         {
                         if(iHigh(sym,timefamre,j)> level1){next = true;}
                         
                         }   
                          
                      if(next == false){ break;}
                     // break;
                         //  if(MathAbs(MarketInfo(sym,MODE_BID)-level2)> 2*MathAbs(level2-level1)    ){  text += " cay nen up " +i; break;}
                   }
      }
      
      
        for( i =1;i< Bars;i++)
      {
  
          value =       iCustom(sym,timefamre,"SupplyDemand_chinhsua",5,i);//cay nen duoi
         
         if(value > 0  )
               {//text += "cay nen down " +i;
                           level4 = iLow(sym,timefamre,i);
                           level3 = MathMax(iClose(sym,timefamre,i),iOpen(sym,timefamre,i));
                           if(i>0) level3 = MathMin(level3,MathMin(iHigh(sym,timefamre,i+1),iHigh(sym,timefamre,i-1)));
                           if(i>0) level3 = MathMin(level3,MathMax(iOpen(sym,timefamre,i-1),iClose(sym,timefamre,i-1)));
                           level3 = MathMin(level3,MathMax(iOpen(sym,timefamre,i+1),iClose(sym,timefamre,i+1)));
                        caynen_dem = i;
                            text += " cay nen dn " +i;
                         next =false;
                         for(j = i-1;j>=0;j--)
                         {
                         if(iLow(sym,timefamre,j) < level4){next = true;}
                         
                         }   
                          
                         if(next == false){ break;}
                         //  break;
                               //  if(khoang_cach == false){break;}  
                             //   if(MathAbs(MarketInfo(sym,MODE_BID)-level3)>2* MathAbs(level3-level4)    ){  text += "cay nen dn " +i; break;}
                }
      }
      //Comment(text+" --- "+level1 +" " +level2 +" " +level3 +" " +level4 );
  //  Comment(text);
      
   }

  //-------------