anathem

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


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

Рейтинг 2088


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



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

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



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





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



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

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

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


РЕКОМЕНДУЮ



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

Лучшее от anathem



Советник на индикаторе ZIGZAG Комментариев 4
2018-11-06 12:16:48Рейтинг 0

Доработка старого советника по двум МА Комментариев 9
2017-11-29 00:23:48Рейтинг 0

Советник на индикаторе ZIGZAG Комментариев 13
2018-11-06 21:14:13Рейтинг 0

Мартингейл с трендовым индикатором Комментариев 6
2018-02-24 15:13:04Рейтинг 0

Пирамидинг по индикатору Parabolic SAR Комментариев 11
2018-06-16 18:37:14Рейтинг 0

Советник поддерживающий баланс лотов

Советник поддерживает баланс лотов встречных направлений по тому инструменту, на котором он расположен.

Пример
Имеем 3 лота Buy и 1 Sell, советник сразу добавит 2 лота Sell. Далее закрылся ордер Buy 0,5 лота по стопу или профиту и тут же будет открыт ордер buy 0.5 лота. Т.е. при любом раскладе советник будет восстанавливать этот баланс все время пока включен.

cloud.mail.ru/public/9v9T/FE1h4CaAn

Он выставляет полный баланс я в коде нашёл где можно поставить свои лоты которые хочеш отнять

LB-LS-2
LS-LB-2

Минус 2 это он будет отнимать 2 лота. Хотел сделать чтобы делил, но не получилось.
==============================

if (LS<LB)
{
if (OrderSend(Symbol(),OP_SELL,LB-LS-2,NormalizeDouble(Bid,Digits),100,0,0,NULL,0,0,CLR_NONE)==-1)
Print(«Ошибка »,GetLastError()," открытия ордера ");
}
if (LS>LB)
{
if (OrderSend(Symbol(),OP_BUY,LS-LB-2,NormalizeDouble(Ask,Digits),100,0,0,NULL,0,0,CLR_NONE)==-1)
Print(«Ошибка »,GetLastError()," открытия ордера ");

Так вот сам по себе советник бессмысленный он будет держать постоянно одни и те же лоты и не будет прибыли. Надо чтобы сделали вместо рыночного ордера советник ставил отложенный ордер.

Если сможете, то сделайте параметр — сколько лотов в процентах выставить. Например у нас разница в 4 лота, ставим процент 50 и советник выставит отложку в 2 лота.

Нужны параметры

extern int Profit = 250; // Профит в валюте
extern int BULevel = 0; // уровень БУ
extern int BUPoint = 30; // пункты БУ
extern int TrailingStop = 0; // трал
extern int TrailingStep = 20; // шаг трала
extern int Dist = 30; //растояние от цены до выставленого ордерами
extern int Slip = 30; // реквот
extern int Magic = 123; // магик
  • 0
  • Просмотров: 3482
  • 28 июня 2016, 20:54
  • anathem
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

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

+
0
Я делал подобный ссылку не подскажу посмотрите в базе а код вот :) 

//+------------------------------------------------------------------+
//|                                                         Lots.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

extern double Lots       = 0.1;      // лот
extern double DeltaLots  = 0.3;      // разница в лотах
extern int StopLoss      = 0;        // лось
extern int TakeProfit    = 0;        // язь
extern int BULevel       = 0;        // уровень БУ
extern int BUPoint       = 30;       // пункты БУ
extern int TrailingStop  = 0;        // трал
extern int TrailingStep  = 20;       // шаг трала
extern int Procent       = 100;      // процент
extern int Delta         = 300;      // расстояние от цены
extern int Slip          = 30;       // реквот
extern int Magic         = 0;        // магик

bool one=true;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---

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

  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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(OrderType()==type) count++;
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Подсчет лота ордеров по типу                                     |
//+------------------------------------------------------------------+
double CountLots(int type)
  {
   double count=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderType()==type) count+=OrderLots();
        }
     }
   return(count);
  }
