新人对MQL4和MQL5的任何问题，对算法和代码的帮助和讨论 - 页 256

[Nauris Zukas]

Alexey Viktorov:

我说的是我自己的记忆芯片。:)))

关于不记得这些琐事，在写代码时可以很容易地重新检查，澄清，必要时做，然后再忘记。

我明白了！:)

[an.manakoff_]

Artyom Trishkin:
我注意到，人们经常要求提供拖网或盈亏平衡功能。我画了一个函数，用于根据一些指标的值在Breakeven水平上画止损，并在价格图上画线（例如，МАшашка或抛物线），并将其传递给函数。

#property strict // в самое начало кода вашей программы (если нету там ещё)


// Функцию - за пределы остальных функций программы
//+------------------------------------------------------------------+
//| Трейлинг по значению + перенос стопа на уровень безубытка        |
//+------------------------------------------------------------------+
void TrailingByLevel(string symbol_name,           // Имя символа
                     int magic_number,             // Magic ордера
                     double level_of_trail,        // Уровень, на который ставим стоп (например МА или Parabolic SAR)
                     int trailing_start,           // Профит в пунктах для старта трала
                     int trailing_step,            // Шаг трала в пунктах
                     int trailing_stop,            // Отступ стоплосс от уровня МА или SAR в пунктах
                     int profit_for_breakeven=15,  // Профит в пунктах для переноса стопа в безубыток
                     int breakeven_level=5,        // Уровень безубытка в пунктах
                     bool use_trail=true,          // Флаг использования трала
                     bool use_breakeven=false      // Флаг использования безубытка
                     )
   {
   int lv=StopLevel(symbol_name)+1;                // Получаем значение Stop Level по символу + 1 пункт (из отдельной функции)
   for(int i=OrdersTotal()-1; i>=0; i--) {
      if(OrderSelect(i,SELECT_BY_POS)) {
         if(OrderMagicNumber()!=magic_number)   continue;         //Если Магик не наш - идем к следующему ордеру
         if(OrderSymbol()!=symbol_name)         continue;         //Если Символ не наш - идем к следующему ордеру
         //--- покупки
         if(OrderType()==OP_BUY) {
            int    digits=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS);
            double point=(SymbolInfoDouble(symbol_name,SYMBOL_POINT));
            double pb=SymbolInfoDouble(symbol_name,SYMBOL_BID);
            double profit=pb-OrderOpenPrice();                    // Профит позиции в цене (без комиссий и свопов)
            //--- безубыток
            if(use_breakeven) {
               //--- если профит в цене больше заданного
               if(profit>=profit_for_breakeven*point) {
                  int err=ERR_NO_ERROR;
                  double sl=NormalizeDouble(OrderOpenPrice()+breakeven_level*point,digits);
                  if(pb-lv*point>sl && OrderStopLoss()<sl) {
                     // Сюда вписываем свою функцию модификации. Можно конечно и стандартной обойтись:
                     // OrderModify(OrderTicket(),OrderOpenPrice(),sl,OrderTakeProfit(),OrderExpiration(),clrModify); ...
                     // ... но в ней не предусмотрены проверки кодов возврата торгового сервера и их обработка
                     //ModifyOrder(-1,sl,-1,err);
                     }
                  if(err==ERR_MARKET_CLOSED) return;
                  }
               }
            //--- трал
            if(use_trail) {
               //--- если профит в пунктах больше заданного, или изначально задан меньше ноля
               if(profit>=trailing_start*point || trailing_start==EMPTY) {
                  int err=ERR_NO_ERROR;
                  double sl=NormalizeDouble(level_of_trail-trailing_stop*point,digits);  // вычисляем новый уровень стоплосс по значению, переданному в функцию
                  //--- Если новое значение СЛ не ближе Stop Level и если новое положение СЛ больше старого+шаг СЛ, то модифицируем стоп позиции
                  if(pb-lv*point>sl && OrderStopLoss()+trailing_step*point<sl) {
                     // Сюда вписываем свою функцию модификации. Можно конечно и стандартной обойтись:
                     // OrderModify(OrderTicket(),OrderOpenPrice(),sl,OrderTakeProfit(),OrderExpiration(),clrModify); ...
                     // ... но в ней не предусмотрены проверки кодов возврата торгового сервера и их обработка
                     //ModifyOrder(-1,sl,-1,err);
                     }
                  if(err==ERR_MARKET_CLOSED) return;
                  }
               }
            }

         //--- Продажи
         if(OrderType()==OP_SELL) {
            int    digits=(int)SymbolInfoInteger(symbol_name,SYMBOL_DIGITS);
            double point=(SymbolInfoDouble(symbol_name,SYMBOL_POINT));
            double pa=SymbolInfoDouble(symbol_name,SYMBOL_ASK);
            double profit=OrderOpenPrice()-pa;                    // Профит позиции в цене (без комиссий и свопов)
            //--- безубыток
            if(use_breakeven) {
               //--- если профит в цене больше заданного
               if(profit>=profit_for_breakeven*point) {
                  int err=ERR_NO_ERROR;
                  double sl=NormalizeDouble(OrderOpenPrice()-breakeven_level*point,digits);
                  if(pa+lv*point<sl && (OrderStopLoss()>sl || OrderStopLoss()==0)) {
                     // Сюда вписываем свою функцию модификации. Можно конечно и стандартной обойтись:
                     // OrderModify(OrderTicket(),OrderOpenPrice(),sl,OrderTakeProfit(),OrderExpiration(),clrModify); ...
                     // ... но в ней не предусмотрены проверки кодов возврата торгового сервера и их обработка
                     //ModifyOrder(-1,sl,-1,err);
                     }
                  if(err==ERR_MARKET_CLOSED) break;
                  }
               }
            //--- трал
            if(use_trail) {
               //--- если профит в пунктах больше заданного, или изначально задан меньше ноля
               if(profit>=trailing_start*point || trailing_start==EMPTY) {
                  int err=ERR_NO_ERROR;
                  double sl=NormalizeDouble(level_of_trail+trailing_stop*point,digits);  // вычисляем новый уровень стоплосс по значению, переданному в функцию
                  //--- Если новое значение СЛ не ближе Stop Level и если новое положение СЛ больше старого+шаг СЛ, то модифицируем стоп позиции
                  if(pa+lv*point<sl && (OrderStopLoss()-trailing_step*point>sl || OrderStopLoss()==0)) {
                     // Сюда вписываем свою функцию модификации. Можно конечно и стандартной обойтись:
                     // OrderModify(OrderTicket(),OrderOpenPrice(),sl,OrderTakeProfit(),OrderExpiration(),clrModify); ...
                     // ... но в ней не предусмотрены проверки кодов возврата торгового сервера и их обработка
                     //ModifyOrder(-1,sl,-1,err);
                     }
                  if(err==ERR_MARKET_CLOSED) break;
                  }
               }
            }
         }
      }
}
//+------------------------------------------------------------------+
int StopLevel(string symbol_name) {
   int sp=(int)SymbolInfoInteger(symbol_name,SYMBOL_SPREAD);
   int lv=(int)SymbolInfoInteger(symbol_name,SYMBOL_TRADE_STOPS_LEVEL);
   return((lv==0)?sp*2:lv);
   }
//+------------------------------------------------------------------+

一般来说，如果有什么事--问。或正确。

你能帮助我完善我的EA吗？我有一个EA，可以设置止损，但不知道如何拖动止损。我完全不明白，所以我希望专家能帮助我。

[Goo4]

你需要一个函数来确定一个数组中一个元素的 权重。与某一元素接近（和更接近）的其他元素数量越多，其权重就越大。也许这样的功能已经存在。类似于通过样品中元素的浓度来确定样品中元素的重量。谢谢。

[Jenya77769]

你好！我不明白为什么在MQL4测试器中，它只进行了一次迭代，然后就停止了？TimeCurrent()没有得到更新吗？我如何更新它？我希望我的EA不是按刻度工作，而是每秒钟，或者最好是每秒钟5次。

  int start()                                     // Спец. функция start
  {
    while(!IsStopped())
     {
      RefreshRates();
      if(RefreshRates()==true||MyTimer(1))
        {
         код советника
        }  
     }
    return(0);
  }


bool MyTimer(int Delay) //функция для работы советника по заданому интервалу времени, а не по тикам
{
  RefreshRates();
  static datetime Time1, Time2;
  bool Result = False;
  
  if(MathMod(TimeSeconds(TimeCurrent()), Delay) == 0.0)
  {
    Time1 = TimeCurrent();
    if(Time1 != Time2)
    {  
      Time2 = Time1;
      Result = True;
    }
  }
  return(Result);
}

[Maxim Kuznetsov]

Jenya77769:

你好！我不明白为什么在MQL4测试器中，它只进行了一次迭代，然后就停止了？TimeCurrent()没有得到更新吗？我如何更新它？你需要一个多币种的EA每秒钟工作一次，或者最好是每秒5次，而不是按ticks工作。

你如何运行这个EA？即从专家目录？

start()函数（旧的名字，现代的OnTick）是为每一个tick 执行的，也就是说，它应该在tick结束后执行。你把它放在一个循环中？

[Jenya77769]

Maxim Kuznetsov:

你是作为顾问还是什么运行的？ 即从专家目录中？

EAs中的start()函数（旧名称，现代的OnTick）在每个tick 上运行，也就是说，它应该在tick结束时结束。你把它放在一个循环中？

教程中允许这样做，并有一个循环的 "启动 "函数的例子

https://book.mql4.com/ru/special/index

[[删除]]

Jenya77769: 在教科书中，这是允许的，有一个循环启动函数的例子

当然，你可以循环使用。但到了下一个TIC，就应该放手了。否则，TIC就会丢失。你需要它吗？

[Jenya77769]

LRA:

要循环，当然是可以的。但到了下一个TIC，最好能释放。否则，TIC就会丢失。是否需要？

为什么会丢失呢？ 新的tick信息可以通过RefreshRates();在无尽循环中 检索到

[[删除]]

Jenya77769: 为什么会丢失？ 关于新刻度线的信息可以通过无限循环中的RefreshRates(); 函数获得

RefreshRates(); 函数只检查。如果数据被更新，它将返回true。你可以这样做 while(!RefreshRates(); - 等待勾选。

[Artyom Trishkin]

LRA:

RefreshRates(); 函数 只检查。如果数据被更新，它将返回true。你可以这样做 while(!RefreshRates()); - 等待勾选。

刷新（不要混淆人们的视线），如果更新成功或失败，则返回标志。

如果你使用SymbolInfoDouble()、SymbolInfoTick()获取数据，你可以不使用它。