input double Lots     = 0.1; // торговый объем
input double MaxLot   = 5;   // максимальный торговый объем
input double KLot     = 1.5; // увеличение лота

input int StopLoss   = 5555; // стоп
input int TakeProfit = 111;  // тейк
input int Count      = 20;   // число поз
input int Step       = 333;  // шаг

input int StartHour  = 0;    // час начала торговли
input int StartMin   = 30;   // минута начала торговли
input int EndHour    = 23;   // час окончания торговли
input int EndMin     = 30;   // минута окончания торговли

input ulong Magic    = 123;  // магик
input int Spread     = 33;   // спред
input int Slip       = 22;   // проскальзывание

input bool Buy       = 1;    // покупки
input bool Sell      = 1;    // продажи

input string Comm    = "Scalp";

input string IndName = "Trend direction and force - JMA smoothed";

input int       trendPeriod  = 20;      // Trend period
input int       smoothPeriod = 3;       // Smoothing period
input double    TriggerUp    =  0.1;    // Trigger up level
input double    TriggerDown  = -0.1;    // Trigger down level

//+------------------------------------------------------------------+      // Это мой первый код на mql5.
//|     Общий Безубыток должен выглядеть так                         |      //  Требует проверки !!!!!!!!!
//+------------------------------------------------------------------+      // Надеюсь получилось. 
double All()
{
      double AllBU=0;
      double BuyLotsSum=0,SelLotsSum=0;
      double WeighBuy=0,WeighSel=0;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)))
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)               
                  {
                  if(PositionGetInteger(POSITION_TYPE)==0)
                     {
                     WeighBuy   += PositionGetDouble(POSITION_PRICE_OPEN)*PositionGetDouble(POSITION_VOLUME);
                     BuyLotsSum += PositionGetDouble(POSITION_VOLUME);
                     }
                  if(PositionGetInteger(POSITION_TYPE)==1)
                     {
                     WeighSel   += PositionGetDouble(POSITION_PRICE_OPEN)*PositionGetDouble(POSITION_VOLUME);
                     SelLotsSum += PositionGetDouble(POSITION_VOLUME);
                     }
                  }
      if(BuyLotsSum-SelLotsSum!=0)
         AllBU=(WeighBuy-WeighSel)/(BuyLotsSum-SelLotsSum);
   return(NormalizeDouble(AllBU,_Digits));
}
//+------------------------------------------------------------------+

<code>
//+------------------------------------------------------------------+
//|                                                   KAE Impuls.mq4 |
//+------------------------------------------------------------------+
#property copyright ""
#property link      ""

#property indicator_separate_window
#property indicator_buffers 4
#property indicator_color1 clrCoral
#property indicator_color2 clrCornflowerBlue
#property indicator_color3 Red
#property indicator_color4 Blue

extern int                Per_ATR  = 3;
extern int                Per_MA   = 3;
extern ENUM_MA_METHOD     Ma_Type  = MODE_SMMA;
extern ENUM_APPLIED_PRICE PRICE    = PRICE_CLOSE;
extern double             Level_Up = 16.7;
extern double             Level_Dn = 16.7;
//---
extern bool   alertsOn        = false;
extern bool   alertsOnCurrent = true;
extern bool   alertsMessage   = true;
extern bool   alertsSound     = false;
extern bool   alertsEmail     = false;
//---
double AboveBuff[];
double ShortBuff[];
double LongBuffe[];
double BelowBuff[];

