FOTON
Иван

 
Уровень 11

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


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

Рейтинг 2081



РЕКОМЕНДУЮ



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

Приветствую!*hi* 
Напишите пожалуйста советник по индикатору Semafor+123Triangles_Robo.mq4 (23 Kb)Semafor+123Triangles_Robo.ex4 (30 Kb)
Задача:
при появлении треугольника, сова ставит рыночный ордер по сигналу, а стоп, стоп ставит за хай треугольника если в селл, и за лой если треугольник в бай.

Спасибо! *hi* 
  • +1
  • Просмотров: 2750
  • 13 мая 2019, 00:54
  • FOTON
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

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

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

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

  • 13 мая 2019, 15:03
+
0
Так ты же больше всех распинался, что все индюки фуфло.Как тогда тебя понимать.

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

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

  • 13 мая 2019, 18:49
+
0
У всех сов одни те же цели-зарабатывать.Тока далеко не все могут.*lalala* 
avatar

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

  • 13 мая 2019, 19:29
+
0
;) с этим я соглашусь… истина где то рядом...*lalala* 
avatar

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

  • 13 мая 2019, 19:33
+
0
на 20-е
avatar

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

  • 13 мая 2019, 17:02
+
0
*hi*  спасиб!
avatar

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

  • 13 мая 2019, 18:49
+
0
чтобы сделать по тз надо написать и отладить кучу уникальных функций. по буферам координаты не считаешь, в списке объектов путаница. не ко мне.

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


//+------------------------------------------------------------------+
//|                                                    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());
  }
//+------------------------------------------------------------------+

avatar

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

  • 15 мая 2019, 14:51
+
0
могите пожалуйста, как прописать код в советнике что бы стоп сова ставила за хай-лой сигнального треугольника?


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





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


//+------------------------------------------------------------------+
//|                                                    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
avatar

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

  • 15 мая 2019, 15:34
+
0
( *???* …
avatar

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

  • 18 мая 2019, 17:12
+
0
что не понятно?

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


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

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

  • 19 мая 2019, 09:58
+
0
:)  спс. Всё понятно. НО...! при появлении треугла, имя треугла каждый раз меняется. Сигнал снимать с треугла снимать получается, т.е. при появлении его ордер выставляется по направлению, но вот стоп, стоп не получается определять по хай-лой треугла.
Полагаю что надо снимать ценовые точки с индикатора при появлении треугольника. Имя теугла постоянно меняется при появлении нового треугла.
Надо полагаю привязать стоп по ценовой метке треугла, и инфу брать из индикатора или его буфера… цена верхней или нижней точки треугла(макс периода) определяется ценой и у неё есть буферная точка.
Может так получится?
Скажу проще как понимаю, при появлении треугла к примеру на селл, у треугла есть буфер мин точки, эту точку пропишем как «буфер мин точка=цена мин точки», по этой мин точки выставляется стоп… аналогично в бай «буфер макс точки=цена макс точки», стоп ставим по макс точке.;) 
Я не учу как делать, я вооще далёк от понимания программирования, но полагаю что лучше привязать стоп к ценовой точке макс-мин буфера.
Тогда есть проблемка, как объяснить машине что есть макс и мин ценовая точка для выставления стопа по этим точкам...?
С уважением к вам! спс.*hi* 
avatar

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

  • 19 мая 2019, 11:49
+
0
намного проще сразу прописать алгоритм появления треугольника и все значения будут под рукой
avatar

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

  • 19 мая 2019, 12:08
+
0
*good*  вот полностью согласен… но ет вам проще, а мне млин, ето тёмный лес…
avatar

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

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

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

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

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

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

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



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

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

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

  • 19 мая 2019, 12:20
+
0
если нужно в следующем топике сделаем по этому алгоритму. такой советник будет тестироваться оптимизироваться и работать быстрее.
avatar

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

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

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

  • 19 мая 2019, 14:25

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