Любые вопросы новичков по MQL4 и MQL5, помощь и обсуждение по алгоритмам и кодам - страница 256

 
Alexey Viktorov:

Я говорил о своей собственной микросхеме памяти. :)))

О том, что не запоминаю такие мелочи которые можно при написании кода легко перепроверить, уточнить, сделать так как надо и опять забыть.

Ясно! :)
 
Artyom Trishkin:
Заметил, что люди часто спрашивают функцию трала или безубытка. Вот накидал функцию-заготовку для переноса стопа на заданный уровень безубытка и трала стопа позиции по переданному в функцию значению какого-нибудь индикатора, рисующего свои линии на графике цены (МАшка или параболик, например).

#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);
   }
//+------------------------------------------------------------------+
В общем, ежли чего - вопрошайте. Или поправляйте

Можешь помочь мне доработать моего советника ? У меня есть советник ставящий стопы, но не умеет тащить за собой стоп-лоссы. Я в этом совершенно ничего не понимаю, и надеюсь на помощь специалиста. 

 

Нужна функция для определения веса элемента массива. Чем больше число других элементов, близких (и более близких) к данному элементу, тем больше его вес. Может быть, уже существует такая функция. Что-то вроде определения веса элемента в выборке по концентрации элементов выборки. Спасибо.

 

Здравствуйте! Не могу разобраться почему в тестере MQL4 проходит только одну итерацию и останавливается? TimeCurrent() что-ли не обновляется? Как его обновить? Нужно чтобы мультивалютный советник работал не по тикам, а каждую секунду  или лучше 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);
}
 
Jenya77769:

Здравствуйте! Не могу разобраться почему в тестере MQL4 проходит только одну итерацию и останавливается? TimeCurrent() что-ли не обновляется? Как его обновить? Нужно чтобы мультивалютный советник работал не по тикам, а каждую секунду  или лучше 5 раз в секунду.

это вы как советник запускаете что-ли ? то есть из каталога experts ??

у советников функция start() (стариинное название, современное OnTick) запускается на каждый тик , то есть по завершению тика должна завершаться. А у вас она зациклина

 
Maxim Kuznetsov:

это вы как советник запускаете что-ли ? то есть из каталога experts ??

у советников функция start() (стариинное название, современное OnTick) запускается на каждый тик , то есть по завершению тика должна завершаться. А у вас она зациклина

Здесь в учебнике такое разрешается и есть пример с зацикленой функцией "старт"

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

О сложных программах - Учебник по MQL4
О сложных программах - Учебник по MQL4
  • book.mql4.com
О сложных программах - Учебник по MQL4
 
Jenya77769:  Здесь в учебнике такое разрешается и есть пример с зацикленой функцией "старт"

Зациклить, конечно, можно. Но к следующему ТИКу желательно отпустить. Иначе ТИК будет потерян. А он нужен?

 
LRA:

Зациклить, конечно, можно. Но к следующему ТИКу желательно отпустить. Иначе ТИК будет потерян. А он нужен?


почему потерян? информацию нового тика ведь можно получить функцией RefreshRates(); прямо в беконечном цикле

 
Jenya77769:  почему потерян? информацию нового тика ведь можно получить функцией RefreshRates(); прямо в беконечном цикле

Функция RefreshRates(); лишь проверяет. Она возвращает true, если обновление данных произведено. Можно так while(!RefreshRates());  - ожидание тика

 
LRA:

Функция RefreshRates(); лишь проверяет. Она возвращает true, если обновление данных произведено. Можно так while(!RefreshRates());  - ожидание тика

Обновляет (не вводите в заблуждение людей) и возвращает флаг успешности или неуспешности обновления.

Можно и без неё обойтись, если получать данные при помощи SymbolInfoDouble(),  SymbolInfoTick()

Причина обращения: