double vol_long = (iHigh(NULL,1440,0)- iOpen(NULL,1440,0))*10000;
double vol_short= (iOpen(NULL,1440,0)- iLow(NULL,1440,0))*10000;

  Comment (vol_long);
  Comment (vol_short);
//===== Ищем возможность войти в рынок ==========================================

int Orders=OrdersTotal ();     //получаем кол-во открытых ордеров
if (Orders==0)                 //если нет открытых ордеров
  {

//---------проверяем условие на покупку----------------------------
  if   (  
                   (vol_long>BarSize_long )  )
   {
  ...   }
//--------проверяем условие на продажу------------------------------
  if  (
                  (vol_short>BarSize_short))

//+------------------------------------------------------------------+
//|Stochastic_Env.mq4.mq4
//| leonid553
//| http://www.tradersforum.net.ru/
//+------------------------------------------------------------------+
#property copyright "leonid553 & co"
#property link      "http://www.tradersforum.net.ru/"

//---- input parameters---------
extern int     MagicNum    =6784;

extern int     BarSize_long    =100;
extern int     TP_long         =50;
extern int     SL_long         =100;

extern int     BarSize_short    =100;
extern int     TP_short         =50;
extern int     SL_short         =100;
//------------------------------
extern bool UseTrailing = false;
extern int lMinProfit = 30;
extern int sMinProfit = 30;
extern int lTrailingStop = 30;
extern int sTrailingStop = 30;
extern int lTrailingStep = 5;
extern int sTrailingStep = 5;

extern double  Lot=0.1;
extern int     Slippage=3;
//-- Подключаемые модули --
#include <stdlib.mqh>
//-------------------
int ticket;
int         ExpertBars;
static bool ZeroBarOrd;
//*********************************************************************

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
ExpertBars = Bars;
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
  
//----
   return(0);
  }

//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
bool isNewBar=false;
if (ExpertBars !=Bars) {ExpertBars=Bars; isNewBar=true; }  

int _Order=isExpertOrder();


if (isNewBar) {
if (_Order!=0) ZeroBarOrd=true;  //есть ордер
else           ZeroBarOrd=false; //нет ордера
}
    if (UseTrailing) TrailPositions();
//*********************************************************************

double vol_long = (iHigh(NULL,1440,0)- iOpen(NULL,1440,0))*100;
double vol_short= (iOpen(NULL,1440,0)- iLow(NULL,1440,0))*100;

  Comment (vol_long);
  Comment (vol_short);
//===== Ищем возможность войти в рынок ==========================================

int Orders=OrdersTotal ();     //получаем кол-во открытых ордеров
if (Orders==0)                 //если нет открытых ордеров
  {
if (!ZeroBarOrd) {      
//---------проверяем условие на покупку----------------------------
  if   (  
          //(vol_>0)  &&
          (vol_long>BarSize_long )  )
   {
  ticket=OrderSend(Symbol(),0,Lot,Ask,Slippage,Bid-SL_long *Point,
                                      Ask+TP_long *Point,NULL,MagicNum ,0,Green);
  if (ticket<0) { Print("Ошибка открытия ордера BUY #", GetLastError()); return (0); }      
   else ZeroBarOrd=true;
   }
//--------проверяем условие на продажу------------------------------
  if  (
          //(vol_<0)  &&
           (vol_short>BarSize_short))
   {      
  ticket=OrderSend(Symbol(),1,Lot,Bid,Slippage,Bid+SL_short*Point,
                                       Bid-TP_short *Point,NULL,MagicNum ,0,Blue);
if (ticket<0) { Print("Ошибка открытия ордера BUY #", GetLastError()); return (0); }            
  else ZeroBarOrd=true;
   }  
//------------------------------------------------------------------
}
   }
  return(0);
  }
  //****************************************************************
void TrailPositions()
{
  int Orders = OrdersTotal();
  for (int i=0; i<Orders; i++) {
    if (!(OrderSelect(i, SELECT_BY_POS, MODE_TRADES))) continue;
    if (OrderSymbol() != Symbol()) continue;  

    if (OrderType() == OP_BUY) {
      if (Bid-OrderOpenPrice() > lMinProfit*Point) {
        if (OrderStopLoss() < Bid-(lTrailingStop+lTrailingStep-1)*Point) {
          OrderModify(OrderTicket(), OrderOpenPrice(), Bid-lTrailingStop*Point,
                                                      OrderTakeProfit(), 0, Blue);
        }}}
    if (OrderType() == OP_SELL) {
      if (OrderOpenPrice()-Ask > sMinProfit*Point) {
        if (OrderStopLoss() > Ask+(sTrailingStop+sTrailingStep-1)*Point ||
                                                             OrderStopLoss() == 0) {
          OrderModify(OrderTicket(), OrderOpenPrice(), Ask+sTrailingStop*Point,
                                                        OrderTakeProfit(), 0, Blue);
        }}}}}
//-------------------------------------------------------------------+
//=======================================================================================
//| Функция проверки наличия ордеров эксперта |==========================================
//| 0 - ордеров нет                           |==========================================
//| 1 - есть ордер Buy                        |==========================================
//| 2 - есть ордер Sell                       |==========================================
//=======================================================================================
int isExpertOrder() {

int _OrdersTotal=OrdersTotal();

//---------- При тестировании проводим упрощённую проверку ордеров.
if (IsTesting())                               {              
  if (_OrdersTotal==0) return (0);
  
  for (int i=0; i<_OrdersTotal; i++)               {
    if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) {
      if (OrderType()==OP_BUY)  {return(1); break;  }    
      if (OrderType()==OP_SELL) {return(2); break; }
    }        
  }
}