mikeford

 
Уровень 9
Добро пожаловать в мой блог!


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

Рейтинг 2090


Если Вы хотите заказать советник или индикатор, то публикуйте в эту группу тех. задание. Если Ваш заказ не очень сложный, то велика вероятность, что Вам его смогут сделать даже бесплатно



Программистам MQL: подпишитесь на группу, чтобы получать уведомления о заказах.

Не забывайте указывать платформу: MT4 или MT5



Свыше 1000 заказов уже выполнено бесплатно!





Перед заказом прочитайте Правила работы Стола заказов



СДЕЛАТЬ ЗАКАЗ →

* нужно быть зарегистрированным на сайте для создания заказа

** уровень должен быть 3 или выше, чтобы заказ был рассмотрен штатным программистом Стола (см. правила)


РЕКОМЕНДУЮ



*Реклама от создателя группы

Лучшее от mikeford



РОБОТ "МАРТЫШКА С РЕВЕРСОМ". Комментариев 3
2016-10-26 15:48:43Рейтинг 0

РОБОТ "ОРДЕР ПО ВРЕМЕНИ". Комментариев 9
2016-12-11 20:30:08Рейтинг 0

РОБОТ – СТОХАСТИК DSS Комментариев 6
2017-06-16 01:03:28Рейтинг 0

РОБОТ "ДВОЙНАЯ МАРТЫШКА". Комментариев 4
2018-03-15 21:52:34Рейтинг 0

Переделать Эксперт "РСИ + КЕЛТНЕР". Комментариев 3
2016-06-20 17:49:10Рейтинг 0

РОБОТ "2 СТОПОВЫХ ОРДЕРА".

Здравствуйте. Нужен такой робот.

В указанное время выставляются 2 Стоповых Ордера с ТП/СЛ и с одинаковой дельтой от Бида и от Аска.

1. Если зацепился только один ордер, который потом закрылся по тейку или стопу – в этот момент второй несработавший удаляется и идет ресет.

2. Если зацепились оба, то робот ждет, когда они оба закроются по своим тейкам/стопам, только потом ставит новые.

3. Мартин с плюсуемым лотом («K * L + p»).

4. Отключение робота после профита (как снятие галочки, а не удаление с графика).

Настройки:

Лот
Дельта
Тейк / Стоп / Трал
Мартин
Время открытия
Отключение после профита.
  • 0
  • Просмотров: 3649
  • 24 сентября 2016, 15:36
  • mikeford
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

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

+
0
После выходных займусь.
avatar

  34  AM2 Сообщений: 15898 - Андрей

  • 24 сентября 2016, 16:00
+
0
Посмотрите: www.opentraders.ru/downloads/1334/


Редактирован: 25 сентября 2016, 21:32
avatar

  34  AM2 Сообщений: 15898 - Андрей

  • 25 сентября 2016, 11:46
+
0
Сильно глючная версия вышла. Открывает правильно, а потом идет полная неразбериха.

1. Иногда нарушает Условие-1 – удаляет второй ордер в момент срабатывания первого, а не после его закрытия.
2. Иногда наоборот, не удаляет несработавший ордер, когда должен, а ждет его экспирации. «Время истечения ордера» в общем не нужно, может этот параметр и дает сбой.

3. Иногда сбрасывает лот после 0.64 или 1.28, хотя в настройках стоит до 5.00.

4. Закрытие по профиту сейчас идет при убытке пары. Надо, чтоб закрывал при общем профите С ПАРЫ или с одного ордера, если второй не зацепился. Например, 1-й закрылся на +10, а 2-й на -20, то это общий убыток. Сейчас он учитывает только плюсовой и отключается при таком раскладе, а должен учитывать сумму пары, если оба включились.

5. «Время открытия» – только для самой первой пары, оно не должно влиять на последующие открытия. На тесте он иногда перестает открывать в какой-то момент и ждет этого времени.

Гляньте на скрин. Открыт 0.01 и при этом еще не удалился позапрошлый 0.64. Такая ситуация в принципе не должна быть возможна по моему ТЗ.



Может, первый глюк тянет за собой остальные. Поправьте его, потом прогоните тест с такими настройками:

Мартин = 2.0
ТП = 500
СЛ = 1000
Дельта = 150

График должен быть ровный, схож с Мартышкой.
avatar

  9  mikeford Автор Сообщений: 57

  • 26 сентября 2016, 16:08
  • ↑
+
0
Сильно глючная версия вышла. Открывает правильно, а потом идет полная неразбериха.


Советник сложный потому и глюки. Вы еще ни разу не присылали простое задание. Посмотрю что можно сделать.
avatar

  34  AM2 Сообщений: 15898 - Андрей

  • 26 сентября 2016, 17:14