// ---
int init() {
   SetIndexBuffer(0, AboveBuff); SetIndexStyle(0, DRAW_HISTOGRAM, EMPTY, 3);                          
   SetIndexBuffer(1, BelowBuff); SetIndexStyle(1, DRAW_HISTOGRAM, EMPTY, 3);                          
   SetIndexBuffer(2, ShortBuff); SetIndexStyle(2, DRAW_ARROW, EMPTY, 1);       SetIndexArrow(2, 108);
   SetIndexBuffer(3, LongBuffe); SetIndexStyle(3, DRAW_ARROW, EMPTY, 1);       SetIndexArrow(3, 108); 
   
   SetIndexLabel(0, "Вверх");
   SetIndexLabel(1, "Вниз");   
   SetIndexLabel(2, NULL);  
   SetIndexLabel(3, NULL);  
   
   SetLevelStyle(STYLE_DOT, 0, SteelBlue);

   IndicatorShortName(" KAE Impuls ");
   return (0);
}
// ---
void deinit() {
   Comment("");
}
// ---
void start()
{
   int counted_bars=IndicatorCounted();
      if(counted_bars<0) return;
      if(counted_bars>0) counted_bars--;
           int limit=MathMin(Bars-counted_bars,Bars-1);
      
      for (int i = limit; i >=0; i--) 
        {
        double Main =iMA(NULL,0,Per_MA,0,Ma_Type,PRICE,i);//  !!! +1
        double Minr = 0.2 * iATR(NULL,PERIOD_CURRENT,Per_ATR,i);
         
        if (Minr!=0)
          {
          AboveBuff[i] = 3.0 * (High[i]  - Main) / Minr;
          BelowBuff[i] = 3.0 * (Low[i]   - Main) / Minr;
          }
        
        if(AboveBuff[i] + BelowBuff[i]>=0)
          {
          AboveBuff[i] = AboveBuff[i] + BelowBuff[i];
          BelowBuff[i] = 0;
          }
        if(AboveBuff[i] + BelowBuff[i]<0)
          {
          BelowBuff[i] = AboveBuff[i] + BelowBuff[i];
          AboveBuff[i] = 0;
          }
                       
        ShortBuff[i] = EMPTY_VALUE;
        LongBuffe[i] = EMPTY_VALUE;
        
        if (AboveBuff[i] >  Level_Up && Close[i] > Open[i]) 
          ShortBuff[i] =  Level_Up;
          
        if (BelowBuff[i] < -Level_Dn && Close[i] < Open[i]) 
          LongBuffe[i] = -(Level_Dn);
        }
   manageAlerts();
   return;
}
//+-------------------------------------------------------------------
//|                                                                  
//+-------------------------------------------------------------------
void manageAlerts()
{
    if (alertsOn)
      {
      if (alertsOnCurrent)
           int whichBar = 0;
      else     whichBar = 1;
      
      if (ShortBuff[whichBar] != EMPTY_VALUE || LongBuffe[whichBar] != EMPTY_VALUE)
        {
        if (ShortBuff[whichBar] !=  EMPTY_VALUE) doAlert(whichBar,"down");
        if (LongBuffe[whichBar] !=  EMPTY_VALUE) doAlert(whichBar,"up");
        }
      }
}
// ---
void doAlert(int forBar, string doWhat)
{
   static string   previousAlert="nothing";
   static datetime previousTime;
   string message;
   
   if (previousAlert != doWhat || previousTime != Time[forBar]) 
     {
     previousAlert  = doWhat;
     previousTime   = Time[forBar];

     message =  StringConcatenate(Symbol()," at ",TimeToStr(TimeLocal(),TIME_SECONDS)," SimilarFxMNT signal ",doWhat);
       if (alertsMessage) 
         Alert(message);
       if (alertsEmail)   
         SendMail
           (StringConcatenate(Symbol()," SimilarFxMNT "),message);
       if (alertsSound)   
         PlaySound("alert2.wav");
     }
}
// ------------------------------------------------------------------------------------------------------------------

</code>

//+------------------------------------------------------------------+
//|                                               TrendDirection.mq5 |
//|                                             Copyright 2024, AM2. |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2024, AM2."
#property link      "http://www.forexsystems.biz"
#property version   "1.00"

#include <Trade\Trade.mqh>
CTrade trade;

