Группа "Стол заказов MQL"

Рейтинг 2146



РЕКОМЕНДУЮ



доработка советника МТ4

По адресу zakaz.opentraders.ru/39489.html был размещен заказ. Прошу его доработать (выделено жирным):
Работа только со стоповыми ордерами.
Условие для входа на покупку. Если цена не дошла до предыдущего минимума ЗЗ на D пунктов и длина последнего луча не меньше ZL, то на уровне предыдущего максимума ставим стоповый ордер на покупку с СЛ=предыдущий минимум и ТП=2*СЛ. Условия входа на продажу обратно зеркальные. Одновременно могут быть только две отложки, одна на покупку и другой на продажу, при получении следующего сигнала по направлению, удаляется предыдущий стоповый ордер по направлению. В реализованной версии заменяется байстоп ордер на селстоп ордер, нужно что бы они отдельно отрабатывались, не зависимо от друг друга.


Код советника был расположен по адресу www.opentraders.ru/downloads/1604/
  • 0
  • Просмотров: 3193
  • 7 июля 2017, 06:47
  • izzatilla
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

Вступите в группу "Стол заказов MQL", чтобы следить за обновлениями
ПРИСОЕДИНИТЬСЯ К ГРУППЕ
присоединиться
  Предыдущая запись в группе
Советник
Следующая запись в группе  
Не отображается индикатор
05 июля 2017
08 июля 2017

Брокер для ваших роботов, 15 лет на рынке

Комментарии (4)

+
0
После выходных буду смотреть.
avatar

  35  AM2 Сообщений: 16266 - Андрей

  • 7 июля 2017, 17:50
+
0
Покажите на скринах все входы, расстояния, где D, ZL и др. Все максимально подробно.
avatar

  35  AM2 Сообщений: 16266 - Андрей

  • 9 июля 2017, 11:08
+
0
Еще одна попытка понять ваше ТЗ:




//+------------------------------------------------------------------+
//|                                                      Zigmund.mq4 |
//|                                              Copyright 2017, AM2 |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, AM2"
#property link      "http://www.forexsystems.biz"
#property version   "1.00"
#property strict

//--- Inputs
extern double Lots        = 0.1;      // лот
extern int StopLoss       = 300;      // лось
extern int TakeProfit     = 600;      // язь
extern int Delta          = 50;       // расстояние до экстремума
extern int Gamma          = 50;       // длина луча
extern int Slip           = 30;       // реквот
extern int Magic          = 123;      // магик

double z=0;
datetime t=0;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   Comment("");
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   Comment("");
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutOrder(int type,double price)
  {
   int r=0;
   color clr=Green;
   double sl=0,tp=0;
   double zz0 = ZZPrice(0);
   double zz1 = ZZPrice(1);
   double zz2 = ZZPrice(2);

   if(type==1 || type==3 || type==5)
     {
      clr=Red;
      if(StopLoss>0) sl=NormalizeDouble(price+StopLoss*Point,Digits); else sl=zz2;
      if(TakeProfit>0) tp=NormalizeDouble(price-TakeProfit*Point,Digits); else tp=price-MathAbs(zz0-zz1)*2;
     }

   if(type==0 || type==2 || type==4)
     {
      clr=Blue;
      if(StopLoss>0) sl=NormalizeDouble(price-StopLoss*Point,Digits); else sl=zz2;
      if(TakeProfit>0) tp=NormalizeDouble(price+TakeProfit*Point,Digits); else tp=price+MathAbs(zz0-zz1)*2;
     }

   r=OrderSend(NULL,type,Lots,NormalizeDouble(price,Digits),Slip,sl,tp,"",Magic,0,clr);
   return;
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int CountTrades()
  {
   int count=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()<2) count++;
           }
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Подсчет ордеров по типу                                          |
//+------------------------------------------------------------------+
int CountOrders(int type=-1)
  {
   int count=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==type || (OrderType()>=0 && type==-1)) count++;
           }
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Удаление отложенных ордеров                                      |
//+------------------------------------------------------------------+
void DelOrder()
  {
   bool del;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()>1) del=OrderDelete(OrderTicket());
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double ZZPrice(int ne=0)
  {
   double zz;
   int    i,k=iBars(NULL,0),ke=0;

   for(i=1; i<k; i++)
     {
      zz=iCustom(NULL,0,"ZigZag",12,5,3,0,i);
      if(zz!=0)
        {
         ke++;
         if(ke>ne) return(zz);
        }
     }
   Print("GetExtremumZZPrice(): Экстремум ЗигЗага номер ",ne," не найден");
   return(0);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double max=0,min=0;
   double zz0 = ZZPrice(0);
   double zz1 = ZZPrice(1);
   double zz2 = ZZPrice(2);
   double gamma = MathAbs(zz0-zz1)/Point;
   double delta = MathAbs(zz0-zz2)/Point;

   if(zz1>zz2) {max=zz1;min=zz2;}
   if(zz1<zz2) {max=zz2;min=zz1;}

   if(t!=Time[0])
     {
      if(z!=zz1) DelOrder();

      if(CountTrades()<1)
        {
         if((zz0>zz1 && zz0<zz2) || (zz0<zz1 && zz0>zz2))
           {
            if(gamma>Gamma && delta>Delta)
              {
               if(CountOrders(4)<1) PutOrder(4,max);
               if(CountOrders(5)<1) PutOrder(5,min);
              }
           }
        }
      z=zz1;
      t=Time[0];
     }

   Comment("\n zz0: ",ZZPrice(0),
           "\n zz1: ",ZZPrice(1),
           "\n zz2: ",ZZPrice(2));
  }
//+------------------------------------------------------------------+

avatar

  35  AM2 Сообщений: 16266 - Андрей

  • 9 июля 2017, 11:54
+
0
Последняя попытка. Далее к платному, больше никаких доработок. Делаю только то что можно быстро сделать.


//+------------------------------------------------------------------+
//|                                                      Zigmund.mq4 |
//|                                              Copyright 2017, AM2 |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2017, AM2"
#property link      "http://www.forexsystems.biz"
#property version   "1.00"
#property strict

//--- Inputs
extern double Lots        = 0.1;      // лот
extern int StopLoss       = 300;      // лось
extern int TakeProfit     = 600;      // язь
extern int Delta          = 50;       // расстояние до экстремума
extern int Gamma          = 50;       // длина луча
extern int Slip           = 30;       // реквот
extern int Magic          = 123;      // магик

double z=0;
datetime t=0;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   Comment("");
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   Comment("");
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutOrder(int type,double price)
  {
   int r=0;
   color clr=Green;
   double sl=0,tp=0;
   double zz0 = ZZPrice(0);
   double zz1 = ZZPrice(1);
   double zz2 = ZZPrice(2);

   if(type==1 || type==3 || type==5)
     {
      clr=Red;
      if(StopLoss>0) sl=NormalizeDouble(price+StopLoss*Point,Digits); else sl=zz1;
      if(TakeProfit>0) tp=NormalizeDouble(price-TakeProfit*Point,Digits); else tp=price-MathAbs(price-zz1)*2;
     }

   if(type==0 || type==2 || type==4)
     {
      clr=Blue;
      if(StopLoss>0) sl=NormalizeDouble(price-StopLoss*Point,Digits); else sl=zz2;
      if(TakeProfit>0) tp=NormalizeDouble(price+TakeProfit*Point,Digits); else tp=price+MathAbs(price-zz1)*2;
     }

   r=OrderSend(NULL,type,Lots,NormalizeDouble(price,Digits),Slip,sl,tp,"",Magic,0,clr);
   return;
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int CountTrades()
  {
   int count=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()<2) count++;
           }
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Подсчет ордеров по типу                                          |
//+------------------------------------------------------------------+
int CountOrders(int type)
  {
   int count=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==type) count++;
           }
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Удаление отложенных ордеров                                      |
//+------------------------------------------------------------------+
void DelOrder()
  {
   bool del;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()>1) del=OrderDelete(OrderTicket());
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double ZZPrice(int ne=0)
  {
   double zz;
   int    i,k=iBars(NULL,0),ke=0;

   for(i=1; i<k; i++)
     {
      zz=iCustom(NULL,0,"ZigZag",12,5,3,0,i);
      if(zz!=0)
        {
         ke++;
         if(ke>ne) return(zz);
        }
     }
   return(0);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double max=0,min=0;
   double zz0 = ZZPrice(0);
   double zz1 = ZZPrice(1);
   double zz2 = ZZPrice(2);
   double gamma = MathAbs(zz0-zz1)/Point;
   double delta = MathAbs(zz0-zz2)/Point;

   if(zz1>zz2) {max=zz1;min=zz2;}
   if(zz1<zz2) {max=zz2;min=zz1;}

   if(t!=Time[0])
     {
      if(z!=zz1) DelOrder();

      if(CountTrades()<1)
        {
         if((zz0>zz1 && zz0<zz2) || (zz0<zz1 && zz0>zz2))
           {
            if(gamma>Gamma && delta>Delta)
              {
               if(CountOrders(4)<1) PutOrder(4,max);
               if(CountOrders(5)<1) PutOrder(5,min);
              }
           }
        }
      z=zz1;
      t=Time[0];
     }

   Comment("\n zz0: ",ZZPrice(0),
           "\n zz1: ",ZZPrice(1),
           "\n zz2: ",ZZPrice(2));
  }
//+------------------------------------------------------------------+



avatar

  35  AM2 Сообщений: 16266 - Андрей

  • 9 июля 2017, 12:29

Зарегистрируйтесь или авторизуйтесь, чтобы оставить комментарий