//+---------------------------------------------------------------------+ //| BlauCMI.mq5 | //| Copyright © 2013, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+---------------------------------------------------------------------+ //| Place the SmoothAlgorithms.mqh file | //| in the directory: terminal_data_folder\MQL5\Include | //+---------------------------------------------------------------------+ //---- author of the indicator #property copyright "Copyright © 2013, Nikolay Kositsin" //---- link to the website of the author #property link "farria@mail.redcom.ru" #property description "Candle Momentum Index" //---- indicator version number #property version "1.00" //---- draw indicator in a separate window #property indicator_separate_window //---- two buffers are used for calculation and drawing the indicator #property indicator_buffers 2 //---- two plots are used #property indicator_plots 2 //+----------------------------------------------+ //| Indicator 1 drawing parameters | //+----------------------------------------------+ //---- draw the indicator as a four-color histogram #property indicator_type1 DRAW_COLOR_HISTOGRAM //---- colors of the five-color histogram are as follows #property indicator_color1 clrDeepPink,clrOrange,clrGray,clrYellowGreen,clrTeal //---- indicator line is a solid one #property indicator_style1 STYLE_SOLID //---- indicator line width is 2 #property indicator_width1 2 //---- display the indicator label #property indicator_label1 "BlauCMI" //+----------------------------------------------+ //| Parameters of displaying horizontal levels | //+----------------------------------------------+ #property indicator_level1 +25 #property indicator_level2 0 #property indicator_level3 -25 #property indicator_levelcolor clrBlue #property indicator_levelstyle STYLE_DASHDOTDOT //+----------------------------------------------+ //| CXMA class description | //+----------------------------------------------+ #include //---- declaration of the CXMA class variables from the SmoothAlgorithms.mqh file CXMA XMA1,XMA2,XMA3,XMA4,XMA5,XMA6; //+----------------------------------------------+ //| declaration of enumerations | //+----------------------------------------------+ enum Applied_price_ // type of constant { PRICE_CLOSE_ = 1, // Close PRICE_OPEN_, // Open PRICE_HIGH_, // High PRICE_LOW_, // Low PRICE_MEDIAN_, // Median Price (HL/2) PRICE_TYPICAL_, // Typical Price (HLC/3) PRICE_WEIGHTED_, // Weighted Close (HLCC/4) PRICE_SIMPL_, // Simple Price (OC/2) PRICE_QUARTER_, // Quarted Price (HLOC/4) PRICE_TRENDFOLLOW0_, // TrendFollow_1 Price PRICE_TRENDFOLLOW1_, // TrendFollow_2 Price PRICE_DEMARK_ // Demark Price }; //+----------------------------------------------+ //| Indicator input parameters | //+----------------------------------------------+ input Smooth_Method XMA_Method=MODE_EMA; //averaging method input uint XLength=1; // depth of Momentum averaging input uint XLength1=20; // first averaging depth input uint XLength2=5; // second averaging depth input uint XLength3=3; // third averaging depth input int XPhase=15; // smoothing parameter // for JJMA it varies within the range -100 ... +100 and influences the quality of the transient period; // for VIDIA it is a CMO period, for AMA it is a slow average period input Applied_price_ IPC1=PRICE_CLOSE; // close price constant input Applied_price_ IPC2=PRICE_OPEN; // open price constant input int Shift=0; // Horizontal shift of the indicator //---- declaration of dynamic arrays that //---- used as indicator buffers double IndBuffer[],ColorIndBuffer[]; //---- declaration of the integer variables for the start of data calculation int min_rates_total,min_rates_1,min_rates_2,min_rates_3; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //---- initialization of variables of the start of data calculation min_rates_1=int(XLength-1); min_rates_2=min_rates_1+XMA1.GetStartBars(XMA_Method,XLength1,XPhase); min_rates_3=min_rates_2+XMA1.GetStartBars(XMA_Method,XLength2,XPhase); min_rates_total=min_rates_3+XMA1.GetStartBars(XMA_Method,XLength3,XPhase); if(IPC1==IPC2 && XLength==1) Print("Invalid price constant values!"); //---- set IndBuffer dynamic array as an indicator buffer SetIndexBuffer(0,IndBuffer,INDICATOR_DATA); //---- perform the shift of the beginning of the indicator drawing PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //---- setting the indicator values that won't be visible on a chart PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0.0); //---- set dynamic array as a color index buffer SetIndexBuffer(1,ColorIndBuffer,INDICATOR_COLOR_INDEX); //--- creation of the name to be displayed in a separate sub-window and in a pop up help IndicatorSetString(INDICATOR_SHORTNAME,"BlauCMI"); //--- determine the accuracy of displaying the indicator values IndicatorSetInteger(INDICATOR_DIGITS,0); //---- } //+------------------------------------------------------------------+ //| Custom indicator 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[], // price array of price maximums for the indicator calculation const double& low[], // price array of price minimums for the indicator calculation const double &close[], const long &tick_volume[], const long &volume[], const int &spread[]) { //---- check for the sufficiency of bars for the calculation if(rates_totalrates_total || prev_calculated<=0) // check for the first start of calculation of an indicator { first=min_rates_1; // starting number for calculation of all bars } else first=prev_calculated-1; // starting index for calculation of new bars //---- main loop of the indicator calculation for(bar=first; barrates_total || prev_calculated<=0) first++; //---- Main loop of the Ind indicator coloring for(bar=first; bar0) { if(IndBuffer[bar]>IndBuffer[bar-1]) clr=4; if(IndBuffer[bar]IndBuffer[bar-1]) clr=1; } ColorIndBuffer[bar]=clr; } //---- return(rates_total); } //+------------------------------------------------------------------+