input double    Lots        = 0.1;      // торговый объем
input double    MaxLot      = 5;        // максимальный торговый объем
input double    KLot        = 1.5;      // увеличение лота
input int       StopLoss    = 5555;     // стоп
input int       TakeProfit  = 111;      // тейк
input int       Count       = 20;       // число поз
input int       Step        = 333;      // шаг
input int       StartHour   = 0;        // час начала торговли
input int       StartMin    = 30;       // минута начала торговли
input int       EndHour     = 23;       // час окончания торговли
input int       EndMin      = 30;       // минута окончания торговли
input ulong     Magic        = 1961;    // магик
input int       Spread       = 33;      // спред
input int       Slip         = 22;      // проскальзывание
input bool      Buy          = 1;       // покупки
input bool      Sell         = 1;       // продажи
input string    Comm         = "Scalp";
input string    IndName      = "Trend direction and force - JMA smoothed";
input int       trendPeriod  = 20;      // Trend period
input int       smoothPeriod = 3;       // Smoothing period
input double    TriggerUp    =  0.1;    // Trigger up level
input double    TriggerDown  = -0.1;    // Trigger down level
//---
datetime t=0;
int td=0, Spr;
double    Ask, Bid;
double tr[2];
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
{
      td = iCustom(NULL,0,IndName,trendPeriod,smoothPeriod,TriggerUp,TriggerDown);        // А какой массив из четырех ???????????????????
      trade.SetExpertMagicNumber(Magic);
      trade.SetDeviationInPoints(Slip);
   return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
}
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
   double sl=0,tp=0;
   
   Spr = (int)SymbolInfoInteger(NULL,SYMBOL_SPREAD);
   Ask = SymbolInfoDouble(NULL,SYMBOL_ASK);
   Bid = SymbolInfoDouble(NULL,SYMBOL_BID);

   CopyBuffer(td,2,1,2,tr);                            // А чему равен tr? Не вижу нигде наполнения массива. ????????????????????????????????

   bool buy = tr[1]>TriggerUp && tr[0]<TriggerUp;      // !!!!!!!!!!!!!!!!!!!!    // Сигналы требуют коррекции
   bool sell = tr[1]<TriggerDown && tr[0]>TriggerDown; // !!!!!!!!!!!!!!!!!!!!    // Другой раз !!!

   if(Spr<=Spread)
      {
      if(CountTrades()<1 && TimeSession(StartHour,StartMin,EndHour,EndMin,TimeCurrent()))
         {
         if(buy && Buy)
            {
            PutOrder(0);
            ModifyOrders();
            }
         if(sell && Sell)
            {
            PutOrder(1);
            ModifyOrders();
            }
         }
      //---
      if(CountTrades()>0 && CountTrades()<Count)
         {
         if(PositionType()==0 && FindLastBuyPrice()-Ask>Step*_Point)
            {
            PutOrder(0);
            ModifyOrders();
            }

         if(PositionType()==1 && Bid-FindLastSellPrice()>Step*_Point)
            {
            PutOrder(1);
            ModifyOrders();
            }
         }
      }
   Comment("\n tr1: ",tr[0],
           "\n tr2: ",tr[1]);
}//+------------------------------------------------------------------+
//|   Расчет лота                                                    |   // Получение лота. Лот каждой позиции *KLot. Зачем????????????????
//+------------------------------------------------------------------+   // Против направления - согласен. По ходу - ?!
double Lot(int type)
{
      double lot=Lots;
   
      if(CountTrades(type)>0)
         lot=NormalizeDouble(Lots*MathPow(KLot,CountTrades(type)),2);
      if(lot>MaxLot)
         lot=Lots;
   return(lot);
}
//+------------------------------------------------------------------+
//|     Подсчет открытых позиций по типу                             |
//+------------------------------------------------------------------+
int CountTrades(int type=-1)
{
      int count=0;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)))
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)
                  if(PositionGetInteger(POSITION_TYPE)==type || type==-1)  // ... || type==-1 - нет необходимости. Даже вредно для здоровья. 
                     count++;                                              // если предполагается ручное вмешательство,
   return(count);                                                          // то надо создавать кнопки на открытиЯ, но уже с Magic !!!!!!!!! 
}
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void CloseAll(int type=-1)
{
   for(int i=PositionsTotal()-1; i>=0; i--)
      if(PositionSelectByTicket(PositionGetTicket(i)))
         if(PositionGetString(POSITION_SYMBOL)==_Symbol)
            if(PositionGetInteger(POSITION_MAGIC)==Magic)
               if(PositionGetInteger(POSITION_TYPE)==type || type==-1)     // ... || type==-1 - нет необходимости. Даже вредно для здоровья. 
                  trade.PositionClose(PositionGetTicket(i));               // если предполагается ручное вмешательство,
}                                                                          // то надо создавать кнопки на открытиЯ, но уже с Magic !!!!!!!!!

//+------------------------------------------------------------------+
//|   Получение цены открытия последнего ордера на покупку           |
//+------------------------------------------------------------------+
double FindLastBuyPrice()
{
      double pr=0;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)) && PositionGetInteger(POSITION_TYPE)==0)
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)
                  {
                  pr=PositionGetDouble(POSITION_PRICE_OPEN);
                  break;                                       // Где гантия, что PositionSelectByTicket() даст последний OP_BUY  ?????????????
                  }                                            // Хотя, почему-то, работает !!!
   return(pr);
}
//+------------------------------------------------------------------+
//|   Получение цены открытия последнего ордера на продажу           |
//+------------------------------------------------------------------+
double FindLastSellPrice()
{
      double pr=0;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)) && PositionGetInteger(POSITION_TYPE)==1)
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)
                  {
                  pr=PositionGetDouble(POSITION_PRICE_OPEN);
                  break;                                       // Где гантия, что PositionSelectByTicket() даст последний OP_SELL  ?????????????
                  }                                            // Хотя, почему-то, работает !!!
   return(pr);
}
//+------------------------------------------------------------------+
//|  Position Profit    ??? Type ???                                 |     // Это что?  Тип последнего открытого ордера. А почему Profit ?
//+------------------------------------------------------------------+
int PositionType()
{
      int type=8;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)))
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)
                  {
                  type=(int)PositionGetInteger(POSITION_TYPE);   
                  break;
                  }
   return(type);
}
//+------------------------------------------------------------------+
//|  Соответствие времени заданному отрезку                          |
//+------------------------------------------------------------------+
bool TimeSession(int aStartHour,int aStartMinute,int aStopHour,int aStopMinute,datetime aTimeCur)
{
      //--- время начала сессии
      int StartTime=3600*aStartHour+60*aStartMinute;
      //--- время окончания сессии
      int StopTime=3600*aStopHour+60*aStopMinute;
      //--- текущее время в секундах от начала дня
      aTimeCur=aTimeCur%86400;
      if(StopTime<StartTime)
         //--- переход через полночь
         if(aTimeCur>=StartTime || aTimeCur<StopTime)
            return(true);
      else
         //--- внутри одного дня
         if(aTimeCur>=StartTime && aTimeCur<StopTime)
            return(true);
   return(false);
}
//+------------------------------------------------------------------+
//|      Открытие ордеров по типу                                    |   // А если ECN - SL и ТР надо открывать после открытия ордера !!!!
//+------------------------------------------------------------------+
void PutOrder(int type)
{
   int r=0;
   color clr=Green;                                                      // Не используется !!!!!!!!
   double sl=0,tp=0;
   double price;

   if(type==0) //OP_BUY
      {
      clr=Blue;                                                          // Не используется !!!!!!!!
      price=Ask;

      if(StopLoss>0)
         sl=NormalizeDouble(price-StopLoss*_Point,_Digits);
      if(TakeProfit>0)
         tp=NormalizeDouble(price+TakeProfit*_Point,_Digits);

      trade.Buy(Lot(type),_Symbol,price,sl,tp,Comm);                     // Правильно: trade.Buy(Lot(type),_Symbol,price,0,0,Comm)
      }                                                                  // Тем более, что по коду все правильно: Открыли - модифицировали.
   //---
   if(type==1) //OP_SELL                                                 // Аналогично
      {
      clr=Red;                                               
      price=Bid;

      if(StopLoss>0)
         sl=NormalizeDouble(price+StopLoss*_Point,_Digits);
      if(TakeProfit>0)
         tp=NormalizeDouble(price-TakeProfit*_Point,_Digits);

      trade.Sell(Lot(type),_Symbol,price,sl,tp,Comm);
      }
}
//+------------------------------------------------------------------+
//|     Общий Безубыток                                              |      // Расчет в корне не верен.!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
//+------------------------------------------------------------------+      // Эта ункция истинна для ордеров одного направления. Выбери какого ?????
double All()
{
      double all=0, num=0;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)))
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)
                  {
                  all+=PositionGetDouble(POSITION_PRICE_OPEN)*PositionGetDouble(POSITION_VOLUME);
                  num+=PositionGetDouble(POSITION_VOLUME);
                  }
      if(num>0)
         all=NormalizeDouble(all/num,_Digits);
   return(all);
}
//+------------------------------------------------------------------+      // Это мой первый код на mql5.
//|     Общий Безубыток должен выглядеть так                         |      //  Требует проверки !!!!!!!!!
//+------------------------------------------------------------------+      // Надеюсь получилось. 
double AllBE()
{
      double AllBU=0;
      double BuyLotsSum=0,SelLotsSum=0;
      double WeighBuy=0,WeighSel=0;
   
      for(int i=PositionsTotal()-1; i>=0; i--)
         if(PositionSelectByTicket(PositionGetTicket(i)))
            if(PositionGetString(POSITION_SYMBOL)==_Symbol)
               if(PositionGetInteger(POSITION_MAGIC)==Magic)               
                  {
                  if(PositionGetInteger(POSITION_TYPE)==0)
                     {
                     WeighBuy   += PositionGetDouble(POSITION_PRICE_OPEN)*PositionGetDouble(POSITION_VOLUME);
                     BuyLotsSum += PositionGetDouble(POSITION_VOLUME);
                     }
                  if(PositionGetInteger(POSITION_TYPE)==1)
                     {
                     WeighSel   += PositionGetDouble(POSITION_PRICE_OPEN)*PositionGetDouble(POSITION_VOLUME);
                     SelLotsSum += PositionGetDouble(POSITION_VOLUME);
                     }
                  }
      if(BuyLotsSum-SelLotsSum!=0)
         AllBU=(WeighBuy-WeighSel)/(BuyLotsSum-SelLotsSum);
   return(NormalizeDouble(AllBU,_Digits));
}
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void ModifyOrders()
{
   double sl=0, tp=0;

   for(int i=PositionsTotal()-1; i>=0; i--)
      if(PositionSelectByTicket(PositionGetTicket(i)))
         if(PositionGetString(POSITION_SYMBOL)==_Symbol)
            if(PositionGetInteger(POSITION_MAGIC)==Magic)
               {
               if(PositionGetInteger(POSITION_TYPE)==0)
                  {
                  tp=NormalizeDouble(All()+TakeProfit*_Point,_Digits);
                  sl=NormalizeDouble(All()-StopLoss*_Point,_Digits);

                  if(PositionGetDouble(POSITION_TP)!=tp && PositionGetDouble(POSITION_SL)!=sl)  // А если ...==tp, а !=sl, то что??????????????????????
                     trade.PositionModify(PositionGetTicket(i),sl,tp);                          // Возможно необходимо && заменить на ||  !!!!!!!!!!!!!
                  }

               if(PositionGetInteger(POSITION_TYPE)==1)
                  {
                  tp=NormalizeDouble(All()-TakeProfit*_Point,_Digits);
                  sl=NormalizeDouble(All()+StopLoss*_Point,_Digits);

                  if(PositionGetDouble(POSITION_TP)!=tp && PositionGetDouble(POSITION_SL)!=sl)  // Аналогично.
                     trade.PositionModify(PositionGetTicket(i),sl,tp);
                  }
               }
}
//+------------------------------------------------------------------+

//+------------------------------------------------------------------+
//|                                               TrendDirection.mq5 |
//|                                             Copyright 2024, AM2. |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2024, AM2."
#property link      "http://www.forexsystems.biz"
#property version   "1.02"

#include <Trade\Trade.mqh>
CTrade trade;

input double    Lots         = 0.1;      // торговый объем
input double    MaxLot       = 5;        // максимальный торговый объем
input double    KLot         = 1.5;      // увеличение лота
input int       StopLoss     = 5555;     // стоп
input int       TakeProfit   = 111;      // тейк
input int       Count        = 20;       // число поз
input int       Step         = 333;      // шаг
input int       StartHour    = 0;        // час начала торговли
input int       StartMin     = 30;       // минута начала торговли
input int       EndHour      = 23;       // час окончания торговли
input int       EndMin       = 30;       // минута окончания торговли
input ulong     Magic        = 1961;     // магик
input int       Spread       = 33;       // спред
input int       Slip         = 22;       // проскальзывание
input bool      Buy          = 1;        // покупки
input bool      Sell         = 1;        // продажи
input string    Comm         = "Scalp";
input string    IndName      = "Trend direction and force - JMA smoothed";
input int       trendPeriod  = 20;       // Trend period
input int       smoothPeriod = 3;        // Smoothing period
input double    TriggerUp    = 0.1;      // Trigger up level
input double    TriggerDn    =-0.1;      // Trigger down level
input int       VariantOpen  = 3;        // Вариант отработки открытия ордеров (1-3)
//---
datetime t=0;
int td=0, Spr;
double    Ask, Bid;
double tr[2];
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
{
      td = iCustom(NULL,0,IndName,trendPeriod,smoothPeriod,TriggerUp,TriggerDn);        // А какой массив из четырех ???????????????????
      trade.SetExpertMagicNumber(Magic);
      trade.SetDeviationInPoints(Slip);
   return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
}
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
   double sl=0,tp=0;
   bool buy=false, sell=false;
   
   Spr = (int)SymbolInfoInteger(NULL,SYMBOL_SPREAD);
   Ask = SymbolInfoDouble(NULL,SYMBOL_ASK);
   Bid = SymbolInfoDouble(NULL,SYMBOL_BID);

   CopyBuffer(td,2,1,2,tr);                            // А чему равен tr? Не вижу нигде наполнения массива. ????????????????????????????????

   if(VariantOpen==1)
      {
      buy  = tr[1]>TriggerUp && tr[0]<TriggerUp;      
      sell = tr[1]<TriggerDn && tr[0]>TriggerDn;
      }      

   if(VariantOpen==2)
      {
      if(tr[1]<TriggerDn && tr[0]<tr[1])
         buy=true;      
      if(tr[1]>TriggerUp && tr[0]>tr[1])
         sell=true; 
      }
           
   if(VariantOpen==3)
      {
      if(tr[1]<TriggerDn && tr[0]<tr[1] && tr[2]<tr[1])
         buy=true;      
      if(tr[1]>TriggerUp && tr[0]>tr[1] && tr[2]<tr[1])
         sell=true; 
      }     
   
   if(VariantOpen==4)
      {
      if(tr[0]<tr[1] && tr[2]<tr[1])
         buy=true;      
      if(tr[0]>tr[1] && tr[2]<tr[1])
         sell=true; 
      }     
   
   if(Spr<=Spread)
      {
      if(CountTrades()<1 && TimeSession(StartHour,StartMin,EndHour,EndMin,TimeCurrent()))
         {
         if(buy && Buy)
            {
            PutOrder(0);
            ModifyOrders();
            }
         if(sell && Sell)
            {
            PutOrder(1);
            ModifyOrders();
            }
         }
      //---
      if(CountTrades()>0 && CountTrades()<Count)
         {
         if(PositionType()==0 && FindLastBuyPrice()-Ask>Step*_Point)
            {
            PutOrder(0);
            ModifyOrders();
            }

         if(PositionType()==1 && Bid-FindLastSellPrice()>Step*_Point)
            {
            PutOrder(1);
            ModifyOrders();
            }
         }
      }
   Comment("\n tr1: ",tr[0],
           "\n tr2: ",tr[1]);