советник по индикатору

Стол заказов MQL

Приветствую! *hi*

Напишите пожалуйста советник по индикатору

Semafor+123Triangles_Robo.ex4 (30 Kb)
Задача:
при появлении треугольника, сова ставит рыночный ордер по сигналу, а стоп, стоп ставит за хай треугольника если в селл, и за лой если треугольник в бай.

Спасибо!

разное

+1
Просмотров: 2942
13 мая 2019, 00:54
FOTON

Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

Предыдущая запись в группе советник не обычный трал	Следующая запись в группе индикатор максимального движения
11 мая 2019	13 мая 2019

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

Так ты же больше всех распинался, что все индюки фуфло.Как тогда тебя понимать.

11 Kuzimich Сообщений: 246 - Андрей

13 мая 2019, 15:03
↓

Так ты же больше всех распинался, что все индюки фуфло.Как тогда тебя понимать.

иная цель сей совы....! 8-)

11 FOTON Автор Сообщений: 683 - Иван

13 мая 2019, 18:49
↑
↓

У всех сов одни те же цели-зарабатывать.Тока далеко не все могут. *lalala*

11 Kuzimich Сообщений: 246 - Андрей

13 мая 2019, 19:29
↑
↓

с этим я соглашусь… истина где то рядом... *lalala*

11 FOTON Автор Сообщений: 683 - Иван

13 мая 2019, 19:33
↑
↓

на 20-е

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

13 мая 2019, 17:02
↓

спасиб!

11 FOTON Автор Сообщений: 683 - Иван

13 мая 2019, 18:49
↑
↓

чтобы сделать по тз надо написать и отладить кучу уникальных функций. по буферам координаты не считаешь, в списке объектов путаница. не ко мне.

то что набросал смотрите. можете доделать но надо долго пыхтеть:


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

//--- Inputs
extern double Lots       = 0.1;      // лот
extern int StopLoss      = 333;      // лось
extern int TakeProfit    = 444;      // язь
extern int Slip          = 30;       // реквот
extern int Magic         = 123;      // магик

extern string IndName="Semafor+123Triangles_Robo";

int tri=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,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 Count()
  {
   int count=0;
   for(int i=0;i<ObjectsTotal();i++)
     {
      if(ObjectType(ObjectName(i))==OBJ_TRIANGLE) count++;
     }
   return(count);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
string Name()
  {
   string nm=ObjectName(1);
   for(int i=ObjectsTotal()-1;i>0;i--)
     {
      if(ObjectType(ObjectName(i))==OBJ_TRIANGLE) nm=ObjectName(i);
      break;
     }
   return(nm);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double ind=iCustom(NULL,0,IndName,0,1);
   Comment("\n Tri: ",Count(),
           "\n Name: ",Name());
  }
//+------------------------------------------------------------------+

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

15 мая 2019, 14:51
↓

могите пожалуйста, как прописать код в советнике что бы стоп сова ставила за хай-лой сигнального треугольника?

пример сделал:

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


//+------------------------------------------------------------------+
//|                                                    BuySell11.mq4 |
//|                                              Copyright 2019, AM2 |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2019, 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 bool TrailingStop = 0;        // включение трала
extern int Count         = 1;        // свеча для трала
extern int Delta         = 20;       // расстояние от хай лоу
extern int Slip          = 30;       // реквот
extern int Magic         = 123;      // магик

extern string Name="Triangle1";

double tri[3];
double sl=0,tp=0,max=0,min=0;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   PutButton("B",100,120,"BUY");
   PutButton("S",100,80,"SELL");
   PutButton("C",100,40,"CLOSE");
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   ObjectDelete(0,"B");
   ObjectDelete(0,"S");
   ObjectDelete(0,"C");
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutButton(string name,int x,int y,string text)
  {
   ObjectCreate(0,name,OBJ_BUTTON,0,0,0);
//--- установим координаты кнопки
   ObjectSetInteger(0,name,OBJPROP_XDISTANCE,x);
   ObjectSetInteger(0,name,OBJPROP_YDISTANCE,y);
//--- установим размер кнопки
   ObjectSetInteger(0,name,OBJPROP_XSIZE,80);
   ObjectSetInteger(0,name,OBJPROP_YSIZE,30);
//--- установим угол графика, относительно которого будут определяться координаты точки
   ObjectSetInteger(0,name,OBJPROP_CORNER,3);
//--- установим текст
   ObjectSetString(0,name,OBJPROP_TEXT,text);
//--- установим шрифт текста
   ObjectSetString(0,name,OBJPROP_FONT,"Arial");
//--- установим размер шрифта
   ObjectSetInteger(0,name,OBJPROP_FONTSIZE,12);
//--- установим цвет текста
   ObjectSetInteger(0,name,OBJPROP_COLOR,Red);
//--- установим цвет фона
   ObjectSetInteger(0,name,OBJPROP_BGCOLOR,White);
//--- установим цвет границы
   ObjectSetInteger(0,name,OBJPROP_BORDER_COLOR,Blue);
//--- скроем (true) или отобразим (false) имя графического объекта в списке объектов
   ObjectSetInteger(0,name,OBJPROP_HIDDEN,false);
//--- установим приоритет на получение события нажатия мыши на графике
   ObjectSetInteger(0,name,OBJPROP_ZORDER,0);
  }
//+------------------------------------------------------------------+
//| Закрытие позиции по типу ордера                                  |
//+------------------------------------------------------------------+
void CloseAll(int ot=-1)
  {
   bool cl;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==0 && (ot==0 || ot==-1))
              {
               RefreshRates();
               cl=OrderClose(OrderTicket(),OrderLots(),NormalizeDouble(Bid,Digits),Slip,White);
              }
            if(OrderType()==1 && (ot==1 || ot==-1))
              {
               RefreshRates();
               cl=OrderClose(OrderTicket(),OrderLots(),NormalizeDouble(Ask,Digits),Slip,White);
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutOrder(int type,double price)
  {
   int r=0;
   color clr=Green;

   if(type==1 || type==3 || type==5)
     {
      clr=Red;
      if(StopLoss>0) sl=NormalizeDouble(price+StopLoss*_Point,_Digits); else sl=max;
      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); else sl=min;
      if(TakeProfit>0) tp=NormalizeDouble(price+TakeProfit*_Point,_Digits);
     }

   r=OrderSend(NULL,type,Lots,NormalizeDouble(price,_Digits),Slip,sl,tp,"",Magic,0,clr);
   return;
  }
//+------------------------------------------------------------------+
//| Профит всех ордеров по типу ордера                               |
//+------------------------------------------------------------------+
double AllProfit(int ot=-1)
  {
   double pr=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==0 && (ot==0 || ot==-1))
              {
               pr+=OrderProfit()+OrderCommission()+OrderSwap();
              }

            if(OrderType()==1 && (ot==1 || ot==-1))
              {
               pr+=OrderProfit()+OrderCommission()+OrderSwap();
              }
           }
        }
     }
   return(pr);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double p1=NormalizeDouble(ObjectGetDouble(0,Name,OBJPROP_PRICE1),_Digits);
   double p2=NormalizeDouble(ObjectGetDouble(0,Name,OBJPROP_PRICE2),_Digits);
   double p3=NormalizeDouble(ObjectGetDouble(0,Name,OBJPROP_PRICE3),_Digits);

   tri[0]=p1;tri[1]=p2;tri[2]=p3;
   max=tri[ArrayMaximum(tri,3,0)];
   min=tri[ArrayMinimum(tri,3,0)];

   if(ObjectGetInteger(0,"B",OBJPROP_STATE)==1)
     {
      PutOrder(0,Ask);
      ObjectSetInteger(0,"B",OBJPROP_STATE,false);
     }

   if(ObjectGetInteger(0,"S",OBJPROP_STATE)==1)
     {
      PutOrder(1,Bid);
      ObjectSetInteger(0,"S",OBJPROP_STATE,false);
     }

   if(OrdersTotal()>0 && ObjectGetInteger(0,"C",OBJPROP_STATE)==1)
     {
      CloseAll();
      ObjectSetInteger(0,"C",OBJPROP_STATE,false);
     }

   Comment("\n Pr1: ",p1,
           "\n Pr2: ",p2,
           "\n Pr3: ",p3,
           "\n Max: ",max,
           "\n Min: ",min);
  }
