Stratégie manuelle MT4 conversion vers PRT (supply and demand)
-
Bonjour à tous,
Voici une petite strat sur MT4 qui pourrait être assez pratique sur PRT, pour ceux qui auraient la possibilité de convertir les indicateurs mt4 vers prt.
La strat est composée de 3 indicateurs. Comme vous pouvez le voir sur la capture, il y a des zones d’achat et vente sur le prix et sur le RSi-Sto, et le 3ème indicateur laisse apparaitre un comptage. lorsqu’il y a 9 et 13 (en rouge ou bleu foncé) on peut considérer un retournement prochain avec validation si cours et RSI-STO dans une des zones.
Voici le code mt4 du SupDem
#property indicator_chart_window #property indicator_buffers 2 extern int forced_tf = 0; extern bool use_narrow_bands = false; extern bool kill_retouch = true; extern color TopColor = Maroon; extern color BotColor = DarkBlue; extern int Price_Width = 1; double BuferUp[]; double BuferDn[]; double iPeriod=13; int Dev=8; int Step=5; datetime t1,t2; double p1,p2; string pair; double point; int digits; int tf; string TAG; double up_cur,dn_cur; int init() { SetIndexBuffer(1,BuferUp); SetIndexEmptyValue(1,0.0); SetIndexStyle(1,DRAW_NONE); SetIndexBuffer(0,BuferDn); SetIndexEmptyValue(0,0.0); SetIndexStyle(0,DRAW_NONE); if(forced_tf != 0) tf = forced_tf; else tf = Period(); point = Point; digits = Digits; if(digits == 3 || digits == 5) point*=10; TAG = "II_SupDem"+tf; return(0); } int deinit() { ObDeleteObjectsByPrefix(TAG); Comment(""); return(0); } int start() { if(NewBar()==true) { CountZZ(BuferUp,BuferDn,iPeriod,Dev,Step); GetValid(); Draw(); } return(0); } void Draw() { int i; string s; ObDeleteObjectsByPrefix(TAG); for(i=0;i<iBars(pair,tf);i++) { if(BuferDn[i] > 0.0) { t1 = iTime(pair,tf,i); t2 = Time[0]; if(use_narrow_bands) p2 = MathMax(iClose(pair,tf,i),iOpen(pair,tf,i)); else p2 = MathMin(iClose(pair,tf,i),iOpen(pair,tf,i)); p2 = MathMax(p2,MathMax(iLow(pair,tf,i-1),iLow(pair,tf,i+1))); s = TAG+"UPAR"+tf+i; ObjectCreate(s,OBJ_ARROW,0,0,0); ObjectSet(s,OBJPROP_ARROWCODE,SYMBOL_RIGHTPRICE); ObjectSet(s, OBJPROP_TIME1, t2); ObjectSet(s, OBJPROP_PRICE1, p2); ObjectSet(s,OBJPROP_COLOR,TopColor); ObjectSet(s,OBJPROP_WIDTH,Price_Width); s = TAG+"UPFILL"+tf+i; ObjectCreate(s,OBJ_RECTANGLE,0,0,0,0,0); ObjectSet(s,OBJPROP_TIME1,t1); ObjectSet(s,OBJPROP_PRICE1,BuferDn[i]); ObjectSet(s,OBJPROP_TIME2,t2); ObjectSet(s,OBJPROP_PRICE2,p2); ObjectSet(s,OBJPROP_COLOR,TopColor); } if(BuferUp[i] > 0.0) { t1 = iTime(pair,tf,i); t2 = Time[0]; if(use_narrow_bands) p2 = MathMin(iClose(pair,tf,i),iOpen(pair,tf,i)); else p2 = MathMax(iClose(pair,tf,i),iOpen(pair,tf,i)); if(i>0) p2 = MathMin(p2,MathMin(iHigh(pair,tf,i+1),iHigh(pair,tf,i-1))); s = TAG+"DNAR"+tf+i; ObjectCreate(s,OBJ_ARROW,0,0,0); ObjectSet(s,OBJPROP_ARROWCODE,SYMBOL_RIGHTPRICE); ObjectSet(s, OBJPROP_TIME1, t2); ObjectSet(s, OBJPROP_PRICE1, p2); ObjectSet(s,OBJPROP_COLOR,BotColor); ObjectSet(s,OBJPROP_WIDTH,Price_Width); s = TAG+"DNFILL"+tf+i; ObjectCreate(s,OBJ_RECTANGLE,0,0,0,0,0); ObjectSet(s,OBJPROP_TIME1,t1); ObjectSet(s,OBJPROP_PRICE1,p2); ObjectSet(s,OBJPROP_TIME2,t2); ObjectSet(s,OBJPROP_PRICE2,BuferUp[i]); ObjectSet(s,OBJPROP_COLOR,BotColor); } } } bool NewBar() { static datetime LastTime = 0; if (iTime(pair,tf,0) != LastTime) { LastTime = iTime(pair,tf,0); return (true); } else return (false); } void ObDeleteObjectsByPrefix(string Prefix) { int L = StringLen(Prefix); int i = 0; while(i < ObjectsTotal()) { string ObjName = ObjectName(i); if(StringSubstr(ObjName, 0, L) != Prefix) { i++; continue; } ObjectDelete(ObjName); } } void CountZZ( double& ExtMapBuffer[], double& ExtMapBuffer2[], int ExtDepth, int ExtDeviation, int ExtBackstep ) { int shift, back,lasthighpos,lastlowpos; double val,res; double curlow,curhigh,lasthigh,lastlow; int count = iBars(pair,tf)-ExtDepth; for(shift=count; shift>=0; shift--) { val = iLow(pair,tf,iLowest(pair,tf,MODE_LOW,ExtDepth,shift)); if(val==lastlow) val=0.0; else { lastlow=val; if((iLow(pair,tf,shift)-val)>(ExtDeviation*Point)) val=0.0; else { for(back=1; back<=ExtBackstep; back++) { res=ExtMapBuffer[shift+back]; if((res!=0)&&(res>val)) ExtMapBuffer[shift+back]=0.0; } } } ExtMapBuffer[shift]=val; //--- high val=iHigh(pair,tf,iHighest(pair,tf,MODE_HIGH,ExtDepth,shift)); if(val==lasthigh) val=0.0; else { lasthigh=val; if((val-iHigh(pair,tf,shift))>(ExtDeviation*Point)) val=0.0; else { for(back=1; back<=ExtBackstep; back++) { res=ExtMapBuffer2[shift+back]; if((res!=0)&&(res<val)) ExtMapBuffer2[shift+back]=0.0; } } } ExtMapBuffer2[shift]=val; } // final cutting lasthigh=-1; lasthighpos=-1; lastlow=-1; lastlowpos=-1; for(shift=count; shift>=0; shift--) { curlow=ExtMapBuffer[shift]; curhigh=ExtMapBuffer2[shift]; if((curlow==0)&&(curhigh==0)) continue; //--- if(curhigh!=0) { if(lasthigh>0) { if(lasthigh<curhigh) ExtMapBuffer2[lasthighpos]=0; else ExtMapBuffer2[shift]=0; } //--- if(lasthigh<curhigh || lasthigh<0) { lasthigh=curhigh; lasthighpos=shift; } lastlow=-1; } //---- if(curlow!=0) { if(lastlow>0) { if(lastlow>curlow) ExtMapBuffer[lastlowpos]=0; else ExtMapBuffer[shift]=0; } //--- if((curlow<lastlow)||(lastlow<0)) { lastlow=curlow; lastlowpos=shift; } lasthigh=-1; } } for(shift=iBars(pair,tf)-1; shift>=0; shift--) { if(shift>=count) ExtMapBuffer[shift]=0.0; else { res=ExtMapBuffer2[shift]; if(res!=0.0) ExtMapBuffer2[shift]=res; } } } void GetValid() { up_cur = 0; int upbar = 0; dn_cur = 0; int dnbar = 0; double cur_hi = 0; double cur_lo = 0; double last_up = 0; double last_dn = 0; double low_dn = 0; double hi_up = 0; int i; for(i=0;i<iBars(pair,tf);i++) { if(BuferUp[i] > 0) { up_cur = BuferUp[i]; cur_lo = BuferUp[i]; last_up = cur_lo; break; } } for(i=0;i<iBars(pair,tf);i++) { if(BuferDn[i] > 0) { dn_cur = BuferDn[i]; cur_hi = BuferDn[i]; last_dn = cur_hi; break; } } for(i=0;i<iBars(pair,tf);i++) // remove higher lows and lower highs { if(BuferDn[i] >= last_dn) { last_dn = BuferDn[i]; dnbar = i; } else BuferDn[i] = 0.0; if(BuferDn[i] <= dn_cur && BuferUp[i] > 0.0) BuferDn[i] = 0.0; if(BuferUp[i] <= last_up && BuferUp[i] > 0) { last_up = BuferUp[i]; upbar = i; } else BuferUp[i] = 0.0; if(BuferUp[i] > up_cur) BuferUp[i] = 0.0; } if(kill_retouch) { if(use_narrow_bands) { low_dn = MathMax(iOpen(pair,tf,dnbar),iClose(pair,tf,dnbar)); hi_up = MathMin(iOpen(pair,tf,upbar),iClose(pair,tf,upbar)); } else { low_dn = MathMin(iOpen(pair,tf,dnbar),iClose(pair,tf,dnbar)); hi_up = MathMax(iOpen(pair,tf,upbar),iClose(pair,tf,upbar)); } for(i=MathMax(upbar,dnbar);i>=0;i--) // work back to zero and remove reentries into s/d { if(BuferDn[i] > low_dn && BuferDn[i] != last_dn) BuferDn[i] = 0.0; else if(use_narrow_bands && BuferDn[i] > 0) { low_dn = MathMax(iOpen(pair,tf,i),iClose(pair,tf,i)); last_dn = BuferDn[i]; } else if(BuferDn[i] > 0) { low_dn = MathMin(iOpen(pair,tf,i),iClose(pair,tf,i)); last_dn = BuferDn[i]; } if(BuferUp[i] <= hi_up && BuferUp[i] > 0 && BuferUp[i] != last_up) BuferUp[i] = 0.0; else if(use_narrow_bands && BuferUp[i] > 0) { hi_up = MathMin(iOpen(pair,tf,i),iClose(pair,tf,i)); last_up = BuferUp[i]; } else if(BuferUp[i] > 0) { hi_up = MathMax(iOpen(pair,tf,i),iClose(pair,tf,i)); last_up = BuferUp[i]; } } } }Voici le code du STO-RSI-WPR OBOS zone
#property indicator_chart_window #property indicator_buffers 2 extern int forced_tf = 0; extern bool use_narrow_bands = false; extern bool kill_retouch = true; extern color TopColor = Maroon; extern color BotColor = DarkBlue; extern int Price_Width = 1; double BuferUp[]; double BuferDn[]; double iPeriod=13; int Dev=8; int Step=5; datetime t1,t2; double p1,p2; string pair; double point; int digits; int tf; string TAG; double up_cur,dn_cur; int init() { SetIndexBuffer(1,BuferUp); SetIndexEmptyValue(1,0.0); SetIndexStyle(1,DRAW_NONE); SetIndexBuffer(0,BuferDn); SetIndexEmptyValue(0,0.0); SetIndexStyle(0,DRAW_NONE); if(forced_tf != 0) tf = forced_tf; else tf = Period(); point = Point; digits = Digits; if(digits == 3 || digits == 5) point*=10; TAG = "II_SupDem"+tf; return(0); } int deinit() { ObDeleteObjectsByPrefix(TAG); Comment(""); return(0); } int start() { if(NewBar()==true) { CountZZ(BuferUp,BuferDn,iPeriod,Dev,Step); GetValid(); Draw(); } return(0); } void Draw() { int i; string s; ObDeleteObjectsByPrefix(TAG); for(i=0;i<iBars(pair,tf);i++) { if(BuferDn[i] > 0.0) { t1 = iTime(pair,tf,i); t2 = Time[0]; if(use_narrow_bands) p2 = MathMax(iClose(pair,tf,i),iOpen(pair,tf,i)); else p2 = MathMin(iClose(pair,tf,i),iOpen(pair,tf,i)); p2 = MathMax(p2,MathMax(iLow(pair,tf,i-1),iLow(pair,tf,i+1))); s = TAG+"UPAR"+tf+i; ObjectCreate(s,OBJ_ARROW,0,0,0); ObjectSet(s,OBJPROP_ARROWCODE,SYMBOL_RIGHTPRICE); ObjectSet(s, OBJPROP_TIME1, t2); ObjectSet(s, OBJPROP_PRICE1, p2); ObjectSet(s,OBJPROP_COLOR,TopColor); ObjectSet(s,OBJPROP_WIDTH,Price_Width); s = TAG+"UPFILL"+tf+i; ObjectCreate(s,OBJ_RECTANGLE,0,0,0,0,0); ObjectSet(s,OBJPROP_TIME1,t1); ObjectSet(s,OBJPROP_PRICE1,BuferDn[i]); ObjectSet(s,OBJPROP_TIME2,t2); ObjectSet(s,OBJPROP_PRICE2,p2); ObjectSet(s,OBJPROP_COLOR,TopColor); } if(BuferUp[i] > 0.0) { t1 = iTime(pair,tf,i); t2 = Time[0]; if(use_narrow_bands) p2 = MathMin(iClose(pair,tf,i),iOpen(pair,tf,i)); else p2 = MathMax(iClose(pair,tf,i),iOpen(pair,tf,i)); if(i>0) p2 = MathMin(p2,MathMin(iHigh(pair,tf,i+1),iHigh(pair,tf,i-1))); s = TAG+"DNAR"+tf+i; ObjectCreate(s,OBJ_ARROW,0,0,0); ObjectSet(s,OBJPROP_ARROWCODE,SYMBOL_RIGHTPRICE); ObjectSet(s, OBJPROP_TIME1, t2); ObjectSet(s, OBJPROP_PRICE1, p2); ObjectSet(s,OBJPROP_COLOR,BotColor); ObjectSet(s,OBJPROP_WIDTH,Price_Width); s = TAG+"DNFILL"+tf+i; ObjectCreate(s,OBJ_RECTANGLE,0,0,0,0,0); ObjectSet(s,OBJPROP_TIME1,t1); ObjectSet(s,OBJPROP_PRICE1,p2); ObjectSet(s,OBJPROP_TIME2,t2); ObjectSet(s,OBJPROP_PRICE2,BuferUp[i]); ObjectSet(s,OBJPROP_COLOR,BotColor); } } } bool NewBar() { static datetime LastTime = 0; if (iTime(pair,tf,0) != LastTime) { LastTime = iTime(pair,tf,0); return (true); } else return (false); } void ObDeleteObjectsByPrefix(string Prefix) { int L = StringLen(Prefix); int i = 0; while(i < ObjectsTotal()) { string ObjName = ObjectName(i); if(StringSubstr(ObjName, 0, L) != Prefix) { i++; continue; } ObjectDelete(ObjName); } } void CountZZ( double& ExtMapBuffer[], double& ExtMapBuffer2[], int ExtDepth, int ExtDeviation, int ExtBackstep ) { int shift, back,lasthighpos,lastlowpos; double val,res; double curlow,curhigh,lasthigh,lastlow; int count = iBars(pair,tf)-ExtDepth; for(shift=count; shift>=0; shift--) { val = iLow(pair,tf,iLowest(pair,tf,MODE_LOW,ExtDepth,shift)); if(val==lastlow) val=0.0; else { lastlow=val; if((iLow(pair,tf,shift)-val)>(ExtDeviation*Point)) val=0.0; else { for(back=1; back<=ExtBackstep; back++) { res=ExtMapBuffer[shift+back]; if((res!=0)&&(res>val)) ExtMapBuffer[shift+back]=0.0; } } } ExtMapBuffer[shift]=val; //--- high val=iHigh(pair,tf,iHighest(pair,tf,MODE_HIGH,ExtDepth,shift)); if(val==lasthigh) val=0.0; else { lasthigh=val; if((val-iHigh(pair,tf,shift))>(ExtDeviation*Point)) val=0.0; else { for(back=1; back<=ExtBackstep; back++) { res=ExtMapBuffer2[shift+back]; if((res!=0)&&(res<val)) ExtMapBuffer2[shift+back]=0.0; } } } ExtMapBuffer2[shift]=val; } // final cutting lasthigh=-1; lasthighpos=-1; lastlow=-1; lastlowpos=-1; for(shift=count; shift>=0; shift--) { curlow=ExtMapBuffer[shift]; curhigh=ExtMapBuffer2[shift]; if((curlow==0)&&(curhigh==0)) continue; //--- if(curhigh!=0) { if(lasthigh>0) { if(lasthigh<curhigh) ExtMapBuffer2[lasthighpos]=0; else ExtMapBuffer2[shift]=0; } //--- if(lasthigh<curhigh || lasthigh<0) { lasthigh=curhigh; lasthighpos=shift; } lastlow=-1; } //---- if(curlow!=0) { if(lastlow>0) { if(lastlow>curlow) ExtMapBuffer[lastlowpos]=0; else ExtMapBuffer[shift]=0; } //--- if((curlow<lastlow)||(lastlow<0)) { lastlow=curlow; lastlowpos=shift; } lasthigh=-1; } } for(shift=iBars(pair,tf)-1; shift>=0; shift--) { if(shift>=count) ExtMapBuffer[shift]=0.0; else { res=ExtMapBuffer2[shift]; if(res!=0.0) ExtMapBuffer2[shift]=res; } } } void GetValid() { up_cur = 0; int upbar = 0; dn_cur = 0; int dnbar = 0; double cur_hi = 0; double cur_lo = 0; double last_up = 0; double last_dn = 0; double low_dn = 0; double hi_up = 0; int i; for(i=0;i<iBars(pair,tf);i++) { if(BuferUp[i] > 0) { up_cur = BuferUp[i]; cur_lo = BuferUp[i]; last_up = cur_lo; break; } } for(i=0;i<iBars(pair,tf);i++) { if(BuferDn[i] > 0) { dn_cur = BuferDn[i]; cur_hi = BuferDn[i]; last_dn = cur_hi; break; } } for(i=0;i<iBars(pair,tf);i++) // remove higher lows and lower highs { if(BuferDn[i] >= last_dn) { last_dn = BuferDn[i]; dnbar = i; } else BuferDn[i] = 0.0; if(BuferDn[i] <= dn_cur && BuferUp[i] > 0.0) BuferDn[i] = 0.0; if(BuferUp[i] <= last_up && BuferUp[i] > 0) { last_up = BuferUp[i]; upbar = i; } else BuferUp[i] = 0.0; if(BuferUp[i] > up_cur) BuferUp[i] = 0.0; } if(kill_retouch) { if(use_narrow_bands) { low_dn = MathMax(iOpen(pair,tf,dnbar),iClose(pair,tf,dnbar)); hi_up = MathMin(iOpen(pair,tf,upbar),iClose(pair,tf,upbar)); } else { low_dn = MathMin(iOpen(pair,tf,dnbar),iClose(pair,tf,dnbar)); hi_up = MathMax(iOpen(pair,tf,upbar),iClose(pair,tf,upbar)); } for(i=MathMax(upbar,dnbar);i>=0;i--) // work back to zero and remove reentries into s/d { if(BuferDn[i] > low_dn && BuferDn[i] != last_dn) BuferDn[i] = 0.0; else if(use_narrow_bands && BuferDn[i] > 0) { low_dn = MathMax(iOpen(pair,tf,i),iClose(pair,tf,i)); last_dn = BuferDn[i]; } else if(BuferDn[i] > 0) { low_dn = MathMin(iOpen(pair,tf,i),iClose(pair,tf,i)); last_dn = BuferDn[i]; } if(BuferUp[i] <= hi_up && BuferUp[i] > 0 && BuferUp[i] != last_up) BuferUp[i] = 0.0; else if(use_narrow_bands && BuferUp[i] > 0) { hi_up = MathMin(iOpen(pair,tf,i),iClose(pair,tf,i)); last_up = BuferUp[i]; } else if(BuferUp[i] > 0) { hi_up = MathMax(iOpen(pair,tf,i),iClose(pair,tf,i)); last_up = BuferUp[i]; } } } }Et le dernier MM count
//+------------------------------------------------------------------+ //| Momo Counts.mq4 | //| Copyright © 2008, TradingSytemForex | //| http://www.tradingsystemforex.com | //+------------------------------------------------------------------+ #property copyright "Copyright © 2008, TradingSytemForex" #property link "http://www.tradingsystemforex.com" #property indicator_chart_window #property indicator_buffers 4 #property indicator_color1 SkyBlue #property indicator_color2 LightSalmon #property indicator_color3 Blue #property indicator_color4 Red //|---------indicator settings extern color First=Black; extern color Sell=LightSalmon; extern color Buy=SkyBlue; extern color PerfectSell=Red; extern color PerfectBuy=Blue; extern bool ShowNumbers=true; extern bool ShowArrows=false; extern bool UseAlerts=false; //|---------indicator buffers double CrossUp[]; double CrossDown[]; double CrossPUp[]; double CrossPDown[]; double prevtime; double Range,AvgRange; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { SetIndexStyle(0,DRAW_ARROW,EMPTY,1); SetIndexArrow(0,233); SetIndexBuffer(0,CrossUp); SetIndexStyle(1,DRAW_ARROW,EMPTY,1); SetIndexArrow(1,234); SetIndexBuffer(1,CrossDown); SetIndexStyle(2,DRAW_ARROW,EMPTY,1); SetIndexArrow(2,233); SetIndexBuffer(2,CrossPUp); SetIndexStyle(3,DRAW_ARROW,EMPTY,1); SetIndexArrow(3,234); SetIndexBuffer(3,CrossPDown); return(0); } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { for(int i=0;i<Bars;i++) { ObjectDelete("first"+i); ObjectDelete("fifth"+i); ObjectDelete("nineth"+i); ObjectDelete("thirteenth"+i); } return(0); } //+------------------------------------------------------------------+ //| Mm Counts | //+------------------------------------------------------------------+ int start() { int iadu;int iadd; double ru=0.5,rd=0.25; if(Period()==PERIOD_M1){iadu=1;iadd=3;} if(Period()==PERIOD_M5){iadu=2;iadd=7;} if(Period()==PERIOD_M15){iadu=2;iadd=12;} if(Period()==PERIOD_M30){iadu=2;iadd=20;} if(Period()==PERIOD_H1){iadu=4;iadd=25;} if(Period()==PERIOD_H4){iadu=8;iadd=60;} if(Period()==PERIOD_D1){iadu=8;iadd=80;} double adu=Point*iadu; double add=Point*iadd; if(ShowNumbers==false){adu=0;add=0;ru=0.5;rd=0.5;} int limit,counter; int counted_bars=IndicatorCounted(); if(counted_bars<0)return(-1); if(counted_bars>0)counted_bars--; limit=Bars-counted_bars+10; for(int i=limit;i>0;i--) { counter=i; Range=0; AvgRange=0; for(counter=i;counter<=i+9;counter++) { AvgRange=AvgRange+MathAbs(High[counter]-Low[counter]); } Range=AvgRange/10; //|---------buy if(Close[i]<Close[i+4] && Close[i+1]>Close[i+5]) { if(ShowNumbers) { ObjectCreate("first"+i,OBJ_TEXT,0,Time[i],Low[i]-adu); ObjectSetText("first"+i,""+1,10,"Arial",First); } } if(Close[i]<Close[i+4] && Close[i+1]<Close[i+5] && Close[i+2]<Close[i+6] && Close[i+3]<Close[i+7] && Close[i+4]<Close[i+8] && Close[i+5]>Close[i+9]) { if(ShowArrows||UseAlerts)CrossUp[i]=Low[i]-adu-Range*ru; if(ShowNumbers) { ObjectCreate("fifth"+i,OBJ_TEXT,0,Time[i],Low[i]-adu); ObjectSetText("fifth"+i,""+5,14,"Arial",Buy); } } if(Close[i]<Close[i+4] && Close[i+1]<Close[i+5] && Close[i+2]<Close[i+6] && Close[i+3]<Close[i+7] && Close[i+4]<Close[i+8] && Close[i+5]<Close[i+9] && Close[i+6]<Close[i+10] && Close[i+7]<Close[i+11] && Close[i+8]<Close[i+12] && Close[i+9]>Close[i+13] && !((Low[i]<Low[i+3] && Low[i]<Low[i+4])||(Low[i+1]<Low[i+3] && Low[i+1]<Low[i+4]))) { if(ShowArrows||UseAlerts)CrossUp[i]=Low[i]-adu-Range*ru; if(ShowNumbers) { ObjectCreate("nineth"+i,OBJ_TEXT,0,Time[i],Low[i]-adu); ObjectSetText("nineth"+i,""+9,14,"Arial",Buy); } } if(Close[i]<Close[i+4] && Close[i+1]<Close[i+5] && Close[i+2]<Close[i+6] && Close[i+3]<Close[i+7] && Close[i+4]<Close[i+8] && Close[i+5]<Close[i+9] && Close[i+6]<Close[i+10] && Close[i+7]<Close[i+11] && Close[i+8]<Close[i+12] && Close[i+9]>Close[i+13] && ((Low[i]<Low[i+3] && Low[i]<Low[i+4])||(Low[i+1]<Low[i+3] && Low[i+1]<Low[i+4]))) { if(ShowArrows||UseAlerts)CrossPUp[i]=Low[i]-adu-Range*ru; if(ShowNumbers) { ObjectCreate("nineth"+i,OBJ_TEXT,0,Time[i],Low[i]-adu); ObjectSetText("nineth"+i,""+9,14,"Arial",PerfectBuy); } } if(Close[i]<=High[i+2] && Close[i+1]<=High[i+3] && Close[i+2]<=High[i+4] && Close[i+3]<=High[i+5] && Close[i+4]<=High[i+6] && Close[i+5]<=High[i+7] && Close[i+6]<=High[i+8] && Close[i+7]<=High[i+9] && Close[i+8]<=High[i+10] && Close[i+9]<=High[i+11] && Close[i+10]<=High[i+12] && Close[i+11]<=High[i+13] && Close[i+12]<=High[i+14] && Close[i+13]>High[i+15] && !(Low[i]<=Close[i+5])) { if(ShowArrows||UseAlerts)CrossUp[i]=Low[i]-adu-Range*ru; if(ShowNumbers) { ObjectCreate("thirteenth"+i,OBJ_TEXT,0,Time[i],Low[i]-adu); ObjectSetText("thirteenth"+i,""+13,14,"Arial",Buy); } } if(Close[i]<=High[i+2] && Close[i+1]<=High[i+3] && Close[i+2]<=High[i+4] && Close[i+3]<=High[i+5] && Close[i+4]<=High[i+6] && Close[i+5]<=High[i+7] && Close[i+6]<=High[i+8] && Close[i+7]<=High[i+9] && Close[i+8]<=High[i+10] && Close[i+9]<=High[i+11] && Close[i+10]<=High[i+12] && Close[i+11]<=High[i+13] && Close[i+12]<=High[i+14] && Close[i+13]>High[i+15] && Low[i]<=Close[i+5]) { if(ShowArrows||UseAlerts)CrossPUp[i]=Low[i]-adu-Range*ru; if(ShowNumbers) { ObjectCreate("thirteenth"+i,OBJ_TEXT,0,Time[i],Low[i]-adu); ObjectSetText("thirteenth"+i,""+13,14,"Arial",PerfectBuy); } } //|---------sell if(Close[i]>Close[i+4] && Close[i+1]<Close[i+5]) { if(ShowNumbers) { ObjectCreate("first"+i,OBJ_TEXT,0,Time[i],High[i]+add); ObjectSetText("first"+i,""+1,10,"Arial",First); } } if(Close[i]>Close[i+4] && Close[i+1]>Close[i+5] && Close[i+2]>Close[i+6] && Close[i+3]>Close[i+7] && Close[i+4]>Close[i+8] && Close[i+5]<Close[i+9]) { if(ShowArrows||UseAlerts)CrossDown[i]=High[i]+add+Range*rd; if(ShowNumbers) { ObjectCreate("fifth"+i,OBJ_TEXT,0,Time[i],High[i]+add); ObjectSetText("fifth"+i,""+5,14,"Arial",Sell); } } if(Close[i]>Close[i+4] && Close[i+1]>Close[i+5] && Close[i+2]>Close[i+6] && Close[i+3]>Close[i+7] && Close[i+4]>Close[i+8] && Close[i+5]>Close[i+9] && Close[i+6]>Close[i+10] && Close[i+7]>Close[i+11] && Close[i+8]>Close[i+12] && Close[i+9]<Close[i+13] && !((High[i]>High[i+3] && High[i]>High[i+4])||(High[i+1]>High[i+3] && High[i+1]>High[i+4]))) { if(ShowArrows||UseAlerts)CrossDown[i]=High[i]+add+Range*rd; if(ShowNumbers) { ObjectCreate("nineth"+i,OBJ_TEXT,0,Time[i],High[i]+add); ObjectSetText("nineth"+i,""+9,14,"Arial",Sell); } } if(Close[i]>Close[i+4] && Close[i+1]>Close[i+5] && Close[i+2]>Close[i+6] && Close[i+3]>Close[i+7] && Close[i+4]>Close[i+8] && Close[i+5]>Close[i+9] && Close[i+6]>Close[i+10] && Close[i+7]>Close[i+11] && Close[i+8]>Close[i+12] && Close[i+9]<Close[i+13] && ((High[i]>High[i+3] && High[i]>High[i+4])||(High[i+1]>High[i+3] && High[i+1]>High[i+4]))) { if(ShowArrows||UseAlerts)CrossPDown[i]=High[i]+add+Range*rd; if(ShowNumbers) { ObjectCreate("nineth"+i,OBJ_TEXT,0,Time[i],High[i]+add); ObjectSetText("nineth"+i,""+9,14,"Arial",PerfectSell); } } if(Close[i]>=Low[i+2] && Close[i+1]>=Low[i+3] && Close[i+2]>=Low[i+4] && Close[i+3]>=Low[i+5] && Close[i+4]>=Low[i+6] && Close[i+5]>=Low[i+7] && Close[i+6]>=Low[i+8] && Close[i+7]>=Low[i+9] && Close[i+8]>=Low[i+10] && Close[i+9]>=Low[i+11] && Close[i+10]>=Low[i+12] && Close[i+11]>=Low[i+13] && Close[i+12]>=Low[i+14] && Close[i+13]<Low[i+15] && !(High[i]>=Close[i+5])) { if(ShowArrows||UseAlerts)CrossDown[i]=High[i]+add+Range*rd; if(ShowNumbers) { ObjectCreate("thirteenth"+i,OBJ_TEXT,0,Time[i],High[i]+add); ObjectSetText("thirteenth"+i,""+13,14,"Arial",Sell); } } if(Close[i]>=Low[i+2] && Close[i+1]>=Low[i+3] && Close[i+2]>=Low[i+4] && Close[i+3]>=Low[i+5] && Close[i+4]>=Low[i+6] && Close[i+5]>=Low[i+7] && Close[i+6]>=Low[i+8] && Close[i+7]>=Low[i+9] && Close[i+8]>=Low[i+10] && Close[i+9]>=Low[i+11] && Close[i+10]>=Low[i+12] && Close[i+11]>=Low[i+13] && Close[i+12]>=Low[i+14] && Close[i+13]<Low[i+15] && High[i]>=Close[i+5]) { if(ShowArrows||UseAlerts)CrossPDown[i]=High[i]+add+Range*rd; if(ShowNumbers) { ObjectCreate("thirteenth"+i,OBJ_TEXT,0,Time[i],High[i]+add); ObjectSetText("thirteenth"+i,""+13,14,"Arial",PerfectSell); } } //|---------alerts if((CrossUp[0]>2000) && (CrossDown[0]>2000) && (CrossPUp[0]>2000) && (CrossPDown[0]>2000)){prevtime=0;} if((CrossUp[0]==Low[i]-adu-Range*ru) && (prevtime!=Time[0]) && UseAlerts) { prevtime=Time[0]; Alert(Symbol()," Mm Counts Up @ Hour ",Hour()," Minute ",Minute()); PlaySound("alert.wav"); SendMail(" Mm Counts Alert "," Signal Up, Symbol=" +Symbol()+ ", Period="+Period()); } if((CrossDown[0]==High[i]+add+Range*rd) && (prevtime!=Time[0]) && UseAlerts) { prevtime=Time[0]; Alert(Symbol()," Mm Counts Down @ Hour ",Hour()," Minute ",Minute()); PlaySound("alert.wav"); SendMail(" Mm Counts Alert "," Signal Down, Symbol="+Symbol()+", Period="+Period()); } if((CrossPUp[0]==Low[i]-adu-Range*ru) && (prevtime!=Time[0]) && UseAlerts) { prevtime=Time[0]; Alert(Symbol()," Mm Counts Perfect Up @ Hour ",Hour()," Minute ",Minute()); PlaySound("alert.wav"); SendMail(" Mm Counts Alert "," Perfect Signal Up, Symbol="+Symbol()+", Period="+Period()); } if((CrossPDown[0]==High[i]+add+Range*rd) && (prevtime!=Time[0]) && UseAlerts) { prevtime=Time[0]; Alert(Symbol()," Mm Counts Perfect Down @ Hour ",Hour()," Minute ",Minute()); PlaySound("alert.wav"); SendMail(" Mm Counts Alert "," Perfect Signal Down, Symbol="+Symbol()+", Period="+Period()); } } return(0); } //+------------------------------------------------------------------+Et enfin une capture pour visualiser la strat.
Ca serait merveilleux de pouvoir transcrire ces indicateurs sous PRT.
Un grand merci par avance à celui qui réussira cette prouesse.
Bonjour Nicolas
Désolé pour l’erreur d’inattention.
Voici les fichiers MQ4 ainsi qu’une autre capture.
Je me sers de ces indicateurs comme support/resistance. Lorsque le cours arrive dans l’une des deux zones je prends en sens inverse.
J’ai un indicateur similaire, peut-être que cela aide à comparer ce que les deux faire.
2 images avec SupDem et l’indicateur que je utilise.J’ai réussi à faire ça rapidement, c’est dynamique, c’est à dire que les zones s’affichent en fonction du prix actuel et des positions des derniers ‘peaks and valleys’ du zigzag.
Par contre, il n’y a pas de confrontation entre une zone qui existe et une nouvelle détecté. C’est là où il faudrait creuser ..
Exemple dramatique sur le DAX en 1 heure, certes avec des zigzag de 0.5 percent seulement. On remarque bien la superposition des zones de supports et résistances, je suppose que je devrai faire 2 boucles, une pour rassembler mes données de zones et une autre pour valider ou non leurs tracements et éviter de retracer toutes ces zones si elles se chevauchent.. bref ça n’est que visuel finalement .. à voir !
- You must be logged in to reply to this topic.
New Reply
Author
Summary
This topic contains 27 replies,
has 6 voices, and was last updated by 
6 years, 5 months ago.
Topic Details
| Forum: | ProBuilder : Indicateurs & Outils Personnalisés |
| Language: | French |
| Started: | 10/09/2017 |
| Status: | Active |
| Attachments: | 14 files |
Loading...