//+------------------------------------------------------------------+ //| WPR_3HTF.mq5 | //| Copyright © 2013, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2013, Nikolay Kositsin" #property link "farria@mail.redcom.ru" //--- indicator version number #property version "1.10" #property description "Three WPR oscillators with different timeframes with the same parameters on one chart." //--- drawing indicator in a separate window #property indicator_separate_window //--- number of indicator buffers 3 #property indicator_buffers 3 //--- three plots are used #property indicator_plots 3 //+----------------------------------------------+ //| declaring constants | //+----------------------------------------------+ #define RESET 0 // A constant for returning the indicator recalculation command to the terminal #define INDICATOR_NAME "WPR" // A constant for the indicator name #define SIZE 3 // A constant for the number of calls of the CountIndicator function in the code //+----------------------------------------------+ //| Indicator 1 drawing parameters | //+----------------------------------------------+ //--- drawing indicator 1 as a line #property indicator_type1 DRAW_LINE //--- the color of the indicator #property indicator_color1 clrDodgerBlue //--- indicator 1 line width is equal to 2 #property indicator_width1 2 //--- displaying the indicator label #property indicator_label1 "WPR 1" //+----------------------------------------------+ //| Indicator 2 drawing parameters | //+----------------------------------------------+ //--- drawing the indicator 2 as a line #property indicator_type2 DRAW_LINE //--- the color of the indicator #property indicator_color2 clrGold //--- thickness of the indicator 2 line is equal to 3 #property indicator_width2 3 //--- displaying the indicator label #property indicator_label2 "WPR 2" //+----------------------------------------------+ //| Indicator 3 drawing parameters | //+----------------------------------------------+ //--- drawing indicator 3 as line #property indicator_type3 DRAW_LINE //--- the color of the indicator #property indicator_color3 clrMediumVioletRed //--- width of the indicator 3 line is equal to 5 #property indicator_width3 5 //--- displaying the indicator label #property indicator_label3 "WPR 3" //+----------------------------------------------+ //| Parameters of displaying horizontal levels | //+----------------------------------------------+ #property indicator_level1 -20.0 #property indicator_level2 -50.0 #property indicator_level3 -80.0 #property indicator_levelcolor Gray #property indicator_levelstyle STYLE_DASHDOTDOT //+-------------------------------------+ //| Indicator input parameters | //+-------------------------------------+ input ENUM_TIMEFRAMES TimeFrame1=PERIOD_M30; // Indicator 1 chart period (smallest timeframe) input ENUM_TIMEFRAMES TimeFrame2=PERIOD_H1; // Indicator 2 chart period (medium timeframe) input ENUM_TIMEFRAMES TimeFrame3=PERIOD_H4; // Indicator 3 chart period (highest timeframe) input uint WPRPeriod=14; 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[]; //--- Declaration of integer variables of data starting point int min_rates_total; //--- Declaration of integer variables for indicators handles int Ind1_Handle,Ind2_Handle,Ind3_Handle; //+------------------------------------------------------------------+ //| Getting a timeframe as a line | //+------------------------------------------------------------------+ string GetStringTimeframe(ENUM_TIMEFRAMES timeframe) {return(StringSubstr(EnumToString(timeframe),7,-1));} //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int OnInit() { //--- Checking correctness of the chart periods if(!TimeFramesCheck(INDICATOR_NAME,TimeFrame1,TimeFrame2,TimeFrame3)) return(INIT_FAILED); //--- initialization of variables min_rates_total=2; //--- getting handle of the WPR 1 indicator Ind1_Handle=iWPR(Symbol(),TimeFrame1,WPRPeriod); if(Ind1_Handle==INVALID_HANDLE) { Print(" Failed to get handle of the WPR 1 indicator"); return(INIT_FAILED); } //--- getting handle of the WPR 2 indicator Ind2_Handle=iWPR(Symbol(),TimeFrame2,WPRPeriod); if(Ind2_Handle==INVALID_HANDLE) { Print(" Failed to get handle of the WPR 2 indicator"); return(INIT_FAILED); } //--- getting handle of the WPR 3 indicator Ind3_Handle=iWPR(Symbol(),TimeFrame3,WPRPeriod); if(Ind3_Handle==INVALID_HANDLE) { Print(" Failed to get handle of the WPR 3 indicator"); return(INIT_FAILED); } //--- initialize indicator buffers IndInit(0,Ind1Buffer,0.0,min_rates_total,Shift); IndInit(1,Ind2Buffer,0.0,min_rates_total,Shift); IndInit(2,Ind3Buffer,0.0,min_rates_total,Shift); //--- creating a name for displaying in a separate sub-window and in tooltip string shortname; StringConcatenate(shortname,INDICATOR_NAME,"(", GetStringTimeframe(TimeFrame1),", ", GetStringTimeframe(TimeFrame2),", ", GetStringTimeframe(TimeFrame3),", ", WPRPeriod,")"); IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- Set accuracy of displaying for the indicator values IndicatorSetInteger(INDICATOR_DIGITS,0); //--- 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 the number of bars to be enough for 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 cycle of calculation of the indicator for(int bar=limit; bar>=0 && !IsStopped(); bar--) { //--- zero out the contents of the indicator buffers for the calculation IndBuf[bar]=0.0; //--- 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]