Комментарии / Публикации AM2 / OpenTraders - блогплатформа для трейдеров финансовых рынков

Всё просто : Stochastic / Стол заказов MQL 20

0

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

AM2

16 марта 2017, 20:31

Пробой канала Мартин / Стол заказов MQL 29

0

Поправил: www.opentraders.ru/downloads/1511/

AM2

16 марта 2017, 20:16

Пробой канала Мартин / Стол заказов MQL 29

0

Поставил на отладку. Сейчас буду все проверять.

AM2

16 марта 2017, 20:00

Добавить параметры в советник / Стол заказов MQL 4

0

Добавил: www.opentraders.ru/downloads/1070/

AM2

16 марта 2017, 19:59

Добавить параметры в советник / Стол заказов MQL 4

0

Добавлю вечером.

AM2

16 марта 2017, 06:20

Пробой канала Мартин / Стол заказов MQL 29

0

Скиньте настройки и я посмотрю вечером.

AM2

16 марта 2017, 06:18

Пробой канала Мартин / Стол заказов MQL 29

0

Все в файлике: www.opentraders.ru/downloads/1511/

AM2

15 марта 2017, 20:32

свечное время 14.03.17 / Стол заказов MQL 4

0

Вот такой простой вариант получился:
www.opentraders.ru/downloads/1510/

AM2

15 марта 2017, 20:23

Советник для бинарных опционов по фракталам / Стол заказов MQL 13

0

Сделал версию для проверки в обычном терминале, нормально:

На опционах тоже:

AM2

15 марта 2017, 16:05

Советник для бинарных опционов по фракталам / Стол заказов MQL 13

0

Проверяю проверяю а он никак сливать не хочет!

AM2

15 марта 2017, 15:48

Пробой канала Мартин / Стол заказов MQL 29

0

Сейчас есть процентов 70 от ТЗ:


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

//--- Inputs
extern double Lots       = 0.1;      // лот
extern double KLot       = 1;        // умножение лота
extern double MaxLot     = 5;        // максимальный лот
extern int StopLoss      = 0;        // лось
extern int TakeProfit    = 0;        // язь
extern int Profit        = 70;       // язь в рублях
extern int Profit2       = 30;       // язь в рублях
extern int Delta         = 100;      // дельта
extern int Slip          = 30;       // реквот
extern int ChannelPeriod = 14;       // период индикатора
extern int Magic         = 123;      // магик
extern string IndName    = "Price Channel";

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,double lot)
  {
   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;
  }
//+------------------------------------------------------------------+
//| Подсчет ордеров по типу                                          |
//+------------------------------------------------------------------+
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());
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void Trailing()
  {
   bool mod;
   double h=NormalizeDouble(iCustom(NULL,0,IndName,ChannelPeriod,0,0),Digits);
   double l=NormalizeDouble(iCustom(NULL,0,IndName,ChannelPeriod,1,0),Digits);

   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==4)
              {
               if(OrderOpenPrice()-h>0)
                 {
                  if(OrderOpenPrice()!=h)
                    {
                     mod=OrderModify(OrderTicket(),h,h-StopLoss*Point,h+TakeProfit*Point,0,Yellow);
                     return;
                    }
                 }
              }

            if(OrderType()==5)
              {
               if(l-OrderOpenPrice()>0)
                 {
                  if(OrderOpenPrice()!=l)
                    {
                     mod=OrderModify(OrderTicket(),l,l+StopLoss*Point,l-TakeProfit*Point,0,Yellow);
                     return;
                    }
                 }
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//| Подсчет позиций                                                  |
//+------------------------------------------------------------------+
int CountTrades(int ot=-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()==0 && (ot==0 || ot==-1)) count++;
            if(OrderType()==1 && (ot==1 || ot==-1)) count++;
           }
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Профит всех ордеров по типу ордера                               |
//+------------------------------------------------------------------+
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);
  }
//+------------------------------------------------------------------+
//| Закрытие позиции по типу ордера                                  |
//+------------------------------------------------------------------+
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);
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//| Лот для усреднителя                                              |
//+------------------------------------------------------------------+
double Lot()
  {
   double lot=Lots;
   if(CountTrades()>0) lot=NormalizeDouble(Lots*MathPow(KLot,CountTrades()),2);
   if(lot>MaxLot)lot=Lots;
   return(lot);
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double h = iCustom(NULL,0,IndName,ChannelPeriod,0,0);
   double l = iCustom(NULL,0,IndName,ChannelPeriod,1,0);

   if((AllProfit()>Profit && CountTrades()==1) || (AllProfit()>Profit2 && CountTrades()>1)) CloseAll();
   
   if(t!=Time[0] && (CountOrders(0)<1 && CountOrders(1)<1))
     {
      Trailing();
      if(CountOrders(4)<1 && Bid<h) PutOrder(4,h+Delta*Point,Lots);
      if(CountOrders(5)<1 && Ask>l) PutOrder(5,l-Delta*Point,Lots);
      t=Time[0];
     }

   if(CountOrders(0)>0 || CountOrders(1)>0)
     {
      DelOrder();
      if(CountOrders(0)>0 && CountOrders(5)<1) PutOrder(5,l-Delta*Point,Lot());
      if(CountOrders(1)>0 && CountOrders(4)<1) PutOrder(4,l+Delta*Point,Lot());
     }

   Comment("\n AllProfit: ",AllProfit());
  }
//+------------------------------------------------------------------+

AM2

14 марта 2017, 23:50

Пробой канала Мартин / Стол заказов MQL 29

0

Пока такой набросок. Выставляет отложки тянет по границе канала, при срабатывании ордера противоположный удаляет и заменяет его увеличенным в 2 раза.

И на будущее, чем проще будет ТЗ, тем больше у вас шансов увидеть советник в готовом виде.


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

//--- Inputs
extern double Lots       = 0.1;      // лот
extern double KLot       = 1;        // умножение лота
extern double MaxLot     = 5;        // максимальный лот
extern int StopLoss      = 50;       // лось
extern int TakeProfit    = 70;       // язь
extern int Delta         = 100;      // дельта
extern int Slip          = 30;       // реквот
extern int ChannelPeriod = 14;       // период индикатора
extern int Magic         = 123;      // магик
extern string IndName    = "Price Channel";

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,double lot)
  {
   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;
  }
//+------------------------------------------------------------------+
//| Подсчет ордеров по типу                                          |
//+------------------------------------------------------------------+
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());
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void Trailing()
  {
   bool mod;
   double h=NormalizeDouble(iCustom(NULL,0,IndName,ChannelPeriod,0,0),Digits);
   double l=NormalizeDouble(iCustom(NULL,0,IndName,ChannelPeriod,1,0),Digits);

   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==4)
              {
               if(OrderOpenPrice()-h>0)
                 {
                  if(OrderOpenPrice()!=h)
                    {
                     mod=OrderModify(OrderTicket(),h,h-StopLoss*Point,h+TakeProfit*Point,0,Yellow);
                     return;
                    }
                 }
              }

            if(OrderType()==5)
              {
               if(l-OrderOpenPrice()>0)
                 {
                  if(OrderOpenPrice()!=l)
                    {
                     mod=OrderModify(OrderTicket(),l,l+StopLoss*Point,l-TakeProfit*Point,0,Yellow);
                     return;
                    }
                 }
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   double h = iCustom(NULL,0,IndName,ChannelPeriod,0,0);
   double l = iCustom(NULL,0,IndName,ChannelPeriod,1,0);

   if(t!=Time[0] && (CountOrders(0)<1 && CountOrders(1)<1))
     {
      Trailing();
      if(CountOrders(4)<1 && Bid<h) PutOrder(4,h+Delta*Point,Lots);
      if(CountOrders(5)<1 && Ask>l) PutOrder(5,l-Delta*Point,Lots);
      t=Time[0];
     }

   if(CountOrders(0)>0 || CountOrders(1)>0)
     {
      DelOrder();
      if(CountOrders(0)>0 && CountOrders(5)<1) PutOrder(5,l-Delta*Point,Lots*KLot);
      if(CountOrders(1)>0 && CountOrders(4)<1) PutOrder(4,l+Delta*Point,Lots*KLot);
     }

   Comment("\n ");
  }
//+------------------------------------------------------------------+

AM2