вопрос — что такое «После 9.00 показывает профит ордера и риск с 0-9 профит»? что такое 9.00? и риск с 0-9 профит, как понять?
//+------------------------------------------------------------------+
//| ExBB.mq4 |
//| Copyright 2015, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2015, AM2"
#property link "http://www.forexsystems.biz"
#property description "BBands expert advisor"
//--- Inputs
extern double Lots = 0.1; // лот
extern int StopLoss = 5000; // лось
extern int TakeProfit = 5000; // язь
extern int Shift = 0; // сдвиг
extern int Slip = 30; // слипаж
//----
extern int Length = 20; // период BB
extern int Deviation = 2; // отклонение ВВ
extern int Magic = 20; // магик
datetime t=0;
//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---
}
//+------------------------------------------------------------------+
//| Check for open order conditions |
//+------------------------------------------------------------------+
void OpenPos()
{
int res;
//--- get Ind
double BBBlue=iCustom(Symbol(),0,"BBands_Stop_v1",Length,Deviation,0,Shift);
double BBRed=iCustom(Symbol(),0,"BBands_Stop_v1",Length,Deviation,1,Shift);
double BBBlue2=iCustom(Symbol(),0,"BBands_Stop_v1",Length,Deviation,0,Shift+1);
double BBRed2=iCustom(Symbol(),0,"BBands_Stop_v1",Length,Deviation,1,Shift+1);
//--- sell conditions
if(BBRed>0 && BBBlue2>0)
{
res=OrderSend(Symbol(),OP_SELL,Lots,NormalizeDouble(Bid,Digits),
Slip,NormalizeDouble(Bid+StopLoss*Point,Digits),
NormalizeDouble(Bid-TakeProfit*Point,Digits),"",Magic,0,Red);
return;
}
//--- buy conditions
if(BBBlue>0 && BBRed2>0)
{
res=OrderSend(Symbol(),OP_BUY,Lots,NormalizeDouble(Ask,Digits),
Slip,NormalizeDouble(Ask-StopLoss*Point,Digits),
NormalizeDouble(Ask+TakeProfit*Point,Digits),"",Magic,0,Blue);
return;
}
//---
}
//+------------------------------------------------------------------+
//| OnTick function |
//+------------------------------------------------------------------+
void OnTick()
{
if(t!=Time[0])
{
OpenPos();
t=Time[0];
}
}
//+------------------------------------------------------------------+
Что изменить/переписать в коде, чтобы сов. только открывал ордера, но не закрывал их?
else ClosePos();
//+------------------------------------------------------------------+
//| Informer.mq4 |
//| Copyright 2015, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2015, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
input int Corner=0; //0-левый верхний. 1-правый верхний. 2-левый нижний. 3-правый нижний.
input int ProfitHour=24; //за сколько часов считаем профит
input color Color=Aqua; //цвет метки
//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void PutLabel(string text,int corner)
{
int x=140,y=40;
if(corner==0 || corner==2) x=40;
//--- создадим текстовую метку
ObjectDelete(0,"Info");
ObjectDelete(0,"Stop");
if(!ObjectCreate(0,"Info",OBJ_LABEL,0,0,0))
{
Print(__FUNCTION__,": не удалось создать текстовую метку! Код ошибки = ",GetLastError());
}
//--- установим координаты метки
ObjectSetInteger(0,"Info",OBJPROP_XDISTANCE,x);
ObjectSetInteger(0,"Info",OBJPROP_YDISTANCE,y);
//--- установим угол графика, относительно которого будут определяться координаты точки
ObjectSetInteger(0,"Info",OBJPROP_CORNER,corner);
//--- установим текст
ObjectSetString(0,"Info",OBJPROP_TEXT,text);
//--- установим шрифт текста
ObjectSetString(0,"Info",OBJPROP_FONT,"Arial");
//--- установим размер шрифта
ObjectSetInteger(0,"Info",OBJPROP_FONTSIZE,14);
//--- установим цвет
ObjectSetInteger(0,"Info",OBJPROP_COLOR,Color);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void PutRiskLabel(string text,int corner)
{
int x=140,y=60;
if(corner==0 || corner==2) x=40;
//--- создадим текстовую метку
ObjectDelete(0,"Stop");
if(!ObjectCreate(0,"Stop",OBJ_LABEL,0,0,0))
{
Print(__FUNCTION__,": не удалось создать текстовую метку! Код ошибки = ",GetLastError());
}
//--- установим координаты метки
ObjectSetInteger(0,"Stop",OBJPROP_XDISTANCE,x);
ObjectSetInteger(0,"Stop",OBJPROP_YDISTANCE,y);
//--- установим угол графика, относительно которого будут определяться координаты точки
ObjectSetInteger(0,"Stop",OBJPROP_CORNER,corner);
//--- установим текст
ObjectSetString(0,"Stop",OBJPROP_TEXT,text);
//--- установим шрифт текста
ObjectSetString(0,"Stop",OBJPROP_FONT,"Arial");
//--- установим размер шрифта
ObjectSetInteger(0,"Stop",OBJPROP_FONTSIZE,14);
//--- установим цвет
ObjectSetInteger(0,"Stop",OBJPROP_COLOR,Color);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double CurrencyProfitFromDate(datetime t=0)
{
double pr=0;
for(int i=0; i<OrdersHistoryTotal()-1; i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY))
{
if((OrderSymbol()==Symbol()))
{
if(OrderType()==OP_BUY || OrderType()==OP_SELL)
{
if(t<OrderCloseTime())
{
pr+=OrderProfit()+OrderCommission()+OrderSwap();
}
}
}
}
}
return(pr);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double CurrencyProfit()
{
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);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double Risk()
{
double s=0,p=0,l=0;
double b=AccountInfoDouble(ACCOUNT_BALANCE);
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)
{
s=MathAbs((OrderOpenPrice()-OrderStopLoss())/Point);
l=OrderLots();
}
}
}
}
p=100*s*l/b;
return(p);
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
double BALANCE=AccountInfoDouble(ACCOUNT_BALANCE);
if(IsTesting() && OrdersTotal()<1 && Hour()>=9)
{
int r=OrderSend(NULL,0,1,Ask,5,Ask-200*Point,Ask+200*Point,"",0,0,Blue);
}
if(OrdersTotal()<1) PutLabel("Profit: "+DoubleToString(CurrencyProfitFromDate(TimeCurrent()-ProfitHour*60*60)*100/BALANCE,2)+"%",Corner);
else
{
PutLabel("Profit: "+DoubleToString(CurrencyProfit()*100/BALANCE,2)+"%",Corner);
PutRiskLabel("Risk: "+DoubleToString(Risk(),2)+"%",Corner);
}
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
//| Informer.mq4 |
//| Copyright 2015, AM2 |
//| http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright 2015, AM2"
#property link "http://www.forexsystems.biz"
#property version "1.00"
#property strict
input int Corner=0; //0-левый верхний. 1-правый верхний. 2-левый нижний. 3-правый нижний.
input int ProfitHour=24; //за сколько часов считаем профит
input color Color=Aqua; //цвет метки
//+------------------------------------------------------------------+
//| Expert initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//---
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Expert deinitialization function |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
//---
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void PutLabel(string text,int corner)
{
int x=140,y=40;
if(corner==0 || corner==2) x=40;
//--- создадим текстовую метку
ObjectDelete(0,"Info");
if(!ObjectCreate(0,"Info",OBJ_LABEL,0,0,0))
{
Print(__FUNCTION__,": не удалось создать текстовую метку! Код ошибки = ",GetLastError());
}
//--- установим координаты метки
ObjectSetInteger(0,"Info",OBJPROP_XDISTANCE,x);
ObjectSetInteger(0,"Info",OBJPROP_YDISTANCE,y);
//--- установим угол графика, относительно которого будут определяться координаты точки
ObjectSetInteger(0,"Info",OBJPROP_CORNER,corner);
//--- установим текст
ObjectSetString(0,"Info",OBJPROP_TEXT,text);
//--- установим шрифт текста
ObjectSetString(0,"Info",OBJPROP_FONT,"Arial");
//--- установим размер шрифта
ObjectSetInteger(0,"Info",OBJPROP_FONTSIZE,14);
//--- установим цвет
ObjectSetInteger(0,"Info",OBJPROP_COLOR,Color);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double CurrencyProfitFromDate(datetime t=0)
{
double pr=0;
for(int i=0; i<OrdersHistoryTotal()-1; i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY))
{
if((OrderSymbol()==Symbol()))
{
if(OrderType()==OP_BUY || OrderType()==OP_SELL)
{
if(t<OrderCloseTime())
{
pr+=OrderProfit()+OrderCommission()+OrderSwap();
}
}
}
}
}
return(pr);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
double CurrencyProfit()
{
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);
}
//+------------------------------------------------------------------+
//| Expert tick function |
//+------------------------------------------------------------------+
void OnTick()
{
if(IsTesting() && OrdersTotal()<1)
{
int r=OrderSend(NULL,0,0.1,Ask,5,Ask-200*Point,Ask+200*Point,"",0,0,Blue);
}
double BALANCE=AccountInfoDouble(ACCOUNT_BALANCE);
if(OrdersTotal()<1) PutLabel("Profit: "+DoubleToString(CurrencyProfitFromDate(TimeCurrent()-ProfitHour*60*60)*100/BALANCE,2)+"%",Corner);
else PutLabel("Profit: "+DoubleToString(CurrencyProfit()*100/BALANCE,2)+"%",Corner);
}
//+------------------------------------------------------------------+
если ставим несколько стопов — то % убытка плюсуется.
for(int i=fbar;i<bcount;i++)
{
double MaxH=high[Highest(NULL,0,MODE_HIGH,period,i)];//считаем наибольшую цену по хаям за период
double MinL=low[Lowest(NULL,0,MODE_LOW,period,i)];//считаем наименьшую цену по лоям за период
double price = (high[i]+low[i])/2;//хай плюс лоу свечи пополам
double Value = 0.33*2*((price-MinL)/(MaxH-MinL)-0.5) + 0.67*Value1;//расчет по формуле
Value=MathMin(MathMax(Value,-0.999),0.999);//сначала выбираем максимум затем минимум
Buf1[i]=0.5*MathLog((1+Value)/(1-Value))+0.5*Fish1;//расчет по формуле
if(Buf1[i]<0) Buf2[i]=Buf1[i];//меньше ноля меняем цвет
Value1=Value;
Fish1=Buf1[i];
}
extern int Reverse = 1; //1-реверс. 0-нет.
Т.П. при срабатывании трала задаётся в настройках.
Трал с настройкой шага.
Функцию переноса Т.П. при срабатывании трала.
AM2