//+------------------------------------------------------------------+ //| FractalChannel_v1.mq4 | //| Copyright 2005, TrendLaboratory Ltd. | //| E-mail: igorad2004@list.ru | //+------------------------------------------------------------------+ #property copyright "Copyright 2005, TrendLaboratory Ltd." #property link "E-mail: igorad2004@list.ru" #property indicator_chart_window #property indicator_buffers 3 #property indicator_color1 DodgerBlue #property indicator_color2 DodgerBlue #property indicator_color3 DodgerBlue //---- input parameters extern int ChannelType=1; extern double Margins=0; extern double Advance=0; extern int OpenClose=0; //---- buffers double UpBuffer[]; double DnBuffer[]; double MdBuffer[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { string short_name; //---- indicator line SetIndexStyle(0,DRAW_LINE); SetIndexStyle(1,DRAW_LINE); SetIndexStyle(2,DRAW_LINE,2); SetIndexBuffer(0,UpBuffer); SetIndexBuffer(1,DnBuffer); SetIndexBuffer(2,MdBuffer); //---- name for DataWindow and indicator subwindow label short_name="Fractal Channel("+ChannelType+")"; IndicatorShortName(short_name); SetIndexLabel(0,"Up Channel"); SetIndexLabel(1,"Down Channel"); SetIndexLabel(2,"Middle Channel"); //---- SetIndexDrawBegin(0,2*ChannelType); SetIndexDrawBegin(1,2*ChannelType); SetIndexDrawBegin(2,2*ChannelType); //---- return(0); } //+------------------------------------------------------------------+ //| FractalChannel_v1 | //+------------------------------------------------------------------+ int start() { int shift; double v1,v2,smax,smin, High0,High1,High2,High3,High4,High5,High6, Low0,Low1,Low2,Low3,Low4,Low5,Low6; for (shift=Bars-1-2*ChannelType;shift>=0;shift--) { v1=-1; v2=-1; High0=High[shift]; High1=High[shift+1]; High2=High[shift+2]; High3=High[shift+3]; High4=High[shift+4]; High5=High[shift+5]; High6=High[shift+6]; Low0=Low[shift]; Low1=Low[shift+1]; Low2=Low[shift+2]; Low3=Low[shift+3]; Low4=Low[shift+4]; Low5=Low[shift+5]; Low6=Low[shift+6]; if (OpenClose>0) { High0=MathMax(Close[shift],Open[shift]); High1=MathMax(Close[shift+1],Open[shift+1]); High2=MathMax(Close[shift+2],Open[shift+2]); High3=MathMax(Close[shift+3],Open[shift+3]); High4=MathMax(Close[shift+4],Open[shift+4]); High5=MathMax(Close[shift+5],Open[shift+5]); High6=MathMax(Close[shift+6],Open[shift+6]); Low0=MathMin(Close[shift],Open[shift]); Low1=MathMin(Close[shift+1],Open[shift+1]); Low2=MathMin(Close[shift+2],Open[shift+2]); Low3=MathMin(Close[shift+3],Open[shift+3]); Low4=MathMin(Close[shift+4],Open[shift+4]); Low5=MathMin(Close[shift+5],Open[shift+5]); Low6=MathMin(Close[shift+6],Open[shift+6]); } if (ChannelType==1) { if (High2<=High1 && High0=Low1 && Low0>Low1) v2=Low1; } if (ChannelType==2) { if (High4<=High2 && High3<=High2 && High0=Low2 && Low3>=Low2 && Low0>Low2 && Low1>Low2) v2=Low2; } if (ChannelType==3) { if (High6<=High3 && High5<=High3 && High4<=High3 && High0=Low3 && Low5>=Low3 && Low4>=Low3 && Low0>Low3 && Low1>Low3 && Low2>Low3) v2=Low3; } if ( v1>0 ) smax=v1; if (High0>smax) smax=High0; if ( v2>0 ) smin=v2; if (Low0