//+------------------------------------------------------------------+ //| StepMA_Stoch_KV1.mq5 | //| Copyright © 2005, TrendLaboratory Ltd. | //| E-mail: igorad2004@list.ru | //| modified by Kalenzo -> simone@konto.pl | //+------------------------------------------------------------------+ #property copyright "Copyright © 2005, TrendLaboratory Ltd." #property link "E-mail: igorad2004@list.ru" //--- номер версии индикатора #property version "1.02" //--- отрисовка индикатора в отдельном окне #property indicator_separate_window //--- количество индикаторных буферов 2 #property indicator_buffers 2 //--- использовано всего одно графическое построение #property indicator_plots 1 //+-----------------------------------+ //| Параметры отрисовки индикатора | //+-----------------------------------+ //--- отрисовка индикатора в виде семицветной гистограммы #property indicator_type1 DRAW_COLOR_HISTOGRAM //--- в качестве цветов семицветной гистограммы использованы #property indicator_color1 clrMagenta,clrMediumVioletRed,clrPlum,clrGray,clrLightSkyBlue,clrTeal,clrDodgerBlue //--- линия индикатора - сплошная #property indicator_style1 STYLE_SOLID //--- толщина линии индикатора равна 2 #property indicator_width1 2 //--- отображение метки индикатора #property indicator_label1 "StepMA_Stoch_KV1" //+-----------------------------------+ //| Входные параметры индикатора | //+-----------------------------------+ input uint PeriodWATR=10; input double Kwatr=1.0000; input bool HighLow=false; //+-----------------------------------+ //--- объявление динамических массивов, которые в дальнейшем //--- будут использованы в качестве индикаторных буферов double IndBuffer[],ColorIndBuffer[]; //--- Объявление целых переменных начала отсчёта данных int min_rates_total; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //--- инициализация переменных начала отсчёта данных min_rates_total=int(PeriodWATR+1); //--- превращение динамического массива IndBuffer в индикаторный буфер SetIndexBuffer(0,IndBuffer,INDICATOR_DATA); //--- индексация элементов в буфере как в таймсерии ArraySetAsSeries(IndBuffer,true); //--- превращение динамического массива в цветовой индексный буфер SetIndexBuffer(1,ColorIndBuffer,INDICATOR_COLOR_INDEX); //--- индексация элементов в буфере как в таймсерии ArraySetAsSeries(ColorIndBuffer,true); //--- осуществление сдвига начала отсчёта отрисовки индикатора PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //--- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0.0); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,"StepMA_Stoch_KV1"); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //--- завершение инициализации } //+------------------------------------------------------------------+ //| Custom indicator 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; // стартовый номер для расчёта всех баров bar=limit; SumRange=0; for(int iii=0; iii=0 && !IsStopped(); bar--) { SumRange=0; for(int iii=0; iiiSmaxMin1) TrendMin=+1; if(close[bar]SmaxMax1) TrendMax=+1; if(close[bar]SmaxMid1) TrendMid=+1; if(close[bar]SmaxMin1) TrendMin=+1; if(close[bar]SmaxMax1) TrendMax=+1; if(close[bar]SmaxMid1) TrendMid=+1; if(close[bar]0 && SminMin0SmaxMin1) SmaxMin0=SmaxMin1; if(TrendMax>0 && SminMax0SmaxMax1) SmaxMax0=SmaxMax1; if(TrendMid>0 && SminMid0SmaxMid1) SmaxMid0=SmaxMid1; //--- if(TrendMin>0) linemin=SminMin0+StepSizeMin*_Point; if(TrendMin<0) linemin=SmaxMin0-StepSizeMin*_Point; if(TrendMax>0) linemax=SminMax0+StepSizeMax*_Point; if(TrendMax<0) linemax=SmaxMax0-StepSizeMax*_Point; if(TrendMid>0) linemid=SminMid0+StepSizeMid*_Point; if(TrendMid<0) linemid=SmaxMid0-StepSizeMid*_Point; //--- bsmin=linemax-StepSizeMax*_Point; bsmax=linemin+StepSizeMax*_Point; double res=bsmax-bsmin; if(!res) res=0.00000001; Stoch1=NormalizeDouble((linemin-bsmin)/res,6); Stoch2=NormalizeDouble((linemid-bsmin)/res,6); IndBuffer[bar]=Stoch1-Stoch2; //--- if(bar) { SminMin1=SminMin0; SmaxMin1=SmaxMin0; SminMax1=SminMax0; SmaxMax1=SmaxMax0; SminMid1=SminMid0; SmaxMid1=SmaxMid0; WATRmax_=WATRmax; WATRmin_=WATRmin; TrendMin1=TrendMin; TrendMax1=TrendMax; TrendMid1=TrendMid; } } if(prev_calculated>rates_total || prev_calculated<=0) limit--; //--- основной цикл раскраски индикатора for(bar=limit; bar>=0 && !IsStopped(); bar--) { int clr=3; if(IndBuffer[bar]>0) { if(IndBuffer[bar]>IndBuffer[bar+1]) clr=6; if(IndBuffer[bar]==IndBuffer[bar+1]) clr=5; if(IndBuffer[bar]IndBuffer[bar+1]) clr=2; } ColorIndBuffer[bar]=clr; } //--- return(rates_total); } //+------------------------------------------------------------------+