fxvladimir

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


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

Рейтинг 2156


_



UPDATE: Внимание! С ноября 2024 финансирование Стола заказов прекращено

Подробности здесь — zakaz.opentraders.ru/132091.html



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



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

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



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





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



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

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

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


РЕКОМЕНДУЮ



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

Лучшее от fxvladimir



Нужен советник на МТ4. Советник торгует на 2 индикаторах АМА с разными периодами. Комментариев 10
2015-01-25 22:02:19Рейтинг 0

Советник по индикатору ZIG ZAG

О, достопочтенные программистеры!*hi*  Не соизволите ли Вы запраграммить советника?

Нужен советник на МТ4.
Советник торгует по индикатору ZIG ZAG (версия индикатора любая на ваш выбор).

Т.З.:

Имеем пики индикатора Р0, Р1, Р2, Р3, Р4(см.приложение).
Если Р1>Р3 и Р2>Р4 Значит тренд BUY и выставляем отложенный ордер BUY с ценой
Р2+(Р1-Р2)/3 (т.е. выше пика Р2 на треть длины плеча Р1-Р2),
со SL= Р2-(спред+1 пункт), с ТР= Р1+n(n- количество пунктов выше пика Р1).
В качестве безубытка: по достижении ценой price+(price-SL+1) закрываем половину лота.
Доливаемся по цене Р2+(price-Р2)/3 Со SL и безубытком аналогично предыдущему.

Если Р1<Р3 и Р2<P4 Значит тренд SELL и выставляем отложенный ордер SELL с ценой
Р2-(Р2-Р1)/3 (т.е. нижее пика Р2 на треть длины плеча Р2-Р1),
со SL= Р2+(спред+1 пункт), с ТР= Р1-n(n- количество пунктов ниже пика Р1).
В качестве безубытка: по достижении ценой price-(SL-price+1) закрываем половину лота.
Доливаемся по цене Р2-(Р2-price)/3 Со SL и безубытком аналогично предыдущему.

Если Р1<Р3 и Р2>P4 или Р1>Р3 и Р2<P4 то сижу курю.

Возможен такой момент: после установки ордера пик Р1 перерисовывается. Соответственно
нужно изменять значения price и TP отложенных ордеров.
Обязательно трейлинг стоп.

Skin zig zag 1.png (18 Kb)
Skin zig zag 2.png (17 Kb)
1c0d7e0ea9da11e28c8322000a9e08d3_7.jpg (71 Kb)
  • 0
  • Просмотров: 3071
  • 24 ноября 2015, 10:51
  • fxvladimir
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

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

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

0






Талисман? :D 
avatar

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

  • 24 ноября 2015, 11:12
0
Да.А еще чуть чуть улыбки
avatar

  2  fxvladimir Автор Сообщений: 11

  • 24 ноября 2015, 12:19
0
Вот набросок, здесь только входы и трал.


//+------------------------------------------------------------------+
//|                                                         ZiZi.mq4 |
//|                                              Copyright 2015, AM2 |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2015, AM2"
#property link      "http://www.forexsystems.biz"
#property description "Simple expert advisor"

//--- Inputs
extern int    StopLoss     = 500; // лось
extern int    TakeProfit   = 500; // язь
extern int    TrailingStop = 300; // трал
extern int    Slip         = 30;  // реквот
extern int    Magic        = 123; // магик
extern double Lots         = 0.1; // лот
//----
extern int InpDepth        = 12;
extern int InpDeviation    = 5;
extern int InpBackstep     = 3;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---

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

  }
