//+------------------------------------------------------------------+
//| MacdPatternTrader.mq4 |
//| FORTRADER.RU |
//| http://FORTRADER.RU |
//+------------------------------------------------------------------+
/*
23 íîìåð
http://www.fortrader.ru/ftgate.php?id=0&num=67
 êàæäîì íîìåðå òîðãîâàÿ ñòðàòåãèÿ è ñîâåòíèê. Ïðèñîåäèíÿéòåñü!
Ïðèãëàøàåì àâòîðîâ ñòàòåé ïî òðåéäèíãó.
Èñòîðèÿ èçìåíåíèé:
0.01 äîáàâëåíî âîçìîæíîñòü âûáîðà äèàïàçîíà ðàáîòû ïî â ðåìåíè ñ startdate ïî stopdate
0.01 äîáàâëåíà âîçìîæíîñòü ðàáîòû ñ ðàñòÿíóòûì ìàðòèíãåéëîì
Ñêà÷àòü íîìåð æóðíàëà è èññëåäîâàíèåì äàííîãî ýêñïåðòà âû ìîæåòå ïî äàííîé ññûëêå:
Original description strategies:
http://www.unfx.ru/strategies_to_trade/strategies_134.php
Ïîäðîáíîå îïèñàíèå ïàðàìåòðîâ ñîâåòíèêà äîñòóïíî â íîìåðå æóðíàëà îò 26 Èþëÿ,
ïðåäëîæåíèÿ è îòçûâû ìû áóäåì ðàäû âèäåòü â íàøåé ýëåêòðîïî÷òå: letters@fortrader.ru
http://www.fortrader.ru/arhiv.php
A detailed description of the parameters adviser available issue of the journal dated Iule 26,
suggestions and feedback we will be glad to see in our e-mail: letters@fortrader.ru
http://www.fortrader.ru/arhiv.php
Looking for an interpreter for the English version of the magazine on partnership.
*/
#property copyright "FORTRADER.RU"
#property link "http://FORTRADER.RU"
extern string p1="Íàñòðîéêè ïàòòåðíà ¹1(A)";
extern bool p1enable=true;
extern int stoplossbars1 = 22;
extern int takeprofitbars1 = 32;
extern int otstup1 = 40;
extern int lowema1=13;
extern int fastema1=24;
extern double maxur1=0.0095;
extern double minur1=-0.0045;
extern string p2="Íàñòðîéêè ïàòòåðíà ¹2(B)";
extern bool p2enable=true;
extern int stoplossbars2 = 2;
extern int takeprofitbars2 = 2;
extern int otstup2 = 50;
extern int lowema2=7;
extern int fastema2=17;
extern double maxur2=0.0045;
extern double minur2=-0.0035;
extern string p3="Íàñòðîéêè ïàòòåðíà ¹3(C)";
extern bool p3enable=true;
extern int stoplossbars3 = 8;
extern int takeprofitbars3 = 12;
extern int otstup3 = 2;
extern int lowema3=2;
extern int fastema3=32;
extern double maxur3=0.0015;
extern double maxur13=0.004;
extern double minur3=-0.005;
extern double minur13=-0.0005;
extern string p4="Íàñòðîéêè ïàòòåðíà ¹4(D)";
extern bool p4enable=true;
extern int stoplossbars4 = 10;
extern int takeprofitbars4 = 32;
extern int otstup4 = 45;
extern int lowema4=9;
extern int fastema4=4;
extern int sum_bars_bup4=10;
extern double maxur4=0.0165;
extern double maxur14=0.0001;
extern double minur4=-0.0005;
extern double minur14=-0.0006;
extern string p5="Íàñòðîéêè ïàòòåðíà ¹5(I)";
extern bool p5enable=true;
extern int stoplossbars5 = 8;
extern int takeprofitbars5 = 47;
extern int otstup5 = 45;
extern int lowema5=2;
extern int fastema5=6;
extern double maxu5=0.0005;
extern double maxur5=0.0015;
double maxur15=0.0000;
extern double minu5=-0.0005;
extern double minur5=-0.0030;
double minur15=0.0000;
extern string p6="Íàñòðîéêè ïàòòåðíà ¹6(F)";
extern bool p6enable=true;
extern int stoplossbars6 = 26;
extern int takeprofitbars6 = 42;
extern int otstup6 = 20;
extern int lowema6=8;
extern int fastema6=4;
extern double maxur6=0.0005;
extern double minur6=-0.0010;
double maxbars6=5;
double minbars6=5;
double countbars6=4;
extern string x="Íàñòðîéêè MA:";
extern int perema1=7;
extern int perema2=21;
extern int persma3=98;
extern int perema4=365;
extern double Lots=0.1;
datetime Bar;
int maxdrow=24250;
extern bool timecontrol=true;
extern string starttime = "07:00:00";
extern string stoptime = "17:00:00";
extern bool slowmartin=true;
int buy,sell;int nummodb,nummods;int flaglot,bars_bup;
int start()
{Comment("FORTRADER.RU");
Lots=slowmartin(slowmartin);
if(timecontrol==true)
{
if(timecontrol(starttime,stoptime)==1){return(0);}
}
if(Bar!=iTime(NULL,0,0))
{
Bar=iTime(NULL,0,0);
if(p6enable==true){ AOPattern6(countbars6,maxbars6,minbars6,lowema6,fastema6,maxur6,minur6,stoplossbars6,otstup6,takeprofitbars6);}
if(p5enable==true){ AOPattern5(lowema5,fastema5,maxur5,minur5,stoplossbars5,otstup5,takeprofitbars6);}
if(p4enable==true){ AOPattern4(lowema4,fastema4,maxur4,minur4,stoplossbars4,otstup4,takeprofitbars4);}
if(p3enable==true){ AOPattern3(lowema3,fastema3,maxur3,minur3,stoplossbars3,otstup3,takeprofitbars3);}
if(p2enable==true){ AOPattern2(lowema2,fastema2,maxur2,minur2,stoplossbars2,otstup2,takeprofitbars2);}
if(p1enable==true){ AOPattern1(lowema1,fastema1,maxur1,minur1,stoplossbars1,otstup1,takeprofitbars1);}
ActivePosManager(perema1,perema2,persma3,perema4);
}else{return(0);}
return(0);
}
int timecontrol(string starttime, string stoptime)
{
if (Time[0]<=StrToTime(starttime) || Time[0]>=StrToTime(stoptime))
{
return(1);
}
return(0);
}
double slowmartin(bool slowmartin)
{//äëÿ ðàáîòû ôóíöèè ïðè îòêðûòèè ïîçèöèè íåîáõîäèìî ñáðàñûâàòü flaglot=0;
if(slowmartin==true)
{
if(OrdersTotal()<2 && flaglot==0)
{
if(true==OrderSelect(OrdersHistoryTotal()-1, SELECT_BY_POS, MODE_HISTORY))
{
if(OrderProfit()>1){Lots=0.1;return(Lots);}else{Lots=Lots+0.1;flaglot=1;return(Lots);}
}
}
}
return(Lots);
}
int stop,sstop,barnumm,barnumms,aopmaxur,aop_oksell,aop_okbuy;
int AOPattern6(int countbars,int maxbars,int minbars,double FastEMA,double SlowEMA,double maxur,double minur,int stoplossbars, int otstup,int takeprofitbars)
{ double sl;
string comment=maxdrow;
//çàãðóæàåì èíäèêàòîðû
double macdcurr =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,1);
double macdlast =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,2);
double macdlast3 =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,3);
if(macdcurr<maxur){sstop=0;}
if(macdcurr>maxur && barnumm<=maxbars && sstop==0)
{
barnumm=barnumm+1;
}
if(barnumm>maxbars)
{
barnumm=0;sstop=1;
}
if(barnumm<minbars && macdcurr<maxur )
{
barnumm=0;
}
if(macdcurr<maxur && barnumm>countbars)
{
aop_oksell=1;
}
if(aop_oksell==1)
{sl=StopLoss(0,stoplossbars,otstup);if(sl<Bid){sl=sl+10*Point;}
OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,TakeProfit(0,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_oksell=0;barnumm=0;
nummods=0;
sstop=0;
flaglot=0;
}
if(macdcurr>minur){stop=0;}
if(macdcurr<minur && barnumms<=maxbars && stop==0)
{
barnumms=barnumms+1;
}
if(barnumms>maxbars)
{
stop=1;barnumms=0;
}
if(barnumms<minbars && macdcurr>minur )
{
barnumms=0;
}
if(macdcurr>minur && barnumms>countbars)
{
aop_okbuy=1;
}
if(aop_okbuy==1 )
{sl=StopLoss(1,stoplossbars,otstup);if(sl>Ask){sl=sl-10*Point;}
OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,TakeProfit(1,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
barnumms=0;
aop_okbuy=0;
nummodb=0;
stop=0;
flaglot=0;
}
}
int stops5, Sb5, aop_oksell5, stopb5, Ss5, aop_okbuy5;
int AOPattern5(double FastEMA,double SlowEMA,double maxur,double minur,int stoplossbars, int otstup,int takeprofitbars)
{ double sl;
//çàãðóæàåì èíäèêàòîðû
double macdcurr =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,1);
double macdlast =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,2);
double macdlast3 =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,3);
if(macdcurr<minu5 && stops5==0){stops5=1;}
if(macdcurr>minur && stops5==1){stops5=0;Sb5=1;}
if(Sb5==1 && macdcurr<macdlast && macdlast>macdlast3 && macdcurr<minur && macdlast>minur){aop_oksell5=1;Sb5=0;}
if(macdcurr>minur15 ){stops5=0;aop_oksell5=0;Sb5=0;}
if(aop_oksell5==1)
{sl=StopLoss(0,stoplossbars,otstup);if(sl<Bid){sl=sl+10*Point;}
OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,TakeProfit(0,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_oksell5=0;
nummods=0;
stops5=0;
Sb5=0;
flaglot=0;
}
if(macdcurr>maxu5 && stopb5==0){stopb5=1;}
if(macdcurr<maxur15 ){stopb5=0;aop_okbuy5=0;Ss5=0;}
if(macdcurr<maxur && stopb5==1){stopb5=0;Ss5=1;}
if(Ss5==1 && macdcurr>macdlast && macdlast<macdlast3 && macdcurr>maxur && macdlast<maxur){aop_okbuy5=1;Ss5=0;}
if(aop_okbuy5==1 )
{sl=StopLoss(1,stoplossbars,otstup);if(sl>Ask){sl=sl-10*Point;}
OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,TakeProfit(1,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_okbuy5=0;
nummodb=0;
Ss5=0;
flaglot=0;
}
}
int aop_oksell4,aop_okbuy4,stops4,sstop4;
double max14,min14;
int AOPattern4(double FastEMA,double SlowEMA,double maxur4,double minur4,int stoplossbars, int otstup,int takeprofitbars)
{ double sl;
//çàãðóæàåì èíäèêàòîðû
double macdcurr =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,1);
double macdlast =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,2);
double macdlast3 =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,3);
if(macdcurr>maxur4 && macdcurr<macdlast && macdlast>macdlast3 && stops4==0){max14=macdlast;stops4=1;}
if(macdcurr<maxur4 ){stops4=0;max14=0;}
if(stops4==1 && macdcurr>maxur4&& macdcurr<macdlast && macdlast>macdlast3 && macdlast<max14 ){aop_oksell4=1;}
if(macdcurr<maxur4 ){aop_oksell4=0;}
if(aop_oksell4==1)
{sl=StopLoss(0,stoplossbars,otstup);if(sl<Bid){sl=sl+10*Point;}
max14=0;
OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,TakeProfit(0,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_oksell4=0;
nummods=0;
flaglot=0;
}
if(macdcurr<minur4 && macdcurr>macdlast && macdlast<macdlast3 && sstop4==0){min14=macdlast;sstop4=1;}
if(macdcurr>minur4 ){sstop4=0;min14=0;}
if(sstop4==1 && macdcurr<minur4&& macdcurr>macdlast && macdlast<macdlast3 && macdlast>min14 ){aop_okbuy4=1;}
if(macdcurr>maxur4 ){aop_okbuy4=0;}
if(aop_okbuy4==1 )
{sl=StopLoss(1,stoplossbars,otstup);if(sl>Ask){sl=sl-10*Point;}
OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,TakeProfit(1,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_okbuy4=0;
nummodb=0;
sstop4=0;
min14=0;
flaglot=0;
}
}
int aop_oksell3,aop_okbuy3,S3,bS3,stops3,stops13,sstops3,sstops13;
double max13,max23,max33,min13,min23,min33;
int AOPattern3(double FastEMA,double SlowEMA,double maxur3,double minur3,int stoplossbars, int otstup,int takeprofitbars)
{double sl;
//çàãðóæàåì èíäèêàòîðû
double macdcurr =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,1);
double macdlast =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,2);
double macdlast3 =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,3);
if(macdcurr>maxur13){S3=1;bars_bup=bars_bup+1;}
if(S3==1 && macdcurr<macdlast && macdlast>macdlast3 && macdlast>max13 && stops3==0){max13=macdlast;}
if(max13>0 &&macdcurr<maxur3){stops3=1;}
if(macdcurr<maxur13 ){stops3=0;max13=0;S3=0;}
if(stops3==1 && macdcurr>maxur3&& macdcurr<macdlast && macdlast>macdlast3 && macdlast>max13 && macdlast>max23 && stops13==0){max23=macdlast;}
if(max23>0 &&macdcurr<maxur3){stops13=1;}
if(macdcurr<maxur13 ){stops13=0;max23=0;}
if(stops13==1 && macdcurr<maxur3&& macdlast<maxur3&& macdlast3<maxur3&& macdcurr<macdlast && macdlast>macdlast3 && macdlast<max23 && aop_oksell3==0){max33=macdlast;aop_oksell3=1;}
if(macdcurr<maxur13 ){aop_oksell3=0;}
if(aop_oksell3==1 )
{max13=0;max23=0;max33=0;
sl=StopLoss(0,stoplossbars,otstup);if(sl<Bid){sl=sl+10*Point;}
OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,TakeProfit(0,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_oksell3=0;
nummods=0;
bars_bup=0;
flaglot=0;
}
if(macdcurr<minur3){bS3=1;}
if(bS3==1 && macdcurr>macdlast && macdlast<macdlast3 && macdlast<min13 && sstops3==0){min13=macdlast;}
if(min13<0 &&macdcurr>minur3){sstops3=1;bS3=0;}
if(macdcurr>minur13 ){sstops3=0;min13=0;bS3=0;}
if(sstops3==1 && macdcurr<maxur3&& macdcurr>macdlast && macdlast<macdlast3 && macdlast<min13 && macdlast<min23 && sstops13==0){min23=macdlast;}
if(min23<0 &&macdcurr>minur3){sstops13=1;sstops3=0;}
if(macdcurr>minur13 ){sstops13=0;min23=0;}
if(sstops13==1 && macdcurr>minur3&& macdlast>minur3&& macdlast3>minur3&& macdcurr>macdlast && macdlast<macdlast3 && macdlast>min23 && aop_okbuy3==0){min33=macdlast;aop_okbuy3=1;sstops13=0;}
if(macdcurr>maxur13 ){aop_okbuy3=0;}
if(aop_okbuy3==1 )
{
sl=StopLoss(1,stoplossbars,otstup);if(sl>Ask){sl=sl-10*Point;}
OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,TakeProfit(1,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_okbuy3=0;
nummodb=0;
sstops13=0;
min13=0;
min23=0;
min33=0;
flaglot=0;
}
}
int aop_maxur2,aop_minur2,aop_oksell2,aop_okbuy2;int value_min2,value_max2,value_curr2;
int AOPattern2(double FastEMA,double SlowEMA,double maxur2,double minur2,int stoplossbars, int otstup,int takeprofitbars)
{double sl;
//çàãðóæàåì èíäèêàòîðû
double macdcurr =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,1);
double macdlast =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,2);
double macdlast3 =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,3);
if(macdcurr>0){aop_maxur2=1;aop_oksell2=0;}
if(macdcurr>macdlast && macdlast<macdlast3 && aop_maxur2==1 && macdcurr>minur2 && macdcurr<0 && aop_oksell2==0)
{
aop_oksell2=1; value_min2= MathAbs(macdlast*10000);
}
value_curr2=MathAbs(macdcurr*10000);
if(aop_oksell2==1 && macdcurr<macdlast && macdlast>macdlast3 && macdcurr<0 && value_min2<=value_curr2)
{
aop_maxur2=0;
}
if(aop_oksell2==1 && macdcurr<macdlast && macdlast>macdlast3 && macdcurr<0 )
{
sl=StopLoss(0,stoplossbars,otstup);if(sl<Bid){sl=sl+10*Point;}
OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,TakeProfit(0,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_oksell2=0;
aop_maxur2=0;
nummods=0;
flaglot=0;
}
if(macdcurr<0){aop_minur2=1;aop_okbuy2=0;}
if(macdcurr<maxur2 && macdcurr<macdlast && macdlast>macdlast3 && aop_minur2==1 && macdcurr>0)
{
aop_okbuy2=1; value_max2= MathAbs(macdlast*10000);
}
value_curr2=MathAbs(macdcurr*10000);
if(aop_okbuy2==1 && macdcurr>macdlast && macdlast<macdlast3 && macdcurr>0 && value_max2<=value_curr2)
{
aop_minur2=0;
}
if(aop_okbuy2==1 && macdcurr>macdlast && macdlast<macdlast3 && macdcurr>0 )
{
sl=StopLoss(1,stoplossbars,otstup);if(sl>Ask){sl=sl-10*Point;}
OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,TakeProfit(1,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_okbuy2=0;
aop_minur2=0;
nummodb=0;
flaglot=0;
}
}
int aop_maxur1,aop_minur1,aop_oksell1,aop_okbuy1;
int AOPattern1(double FastEMA,double SlowEMA,double maxur1,double minur1,int stoplossbars, int otstup,int takeprofitbars)
{double sl;
//çàãðóæàåì èíäèêàòîðû
double macdcurr =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,1);
double macdlast =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,2);
double macdlast3 =iMACD(NULL,0,FastEMA,SlowEMA,1,PRICE_CLOSE,MODE_MAIN,3);
if(macdcurr>maxur1){aop_maxur1=1;}
if(macdcurr<0){aop_maxur1=0;}
if(macdcurr<maxur1 && macdcurr<macdlast && macdlast>macdlast3 && aop_maxur1==1 && macdcurr>0 && macdlast3<maxur1)
{
aop_oksell1=1;
}
if(aop_oksell1==1 )
{
sl=StopLoss(0,stoplossbars,otstup);if(sl<Bid){sl=sl+10*Point;}
OrderSend(Symbol(),OP_SELL,Lots,Bid,3,sl,TakeProfit(0,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_oksell1=0;
aop_maxur1=0;
nummods=0;
flaglot=0;
}
if(macdcurr<minur1){aop_minur1=1;}
if(macdcurr>0){aop_minur1=0;}
if(macdcurr>minur1 && macdcurr<0 && macdcurr>macdlast && macdlast<macdlast3 && aop_minur1==1 && macdlast3>minur1 )
{
aop_okbuy1=1;
}
if(aop_okbuy1==1 )
{
sl=StopLoss(1,stoplossbars,otstup);if(sl>Ask){sl=sl-10*Point;}
OrderSend(Symbol(),OP_BUY,Lots,Ask,3,sl,TakeProfit(1,takeprofitbars),"FORTRADER.RU",maxdrow,0,Red);
aop_okbuy1=0;
aop_minur1=0;
nummodb=0;
flaglot=0;
}
}
double StopLoss(int type,int stoplossbars,int otstup)
{double stoploss;
if(type==0)
{
stoploss=High[iHighest(NULL,0,MODE_HIGH,stoplossbars,1)]+otstup*Point;
return(stoploss);
}
if(type==1)
{
stoploss=Low[iLowest(NULL,0,MODE_LOW,stoplossbars,1)]-otstup*Point;
return(stoploss);
}
}
double TakeProfit(int type,int takeprofitbars)
{ int x=0,stop=0;double takeprofit;
if(type==0)
{
while(stop==0)
{
takeprofit =Low[iLowest(NULL,0,MODE_LOW,takeprofitbars,x)];
if(takeprofit>Low[iLowest(NULL,0,MODE_LOW,takeprofitbars,x+takeprofitbars)])
{
takeprofit =Low[iLowest(NULL,0,MODE_LOW,takeprofitbars,x+takeprofitbars)];
x=x+takeprofitbars;
}
else
{
stop=1;return(takeprofit);
}
}
}
if(type==1)
{
while(stop==0)
{
takeprofit =High[iHighest(NULL,0,MODE_HIGH,takeprofitbars,x)];
if(takeprofit<High[iHighest(NULL,0,MODE_HIGH,takeprofitbars,x+takeprofitbars)])
{
takeprofit =High[iHighest(NULL,0,MODE_HIGH,takeprofitbars,x+takeprofitbars)];
x=x+takeprofitbars;
}
else
{
stop=1;return(takeprofit);
}
}
}
}
int ActivePosManager(int perema1, int perema2, int persma3, int perema4)
{string comment=maxdrow;int i;double lt;
double ema1 =iMA(NULL,0,perema1,0,MODE_EMA,PRICE_CLOSE,1);
double ema2 =iMA(NULL,0,perema2,0,MODE_EMA,PRICE_CLOSE,1);
double sma1 =iMA(NULL,0,persma3,0,MODE_SMA,PRICE_CLOSE,1);
double ema3 =iMA(NULL,0,perema4,0,MODE_EMA,PRICE_CLOSE,1);
for( i=1; i<=OrdersTotal(); i++)
{
if (OrderSelect(i-1,SELECT_BY_POS)==true)
{
if(OrderType()==OP_BUY && OrderProfit()>5 && Close[1]>ema2 && nummodb==0&& OrderSymbol()==Symbol()&&OrderMagicNumber()==maxdrow)
{ lt=NormalizeDouble(OrderLots()/3,2);if(lt<=0.01){lt=0.01;}
OrderClose(OrderTicket(),lt,Bid,3,Violet);
nummodb++;
}
}
if (OrderSelect(i-1,SELECT_BY_POS)==true)
{
if(OrderType()==OP_BUY && OrderProfit()>5 && High[1]>(sma1+ema3)/2 && nummodb==1 &&OrderSymbol()==Symbol()&&OrderMagicNumber()==maxdrow)
{ lt=NormalizeDouble(OrderLots()/2,2);if(lt<=0.01){lt=0.01;}
OrderClose(OrderTicket(),lt,Bid,3,Violet);
nummodb++;
}
}
if (OrderSelect(i-1,SELECT_BY_POS)==true)
{
if(OrderType()==OP_SELL && OrderProfit()>5 && Close[1]<ema2 && nummods==0 && OrderSymbol()==Symbol()&&OrderMagicNumber()==maxdrow)
{lt=NormalizeDouble(OrderLots()/3,2);if(lt<=0.01){lt=0.01;}
OrderClose(OrderTicket(),lt,Ask,3,Violet);
nummods++;
}
}
if (OrderSelect(i-1,SELECT_BY_POS)==true)
{
if(OrderType()==OP_SELL && OrderProfit()>5 && Low[1]<(sma1+ema3)/2 && nummods==1&& OrderSymbol()==Symbol()&&OrderMagicNumber()==maxdrow)
{ lt=NormalizeDouble(OrderLots()/2,2);if(lt<=0.01){lt=0.01;}
OrderClose(OrderTicket(),lt,Ask,3,Violet);
nummods++;
}
}
}
}
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Series array that contains close prices for each bar
Indicator Curves created:
Indicators Used:
MACD Histogram
Moving average indicator
Custom Indicators Used:
Order Management characteristics:
Checks for the total of open orders
Checks for the total of closed orders
It automatically opens orders when conditions are reached
It Closes Orders by itself
Other Features: