//+------------------------------------------------------------------+ //| MTF_PSAR.mq4 | //| Copyright © 2006, Keris2112 | //| | //+------------------------------------------------------------------+ #property copyright "Copyright © 2006, Keris2112" #property link "http://www.forex-tsd.com" #property indicator_separate_window #property indicator_buffers 2 #property indicator_color1 Teal #property indicator_color2 Magenta //---- input parameters /************************************************************************* PERIOD_M1 1 PERIOD_M5 5 PERIOD_M15 15 PERIOD_M30 30 PERIOD_H1 60 PERIOD_H4 240 PERIOD_D1 1440 PERIOD_W1 10080 PERIOD_MN1 43200 You must use the numeric value of the timeframe that you want to use when you set the TimeFrame' value with the indicator inputs. **************************************************************************/ extern int TimeFrame=0; extern double Step=0.02; extern double Maximum=0.2; extern string note_Price = "0C,1O 2H3L,4Md 5Tp 6WghC: Md(HL/2)4,Tp(HLC/3)5,Wgh(HLCC/4)6"; extern string TimeFrames = "M1;5,15,30,60H1;240H4;1440D1;10080W1;43200MN|0-CurrentTF"; double ExtMapBuffer1[]; double ExtMapBuffer2[]; double ExtMapBuffer3[]; double ExtMapBuffer4[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { IndicatorBuffers(4); //---- indicator line SetIndexBuffer(0,ExtMapBuffer1); SetIndexStyle(0,DRAW_ARROW); SetIndexArrow(0,159); SetIndexEmptyValue(0,EMPTY_VALUE); SetIndexBuffer(1,ExtMapBuffer2); SetIndexStyle(1,DRAW_ARROW); SetIndexArrow(1,159); SetIndexEmptyValue(1,EMPTY_VALUE); SetIndexBuffer(2,ExtMapBuffer3); SetIndexStyle (2,DRAW_NONE); SetIndexEmptyValue(2,EMPTY_VALUE); SetIndexBuffer(3,ExtMapBuffer4); SetIndexStyle (3,DRAW_NONE); SetIndexEmptyValue(3,EMPTY_VALUE); //---- name for DataWindow and indicator subwindow label switch(TimeFrame) { case 1 : string TimeFrameStr="M1"; break; case 5 : TimeFrameStr="M5"; break; case 15 : TimeFrameStr="M15"; break; case 30 : TimeFrameStr="M30"; break; case 60 : TimeFrameStr="H1"; break; case 240 : TimeFrameStr="H4"; break; case 1440 : TimeFrameStr="D1"; break; case 10080 : TimeFrameStr="W1"; break; case 43200 : TimeFrameStr="MN1"; break; default : TimeFrameStr="TF0"; } TimeFrame=MathMax(TimeFrame,Period()); IndicatorShortName("PSAR ["+TimeFrameStr+"]"); } //---- return(0); //+------------------------------------------------------------------+ //| MTF Parabolic Sar | //+------------------------------------------------------------------+ int start() { datetime TimeArray[]; int i,y,limit,counted_bars=IndicatorCounted(); // Plot defined time frame on to current time frame ArrayCopySeries(TimeArray,MODE_TIME,Symbol(),TimeFrame); limit=Bars-counted_bars+TimeFrame/Period(); for(i=0,y=0;i<limit;i++) { if (Time[i]<TimeArray[y]) y++; /*********************************************************** Add your main indicator loop below. You can add the full indicator code or you can just reference an existing indicator with its iValue or iCustom. Rule 1: Add extern inputs above for all neccesary values Rule 2: Use 'TimeFrame' for the indicator time frame Rule 3: Use 'y' for your indicator's shift value **********************************************************/ ExtMapBuffer3[i]=iSAR(NULL,TimeFrame,Step,Maximum,y); ExtMapBuffer4[i] = iHigh(NULL,TimeFrame,y); if(ExtMapBuffer3[i] >= ExtMapBuffer4[i]) { ExtMapBuffer1[i] = ExtMapBuffer3[i]; } else { ExtMapBuffer2[i] = ExtMapBuffer3[i]; } } return(0); } //+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Series array that contains the highest prices of each bar
Indicator Curves created:
Implements a curve of type DRAW_ARROW
Indicators Used:
Parabolic Stop and Reverse system
Custom Indicators Used:
Order Management characteristics:
Other Features: