GeneralTradingSarl
145 lines
12 KiB
Plaintext
145 lines
12 KiB
Plaintext
//+------------------------------------------------------------------+
|
|
//| ProfLine.mq5 |
|
|
//| x5d |
|
|
//| https://www.mql5.com/ru/users/x5d |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright © 2010, x5d"
|
|
#property link "https://www.mql5.com/ru/users/x5d"
|
|
#property indicator_chart_window
|
|
#property version "1.00"
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Declaration of variables |
|
|
//+------------------------------------------------------------------+
|
|
extern double Profit=0.0;
|
|
extern int MagicNumber = 0;
|
|
extern string NameBuy = "LineBuy";
|
|
extern string NameSell = "LineSell";
|
|
extern color ColorBuy = DarkBlue;
|
|
extern color ColorSell = FireBrick;
|
|
double LotsBuy, LotsSell;
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Custom indicator deinitialization function |
|
|
//+------------------------------------------------------------------+
|
|
void deinit()
|
|
{
|
|
if (ObjectFind(0,NameBuy)!=-1) ObjectDelete(0,NameBuy);
|
|
if (ObjectFind(0,NameSell)!=-1) ObjectDelete(0,NameSell);
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Script program start function |
|
|
//+------------------------------------------------------------------+
|
|
void OnStart()
|
|
{
|
|
if (ObjectFind(0,NameBuy)!=-1) ObjectDelete(0,NameBuy);
|
|
if (ObjectFind(0,NameSell)!=-1) ObjectDelete(0,NameSell);
|
|
|
|
double ProfitBuy = ProfitPrice(Symbol(), "ORDER_TYPE_BUY", MagicNumber, Profit);
|
|
double ProfitSell = ProfitPrice(Symbol(), "ORDER_TYPE_SELL", MagicNumber, Profit);
|
|
|
|
if (ObjectFind(0,NameBuy)==-1)
|
|
{
|
|
if(!HLineCreate(0,NameBuy,0,ProfitBuy,ColorBuy))
|
|
{
|
|
return;
|
|
}
|
|
ChartRedraw();
|
|
}
|
|
if (ObjectFind(0,NameSell)==-1)
|
|
{
|
|
if(!HLineCreate(0,NameSell,0,ProfitSell,ColorSell))
|
|
{
|
|
return;
|
|
}
|
|
ChartRedraw();
|
|
}
|
|
|
|
}
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Function of drawing a horizontal line |
|
|
//+------------------------------------------------------------------+
|
|
bool HLineCreate(const long chart_ID=0, // ID графика
|
|
const string name="HLine", // имя линии
|
|
const int sub_window=0, // номер подокна
|
|
double price=0, // цена линии
|
|
const color clr=clrRed, // цвет линии
|
|
const ENUM_LINE_STYLE style=STYLE_SOLID, // стиль линии
|
|
const int width=1, // толщина линии
|
|
const bool back=false, // на заднем плане
|
|
const bool selection=true, // выделить для перемещений
|
|
const bool hidden=true, // скрыт в списке объектов
|
|
const long z_order=0) // приоритет на нажатие мышью
|
|
{
|
|
|
|
ResetLastError();
|
|
if(!ObjectCreate(chart_ID,name,OBJ_HLINE,sub_window,0,price))
|
|
{
|
|
Print(__FUNCTION__,
|
|
": не удалось создать горизонтальную линию! Код ошибки = ",GetLastError());
|
|
return(false);
|
|
}
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_COLOR,clr);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_STYLE,style);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_WIDTH,width);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_BACK,back);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_SELECTABLE,selection);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_SELECTED,selection);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_HIDDEN,hidden);
|
|
ObjectSetInteger(chart_ID,name,OBJPROP_ZORDER,z_order);
|
|
return(true);
|
|
}
|
|
|
|
|
|
//+------------------------------------------------------------------+
|
|
//| Profit line calculation function |
|
|
//+------------------------------------------------------------------+
|
|
double ProfitPrice(string fSymbol, string fType, int fMagic=0, double MyProfit=0.0)
|
|
{
|
|
//Функция возвращает цену, на которую необходимо установить уровень TakeProfit, чтобы получить прибыль MyProfit
|
|
double SummPrice=0.0, SummLots=0.0, Formula=0.0;
|
|
int SumTiket =0;
|
|
int total=PositionsTotal();
|
|
|
|
for(int i=total-1; i>=0; i--)
|
|
{
|
|
PositionGetSymbol(i);
|
|
if(PositionGetString(POSITION_SYMBOL)==fSymbol)
|
|
{
|
|
if(PositionGetInteger(POSITION_MAGIC)==fMagic || fMagic==0)
|
|
{
|
|
if(EnumToString(ENUM_ORDER_TYPE(PositionGetInteger(POSITION_TYPE)))==fType)
|
|
{
|
|
SummLots=SummLots+PositionGetDouble(POSITION_VOLUME);
|
|
SummPrice=SummPrice+(PositionGetDouble(POSITION_PRICE_OPEN)*PositionGetDouble(POSITION_VOLUME));
|
|
SumTiket = SumTiket+1;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
if(SumTiket>0)
|
|
{
|
|
|
|
if(fType=="ORDER_TYPE_BUY")
|
|
{
|
|
Formula = SummPrice/SummLots +
|
|
MyProfit * SymbolInfoDouble(fSymbol,SYMBOL_POINT) /
|
|
(SymbolInfoDouble(fSymbol,SYMBOL_TRADE_TICK_SIZE) * SummLots) +
|
|
(SymbolInfoInteger(fSymbol,SYMBOL_SPREAD) * SymbolInfoDouble(fSymbol,SYMBOL_POINT));
|
|
LotsBuy = SummLots;
|
|
}
|
|
if(fType=="ORDER_TYPE_SELL")
|
|
{
|
|
Formula = SummPrice/SummLots -
|
|
MyProfit * SymbolInfoDouble(fSymbol,SYMBOL_POINT) /
|
|
(SymbolInfoDouble(fSymbol,SYMBOL_TRADE_TICK_SIZE) * SummLots) -
|
|
(SymbolInfoInteger(fSymbol,SYMBOL_SPREAD) * SymbolInfoDouble(fSymbol,SYMBOL_POINT));
|
|
LotsSell = SummLots;
|
|
}
|
|
}
|
|
|
|
return(Formula);
|
|
}//ProfitPrice() |