//+------------------------------------------------------------------+

Редактирован: 15 мая 2019, 15:39

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

15 мая 2019, 15:34
↓

…

11 FOTON Автор Сообщений: 683 - Иван

18 мая 2019, 17:12
↓

что не понятно?

на графике 3 кнопки.
когда жмем бай, стоп идет на нижнюю границу треугольника.
когда жмем селл, стоп идет на верхнюю границу треугольника.
треугольник должен иметь имя:

extern string Name="Triangle1";

это пример. а по индикатору не ко мне.

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

19 мая 2019, 09:58
↑
↓

спс. Всё понятно. НО...! при появлении треугла, имя треугла каждый раз меняется. Сигнал снимать с треугла снимать получается, т.е. при появлении его ордер выставляется по направлению, но вот стоп, стоп не получается определять по хай-лой треугла.
Полагаю что надо снимать ценовые точки с индикатора при появлении треугольника. Имя теугла постоянно меняется при появлении нового треугла.
Надо полагаю привязать стоп по ценовой метке треугла, и инфу брать из индикатора или его буфера… цена верхней или нижней точки треугла(макс периода) определяется ценой и у неё есть буферная точка.
Может так получится?
Скажу проще как понимаю, при появлении треугла к примеру на селл, у треугла есть буфер мин точки, эту точку пропишем как «буфер мин точка=цена мин точки», по этой мин точки выставляется стоп… аналогично в бай «буфер макс точки=цена макс точки», стоп ставим по макс точке.

Я не учу как делать, я вооще далёк от понимания программирования, но полагаю что лучше привязать стоп к ценовой точке макс-мин буфера.
Тогда есть проблемка, как объяснить машине что есть макс и мин ценовая точка для выставления стопа по этим точкам...?
С уважением к вам! спс. *hi*

11 FOTON Автор Сообщений: 683 - Иван

19 мая 2019, 11:49
↑
↓

намного проще сразу прописать алгоритм появления треугольника и все значения будут под рукой

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

19 мая 2019, 12:08
↑
↓

вот полностью согласен… но ет вам проще, а мне млин, ето тёмный лес…

11 FOTON Автор Сообщений: 683 - Иван

19 мая 2019, 12:16
↑
↓

комментарий был удален 2019-05-19 13:59:18 FOTON

комментарий был удален 2019-05-19 13:59:21 FOTON

млин… ну как же прописать что бы стоп ставился за хай-лой треугла… аааааааа *girlcry*

11 FOTON Автор Сообщений: 683 - Иван

19 мая 2019, 12:20
↑
↓

комментарий был удален 2019-05-19 13:59:26 FOTON

вот возьмем эту картинку:

самый простой алгоритм: берем бары 1,5,15. это соответственно точки 1 2 3.

если 2-3>333*_Point и 2-1>111*_Point то у нас треугольник бай и т.д.

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

19 мая 2019, 12:20
↓

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

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

19 мая 2019, 14:13
↓

при всём уважении! но, направление сигнала треугла мы получаем и выставляется ордер, но нам нужно, что бы сова выставляла стоп по хай-лой треугла при появлении треугла по индикатору.
как на картинке выше. Нам надо точка цены куда будет ставиться стоп этого мин-макс треугла согласно направлению треугла.
т.е. появился треугольник по индикатору к примеру в бай, то сова ставит стоп за лой треугла(за нижнею точку треугольника).
Аналогично только в селл. *hi*

11 FOTON Автор Сообщений: 683 - Иван

19 мая 2019, 14:25
↑
↓

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

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

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

РЕКОМЕНДУЮ

Лучшее от FOTON

советник по индикатору

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

Рейтинг брокеров FOREX

Из недавнего:

	FOTON Иван Уровень 11

Авторизация

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

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

РЕКОМЕНДУЮ

Лучшее от FOTON

советник по индикатору

Вставка изображения

СМАЙЛИКИ

Позитив

Негатив

Роли

Еще

Плакаты, знаки

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

Рейтинг брокеров FOREX

Из недавнего: