//+------------------------------------------------------------------+ //| JFatlCandle_Chl_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.70" #property description "JFatlCandle_Chl с фиксированным во входных параметрах таймфреймом" //---- отрисовка индикатора в главном окне #property indicator_chart_window //---- для расчета и отрисовки индикатора использовано девять буферов #property indicator_buffers 9 //---- использовано всего три графических построения #property indicator_plots 3 //+----------------------------------------------+ //| объявление констант | //+----------------------------------------------+ #define RESET 0 // Константа для возврата терминалу команды на пересчет индикатора #define INDICATOR_NAME "JFatlCandle_Chl" // Константа для имени индикатора #define SIZE 9 // Константа для количества вызовов функции CountIndicator в коде //+----------------------------------------------+ //| Параметры отрисовки индикатора | //+----------------------------------------------+ //--- отрисовка индикатора в виде цветного облака #property indicator_type1 DRAW_FILLING //--- в качестве цветов индикатора использованы #property indicator_color1 C'223,255,232' //--- отображение метки индикатора #property indicator_label1 "Upper Signal Cloud" //+----------------------------------------------+ //| Параметры отрисовки индикатора | //+----------------------------------------------+ //--- отрисовка индикатора в виде цветного облака #property indicator_type2 DRAW_FILLING //--- в качестве цветов индикатора использованы #property indicator_color2 C'255,242,255' //--- отображение метки индикатора #property indicator_label2 "Lower Signal Cloud" //+----------------------------------------------+ //| Параметры отрисовки индикатора | //+----------------------------------------------+ //---- в качестве индикатора использованы цветные свечи #property indicator_type3 DRAW_COLOR_CANDLES #property indicator_color3 C'255,138,255',clrGray,C'117,186,255'; //---- отображение метки индикатора #property indicator_label3 "JFatlCandle Open;JFatlCandle High;JFatlCandle Low;JFatlCandle Close" //+-----------------------------------------+ //| объявление перечислений | //+-----------------------------------------+ 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 JLength=5; // глубина JMA сглаживания input int JPhase=100; // параметр JMA сглаживания, //---- изменяющийся в пределах -100 ... +100, //---- влияет на качество переходного процесса; input uint Gap=10; // размер неучитываемого гэпа в пунктах input uint BBLength=10; // период Боллинджера input double BandsDeviation=1.0; // девиация //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в дальнейшем использованы в качестве индикаторных буферов double UpUpBuffer[],UpDnBuffer[],DnUpBuffer[],DnDnBuffer[]; double ExtOpenBuffer[]; double ExtHighBuffer[]; double ExtLowBuffer[]; double ExtCloseBuffer[]; double ExtColorBuffer[]; //--- объявление целочисленных переменных начала отсчета данных 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; //--- получение хендла индикатора JFatlCandle_Chl Ind_Handle=iCustom(Symbol(),TimeFrame,"JFatlCandle_Chl",JLength,JPhase,Gap,BBLength,BandsDeviation); if(Ind_Handle==INVALID_HANDLE) { Print(" Не удалось получить хендл индикатора JFatlCandle_Chl"); return(INIT_FAILED); } //--- инициализация индикаторных буферов IndInit(0,UpUpBuffer,INDICATOR_DATA); IndInit(1,UpDnBuffer,INDICATOR_DATA); //--- инициализация индикаторов PlotInit(0,NULL,min_rates_total,0); //--- инициализация индикаторных буферов IndInit(2,DnUpBuffer,INDICATOR_DATA); IndInit(3,DnDnBuffer,INDICATOR_DATA); //--- инициализация индикаторов PlotInit(1,NULL,min_rates_total,0); //---- превращение динамических массивов в индикаторные буферы SetIndexBuffer(4,ExtOpenBuffer,INDICATOR_DATA); SetIndexBuffer(5,ExtHighBuffer,INDICATOR_DATA); SetIndexBuffer(6,ExtLowBuffer,INDICATOR_DATA); SetIndexBuffer(7,ExtCloseBuffer,INDICATOR_DATA); //---- превращение динамического массива в цветовой, индексный буфер SetIndexBuffer(8,ExtColorBuffer,INDICATOR_COLOR_INDEX); //---- индексация элементов в буферах как в таймсериях ArraySetAsSeries(ExtOpenBuffer,true); ArraySetAsSeries(ExtHighBuffer,true); ArraySetAsSeries(ExtLowBuffer,true); ArraySetAsSeries(ExtCloseBuffer,true); ArraySetAsSeries(ExtColorBuffer,true); //--- инициализация индикаторов PlotInit(2,NULL,min_rates_total,0); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке string shortname; StringConcatenate(shortname,INDICATOR_NAME,"(",GetStringTimeframe(TimeFrame),")"); //--- IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //--- завершение инициализации return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Инициализация индикаторного буфера | //+------------------------------------------------------------------+ void IndInit(int Number,double &Buffer[],ENUM_INDEXBUFFER_TYPE Type) { //--- превращение динамического массива в индикаторный буфер SetIndexBuffer(Number,Buffer,Type); //---- индексация элементов в буферах как в таймсериях ArraySetAsSeries(Buffer,true); //--- } //+------------------------------------------------------------------+ //| Инициализация индикатора | //+------------------------------------------------------------------+ void PlotInit(int Number,double Empty_Value,int Draw_Begin,int nShift) { //--- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(Number,PLOT_DRAW_BEGIN,Draw_Begin); //--- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(Number,PLOT_EMPTY_VALUE,Empty_Value); //--- осуществление сдвига индикатора по горизонтали на Shift PlotIndexSetInteger(Number,PLOT_SHIFT,nShift); //--- } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //---- Comment(""); //---- } //+------------------------------------------------------------------+ //| 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--) { //--- копируем вновь появившиеся данные в массив IndTime if(CopyTime(Symbol(),TFrame,Time[bar],1,IndTime)<=0) return(RESET); //--- if(Time[bar]>=IndTime[0] && Time[bar+1]