//+------------------------------------------------------------------+
//| Ступенчатый трал               if(TrailingStop>0) Trailing();    |
//+------------------------------------------------------------------+
void Trailing()
  {
   bool mod;
   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)
              {
               if(Bid-OrderOpenPrice()>TrailingStop*Point)
                 {
                  if(OrderStopLoss()<Bid-(TrailingStop+TrailingStep-1)*Point)
                    {
                     mod=OrderModify(OrderTicket(),OrderOpenPrice(),Bid-TrailingStop*Point,OrderTakeProfit(),0,Yellow);
                     return;
                    }
                 }
              }

            if(OrderType()==OP_SELL)
              {
               if((OrderOpenPrice()-Ask)>TrailingStop*Point)
                 {
                  if(OrderStopLoss()>Ask+(TrailingStop+TrailingStep-1)*Point || OrderStopLoss()==0)
                    {
                     mod=OrderModify(OrderTicket(),OrderOpenPrice(),Ask+TrailingStop*Point,OrderTakeProfit(),0,Yellow);
                     return;
                    }
                 }
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//|  Безубыток ордеров   if(BULevel>0) BU();                         |
//+------------------------------------------------------------------+
void BU()
  {
   bool m;
   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)
              {
               if(OrderOpenPrice()<=(Bid-(BULevel+BUPoint)*Point) && OrderOpenPrice()>OrderStopLoss())
                 {
                  m=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()+BUPoint*Point,OrderTakeProfit(),0,Yellow);
                  return;
                 }
              }

            if(OrderType()==OP_SELL)
              {
               if(OrderOpenPrice()>=(Ask+(BULevel+BUPoint)*Point) && (OrderOpenPrice()<OrderStopLoss() || OrderStopLoss()==0))
                 {
                  m=OrderModify(OrderTicket(),OrderOpenPrice(),OrderOpenPrice()-BUPoint*Point,OrderTakeProfit(),0,Yellow);
                  return;
                 }
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   if(IsTesting() && OrdersTotal()<1)
     {
      for(int i=1;i<=5;i++)
        {
         PutOrder(4,Bid+200*Point*i,0.1);
         PutOrder(5,Bid-200*Point*i,0.1);
        }
     }

   if(BULevel>0) BU();
   if(TrailingStop>0) Trailing();

   double delta=MathAbs(CountLots(0)-CountLots(1));

   if(delta>=DeltaLots && CountLots(0)>CountLots(1) && one)
     {
      PutOrder(5,Bid-Delta*Point,delta*Procent*0.01);
      one=false;
     }

   if(delta>=DeltaLots && CountLots(1)>CountLots(0) && one)
     {
      PutOrder(4,Bid+Delta*Point,delta*Procent*0.01);
      one=false;
     }

   Comment("\n Buy Lots: ",CountLots(0),
           "\n Sell Lots: ",CountLots(1),
           "\n Delta Lots: ",MathAbs(CountLots(0)-CountLots(1)));
  }
//+------------------------------------------------------------------+
avatar

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

  • 29 июня 2016, 06:40
+
0
Адаптировал свой вариант под ваше ТЗ:
www.opentraders.ru/downloads/1221/




Редактирован: 29 июня 2016, 07:37
avatar

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

  • 29 июня 2016, 07:03
+
0
Апну тему.
Считаю, что стратегия локирования позиций имеет право на жизнь, если цена будет «ходить» в таком канале, при котором свопы и комиссии открытых ордеров не будут съедать всю прибыль и, вообще, итоговая прибыль получится больше депозитных процентов. Опять угадайки с выбором валютной пары или нескольких пар.
Жаль, что Андрей не взялся за мое первое ТЗ и ТЗ с интегрой.
avatar

  7  stepmega Сообщений: 88

  • 2 ноября 2016, 10:22

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