//+------------------------------------------------------------------+ //| XFatlXSatlMACD_HTF.mq5 | //| Copyright © 2016, Nikolay Kositsin | //| Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2016, Nikolay Kositsin" #property link "arria@mail.redcom.ru" //--- номер версии индикатора #property version "1.60" #property description "Гистограмма на разности между сглаженными фильтрами Fatl и Satl с возможностью изменения таймфрейма во входных параметрах" //--- отрисовка индикатора в отдельном окне #property indicator_separate_window //--- количество индикаторных буферов 4 #property indicator_buffers 4 //--- использовано всего два графических построения #property indicator_plots 2 //+----------------------------------------------+ //| объявление констант | //+----------------------------------------------+ #define RESET 0 // Константа для возврата терминалу команды на пересчет индикатора #define INDICATOR_NAME "XFatlXSatlMACD" // Константа для имени индикатора #define SIZE 1 // Константа для количества вызовов функции CountIndicator коде //+----------------------------------------------+ //| Параметры отрисовки индикатора 1 | //+----------------------------------------------+ //---- отрисовка индикатора в виде цветного облака #property indicator_type1 DRAW_FILLING //---- в качестве цветов индикатора использованы #property indicator_color1 clrBlue,clrPurple //---- отображение метки индикатора #property indicator_label1 "XFatlXSatlMACD Signal" //+----------------------------------------------+ //| Параметры отрисовки индикатора 2 | //+----------------------------------------------+ //---- отрисовка индикатора в виде четырёхцветной гистограммы #property indicator_type2 DRAW_COLOR_HISTOGRAM //---- в качестве цветов пятицветной гистограммы использованы #property indicator_color2 clrDeepPink,clrOrange,clrGray,clrYellowGreen,clrTeal //---- линия индикатора - сплошная #property indicator_style2 STYLE_SOLID //---- толщина линии индикатора равна 2 #property indicator_width2 2 //---- отображение метки индикатора #property indicator_label2 "XFatlXSatlMACD" //+----------------------------------------------+ //| объявление перечислений | //+----------------------------------------------+ 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 }; //+----------------------------------------------+ //| объявление перечислений | //+----------------------------------------------+ enum Applied_price_ //Тип константы { PRICE_CLOSE_ = 1, //PRICE_CLOSE PRICE_OPEN_, //PRICE_OPEN PRICE_HIGH_, //PRICE_HIGH PRICE_LOW_, //PRICE_LOW PRICE_MEDIAN_, //PRICE_MEDIAN PRICE_TYPICAL_, //PRICE_TYPICAL PRICE_WEIGHTED_, //PRICE_WEIGHTED PRICE_SIMPL_, //PRICE_SIMPL_ PRICE_QUARTER_, //PRICE_QUARTER_ PRICE_TRENDFOLLOW0_, //PRICE_TRENDFOLLOW0_ PRICE_TRENDFOLLOW1_, // TrendFollow_2 Price PRICE_DEMARK_ // Demark Price }; //+----------------------------------------------+ //| Входные параметры индикатора | //+----------------------------------------------+ input ENUM_TIMEFRAMES TimeFrame=PERIOD_H4; // Период графика индикатора (таймфрейм) input Smooth_Method XMA_Method1=MODE_JJMA; //метод усреднения Fatl input uint XLength1=3; //глубина усреднения Fatl input int XPhase1=15; //параметр сглаживания Fatl, //---- для JJMA изменяющийся в пределах -100 ... +100, влияет на качество переходного процесса; //---- Для VIDIA это период CMO, для AMA это период медленной скользящей input Smooth_Method XMA_Method2=MODE_JJMA; //метод усреднения Satl input uint XLength2=3; //глубина усреднения Satl input int XPhase2=15; //параметр сглаживания Satl, //---- для JJMA изменяющийся в пределах -100 ... +100, влияет на качество переходного процесса; //---- Для VIDIA это период CMO, для AMA это период медленной скользящей input Smooth_Method XMA_Method3=MODE_JJMA; //метод усреднения сигнальной линии input uint XLength3=5; //глубина усреднения сигнальной линии input int XPhase3=15; //параметр сглаживания сигнальной линии, //---- для JJMA изменяющийся в пределах -100 ... +100, влияет на качество переходного процесса; //---- Для VIDIA это период CMO, для AMA это период медленной скользящей input Applied_price_ IPC=PRICE_CLOSE_; //ценовая константа input int Shift=0; // Сдвиг индикатора по горизонтали в барах //+----------------------------------------------+ //--- объявление динамических массивов, которые в дальнейшем //--- будут использованы в качестве индикаторных буферов double IndBuffer[]; double ColorIndBuffer[]; double UpIndBuffer[]; double DnIndBuffer[]; //--- объявление целочисленных переменных начала отсчета данных int min_rates_total; //--- объявление целочисленных переменных для хендлов индикаторов int Ind_Handle; //+------------------------------------------------------------------+ //| Получение таймфрейма в виде строки | //+------------------------------------------------------------------+ string GetStringTimeframe(ENUM_TIMEFRAMES timeframe) {return(StringSubstr(EnumToString(timeframe),7,-1));} //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int OnInit() { //--- проверка периодов графиков на корректность if(!TimeFramesCheck(INDICATOR_NAME,TimeFrame)) return(INIT_FAILED); //--- инициализация переменных min_rates_total=2; //--- получение хендла индикатора XFatlXSatlMACD Ind_Handle=iCustom(Symbol(),TimeFrame,"XFatlXSatlMACD",XMA_Method1,XLength1,XPhase1,XMA_Method2,XLength2,XPhase2,XMA_Method3,XLength3,XPhase3,IPC); if(Ind_Handle==INVALID_HANDLE) { Print(" Не удалось получить хендл индикатора XFatlXSatlMACD"); return(INIT_FAILED); } //--- инициализация индикаторных буферов IndInit(0,UpIndBuffer,INDICATOR_DATA); IndInit(1,DnIndBuffer,INDICATOR_DATA); IndInit(2,IndBuffer,INDICATOR_DATA); IndInit(3,ColorIndBuffer,INDICATOR_COLOR_INDEX); //--- инициализация индикаторов PlotInit(0,0.0,0,Shift); PlotInit(1,0.0,0,Shift); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке string shortname; StringConcatenate(shortname,INDICATOR_NAME,"(",GetStringTimeframe(TimeFrame),")"); IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //--- завершение инициализации 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(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(),TFrame,iTime[bar],1,IndTime)<=0) return(RESET); if(iTime[bar]>=IndTime[0] && iTime[bar+1]