alekseifx

 
Уровень 8

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


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

Рейтинг 2087



РЕКОМЕНДУЮ



Немного подправить советник, написанный здесь.

Здравствуйте! Уважаемые программисты, добавьте в основные настройки советника пункт «only sell», «only buy». (Я знаю, что он есть в настройках, но нужно именно в основных.)
Заранее спасибо!
Вот этот www.opentraders.ru/downloads/1648/
  • 0
  • Просмотров: 2728
  • 13 сентября 2017, 13:47
  • alekseifx
Понравилcя материал? Не забудьте поставить плюс и поделиться в социальной сети!

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

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

+
0
Пока на неделю вперед все расписано. Поэтому не раньше следующей среды смотреть буду.
Редактирован: 13 сентября 2017, 20:06
avatar

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

  • 13 сентября 2017, 19:23
+
0
По этому заданию отбой, протестирую руками 2-3 месяца, а дальше будем думать!
avatar

  8  alekseifx Автор Сообщений: 179

  • 14 сентября 2017, 20:31
+
0
Хорошо!
avatar

  8  alekseifx Автор Сообщений: 179

  • 13 сентября 2017, 20:17
+
+1
Сделал если что: www.opentraders.ru/downloads/1648/

avatar

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

  • 15 сентября 2017, 20:38
+
0
avatar

  8  alekseifx Автор Сообщений: 179

  • 15 сентября 2017, 21:05
+
0
Есть одно, НО!!! Видно даже у Вас на скрине, если выставить в советнике одкрытие и закрытие по сигналу на 1 баре, то он торгует только в одну сторону!
avatar

  8  alekseifx Автор Сообщений: 179

  • 18 сентября 2017, 11:28
+
0
Вроде бы нормально все:




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

//--- Inputs
extern double Lots         = 0.1;      // лот
extern double Risk         = 5;        // риск
extern double StopLoss     = 500;      // лось
extern double TakeProfit   = 500;      // язь
extern int Step            = 200;      // шаг
extern int Orders          = 5;        // макс ордеров в рынке
extern int Shift           = 1;        // на каком баре сигнал индикатора
extern int Slip            = 30;       // реквот
extern int CloseSig        = 0;        // 1-закрытие по сигналу
extern int Magic           = 123;      // магик
extern bool Buy            = true;     // buy
extern bool Sell           = true;     // sell

extern string IndName="Real Trend";
extern int SignalPeriod= 15;
extern int ArrowPeriod = 2;
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---

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

  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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,Lot(),NormalizeDouble(price,Digits),Slip,sl,tp,"",Magic,0,clr);
   return;
  }
//+------------------------------------------------------------------+
//| Check for close order conditions                                 |
//+------------------------------------------------------------------+
void ClosePos()
  {
   double buy=iCustom(NULL,0,IndName,SignalPeriod,ArrowPeriod,2,Shift);
   double sell=iCustom(NULL,0,IndName,SignalPeriod,ArrowPeriod,3,Shift);

   if(sell>0)
     {
      CloseAll(0);
     }

   if(buy>0)
     {
      CloseAll(1);
     }
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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);
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
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);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double Lot()
  {
   double lot=Lots;
   double lotstep=MarketInfo(Symbol(),MODE_LOTSTEP);
   double MinLot=MarketInfo(Symbol(),MODE_MINLOT);
   double MaxLot=MarketInfo(Symbol(),MODE_MAXLOT);
   if(Lots==0) lot=AccountBalance()/100000*Risk;
   lot=NormalizeDouble(lot/lotstep,0)*lotstep;
   if(lot<MinLot) lot=MinLot;
   if(lot>MaxLot) lot=MaxLot;
   return(lot);
  }
  //+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double LastPrice()
  {
   double lp=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) lp=OrderOpenPrice();
            break;
           }
        }
     }
   return(lp);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int LastType()
  {
   int tp=8;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()<2) tp=OrderType();
            break;
           }
        }
     }
   return(tp);
  }
//+------------------------------------------------------------------+
//| OnTick function                                                  |
//+------------------------------------------------------------------+
void OnTick()
  {
   double buy=iCustom(NULL,0,IndName,SignalPeriod,ArrowPeriod,2,Shift);
   double sell=iCustom(NULL,0,IndName,SignalPeriod,ArrowPeriod,3,Shift);
     
   if((CountTrades()<1 && buy>0 && Buy)  || (CountTrades()<Orders && LastType()==0 && Bid-LastPrice()>Step*Point)) PutOrder(0,Ask);
   if((CountTrades()<1 && sell>0 && Sell) || (CountTrades()<Orders && LastType()==1 && LastPrice()-Bid>Step*Point)) PutOrder(1,Bid);

   if(CloseSig>0) ClosePos();
  }
//+------------------------------------------------------------------+

avatar

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

  • 19 сентября 2017, 02:04

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