+
0
Отладил пункт 1 и лот:




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

//--- Inputs
extern string StartTime = "8:00";
extern double Lots      = 0.1; // лот
extern double KLot      = 2;   // умножение лота
extern double PLot      = 0;   // прибавление лота
extern double MaxLot    = 5;   // максимальный лот
extern int StopLoss     = 500; // стоп лосс ордера
extern int TakeProfit   = 1500;// тейк профит ордера
extern int TrailingStop = 0;   // трал
extern int ProfitStop   = 0;   // 1-отключение после профита
extern int Delta        = 150; // расстояние от цены
extern int Slip         = 30;  // реквот
extern int Magic        = 333; // магик

bool trade=true;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---

//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---

  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutOrder(int type,double price)
  {
   int    r=0;
   color clr=clrNONE;
   double sl=0,tp=0;

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

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

   r=OrderSend(NULL,type,Lot(),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);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int CountPendOrders()
  {
   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()>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(OrderType()>1) del=OrderDelete(OrderTicket());
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void Trailing()
  {
   bool mod;
   for(int i=0; i<OrdersTotal(); i++)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==OP_BUY)
              {
               if(TrailingStop>0)
                 {
                  if(Bid-OrderOpenPrice()>TrailingStop*Point)
                    {
                     if(OrderStopLoss()<Bid-TrailingStop*Point)
                       {
                        mod=OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TrailingStop*Point,OrderTakeProfit(),0,Yellow);
                        return;
                       }
                    }
                 }
              }

            if(OrderType()==OP_SELL)
              {
               if(TrailingStop>0)
                 {
                  if((OrderOpenPrice()-Ask)>TrailingStop*Point)
                    {
                     if((OrderStopLoss()>(Ask+TrailingStop*Point)) || (OrderStopLoss()==0))
                       {
                        mod=OrderModify(OrderTicket(),OrderOpenPrice(),Ask+TrailingStop*Point,OrderTakeProfit(),0,Yellow);
                        return;
                       }
                    }
                 }
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double Lot()
  {
   double lot=0;
   lot=Lots*MathPow(KLot,Losses()+PLot);
   if(lot>MaxLot)lot=Lots;
   return(lot);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int Losses()
  {
   int losses=0;
   for(int i=OrdersHistoryTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY))
        {
         if(OrderProfit()>0) break;
         if(OrderProfit()<0) losses++;
        }
     }
   return(losses);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int LastDealResult()
  {
   int result=0;

   if(OrderSelect(OrdersHistoryTotal()-1,SELECT_BY_POS,MODE_HISTORY))
     {
      if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
        {
         if(OrderProfit()>0)
           {
            result=1;//tp  
           }
         if(OrderProfit()<0)
           {
            result=2;//sl  
           }
        }
     }
   return(result);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   if(TrailingStop!=0) Trailing();
   if(LastDealResult()==1 && ProfitStop>0) trade=false;
   if(CountTrades()<1 && CountPendOrders()<2) DelOrder();

   if(CountTrades()<1 && TimeCurrent()>StringToTime(StartTime) && trade)
     {
      if(CountOrders(4)<1) PutOrder(4,Ask+Delta*Point);
      if(CountOrders(5)<1) PutOrder(5,Bid-Delta*Point);
     }
  }
//+------------------------------------------------------------------+
avatar

  34  AM2 Сообщений: 15898 - Андрей

  • 26 сентября 2016, 21:41
+
0
Спасибо, теперь главное условие правильно исполняется.

Правда, Мартин странно работает. Увеличивает только один раз, а дальше не идет. Если будет время, можете глянуть.

Главное по Мартину: он должен учитывать сумму закрывшейся пары. Если общий минус – увеличивает, если плюс – нет.

Если это править слишком сложно, я могу подождать до следующего месяца.
avatar

  9  mikeford Автор Сообщений: 57

  • 28 сентября 2016, 15:53
  • ↑
+
0
Главное по Мартину: он должен учитывать сумму закрывшейся пары. Если общий минус – увеличивает, если плюс – нет.

Этого нет в первоначальном ТЗ и такой анализ не ко мне.
avatar

  34  AM2 Сообщений: 15898 - Андрей

  • 28 сентября 2016, 19:55
  • ↑
+
0
Похоже на пробойник, работающий на открытии волатильных сессий (бирж).
Есть такие и с прикрученными индикаторами время выхода новостей. Все-равно ДЦ нае…
avatar

  7  stepmega Сообщений: 88

  • 6 октября 2016, 17:12

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