0
Сейчас попробовал с двумя ордерами, удаляет линии.


//+------------------------------------------------------------------+
//|                                                         Risk.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
#property indicator_chart_window

extern double Risk      = 1;        // риск %
extern color  LineColor = Red;      // цвет линии
extern int    LineStyle = 0;        // стиль линии
extern int    Magic     = 0;        // магик
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   Comment("");
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   Comment("");
   ObjectsDeleteAll();
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutTrendLine(string name,double pr)
  {
   ObjectDelete(0,name);
   ObjectCreate(0,name,OBJ_TREND,0,Time[10],pr,Time[0],pr);
//--- установим цвет линии
   ObjectSetInteger(0,name,OBJPROP_COLOR,LineColor);
//--- установим стиль отображения линии
   ObjectSetInteger(0,name,OBJPROP_STYLE,LineStyle);
//--- установим толщину линии
   ObjectSetInteger(0,name,OBJPROP_WIDTH,1);
//--- включим (true) или отключим (false) режим продолжения отображения линии вправо
   ObjectSetInteger(0,name,OBJPROP_RAY_RIGHT,false);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutText(string name,string text,double price)
  {
   ObjectDelete(0,name);
//--- создадим объект "Текст"  
   ObjectCreate(0,name,OBJ_TEXT,0,Time[5],price);
//--- установим текст
   ObjectSetString(0,name,OBJPROP_TEXT,text);
//--- установим шрифт текста
   ObjectSetString(0,name,OBJPROP_FONT,"Arial");
//--- установим размер шрифта
   ObjectSetInteger(0,name,OBJPROP_FONTSIZE,12);
//--- установим цвет
   ObjectSetInteger(0,name,OBJPROP_COLOR,LineColor);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double OrdersLot()
  {
   double lot=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) lot+=OrderLots();
           }
        }
     }
   return(lot);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
  {
   double stop=0;
   if(OrdersLot()>0) stop=AccountBalance()*Risk/(OrdersLot()*100);
   
   ObjectsDeleteAll();
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==0)
              {
               PutTrendLine("Stop"+(string)OrderTicket(),OrderOpenPrice()-stop*Point);
               PutText("Risk"+(string)OrderTicket(),(string)Risk+"%",OrderOpenPrice()-stop*Point);
              }

            if(OrderType()==1)
              {
               PutTrendLine("Stop"+(string)OrderTicket(),OrderOpenPrice()+stop*Point);
               PutText("Risk"+(string)OrderTicket(),(string)Risk+"%",OrderOpenPrice()+stop*Point);
              }
           }
        }
     }

   Comment("\n Lots: ",OrdersLot(),
           "\n Stop: ",stop,
           "\n Trades: ",OrdersTotal());
           
   return(rates_total);
  }
//+------------------------------------------------------------------+

avatar

AM2

  • 22 апреля 2016, 22:52
0
Могу сделать чуть больше половины пунктов из ТЗ после выходных.
avatar

AM2

  • 22 апреля 2016, 17:02
0
Стопы считает, а с удалением линий нужно подольше репу чесать :) 


//+------------------------------------------------------------------+
//|                                                         Risk.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
#property indicator_chart_window

extern double Risk      = 1;        // риск %
extern color  LineColor = Red;      // цвет линии
extern int    LineStyle = 0;        // стиль линии
extern int    Magic     = 0;        // магик
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   Comment("");
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
   Comment("");
   ObjectsDeleteAll();
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutTrendLine(string name,double pr)
  {
   ObjectDelete(0,name);
   ObjectCreate(0,name,OBJ_TREND,0,Time[10],pr,Time[0],pr);
//--- установим цвет линии
   ObjectSetInteger(0,name,OBJPROP_COLOR,LineColor);
//--- установим стиль отображения линии
   ObjectSetInteger(0,name,OBJPROP_STYLE,LineStyle);
//--- установим толщину линии
   ObjectSetInteger(0,name,OBJPROP_WIDTH,1);
//--- включим (true) или отключим (false) режим продолжения отображения линии вправо
   ObjectSetInteger(0,name,OBJPROP_RAY_RIGHT,false);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void PutText(string name,string text,double price)
  {
   ObjectDelete(0,name);
//--- создадим объект "Текст"  
   ObjectCreate(0,name,OBJ_TEXT,0,Time[5],price);
//--- установим текст
   ObjectSetString(0,name,OBJPROP_TEXT,text);
//--- установим шрифт текста
   ObjectSetString(0,name,OBJPROP_FONT,"Arial");
//--- установим размер шрифта
   ObjectSetInteger(0,name,OBJPROP_FONTSIZE,12);
//--- установим цвет
   ObjectSetInteger(0,name,OBJPROP_COLOR,LineColor);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double OrdersLot()
  {
   double lot=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) lot+=OrderLots();
           }
        }
     }
   return(lot);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
void DeleteObject()
  {
   int ticket=0;
   string name="";

   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            name=ObjectName(i);
            if(name!="Stop"+(string)OrderTicket()) ObjectDelete(0,name);
           }
        }
     }
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
  {
//---
   double stop=0;
   if(OrdersLot()>0) stop=AccountBalance()*Risk/(OrdersLot()*100);

   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
           {
            if(OrderType()==0)
              {
               PutTrendLine("Stop"+(string)OrderTicket(),OrderOpenPrice()-stop*Point);
               PutText("Risk"+(string)OrderTicket(),(string)Risk+"%",OrderOpenPrice()-stop*Point);
              }

            if(OrderType()==1)
              {
               PutTrendLine("Stop"+(string)OrderTicket(),OrderOpenPrice()+stop*Point);
               PutText("Risk"+(string)OrderTicket(),(string)Risk+"%",OrderOpenPrice()+stop*Point);
              }
           }
        }
     }
     
   //DeleteObject();
   
   Comment("\n Lots: ",OrdersLot(),
           "\n Stop: ",stop,
           "\n Trades: ",CountTrades());
//--- return value of prev_calculated for next call
   return(rates_total);
  }
//+------------------------------------------------------------------+

avatar

AM2

  • 22 апреля 2016, 11:46
0
Метод там был, просто вынес его в настройки, время добавил: www.opentraders.ru/downloads/1156/

avatar

AM2

  • 22 апреля 2016, 11:03
+1
Сделал советник для всех ордеров и индикатор:
www.opentraders.ru/downloads/1155/
www.opentraders.ru/downloads/1154/


avatar

AM2

  • 22 апреля 2016, 10:12
+1
У вас в этом месяце уже 2 выполненных заказа:
zakaz.opentraders.ru/31690.html
zakaz.opentraders.ru/32001.html

Тарапитца не надо <img src='http://opentraders.ru/templates/skin/g6h/images/smilies/003.gif' alt=' :D '>&nbsp; 

avatar

AM2

  • 22 апреля 2016, 09:29
0
Это не когда то от чего то, а было написано специально под ваш заказ, чтобы можно было торговать и тестировать. Если нужно для нескольких ордеров, то это не ко мне.

Открыл вручную, позу и запустил советник со следующими настройками:



Мне этот заказ не оплачивается, поэтому как есть, просто мне было интересно сделать что то подобное.
avatar

AM2

  • 22 апреля 2016, 09:22
0
С чужим кодом предпочитаю не работать. Если будет простое ТЗ и 3-й уровень, тогда буду смотреть.
avatar

AM2

  • 21 апреля 2016, 18:50
0
У вас по нескольким парам открыты позы, нужен мультивалютный локер? Когда для одной пары и есть серия только бай или селл это еще куда ни шло, а за такое ТЗ я не возьмусь.
avatar

AM2

  • 21 апреля 2016, 18:43
0
Техническое задание

Торговый советник для торгового терминала МТ4

В советнике используются ндикаторы:

1.пользовательский индикатор Amir; /прилагается/
2.Стандартный индикатор Parabolic SAR

• Советник торгует (LONG/SHORT)

В советнике должен быть реализован StopLoss,
В советнике должен быть реализован Takeprofit
В советнике должен быть реализован скользящий стоп /0=falce/

• Установка фиксированного лота для торговли,
• Функция начала работы советника /час, мин 00-00/
• Функция окончания работы советник /час, мин 00-00/
• Функция выхода из позиции одновременно с окончанием работы советника /TRUE. FALCE/
• Выбор таймфрейма в зависимости от выбранного окна графика,
Magic
SHIFT

2. Условия входа и выхода

А// Вход в длинную позицию /LONG/ осуществляется по следующему условию:

1.Столбики гистограммы индикатора Amir окрашены в зеленый цвет.
2.Рыночная цена больше значения Parabolic SAR.

Выход из длинной позиции

происходит, если выполнено хотя бы одно из следующих условий:

1. Выполнены условия для входа в короткую позицию /SHORT/.
2. Выход по ордеру стоп-лосс или тейк-профит.
3. Выход в конце работы советника (при активной соответствующей опции).

В// Вход в короткую позицию /SHORT/осуществляется по следующему условию:

1.Столбики гистограммы индикатора АМИР-v.1 окрашены в красный цвет.
2.Рыночная цена меньше значения Parabolic SAR

Выход из короткой позиции
происходит, если выполнено, хотя бы одно из следующих условий:

1. Выполнены условия для входа в длинную позицию.
2. Выход по ордеру стоп-лосс или тейк-профит.
3. Выход в конце работы советника (при активной соответствующей опции).

avatar

AM2

  • 21 апреля 2016, 16:44
0
Я, если надо, вышлю ТЗ и исходный код (который я получил).

Скиньте сюда в базу ТЗ и советник, я посмотрю.
База: www.opentraders.ru/downloads/
avatar

AM2

  • 21 апреля 2016, 16:39
0
Будет заказ посмотрю что можно сделать.
avatar

AM2

  • 21 апреля 2016, 09:21
0
Пока есть свободное время сделал набросок. Нужны скрины с пояснениями к ним и максимально упростить ТЗ.




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

//--- Inputs
extern double Lots      = 0.1;      // лот
extern double Loss      = 5000;     // убыток в рублях
extern double Profit    = 100;      // профит в рублях
extern int StopLoss     = 0;        // лось
extern int TakeProfit   = 50;       // язь
extern int Step         = 100;      // шаг ордеров
extern int Expiration   = 10;       // истечение ордера в часах
extern int BuySell      = 1;        // 1-Buy 2-Sell 0-Off
extern int StopLimit    = 0;        // 0-Stop 1-Limit
extern int Slip         = 3;        // реквот
extern int Count        = 5;        // количество отложек
extern int Magic        = 123;      // магик
//+------------------------------------------------------------------+
//| 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,lot=Lots;

   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);
     }

   if(type>1) lot=OrdersLot()/Count;

   r=OrderSend(NULL,type,lot,NormalizeDouble(price,Digits),Slip,sl,tp,"",Magic,TimeCurrent()+Expiration*3600,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);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double AllProfit()
  {
   double pr=0;
   for(int i=OrdersTotal()-1;i>=0;i--)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol())
           {
            if(OrderType()==OP_BUY || OrderType()==OP_SELL)
              {
               pr+=OrderProfit()+OrderCommission()+OrderSwap();
              }
           }
        }
     }
   return(pr);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
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 Type()
  {
   int type=0;
   if(OrderSelect(OrdersTotal()-1,SELECT_BY_POS,MODE_TRADES))
     {
      if(OrderSymbol()==Symbol() && OrderMagicNumber()==Magic)
        {
         type=OrderType();
        }
     }
   return(type);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
double OrdersLot()
  {
   double lot=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) lot+=OrderLots();
           }
        }
     }
   return(lot);
  }
//+------------------------------------------------------------------+
//| Закрытие позиции по типу ордера                                  |
//+------------------------------------------------------------------+
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);
              }
           }
        }
     }
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
   if(CountTrades()<1)
     {
      if(BuySell==1) PutOrder(0,Ask);
      if(BuySell==2) PutOrder(1,Bid);
     }

   if(CountTrades()<2)
     {
      if(Type()==0 && CountOrders(5)<1)
        {
         for(int i=1;i<=Count;i++)
           {
            PutOrder(5,Ask-Step*i*Point);
           }
        }

      if(Type()==1 && CountOrders(4)<1)
        {
         for(int i=1;i<=Count;i++)
           {
            PutOrder(4,Ask+Step*i*Point);
           }
        }
     }

   if(CountTrades()>1 && ((Profit>0 && AllProfit()>Profit)||(Loss>0 && AllProfit()<-Loss))) CloseAll(-1);

   Comment("\n Lots: ",OrdersLot(),
           "\n Type: ",Type(),
           "\n Profit: ",AllProfit());
  }
//+------------------------------------------------------------------+


avatar

AM2

  • 21 апреля 2016, 09:19
0
Что простое я еще могу сделать. Обратитесь к платному, если так срочно.
avatar

AM2

  • 20 апреля 2016, 19:38
0
Хотел спросить один вопрос, возможно ли технически сделать первый лот процентом от депо????
Те первые ордера берёюутся % от депо, а дальше умножение стандарт.

А смысл?
avatar

AM2

  • 20 апреля 2016, 19:34
0
Запустил тот же советник и на World Forex. В экспирации пропишите следующую строку:

«BO exp:60», это истечение в секундах, вместо «60», как у Гранда. И еще уточните у брокера формат значений экспирации.

extern string Expiration = "BO exp:60"; // истечение опциона в секундах



avatar

AM2

  • 20 апреля 2016, 07:42
+1
Тогда план «Б»:- Подключить этот скрипт к Excel

Связку с Excel я никогда не делал, в следующем месяце если разместите топик и можно будет быстро сделать, тогда да :) 
avatar

AM2

  • 20 апреля 2016, 06:56
0
В следующий раз не придумывайте ТЗ такое запутаное, чем проще тем лучше. Вот настройки:

avatar

AM2

  • 19 апреля 2016, 21:33