ruslan71
Руслан

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

  Торгую в компаниях:


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

Рейтинг 2081


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



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

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



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





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



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

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

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


РЕКОМЕНДУЮ



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

Сова
[*]

Здраствуйте Андрей сделайте пожалуйста сову на основе двух индикаторов:
moving_averages.mq4 (10 Kb) moving_averages.ex4 (15 Kb)
параметры скользящей 105, применить к close
и второй индикатор WPR.mq4 (2 Kb) WPR.ex4 (8 Kb)
параметры индюка WPR период 21, уровни -95 и -5
вход в бай если цена выше скользящей и касается уровня -95 в индюке WPR
вход в сел если цена ниже скользящей и касается уровня-5 в индюке WPR
В сове должны быть:
1 Тейк стоп
2 время тороговли
3 увеличение лота после минусовой сделки
4 регулироваемый лот
5 возможность изменение уровней и периода индикатора WPR в сове
6 изменение настроек параметров скользящей тоже в сове
7 вход в сделку с на текущей свече или на закрытой
8 сделки или на каждый сигнал или 1 вход пока не достигнем или тейка или стопа функция переключаемая
пример скриншота вход в селл

пример входа в бай
  • +2
  • Просмотров: 2462
  • 1 ноября 2016, 00:47
  • ruslan71
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

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

+
0
Помню делал с МА и WPR, посмотрите в базе, если не найдете тогда с нуля напишу.
avatar

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

  • 1 ноября 2016, 05:06
+
0
Ок посмотрю отпишусь
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 09:53
+
0
Андрей просто с WPR нашел с ма нет
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 10:10
+
0
Сделал все по ТЗ: www.opentraders.ru/downloads/1375/




//+------------------------------------------------------------------+
//|                                                   MissMarple.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  = "00:00";  // время начала торговли
extern string EndTime    = "23:00";  // время окончания торговли
extern double Lots       = 0.1;      // лот
extern double KLot       = 1;        // умножение лота
extern double MaxLot     = 5;        // максимальный лот
extern int StopLoss      = 2000;     // лось
extern int TakeProfit    = 3000;     // язь
extern int Slip          = 30;       // реквот
extern int MAPeriod      = 12;       // период МА
extern int WPRPeriod     = 21;       // период WPR
extern int WPRLevel      = 5;        // уровень WPR
extern int Shift         = 1;        // на каком баре сигнал индикатора
extern int OnePos        = 1;        // 1-одна поза 0-несколько
extern int Magic         = 123;      // магик

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;

   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;
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double Lot()
  {
   double lot=Lots;

   if(OrderSelect(OrdersHistoryTotal()-1,SELECT_BY_POS,MODE_HISTORY))
     {
      if(OrderProfit()<0)
        {
         lot=OrderLots()*KLot;
        }
     }
   if(lot>MaxLot)lot=Lots;
   return(lot);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void OpenPos()
  {
   double ma=iMA(NULL,0,MAPeriod,0,0,0,Shift);
   double wpr1=iWPR(NULL,0,WPRPeriod,Shift);
   double wpr2=iWPR(NULL,0,WPRPeriod,Shift+1);

   if(Ask>ma && wpr1>-100+WPRLevel && wpr2<-100+WPRLevel)
     {
      PutOrder(0,Ask);
     }

   if(Bid<ma && wpr2>-WPRLevel && wpr1<-WPRLevel)
     {
      PutOrder(1,Bid);
     }
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   datetime End=StringToTime(EndTime);
   datetime Start=StringToTime(StartTime);

   if(TimeCurrent()>Start && TimeCurrent()<End)
     {
      if(t!=Time[0] && OnePos<1)
        {
         OpenPos();
         t=Time[0];
        }

      if(CountTrades()<1 && OnePos>0) OpenPos();
     }
  }
//+------------------------------------------------------------------+

Редактирован: 1 ноября 2016, 10:18
avatar

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

  • 1 ноября 2016, 10:12
+
0
вобщем все нормально только в настройки совы в ведите пожалуста параметры уровней индикатора WPR чтобы можно было менять в настройках совы

и также с индюком скользящей
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 22:58
  • ↑
+
0
Для впр уровень считает так:
верхний = — WPRLevel,
нижний = -100 + WPRLevel.
extern int WPRLevel = 5;  // уровень WPR


Настройки МА добавил:


extern int MAShift       = 0;        // сдвиг МА
extern int MAMethod      = 0;        // метод МА
extern int MAPrice       = 0;        // цены МА




//+------------------------------------------------------------------+
//|                                                   MissMarple.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  = "00:00";  // время начала торговли
extern string EndTime    = "23:00";  // время окончания торговли
extern double Lots       = 0.1;      // лот
extern double KLot       = 1;        // умножение лота
extern double MaxLot     = 5;        // максимальный лот
extern int StopLoss      = 2000;     // лось
extern int TakeProfit    = 3000;     // язь
extern int Slip          = 30;       // реквот
extern int MAPeriod      = 12;       // период МА
extern int MAShift       = 0;        // сдвиг МА
extern int MAMethod      = 0;        // метод МА
extern int MAPrice       = 0;        // цены МА
extern int WPRPeriod     = 21;       // период WPR
extern int WPRLevel      = 5;        // уровень WPR
extern int Shift         = 1;        // на каком баре сигнал индикатора
extern int OnePos        = 1;        // 1-одна поза 0-несколько
extern int Magic         = 123;      // магик

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;

   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;
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double Lot()
  {
   double lot=Lots;

   if(OrderSelect(OrdersHistoryTotal()-1,SELECT_BY_POS,MODE_HISTORY))
     {
      if(OrderProfit()<0)
        {
         lot=OrderLots()*KLot;
        }
     }
   if(lot>MaxLot)lot=Lots;
   return(lot);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void OpenPos()
  {
   double ma=iMA(NULL,0,MAPeriod,MAShift,MAMethod,MAPrice,Shift);
   double wpr1=iWPR(NULL,0,WPRPeriod,Shift);
   double wpr2=iWPR(NULL,0,WPRPeriod,Shift+1);

   if(Ask>ma && wpr1>-100+WPRLevel && wpr2<-100+WPRLevel)
     {
      PutOrder(0,Ask);
     }

   if(Bid<ma && wpr2>-WPRLevel && wpr1<-WPRLevel)
     {
      PutOrder(1,Bid);
     }
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   datetime End=StringToTime(EndTime);
   datetime Start=StringToTime(StartTime);

   if(TimeCurrent()>Start && TimeCurrent()<End)
     {
      if(t!=Time[0] && OnePos<1)
        {
         OpenPos();
         t=Time[0];
        }

      if(CountTrades()<1 && OnePos>0) OpenPos();
     }
  }
//+------------------------------------------------------------------+
avatar

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

  • 1 ноября 2016, 23:19
  • ↑
+
0
Спасибо огромное протестю вечерком
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 15:27
+
0
Андрей как в сове настроить уровни идикатора WPR там два уровня стоят по умолчанию в положении5 написано чтобы можно было менять уровни
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 22:30
+
0
За настройки ма спасибо насчет уровней индюка WPR не понял*wall* как проставить уровни -95 и -5 а то поумолчанию -80 -20
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 23:35
+
0
как проставить уровни -95 и -5


WPRLevel = 5.
avatar

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

  • 2 ноября 2016, 01:54
  • ↑
+
0
Уважаемый Андрей обьясните тогда почему при выставлении в индюке МА переменной период который мне нужен при выключении тестора индюк МА остается в том положении который я задал в сове а индюк WPR при цифре 5 уровни все равно остаються по у молчанию?
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 2 ноября 2016, 08:42
  • ↑
+
0
индюк WPR при цифре 5 уровни все равно остаются по у молчанию?

У разработчиков терминала спросите.
avatar

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

  • 2 ноября 2016, 08:48
  • ↑
+
0
какое бы я числовое значение extern int WPRLevel не ставил ве равно остаеться -20 и -80
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 23:43
+
0
какое бы я числовое значение extern int WPRLevel не ставил ве равно остаеться -20 и -80

Торгует по тем у ровням что прописали, а в тестере уровни ставятся по умолчанию.
avatar

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

  • 2 ноября 2016, 01:53
  • ↑
+
0
можно в сову в вести уровни идюка какие я бы прописывал такие бы и были?
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 1 ноября 2016, 23:57
+
0
можно в сову в вести уровни идюка какие я бы прописывал такие бы и были?

Это нужно только когда уровни разные, например верх -10 низ -70.
avatar

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

  • 2 ноября 2016, 01:57
  • ↑
+
0
Уважаемый Андрей огромное спасибо за сову все работает как нужно вы были правы насчет индюка WPR на графике по че муто в тесторе он показывает уровни по умолчанию а торгует потем уровням которым нужно Просьба огромная если есть время у вас возможно ли добавить в сову одну функцию расстояние цены от МА в пунктиках тобишь вы ставляю 1 пукт значит входы от одного пункта и больше при 0 не входим или 3 пункта торгуем от 3 и больше если возможно конечно*stesnitelno*  на скрине ниже
avatar

  21  ruslan71 Автор Сообщений: 974 - Руслан

  • 2 ноября 2016, 21:18

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