| Усреднитель с тейкпрофитом в 1 пункт или 5% в день |
Буквально на днях ко мне обратились со следующей просьбой:
По мониторингу и сделкам
( Читать дальше )
попробуй подключится к инвест паролю, там советник работает с плавающими ордерами, если подключишься посмотри алгоритм возможно сделать подобие?
MetaTrader4 Server: FXOpen-ECN Demo Server
Login: 120134192
Investor: vkl0cin
мониторинг в режиме реального времени
По мониторингу и сделкам
( Читать дальше )
- 10
- Просмотров: 6572
- 23 ноября 2016, 04:16
- Комментариев: 7
| Советник "Hello Smart MA" или усреднитель устойчивый к смене тренда |
Как известно усреднители хорошо работают во флете и очень не любят резкую смену тренда. Основная идея алгоритма советника состоит в том что после убыточной серии с небольшим увеличением лота усредняющего ордера, открывается по тренду новая серия с учетом лотности предыдущей.
( Читать дальше )
( Читать дальше )
- 8
- Просмотров: 7927
- 24 октября 2016, 11:05
- Комментариев: 12
| Мультивалютный советник "Multi Dual" |
Советник «Multi Dual» выставляет 2 ордера, на покупку и на продажу при запуске советника, усредняет убыточные позиции и затем закрывает все позиции при достижении прибыли или убытка в валюте депозита. Усредняются как покупки так и продажи. 9 валютных пар на выбор. На экране советник показывает информацию по символу на который установлен.
Для каждой
( Читать дальше )
Для каждой
( Читать дальше )
- 7
- Просмотров: 11355
- 11 марта 2016, 10:32
- Комментариев: 9
| Советник "Hello Dual" |
Советник «Hello Dual» выставляет 2 ордера на покупку и на продажу по сигналу, усредняет убыточные позиции и затем закрывает все сразу при достижении прибыли в валюте депозита. Усредняются как покупки так и продажи. Имеется увеличение лота и шага ордеров, открытие позиций только выбранного направления. Работа на открытии свечи, и усреднение и закрытие по
( Читать дальше )
( Читать дальше )
- 6
- Просмотров: 7259
- 28 февраля 2016, 14:03
- Комментариев: 20
| Пишем мультивалютный усреднитель на MQL5 |
Более 3-х лет я мечтал, написать на MQL5 мультивалютный усреднитель и вот сегодня моя мечта осуществилась! Торговать советник будет по всем символам, которые имеются в окне рынка. Предварительно я посмотрел на работы других авторов, но мне захотелось иметь собственную основу. Прототипом послужил мой советник «Hello» на MQL4. Сразу же после создания эксперта
( Читать дальше )
( Читать дальше )
- 1
- Просмотров: 17771
- 25 ноября 2015, 09:27
- Комментировать
| Пишем усреднитель. |
Воспользуемся для нашего усреднителя готовой торговой системой одного из успешных управляющих на рынке FOREX.
Суть системы в следующем:
1) В ноль-ноль по терминальному времени открывается две сделки по GBPUSD, одна на север, вторая на юг. Тейк короткий — 10-15 пп. Лот — 0,01 на 100$ депозита.
2) Дальше, одна из сделок закрывается по тейку. На втором направлении начинается усреднение. Пипстеп рассчитывается из следующих соображений:
а) исторически сложившееся максимальное бескоррекционное движение GBPUSD,
б) максимально допустимая просадка в 50% на N-ное количество колен.
На сегодня этот диапазон составляет 2-2,5 фигуры.
3) Далее, если этого расстояния оказывается недостаточно для закрытия серии, тогда срабатывает отложенный локирующий ордер. Сова отключается и разруливание лока производится вручную.
За основу возьмем код эксперта Ilan 1.4.
Далее достаточно немного изменить блок сигнала для первой сделки:
Новый вариант у нас будет иметь вид:
И наш усреднитель уже может выставлять две разнонаправленные сделки в ноль часов, затем выводить в плюс убыточную сделку.
Рис.1. Схема работы усреднителя.
И вот новый код готов!
В результате получаем вот такую картинку:
Рис.2. Один из результатов оптимизации эксперта с начала 2009 года.
Догоним и перегоним господина Таниса!
Суть системы в следующем:
1) В ноль-ноль по терминальному времени открывается две сделки по GBPUSD, одна на север, вторая на юг. Тейк короткий — 10-15 пп. Лот — 0,01 на 100$ депозита.
2) Дальше, одна из сделок закрывается по тейку. На втором направлении начинается усреднение. Пипстеп рассчитывается из следующих соображений:
а) исторически сложившееся максимальное бескоррекционное движение GBPUSD,
б) максимально допустимая просадка в 50% на N-ное количество колен.
На сегодня этот диапазон составляет 2-2,5 фигуры.
3) Далее, если этого расстояния оказывается недостаточно для закрытия серии, тогда срабатывает отложенный локирующий ордер. Сова отключается и разруливание лока производится вручную.
За основу возьмем код эксперта Ilan 1.4.
Далее достаточно немного изменить блок сигнала для первой сделки:
if (TradeNow && total<1){
double PrevCl = iClose(Symbol(),0,2);
double CurrCl = iClose(Symbol(),0,1);
SellLimit = Bid;
BuyLimit = Ask;
if(!ShortTrade && !LongTrade){
NumOfTrades = total;
if(PrevCl > CurrCl){
iLots = fGetLots(OP_SELL);
if(iLots>0){//#
ticket = OpenPendingOrder(OP_SELL,iLots,SellLimit,slip,SellLimit,0,0,EAName+"-"+NumOfTrades,MagicNumber,0,HotPink);
if(ticket<0){Print(iLots,"Error: ",GetLastError()); return(0);}
LastBuyPrice = FindLastBuyPrice();
NewOrdersPlaced = true;
}//#
}
else{
iLots = fGetLots(OP_BUY);
if(iLots>0){//#
ticket = OpenPendingOrder(OP_BUY,iLots,BuyLimit,slip,BuyLimit,0,0,EAName+"-"+NumOfTrades,MagicNumber,0,Lime);
if(ticket<0){Print(iLots,"Error: ",GetLastError()); return(0);}
LastSellPrice = FindLastSellPrice();
NewOrdersPlaced = true;
}//#
}
}
if(ticket>0) expiration = CurTime()+MaxTradeOpenHours*60*60;
TradeNow = false;
}
Новый вариант у нас будет иметь вид:
if (TradeNow && total<1){
SellLimit = Bid;
BuyLimit = Ask;
if(!ShortTrade && !LongTrade && Hour()==0)
{
NumOfTrades = total;
{
iLots = fGetLots(OP_SELL);
if(iLots>0){//#
ticket = OpenPendingOrder(OP_SELL,iLots,SellLimit,slip,SellLimit,0,Bid-TakeProfit*Point,EAName+"-"+NumOfTrades,MagicNumber,0,HotPink);
if(ticket<0){Print(iLots,"Error: ",GetLastError()); return(0);}
LastBuyPrice = FindLastBuyPrice();
NewOrdersPlaced = true;
}//#
}
{
iLots = fGetLots(OP_BUY);
if(iLots>0){//#
ticket = OpenPendingOrder(OP_BUY,iLots,BuyLimit,slip,BuyLimit,0,Ask+TakeProfit*Point,EAName+"-"+NumOfTrades,MagicNumber,0,Lime);
if(ticket<0){Print(iLots,"Error: ",GetLastError()); return(0);}
LastSellPrice = FindLastSellPrice();
NewOrdersPlaced = true;
}//#
}
}
if(ticket>0) expiration = CurTime()+MaxTradeOpenHours*60*60;
TradeNow = false;
}
И наш усреднитель уже может выставлять две разнонаправленные сделки в ноль часов, затем выводить в плюс убыточную сделку.
Рис.1. Схема работы усреднителя.
И вот новый код готов!
//+------------------------------------------------------------------+
//| 2008 Ilan1.4 |
//+------------------------------------------------------------------+
#property copyright "Nikisaki@yandex.ru"
extern int MMType=1; // Тип ММ: 0-Lots, 1-как было в 1.2, 2-мартингейл (коэффициент LotExponent)
extern bool UseClose=false; // закрытие по убытку PipStep. рекомендутся false
extern bool UseAdd=true; // переоткрытие с новым лотом. лот для переоткрытия считается по LotExponent независимо от MMType рекомендутся = true
extern double LotExponent = 1.667; // умножение лотов в серии по експоненте для вывода в безубыток. первый лот 0.1, серия: 0.16, 0.26, 0.43 ...
extern double slip = 3; // допустимое проскальзывание цены в пипсах
extern double Lots = 0.1; // теперь можно и микролоты 0.01 при этом если стоит 0.1 то следующий лот в серии будет 0.16
extern double LotsDigits=2; // 2 - микролоты 0.01, 1 - мини лоты 0.1, 0 - нормальные лоты 1.0
extern double TakeProfit = 10; // Уровень прибыли в пипсаз от цены открытия.
double Stoploss = 500; // эти три параметра не работают
double TrailStart = 10;
double TrailStop = 10;
extern double PipStep = 30; // растоянию в пипсах убытка на котором открываеться следующий ордер колена.
extern int MaxTrades = 10;
extern bool UseEquityStop = false;
extern double TotalEquityRisk = 20; //loss as a percentage of equity
extern bool UseTrailingStop = false;
extern bool UseTimeOut = false;
extern double MaxTradeOpenHours = 48;
int MagicNumber = 12324;
double PriceTarget, StartEquity, BuyTarget, SellTarget;
double AveragePrice, SellLimit, BuyLimit;
double LastBuyPrice, LastSellPrice, ClosePrice, Spread;
int flag;
string EAName = "CostAvg-Pyramid";
datetime timeprev=0, expiration;
int NumOfTrades=0;
double iLots;
int cnt=0, total;
double Stopper=0;
bool TradeNow = false, LongTrade=false, ShortTrade=false;
int ticket;
bool NewOrdersPlaced = false;
int init()
{
Spread = MarketInfo(Symbol(), MODE_SPREAD)*Point;
return(0);
}
int deinit()
{
return(0);
}
int start(){
if (UseTrailingStop){
TrailingAlls(TrailStart, TrailStop, AveragePrice);
}
if (UseTimeOut){
if(CurTime() >= expiration){
CloseThisSymbolAll();
Print("Closed All due to TimeOut");
}
}
if(timeprev==Time[0]){
return(0);
}
timeprev=Time[0];
double CurrentPairProfit = CalculateProfit();
if(UseEquityStop){
if(CurrentPairProfit<0 && MathAbs(CurrentPairProfit)>(TotalEquityRisk/100)*AccountEquityHigh()){
CloseThisSymbolAll();
Print("Closed All due to Stop Out");
NewOrdersPlaced = false;
}
}
total=CountTrades();
if (total == 0){
flag = 0;
}
double LastBuyLots;
double LastSellLots;
for(cnt=OrdersTotal()-1;cnt>=0;cnt--){// поиск последнего направления
OrderSelect(cnt,SELECT_BY_POS,MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)continue;
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_BUY){
LongTrade = true;
ShortTrade = false;
LastBuyLots=OrderLots();
break;
}
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_SELL){
LongTrade = false;
ShortTrade = true;
LastSellLots=OrderLots();
break;
}
}
if(total>0 && total <= MaxTrades){
RefreshRates();
LastBuyPrice = FindLastBuyPrice();
LastSellPrice = FindLastSellPrice();
if(LongTrade && (LastBuyPrice - Ask) >= (PipStep*Point)){
TradeNow = true;
}
if(ShortTrade && (Bid - LastSellPrice) >= (PipStep*Point)){
TradeNow = true;
}
}
if (total < 1){
ShortTrade = false;
LongTrade = false;
TradeNow = true;
StartEquity = AccountEquity();
}
if (TradeNow){
LastBuyPrice = FindLastBuyPrice();
LastSellPrice = FindLastSellPrice();
if(ShortTrade){
if(UseClose){
fOrderCloseMarket(false,true);
iLots = NormalizeDouble(LotExponent*LastSellLots,LotsDigits);
}
else{
iLots = fGetLots(OP_SELL);
}
if(UseAdd){
NumOfTrades = total;
if(iLots>0){//#
RefreshRates();
ticket = OpenPendingOrder(OP_SELL,iLots,Bid,slip,Ask,0,0,EAName+"-"+NumOfTrades,MagicNumber,0,HotPink);
if(ticket<0){Print("Error: ",GetLastError()); return(0);}
LastSellPrice = FindLastSellPrice();
TradeNow = false;
NewOrdersPlaced = true;
}//#
}
}
else if (LongTrade){
if(UseClose){
fOrderCloseMarket(true,false);
iLots = NormalizeDouble(LotExponent*LastBuyLots,LotsDigits);
}
else{
iLots = fGetLots(OP_BUY);
}
if(UseAdd){
NumOfTrades = total;
if(iLots>0){//#
ticket = OpenPendingOrder(OP_BUY,iLots,Ask,slip,Bid,0,0,EAName+"-"+NumOfTrades,MagicNumber,0,Lime);
if(ticket<0){Print("Error: ",GetLastError()); return(0);}
LastBuyPrice = FindLastBuyPrice();
TradeNow = false;
NewOrdersPlaced = true;
}//#
}
}
}
if (TradeNow && total<1){
SellLimit = Bid;
BuyLimit = Ask;
if(!ShortTrade && !LongTrade && Hour()==0)
{
NumOfTrades = total;
{
iLots = fGetLots(OP_SELL);
if(iLots>0){//#
ticket = OpenPendingOrder(OP_SELL,iLots,SellLimit,slip,SellLimit,0,Bid-TakeProfit*Point,EAName+"-"+NumOfTrades,MagicNumber,0,HotPink);
if(ticket<0){Print(iLots,"Error: ",GetLastError()); return(0);}
LastBuyPrice = FindLastBuyPrice();
NewOrdersPlaced = true;
}//#
}
{
iLots = fGetLots(OP_BUY);
if(iLots>0){//#
ticket = OpenPendingOrder(OP_BUY,iLots,BuyLimit,slip,BuyLimit,0,Ask+TakeProfit*Point,EAName+"-"+NumOfTrades,MagicNumber,0,Lime);
if(ticket<0){Print(iLots,"Error: ",GetLastError()); return(0);}
LastSellPrice = FindLastSellPrice();
NewOrdersPlaced = true;
}//#
}
}
if(ticket>0) expiration = CurTime()+MaxTradeOpenHours*60*60;
TradeNow = false;
}
//----------------------- CALCULATE AVERAGE OPENING PRICE
total=CountTrades();
AveragePrice=0;
double Count = 0;
for(cnt=OrdersTotal()-1;cnt>=0;cnt--)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_BUY || OrderType()==OP_SELL)
{
AveragePrice=AveragePrice+OrderOpenPrice()*OrderLots();
Count = Count + OrderLots();
}
}
if(total > 0)
AveragePrice=NormalizeDouble(AveragePrice/Count, Digits);
//----------------------- RECALCULATE STOPLOSS & PROFIT TARGET BASED ON AVERAGE OPENING PRICE
if(NewOrdersPlaced)
for(cnt=OrdersTotal()-1;cnt>=0;cnt--)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_BUY) // Calculate profit/stop target for long
{
PriceTarget=AveragePrice+(TakeProfit*Point);
BuyTarget = PriceTarget;
Stopper=AveragePrice-(Stoploss*Point);
// Stopper=0;
flag = 1;
}
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_SELL) // Calculate profit/stop target for short
{
PriceTarget=AveragePrice-(TakeProfit*Point);
SellTarget = PriceTarget;
Stopper=AveragePrice+(Stoploss*Point);
// Stopper=0;
flag = 1;
}
}
//----------------------- IF NEEDED CHANGE ALL OPEN ORDERS TO NEWLY CALCULATED PROFIT TARGET
if(NewOrdersPlaced)
if(flag==1)// check if average has really changed
{
for(cnt=OrdersTotal()-1;cnt>=0;cnt--)
{
// PriceTarget=total;
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
// OrderModify(OrderTicket(),0,Stopper,PriceTarget,0,Yellow);// set all positions to averaged levels
OrderModify(OrderTicket(),AveragePrice,OrderStopLoss(),PriceTarget,0,Yellow);// set all positions to averaged levels
NewOrdersPlaced = false;
}
}
}
double ND(double v){return(NormalizeDouble(v,Digits));}
int fOrderCloseMarket(bool aCloseBuy=true,bool aCloseSell=true){
int tErr=0;
for(int i=OrdersTotal()-1;i>=0;i--){
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)){
if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber){
if(OrderType()==OP_BUY && aCloseBuy){
RefreshRates();
if(!IsTradeContextBusy()){
if(!OrderClose(OrderTicket(),OrderLots(),ND(Bid),5,CLR_NONE)){
Print("Error close BUY "+OrderTicket());//+" "+fMyErDesc(GetLastError()));
tErr=-1;
}
}
else{
static int lt1=0;
if(lt1!=iTime(NULL,0,0)){
lt1=iTime(NULL,0,0);
Print("Need close BUY "+OrderTicket()+". Trade Context Busy");
}
return(-2);
}
}
if(OrderType()==OP_SELL && aCloseSell){
RefreshRates();
if(!IsTradeContextBusy()){
if(!OrderClose(OrderTicket(),OrderLots(),ND(Ask),5,CLR_NONE)){
Print("Error close SELL "+OrderTicket());//+" "+fMyErDesc(GetLastError()));
tErr=-1;
}
}
else{
static int lt2=0;
if(lt2!=iTime(NULL,0,0)){
lt2=iTime(NULL,0,0);
Print("Need close SELL "+OrderTicket()+". Trade Context Busy");
}
return(-2);
}
}
}
}
}
return(tErr);
}
double fGetLots(int aTradeType){
double tLots;
switch(MMType){
case 0:
tLots=Lots;
break;
case 1:
tLots=NormalizeDouble(Lots*MathPow(LotExponent,NumOfTrades),LotsDigits);
break;
case 2:
int LastClosedTime=0;
tLots=Lots;
for(int i=OrdersHistoryTotal()-1;i>=0;i--){
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)){
if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber){
if(LastClosedTime<OrderCloseTime()){
LastClosedTime=OrderCloseTime();
if(OrderProfit()<0){
tLots=NormalizeDouble(OrderLots()*LotExponent,LotsDigits);
}
else{
tLots=Lots;
}
}
}
}
else{
return(-3);
}
}
break;
}
if(AccountFreeMarginCheck(Symbol(),aTradeType,tLots)<=0){
return(-1);
}
if(GetLastError()==134){
return(-2);
}
return(tLots);
}
int CountTrades()
{
int count=0;
int trade;
for(trade=OrdersTotal()-1;trade>=0;trade--)
{
OrderSelect(trade,SELECT_BY_POS,MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol()&&OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_SELL || OrderType()==OP_BUY)
count++;
}//for
return(count);
}
void CloseThisSymbolAll()
{
int trade;
for(trade=OrdersTotal()-1;trade>=0;trade--)
{
OrderSelect(trade,SELECT_BY_POS,MODE_TRADES);
if(OrderSymbol()!=Symbol())
continue;
if(OrderSymbol()==Symbol() && OrderMagicNumber()== MagicNumber)
{
if(OrderType()==OP_BUY)
OrderClose(OrderTicket(),OrderLots(),Bid,slip,Blue);
if(OrderType()==OP_SELL)
OrderClose(OrderTicket(),OrderLots(),Ask,slip,Red);
}
Sleep(1000);
}
}
int OpenPendingOrder(int pType,double pLots,double pLevel,int sp, double pr, int sl, int tp,string pComment,int pMagic,datetime pExpiration,color pColor)
{
int ticket=0;
int err=0;
int c = 0;
int NumberOfTries = 100;
switch (pType)
{
case OP_BUYLIMIT:
for(c = 0 ; c < NumberOfTries ; c++)
{
ticket=OrderSend(Symbol(),OP_BUYLIMIT,pLots,pLevel,sp,StopLong(pr,sl),TakeLong(pLevel,tp),pComment,pMagic,pExpiration,pColor);
err=GetLastError();
if(err==0)
{
break;
}
else
{
if(err==4 || err==137 ||err==146 || err==136) //Busy errors
{
Sleep(1000);
continue;
}
else //normal error
{
break;
}
}
}
break;
case OP_BUYSTOP:
for(c = 0 ; c < NumberOfTries ; c++)
{
ticket=OrderSend(Symbol(),OP_BUYSTOP,pLots,pLevel,sp,StopLong(pr,sl),TakeLong(pLevel,tp),pComment,pMagic,pExpiration,pColor);
err=GetLastError();
if(err==0)
{
break;
}
else
{
if(err==4 || err==137 ||err==146 || err==136) //Busy errors
{
Sleep(5000);
continue;
}
else //normal error
{
break;
}
}
}
break;
case OP_BUY:
for(c = 0 ; c < NumberOfTries ; c++)
{
RefreshRates();
ticket=OrderSend(Symbol(),OP_BUY,pLots,Ask,sp,StopLong(Bid,sl),TakeLong(Ask,tp),pComment,pMagic,pExpiration,pColor);
err=GetLastError();
if(err==0)
{
break;
}
else
{
if(err==4 || err==137 ||err==146 || err==136) //Busy errors
{
Sleep(5000);
continue;
}
else //normal error
{
break;
}
}
}
break;
case OP_SELLLIMIT:
for(c = 0 ; c < NumberOfTries ; c++)
{
ticket=OrderSend(Symbol(),OP_SELLLIMIT,pLots,pLevel,sp,StopShort(pr,sl),TakeShort(pLevel,tp),pComment,pMagic,pExpiration,pColor);
err=GetLastError();
if(err==0)
{
break;
}
else
{
if(err==4 || err==137 ||err==146 || err==136) //Busy errors
{
Sleep(5000);
continue;
}
else //normal error
{
break;
}
}
}
break;
case OP_SELLSTOP:
for(c = 0 ; c < NumberOfTries ; c++)
{
ticket=OrderSend(Symbol(),OP_SELLSTOP,pLots,pLevel,sp,StopShort(pr,sl),TakeShort(pLevel,tp),pComment,pMagic,pExpiration,pColor);
err=GetLastError();
if(err==0)
{
break;
}
else
{
if(err==4 || err==137 ||err==146 || err==136) //Busy errors
{
Sleep(5000);
continue;
}
else //normal error
{
break;
}
}
}
break;
case OP_SELL:
for(c = 0 ; c < NumberOfTries ; c++)
{
ticket=OrderSend(Symbol(),OP_SELL,pLots,Bid,sp,StopShort(Ask,sl),TakeShort(Bid,tp),pComment,pMagic,pExpiration,pColor);
err=GetLastError();
if(err==0)
{
break;
}
else
{
if(err==4 || err==137 ||err==146 || err==136) //Busy errors
{
Sleep(5000);
continue;
}
else //normal error
{
break;
}
}
}
break;
}
return(ticket);
}
double StopLong(double price,int stop)
{
if(stop==0)
return(0);
else
return(price-(stop*Point));
}
double StopShort(double price,int stop)
{
if(stop==0)
return(0);
else
return(price+(stop*Point));
}
double TakeLong(double price,int take)
{
if(take==0)
return(0);
else
return(price+(take*Point));
}
double TakeShort(double price,int take)
{
if(take==0)
return(0);
else
return(price-(take*Point));
}
double CalculateProfit()
{
double Profit=0;
for(cnt=OrdersTotal()-1;cnt>=0;cnt--)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber)
if(OrderType()==OP_BUY || OrderType()==OP_SELL)
{
Profit=Profit+OrderProfit();
}
}
return(Profit);
}
void TrailingAlls(int start,int stop, double AvgPrice)
{
int profit;
double stoptrade;
double stopcal;
if(stop==0)
return;
int trade;
for(trade=OrdersTotal()-1;trade>=0;trade--)
{
if(!OrderSelect(trade,SELECT_BY_POS,MODE_TRADES))
continue;
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol()||OrderMagicNumber()==MagicNumber)
{
if(OrderType()==OP_BUY)
{
profit=NormalizeDouble((Bid-AvgPrice)/Point,0);
if(profit<start)
continue;
stoptrade=OrderStopLoss();
stopcal=Bid-(stop*Point);
if(stoptrade==0||(stoptrade!=0&&stopcal>stoptrade))
// OrderModify(OrderTicket(),OrderOpenPrice(),stopcal,OrderTakeProfit(),0,Blue);
OrderModify(OrderTicket(),AvgPrice,stopcal,OrderTakeProfit(),0,Aqua);
}//Long
if(OrderType()==OP_SELL)
{
profit=NormalizeDouble((AvgPrice-Ask)/Point,0);
if(profit<start)
continue;
stoptrade=OrderStopLoss();
stopcal=Ask+(stop*Point);
if(stoptrade==0||(stoptrade!=0&&stopcal<stoptrade))
// OrderModify(OrderTicket(),OrderOpenPrice(),stopcal,OrderTakeProfit(),0,Red);
OrderModify(OrderTicket(),AvgPrice,stopcal,OrderTakeProfit(),0,Red);
}//Shrt
}
Sleep(1000);
}//for
}
double AccountEquityHigh()
{
static double AccountEquityHighAmt,PrevEquity;
if(CountTrades()==0) AccountEquityHighAmt=AccountEquity();
if(AccountEquityHighAmt < PrevEquity) AccountEquityHighAmt=PrevEquity;
else AccountEquityHighAmt=AccountEquity();
PrevEquity = AccountEquity();
return(AccountEquityHighAmt);
}
double FindLastBuyPrice()
{
double oldorderopenprice = 0, orderprice;
int cnt, oldticketnumber = 0, ticketnumber;
for(cnt=OrdersTotal()-1;cnt>=0;cnt--)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber && OrderType()==OP_BUY)
{
ticketnumber = OrderTicket();
if(ticketnumber>oldticketnumber)
{
orderprice=OrderOpenPrice();
oldorderopenprice=orderprice;
oldticketnumber=ticketnumber;
}
}
}
return(orderprice);
}
double FindLastSellPrice()
{
double oldorderopenprice = 0, orderprice;
int cnt, oldticketnumber = 0, ticketnumber;
for(cnt=OrdersTotal()-1;cnt>=0;cnt--)
{
OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
if(OrderSymbol()!=Symbol()||OrderMagicNumber()!=MagicNumber)
continue;
if(OrderSymbol()==Symbol() && OrderMagicNumber()==MagicNumber && OrderType()==OP_SELL)
{
ticketnumber = OrderTicket();
if(ticketnumber>oldticketnumber)
{
orderprice=OrderOpenPrice();
oldorderopenprice=orderprice;
oldticketnumber=ticketnumber;
}
}
}
return(orderprice);
}
В результате получаем вот такую картинку:
Рис.2. Один из результатов оптимизации эксперта с начала 2009 года.
Догоним и перегоним господина Таниса!
- 3
- Просмотров: 18063
- 24 октября 2011, 00:31
- Комментариев: 7
Из недавнего:
Нажмите, чтобы обновить-
ivan1032612
19 апреля 2024, 02:29→ советник (6) в Стол заказов MQL
можете переделать пожалуйста <>[Читать..] -
Oxy
18 апреля 2024, 20:58→ #1 Синопсис (6) в Блог им. vis
Да, вся база Открытия в конце 2023 — начале 2024 автоматом перекочевала... <>[Читать..] -
MT45PRO
17 апреля 2024, 23:46→ Криптовалюты популярнее акций среди зумеров (3) в Криптовалюта
This comment is no longer available. <>[Читать..] -
Strannik-ag
17 апреля 2024, 10:06→ Валюты, металлы, нефть. Что говорят биржевые индикаторы (1) в ТОРГОВЫЕ СИГНАЛЫ!!!
Сегодня и завтра осторожней с Иеной. <>[Читать..] -
Ramboo
17 апреля 2024, 07:25→ Доработка советника (13) в Стол заказов MQL
Андрей добрый день, сможем поправить советник? Или это тема... <>[Читать..] -
MT45PRO
17 апреля 2024, 00:02→ Parabolic_r2 (7) в Стол заказов MQL
This comment is no longer available. <>[Читать..] -
kvashnin007
16 апреля 2024, 15:40→ Шаман. Уходят лучшие. (12) в Блог им. kvashnin007
Ладно. Я хоть попытался. Всем удачи.
<>[Читать..] -
AM2
16 апреля 2024, 11:20→ ДОРАБОТКА СОВЕТНИКА (12) в Стол заказов MQL Проблема с ордерами так и осталась!!!
покажите... <>[Читать..] -
droba
16 апреля 2024, 05:21→ советник для МТ4. (14) в Стол заказов MQL
, спасибо огромное за понимание и проделанную работу и не... <>[Читать..] -
kvashnin007
15 апреля 2024, 16:43→ Безиндикаторная стратегия "Переворот позиции" (42) в Стол заказов MQL
Новости здесь как раз в жилу. А вот алгоритм я бы изменил.... <>[Читать..]
Есть вопрос?
| Статус сейчас: |  |
Текущие конкурсы и акции
(показано 5 случайных)
|
Конкурсы без вложений
(InstaForex)
*осталось дней: бессрочно
|
|
Конкурсы без вложений
(LiteForex)
*осталось дней: бессрочно
|
|
Бездепозитные бонусы
(Larson&Holz)
*осталось дней: бессрочно
|
|
Бездепозитные бонусы
(FBS)
*осталось дней: бессрочно
|
|
Бездепозитные бонусы
(TeleTrade)
*осталось дней: бессрочно
|
Полный список см. в сервисе
OpenTraders.Event →
OpenTraders.Event →
- Общая информация
- О проекте
- Наша команда
- Предупреждение о рисках
- Условия использования
- Рекламодателям
- Контакты
- Торговля
- Инструкция по FOREX для начинающих
- Сравнение FOREX и биржевого рынка
- Рейтинг брокеров Forex
- Расписание торговых сессий
- Монитор Forex (графики, календарь)
- Наши сервисы и услуги
- Forex VPS
- Тестовая лаборатория
- Рейтинг советников Форекс
- Файловое хранилище
- Конкурсы от брокеров Форекс
- Инвесторам
- Новости: финансы, бизнес, экономика
- MetaTrader
- Скачать MetaTrader 5
- Начало работы с терминалом
- Мобильная версия терминала
- Язык MQL5 для создания советников
- Структура сообщества
- Главная
- Пользователи
- Группы
- Стены
- Лента комментариев
- Избранное
Внимание! Торговля и инвестирование на финансовых рынках сопряжены с повышенным риском потери капитала!
OpenTraders - информационный ресурс, не ведет брокерскую или дилерскую деятельность, не открывает счета. Торговые счета Вы можете зарегистрировать у указанного выше брокера. Все материалы на ресурсе носят информационный характер и не являются побуждением к действию. Администрация сайта может не соглашаться с мнением авторов. См. Предупреждение о рисках