//+------------------------------------------------------------------+ //| XWPR_Histogram_Vol_HTF.mq5 | //| Copyright © 2018, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2018, Nikolay Kositsin" #property link "farria@mail.redcom.ru" //--- номер версии индикатора #property version "1.10" //---- отрисовка индикатора в отдельном окне #property indicator_separate_window //---- количество индикаторных буферов 6 #property indicator_buffers 6 //---- использовано всего пять графических построений #property indicator_plots 5 //+----------------------------------------------+ //| объявление констант | //+----------------------------------------------+ #define RESET 0 // Константа для возврата терминалу команды на пересчет индикатора #define INDICATOR_NAME "XWPR_Histogram_Vol" // Константа для имени индикатора #define SIZE 6 // Константа для количества вызовов функции CountLine //+-----------------------------------------+ //| Параметры отрисовки максимума | //+-----------------------------------------+ //---- отрисовка индикатора в виде линии #property indicator_type1 DRAW_LINE //---- в качестве цвета линии индикатора использован DeepSkyBlue цвет #property indicator_color1 clrDeepSkyBlue //---- линия индикатора - штрих-пунктир #property indicator_style1 STYLE_DASHDOTDOT //---- толщина линии индикатора равна 1 #property indicator_width1 1 //---- отображение метки индикатора #property indicator_label1 "XWPR_Histogram_Vol Max" //+-----------------------------------------+ //| Параметры отрисовки уровня Res | //+-----------------------------------------+ //---- отрисовка индикатора в виде линии #property indicator_type2 DRAW_LINE //---- в качестве цвета линии индикатора использован Blue цвет #property indicator_color2 clrBlue //---- линия индикатора - штрих-пунктир #property indicator_style2 STYLE_DASHDOTDOT //---- толщина линии индикатора равна 1 #property indicator_width2 1 //---- отображение метки индикатора #property indicator_label2 "XWPR_Histogram_Vol Res" //+-----------------------------------------+ //| Параметры отрисовки индикатора XWPR | //+-----------------------------------------+ //---- отрисовка индикатора в виде гистограммы #property indicator_type3 DRAW_COLOR_HISTOGRAM //---- в качестве цветов индикатора использованы #property indicator_color3 clrLime,clrTeal,clrMediumPurple,clrBrown,clrOrange //---- линия индикатора - сплошная #property indicator_style3 STYLE_SOLID //---- толщина линии индикатора равна 2 #property indicator_width3 2 //---- отображение метки индикатора #property indicator_label3 "XWPR_Histogram_Vol" //+-----------------------------------------+ //| Параметры отрисовки уровня Supr | //+-----------------------------------------+ //---- отрисовка индикатора в виде линии #property indicator_type4 DRAW_LINE //---- в качестве цвета линии индикатора использован Blue цвет #property indicator_color4 clrBlue //---- линия индикатора - штрих-пунктир #property indicator_style4 STYLE_DASHDOTDOT //---- толщина линии индикатора равна 1 #property indicator_width4 1 //---- отображение метки индикатора #property indicator_label4 "XWPR_Histogram_Vol Supr" //+-----------------------------------------+ //| Параметры отрисовки минимума | //+-----------------------------------------+ //---- отрисовка индикатора в виде линии #property indicator_type5 DRAW_LINE //---- в качестве цвета линии индикатора использован DeepSkyBlue цвет #property indicator_color5 clrDeepSkyBlue //---- линия индикатора - штрих-пунктир #property indicator_style5 STYLE_DASHDOTDOT //---- толщина линии индикатора равна 1 #property indicator_width5 1 //---- отображение метки индикатора #property indicator_label5 "XWPR_Histogram_Vol Min" //+-----------------------------------------+ //| объявление перечислений | //+-----------------------------------------+ enum Smooth_Method { MODE_SMA_, // SMA MODE_EMA_, // EMA MODE_SMMA_, // SMMA MODE_LWMA_, // LWMA MODE_JJMA, // JJMA MODE_JurX, // JurX MODE_ParMA, // ParMA MODE_T3, // T3 MODE_VIDYA, // VIDYA MODE_AMA, // AMA }; //+----------------------------------------------+ //| Входные параметры индикатора | //+----------------------------------------------+ input ENUM_TIMEFRAMES TimeFrame=PERIOD_H4; //Период графика индикатора input uint WPRPeriod=14; // период индикатора input ENUM_APPLIED_VOLUME VolumeType=VOLUME_TICK; // объём input int HighLevel2=+20; // уровень перекупленности 2 input int HighLevel1=+15; // уровень перекупленности 1 input int LowLevel1=-15; // уровень перепроданности 1 input int LowLevel2=-20; // уровень перепроданности 2 input Smooth_Method MA_SMethod=MODE_SMA_; // Метод усреднения input uint MA_Length=12; // Глубина сглаживания input int MA_Phase=15; // параметр первого сглаживания, //---- для JJMA изменяющийся в пределах -100 ... +100, влияет на качество переходного процесса; //---- Для VIDIA это период CMO, для AMA это период медленной скользящей input int Shift=0; // Сдвиг индикатора по горизонтали в барах //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в // дальнейшем использованы в качестве индикаторных буферов double ExtLineBuffer1[],ExtLineBuffer2[],ExtLineBuffer3[],ExtLineBuffer4[],ExtLineBuffer5[],ExtLineBuffer6[]; //--- объявление целочисленных переменных начала отсчета данных int min_rates_total; //--- объявление целочисленных переменных для хендлов индикаторов int Ind_Handle; //+------------------------------------------------------------------+ //| Получение таймфрейма в виде строки | //+------------------------------------------------------------------+ string GetStringTimeframe(ENUM_TIMEFRAMES timeframe) {return(StringSubstr(EnumToString(timeframe),7,-1));} //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int OnInit() { //--- инициализация переменных min_rates_total=2; //--- получение хендла индикатора XWPR_Histogram_Vol Ind_Handle=iCustom(Symbol(),TimeFrame,"XWPR_Histogram_Vol",WPRPeriod,VolumeType,HighLevel2,HighLevel1,LowLevel1,LowLevel2,MA_SMethod,MA_Length,MA_Phase,0); if(Ind_Handle==INVALID_HANDLE) { Print(" Не удалось получить хендл индикатора XWPR_Histogram_Vol"); return(INIT_FAILED); } //---- превращение динамических массивов в индикаторные буферы SetIndexBuffer(0,ExtLineBuffer1,INDICATOR_DATA); SetIndexBuffer(1,ExtLineBuffer2,INDICATOR_DATA); SetIndexBuffer(2,ExtLineBuffer3,INDICATOR_DATA); SetIndexBuffer(3,ExtLineBuffer4,INDICATOR_DATA); SetIndexBuffer(4,ExtLineBuffer5,INDICATOR_DATA); SetIndexBuffer(5,ExtLineBuffer6,INDICATOR_DATA); //---- установка позиции, с которой начинается отрисовка уровней PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total); PlotIndexSetInteger(2,PLOT_DRAW_BEGIN,min_rates_total); PlotIndexSetInteger(3,PLOT_DRAW_BEGIN,min_rates_total); PlotIndexSetInteger(4,PLOT_DRAW_BEGIN,min_rates_total); //---- запрет на отрисовку индикатором пустых значений PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE); PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,EMPTY_VALUE); PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,EMPTY_VALUE); PlotIndexSetDouble(3,PLOT_EMPTY_VALUE,EMPTY_VALUE); PlotIndexSetDouble(4,PLOT_EMPTY_VALUE,EMPTY_VALUE); //---- запрет на отображение значений индикатора в левом верхнем углу окна индикатора PlotIndexSetInteger(0,PLOT_SHOW_DATA,false); PlotIndexSetInteger(1,PLOT_SHOW_DATA,false); PlotIndexSetInteger(2,PLOT_SHOW_DATA,false); PlotIndexSetInteger(3,PLOT_SHOW_DATA,false); PlotIndexSetInteger(4,PLOT_SHOW_DATA,false); //---- индексация элементов в буфере как в таймсерии ArraySetAsSeries(ExtLineBuffer1,true); ArraySetAsSeries(ExtLineBuffer2,true); ArraySetAsSeries(ExtLineBuffer3,true); ArraySetAsSeries(ExtLineBuffer4,true); ArraySetAsSeries(ExtLineBuffer5,true); ArraySetAsSeries(ExtLineBuffer6,true); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке string shortname; StringConcatenate(shortname,INDICATOR_NAME"(",GetStringTimeframe(TimeFrame),")"); IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,0); //--- завершение инициализации return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Custom iteration function | //+------------------------------------------------------------------+ int OnCalculate(const int rates_total, // количество истории в барах на текущем тике const int prev_calculated,// количество истории в барах на предыдущем тике 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[]) { //--- проверка периодов графиков на корректность if(!TimeFramesCheck(INDICATOR_NAME,TimeFrame)) return(RESET); //--- проверка количества баров на достаточность для расчета if(rates_totalRates_Total || Prev_Calculated<=0)// проверка на первый старт расчета индикатора { limit=Rates_Total-Min_Rates_Total-1; // стартовый номер для расчета всех баров LastCountBar[Numb]=limit; } else limit=LastCountBar[Numb]+Rates_Total-Prev_Calculated; // стартовый номер для расчета новых баров //--- основной цикл расчета индикатора for(int bar=limit; bar>=0 && !IsStopped(); bar--) { //--- обнулим содержимое индикаторных буферов до расчета IndBuf[bar]=0.0; //--- копируем вновь появившиеся данные в массив IndTime if(CopyTime(Symbol(),TimeFrame,iTime[bar],1,IndTime)<=0) return(RESET); //--- if(iTime[bar]>=IndTime[0] && iTime[bar+1]