//+------------------------------------------------------------------+
//| Check for open order conditions                                  |
//+------------------------------------------------------------------+
void OpenPos()
  {
   int r=0;
   double sl=0,tp=0,pr=0;
//--- get Ind
   double ZZ0=GetExtremumZZPrice(NULL,0,0,InpDepth,InpDeviation,InpBackstep);
   double ZZ1=GetExtremumZZPrice(NULL,0,1,InpDepth,InpDeviation,InpBackstep);
   double ZZ2=GetExtremumZZPrice(NULL,0,2,InpDepth,InpDeviation,InpBackstep);
   double ZZ3=GetExtremumZZPrice(NULL,0,3,InpDepth,InpDeviation,InpBackstep);
   double ZZ4=GetExtremumZZPrice(NULL,0,4,InpDepth,InpDeviation,InpBackstep);

//--- sell conditions
   if(ZZ0>ZZ1 && ZZ1<ZZ3 && ZZ2<ZZ4)
     {
      pr=ZZ2-(ZZ2-ZZ1)/3;
      if(StopLoss>0) sl=NormalizeDouble(pr+StopLoss*Point,Digits);
      if(TakeProfit>0) tp=NormalizeDouble(pr-TakeProfit*Point,Digits);
      r=OrderSend(Symbol(),OP_SELLSTOP,Lots,NormalizeDouble(pr,Digits),Slip,sl,tp,"",Magic,0,Red);
     }
//--- buy conditions
   if(ZZ0<ZZ1 && ZZ1>ZZ3 && ZZ2>ZZ4)
     {
      pr=ZZ2+(ZZ1-ZZ2)/3;
      if(StopLoss>0) sl=NormalizeDouble(pr-StopLoss*Point,Digits);
      if(TakeProfit>0) tp=NormalizeDouble(pr+TakeProfit*Point,Digits);
      r=OrderSend(Symbol(),OP_BUYSTOP,Lots,NormalizeDouble(pr,Digits),Slip,sl,tp,"",Magic,0,Blue);
     }
//---
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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;
                       }
                    }
                 }
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
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()==OP_BUY || OrderType()==OP_SELL) count++;
           }
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
int CountOrders()
  {
   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()==OP_BUYSTOP || OrderType()==OP_SELLSTOP) count++;
           }
        }
     }
   return(count);
  }
//+----------------------------------------------------------------------------+
//|  Автор    : Ким Игорь В. aka KimIV,  http://www.kimiv.ru                   |
//+----------------------------------------------------------------------------+
//|  Версия   : 07.10.2006                                                     |
//|  Описание : Возвращает экстремум ЗигЗага по его номеру.                    |
//+----------------------------------------------------------------------------+
//|  Параметры:                                                                |
//|    sy - наименование инструмента   (NULL или "" - текущий символ)          |
//|    tf - таймфрейм                  (      0     - текущий ТФ)              |
//|    ne - номер экстремума           (      0     - последний)               |
//|    dp - ExtDepth                                                           |
//|    dv - ExtDeviation                                                       |
//|    bs - ExtBackstep                                                        |
//+----------------------------------------------------------------------------+
double GetExtremumZZPrice(string sy="",int tf=0,int ne=0,int dp=12,int dv=5,int bs=3)
  {
   if(sy=="" || sy=="0") sy=Symbol();
   double zz;
   int    i,k=iBars(sy,tf),ke=0;

   for(i=1; i<k; i++)
     {
      zz=iCustom(sy,tf,"ZigZag",dp,dv,bs,0,i);
      if(zz!=0)
        {
         ke++;
         if(ke>ne) return(zz);
        }
     }
   Print("GetExtremumZZPrice(): Экстремум ЗигЗага номер ",ne," не найден");
   return(0);
  }
//+------------------------------------------------------------------+
//| OnTick function                                                  |
//+------------------------------------------------------------------+
void OnTick()
  {
   double ZZ0=GetExtremumZZPrice(NULL,0,0,InpDepth,InpDeviation,InpBackstep);
   double ZZ1=GetExtremumZZPrice(NULL,0,1,InpDepth,InpDeviation,InpBackstep);
   double ZZ2=GetExtremumZZPrice(NULL,0,2,InpDepth,InpDeviation,InpBackstep);
   double ZZ3=GetExtremumZZPrice(NULL,0,3,InpDepth,InpDeviation,InpBackstep);
   double ZZ4=GetExtremumZZPrice(NULL,0,4,InpDepth,InpDeviation,InpBackstep);

   if(CountTrades()<1 && CountOrders()<1)
     {
      OpenPos();
     }

   if(TrailingStop>0) Trailing();

   Comment("\n ZZ0: ",ZZ0,
           "\n ZZ1: ",ZZ1,
           "\n ZZ2: ",ZZ2,
           "\n ZZ3: ",ZZ3,
           "\n ZZ4: ",ZZ4);
  }
//+------------------------------------------------------------------+

avatar

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

  • 24 ноября 2015, 12:31
0
Да озарится радостью душа твоя!
Спасибо, дорогой! Теперь я вижу дорогу к написанию этого советника.
avatar

  2  fxvladimir Автор Сообщений: 11

  • 24 ноября 2015, 19:02

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