//+------------------------------------------------------------------+ //| WATR_HTF.mq5 | //| Copyright © 2013, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2013, Nikolay Kositsin" #property link "farria@mail.redcom.ru" //--- indicator version #property version "1.00" #property description "Indicator WATR with timeframe selection option available in input parameters" //--- drawing the indicator in the main window #property indicator_chart_window //--- number of indicator buffers 4 #property indicator_buffers 4 //--- four plots are used #property indicator_plots 4 //+----------------------------------------------+ //| declaring constants | //+----------------------------------------------+ #define RESET 0 // A constant for returning the indicator recalculation command to the terminal #define INDICATOR_NAME " WATR" // A constant for the indicator name #define SIZE 1 // A constant for the number of calls of the CountIndicator function in the code #define EMPTYVALUE EMPTY_VALUE // A constant for undisplayed indicator values //+----------------------------------------------+ //| Indicator 1 drawing parameters | //+----------------------------------------------+ //--- drawing indicator 1 as a line #property indicator_type1 DRAW_LINE //--- DodgerBlue color is used for the indicator line color #property indicator_color1 clrDodgerBlue //--- the indicator 1 line is a dot-dash one #property indicator_style1 STYLE_DASHDOTDOT //--- indicator 1 line width is equal to 2 #property indicator_width1 2 //--- displaying the indicator label #property indicator_label1 "Up" //+----------------------------------------------+ //| Indicator 2 drawing parameters | //+----------------------------------------------+ //--- drawing indicator 2 as a line #property indicator_type2 DRAW_LINE //--- Coral is used as the color of the indicator line #property indicator_color2 clrCoral //--- the indicator 2 line is a dot-dash one #property indicator_style2 STYLE_DASHDOTDOT //--- indicator 2 line width is equal to 2 #property indicator_width2 2 //--- displaying the indicator label #property indicator_label2 "Down" //+----------------------------------------------+ //| Indicator 3 drawing parameters | //+----------------------------------------------+ //--- drawing the indicator 3 as a label #property indicator_type3 DRAW_ARROW //--- Aqua color is used for the indicator #property indicator_color3 clrAqua //--- indicator 3 width is equal to 4 #property indicator_width3 4 //--- displaying the indicator label #property indicator_label3 "Buy" //+----------------------------------------------+ //| Indicator 4 drawing parameters | //+----------------------------------------------+ //--- drawing the indicator 4 as a label #property indicator_type4 DRAW_ARROW //--- magenta color is used as the color of the indicator #property indicator_color4 clrMagenta //--- indicator 4 width is equal to 4 #property indicator_width4 4 //--- displaying the indicator label #property indicator_label4 "Sell" //+----------------------------------------------+ //| Indicator input parameters | //+----------------------------------------------+ input ENUM_TIMEFRAMES TimeFrame=PERIOD_H4; // Indicator chart period input uint WATR_K = 10; input double WATR_M = 4.0; input uint ATR=21; input int Shift=0; // Horizontal shift of the indicator in bars //+----------------------------------------------+ //--- declaration of dynamic arrays that will be used as indicator buffers double Ind1Buffer[]; double Ind2Buffer[]; double Ind3Buffer[]; double Ind4Buffer[]; //--- declaration of integer variables of data starting point int min_rates_total; //--- declaration of integer variables for the indicators handles int Ind_Handle; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int OnInit() { //--- checking correctness of the chart periods if(!TimeFramesCheck(INDICATOR_NAME,TimeFrame)) return(INIT_FAILED); //--- initialization of variables min_rates_total=2; //--- getting the handle of the WATR indicator Ind_Handle=iCustom(Symbol(),TimeFrame,"WATR",WATR_K,WATR_M,ATR,0); if(Ind_Handle==INVALID_HANDLE) { Print(" Failed to get the handle of the WATR indicator"); return(INIT_FAILED); } //--- initialize indicator buffers IndInit(0,Ind1Buffer,EMPTYVALUE,min_rates_total,Shift); IndInit(1,Ind2Buffer,EMPTYVALUE,min_rates_total,Shift); IndInit(2,Ind3Buffer,EMPTYVALUE,min_rates_total,Shift); IndInit(3,Ind4Buffer,EMPTYVALUE,min_rates_total,Shift); //--- indicator symbol PlotIndexSetInteger(2,PLOT_ARROW,108); PlotIndexSetInteger(3,PLOT_ARROW,108); //--- creation of the name to be displayed in a separate sub-window and in a pop up help string shortname; StringConcatenate(shortname,INDICATOR_NAME,"(",EnumToString(TimeFrame),")"); IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- determining the accuracy of the indicator values IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //--- initialization end return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Custom iteration function | //+------------------------------------------------------------------+ int OnCalculate(const int rates_total, // number of bars in history at the current tick const int prev_calculated,// amount of history in bars at the previous tick const datetime &time[], const double &open[], const double &high[], const double &low[], const double &close[], const long &tick_volume[], const long &volume[], const int &spread[]) { //--- checking if the number of bars is enough for the calculation if(rates_totalRates_Total || Prev_Calculated<=0)// checking for the first start of the indicator calculation { limit=Rates_Total-Min_Rates_Total-1; // starting index for the calculation of all bars LastCountBar[Numb]=limit; } else limit=LastCountBar[Numb]+Rates_Total-Prev_Calculated; // starting index for calculation of new bars //--- main calculation loop of the indicator for(int bar=limit; bar>=0 && !IsStopped(); bar--) { //--- Zero out the contents of the indicator buffers for the calculation UpIndBuf[bar]=EMPTYVALUE; DnIndBuf[bar]=EMPTYVALUE; BuyIndBuf[bar]=EMPTYVALUE; SellIndBuf[bar]=EMPTYVALUE; //--- Copy new data to the IndTime array if(CopyTime(Symbol(),TFrame,iTime[bar],1,IndTime)<=0) return(RESET); if(iTime[bar]>=IndTime[0] && iTime[bar+1]