//+---------------------------------------------------------------------+ //| MTF_MA_v1L. mq4 MTF_MovingAverage_v1.mq4 Igorad | //| mtf ma + Levels (I/O) Copyright © 2006, Keris2112 | //| IgorAd www.forex-tsd.com ik | //+---------------------------------------------------------------------+ #property copyright "Copyright © 2006, Keris2112" #property link "http://www.forex-tsd.com" #property indicator_chart_window #property indicator_buffers 7 #property indicator_color1 DarkSlateGray #property indicator_color2 DarkSlateGray #property indicator_color3 SlateGray #property indicator_color4 SlateGray #property indicator_color5 Silver #property indicator_color6 Silver #property indicator_color7 Blue #property indicator_width7 2 //---- 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. --------------------------------------- PRICE_CLOSE 0 Close price. PRICE_OPEN 1 Open price. PRICE_HIGH 2 High price. PRICE_LOW 3 Low price. PRICE_MEDIAN 4 Median price, (high+low)/2. PRICE_TYPICAL 5 Typical price, (high+low+close)/3. PRICE_WEIGHTED 6 Weighted close price, (high+low+close+close)/4. You must use the numeric value of the Applied Price that you want to use when you set the 'applied_price' value with the indicator inputs. --------------------------------------- MODE_SMA 0 Simple moving average, MODE_EMA 1 Exponential moving average, MODE_SMMA 2 Smoothed moving average, MODE_LWMA 3 Linear weighted moving average. You must use the numeric value of the MA Method that you want to use when you set the 'ma_method' value with the indicator inputs. **************************************************************************/ extern int TimeFrame=0; extern string Currency; extern int MAPeriod=34; extern int ma_method=1; extern int applied_price=PRICE_CLOSE; extern int ma_shift=0; extern int ma_x_shift=0; extern color MA_Color=Blue; extern int MA_width=2; extern int MaxBarsToCount = 1500; extern bool UseLevels=false; extern int Level0= 7; extern int Level1=-7; extern int Level2=0; extern int Level3=0; extern int Level4=0; extern int Level5=0; // extern string note_Price = "0O,1C 2H3L,4Md 5Tp 6WghC: Md(HL/2)4,Tp(HLC/3)5,Wgh(HLCC/4)6"; extern string MA_Method = "SMA0 EMA1 SMMA2 LWMA3"; extern string TimeFrames = "M1;5,15,30,60H1;240H4;1440D1;10080W1;43200MN"; // double ExtMapBuffer1[]; double ExtMapBuffer2[]; double ExtMapBuffer3[]; double ExtMapBuffer4[]; double ExtMapBuffer5[]; double ExtMapBuffer6[]; double ExtMapBuffer7[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { string short_name; //---- indicator line SetIndexBuffer(0,ExtMapBuffer1); SetIndexStyle(0,DRAW_LINE,STYLE_DOT); SetIndexBuffer(1,ExtMapBuffer2); SetIndexStyle(1,DRAW_LINE,STYLE_DOT); SetIndexBuffer(2,ExtMapBuffer3); SetIndexStyle(2,DRAW_LINE,STYLE_DOT); SetIndexBuffer(3,ExtMapBuffer4); SetIndexStyle(3,DRAW_LINE,STYLE_DOT); SetIndexBuffer(4,ExtMapBuffer5); SetIndexStyle(4,DRAW_LINE,STYLE_DOT); SetIndexBuffer(5,ExtMapBuffer6); SetIndexStyle(5,DRAW_LINE,STYLE_DOT); SetIndexBuffer(6,ExtMapBuffer7); SetIndexStyle(6,DRAW_LINE,STYLE_SOLID,MA_width,MA_Color); // if(TimeFrame==0) TimeFrame = Period(); SetIndexShift(0,ma_shift+ ma_x_shift*TimeFrame/Period()); SetIndexShift(1,ma_shift+ ma_x_shift*TimeFrame/Period()); SetIndexShift(2,ma_shift+ ma_x_shift*TimeFrame/Period()); SetIndexShift(3,ma_shift+ ma_x_shift*TimeFrame/Period()); SetIndexShift(4,ma_shift+ ma_x_shift*TimeFrame/Period()); SetIndexShift(5,ma_shift+ ma_x_shift*TimeFrame/Period()); SetIndexShift(6,ma_shift+ ma_x_shift*TimeFrame/Period()); // SetIndexLabel(0,"MTF_MAv1L("+MAPeriod+"),tf"+TimeFrame+".Level_0"+Level0+""); SetIndexLabel(1,"MTF_MAv1L("+MAPeriod+"),tf"+TimeFrame+".Level_1"+Level1+""); SetIndexLabel(2,"MTF_MAv1L("+MAPeriod+"),tf"+TimeFrame+".Level_2"+Level2+""); SetIndexLabel(3,"MTF_MAv1L("+MAPeriod+"),tf"+TimeFrame+".Level_3"+Level3+""); SetIndexLabel(4,"MTF_MAv1L("+MAPeriod+"),tf"+TimeFrame+".Level_4"+Level4+""); SetIndexLabel(5,"MTF_MAv1L("+MAPeriod+"),tf"+TimeFrame+".Level_5"+Level5+""); SetIndexLabel(6,"MTF_MAv1L("+MAPeriod+"),"+ma_method+",tf"+TimeFrame+" s"+ma_x_shift+""); //---- name for DataWindow and indicator subwindow label switch(ma_method) { case 1 : short_name=" EMA("; break; case 2 : short_name=" SMMA("; break; case 3 : short_name=" LWMA("; break; default : short_name=" SMA("; } switch(TimeFrame) { case 1 : string TimeFrameStr="Period_M1"; break; case 5 : TimeFrameStr="Period_M5"; break; case 15 : TimeFrameStr="Period_M15"; break; case 30 : TimeFrameStr="Period_M30"; break; case 60 : TimeFrameStr="Period_H1"; break; case 240 : TimeFrameStr="Period_H4"; break; case 1440 : TimeFrameStr="Period_D1"; break; case 10080 : TimeFrameStr="Period_W1"; break; case 43200 : TimeFrameStr="Period_MN1"; break; default : TimeFrameStr="Current Timeframe"; } IndicatorShortName(Currency + short_name + MAPeriod+") "+TimeFrameStr +" |"); if (TimeFrame < Period()) TimeFrame = Period(); } //---- return(0); //+------------------------------------------------------------------+ //| MTF Moving Average + Levels (I/O) | //+------------------------------------------------------------------+ int start() { datetime TimeArray[]; int i,shift,limit,y=0,counted_bars=IndicatorCounted(); // Plot defined timeframe on to current timeframe ArrayCopySeries(TimeArray,MODE_TIME,Symbol(),TimeFrame); limit = Bars-counted_bars; limit = MathMax (limit,TimeFrame/Period()); limit= MathMin(limit,MaxBarsToCount); for(i=0,y=0;i<limit;i++) { if (Time[i]<TimeArray[y]) y++; /*********************************************************** Add your main indicator loop below. You can reference an existing indicator with its iName or iCustom. Rule 1: Add extern inputs above for all neccesary values Rule 2: Use 'TimeFrame' for the indicator timeframe Rule 3: Use 'y' for the indicator's shift value **********************************************************/ ExtMapBuffer7[i]=iMA(Currency,TimeFrame,MAPeriod,ma_shift,ma_method,applied_price,y) ; if(UseLevels) { ExtMapBuffer1[i]=(ExtMapBuffer7[i]+(Level0*Point)); ExtMapBuffer2[i]=(ExtMapBuffer7[i]+(Level1*Point)); ExtMapBuffer3[i]=(ExtMapBuffer7[i]+(Level2*Point)); ExtMapBuffer4[i]=(ExtMapBuffer7[i]+(Level3*Point)); ExtMapBuffer5[i]=(ExtMapBuffer7[i]+(Level4*Point)); ExtMapBuffer6[i]=(ExtMapBuffer7[i]+(Level5*Point)); } } //---- Refresh buffers +++++++++++++++++++++++++ upgrade by Raff if (TimeFrame>Period()) { int PerINT=TimeFrame/Period()+1; datetime TimeArr[]; ArrayResize(TimeArr,PerINT); ArrayCopySeries(TimeArr,MODE_TIME,Symbol(),Period( )); for(i=0;i<PerINT+1;i++) {if (TimeArr[i]>=TimeArray[0]) { /************************************************** ****** Refresh buffers: buffer[i] = buffer[0]; ************************************************** ******/ ExtMapBuffer1[i]= ExtMapBuffer1[0]; ExtMapBuffer2[i]= ExtMapBuffer2[0]; ExtMapBuffer3[i]= ExtMapBuffer3[0]; ExtMapBuffer4[i]= ExtMapBuffer4[0]; ExtMapBuffer5[i]= ExtMapBuffer5[0]; ExtMapBuffer6[i]= ExtMapBuffer6[0]; ExtMapBuffer7[i]= ExtMapBuffer7[0]; } } } //+++++++++++++++++++++++++++++++++++++++++++++ Raff return(0); } //+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Indicator Curves created:
Implements a curve of type DRAW_LINE
Indicators Used:
Moving average indicator
Custom Indicators Used:
Order Management characteristics:
Other Features: