Files

154 lines
14 KiB
Plaintext

//+------------------------------------------------------------------+
//| Volatility2Step.mq5 |
//| Copyright © 2007, Eva Ruft |
//| briz18@rambler.ru/ |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2007, Eva Ruft"
#property link "briz18@rambler.ru"
//---- номер версии индикатора
#property version "1.00"
//---- отрисовка индикатора в отдельном окне
#property indicator_separate_window
//---- количество индикаторных буферов
#property indicator_buffers 1
//---- использовано всего одно графическое построение
#property indicator_plots 1
//+-----------------------------------+
//| Параметры отрисовки индикатора |
//+-----------------------------------+
//---- отрисовка индикатора в виде гистограммы
#property indicator_type1 DRAW_HISTOGRAM
//---- в качестве цвета бычей линии индикатора использован BlueViolet цвет
#property indicator_color1 clrBlueViolet
//---- линия индикатора - непрерывная кривая
#property indicator_style1 STYLE_SOLID
//---- толщина линии индикатора равна 4
#property indicator_width1 4
//---- отображение метки индикатора
#property indicator_label1 "Volatility2Step"
//+-----------------------------------+
//| объявление констант |
//+-----------------------------------+
#define RESET 0 // Константа для возврата терминалу команды на пересчёт индикатора
//+-----------------------------------+
//| ВХОДНЫЕ ПАРАМЕТРЫ ИНДИКАТОРА |
//+-----------------------------------+
input ENUM_MA_METHOD MAType=MODE_SMA; // метод усреднения
input uint VolatilityPeriod=5; // период индикатора
input int Shift=0; // сдвиг индикатора по горизонтали в барах
input uint LevelsTotal=20; // количество уровеней
input uint StartLevel=100; // стартовый уровень
input uint LevelsStep=100; // расстояние между уровнями
input color LevelsColor=clrDarkOrange; // цвет уровеней
//+-----------------------------------+
//---- индикаторный буфер
double IndBuffer[];
//---- Объявление целых переменных начала отсчёта данных
int min_rates_total;
//---- Объявление целых переменных для хендлов индикаторов
int HMA_Handle,LMA_Handle;
//+------------------------------------------------------------------+
//| Volatility indicator initialization function |
//+------------------------------------------------------------------+
void OnInit()
{
//---- Инициализация переменных начала отсчёта данных
min_rates_total=int(VolatilityPeriod);
//---- получение хендла индикатора iMA
HMA_Handle=iMA(NULL,0,VolatilityPeriod,0,MAType,PRICE_HIGH);
if(HMA_Handle==INVALID_HANDLE) Print(" Не удалось получить хендл индикатора iMA");
//---- получение хендла индикатора iMA
LMA_Handle=iMA(NULL,0,VolatilityPeriod,0,MAType,PRICE_LOW);
if(LMA_Handle==INVALID_HANDLE) Print(" Не удалось получить хендл индикатора iMA");
//---- превращение динамического массива в индикаторный буфер
SetIndexBuffer(0,IndBuffer,INDICATOR_DATA);
//---- осуществление сдвига индикатора по горизонтали на Shift
PlotIndexSetInteger(0,PLOT_SHIFT,Shift);
//---- осуществление сдвига начала отсчёта отрисовки индикатора
PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total);
//---- установка значений индикатора, которые не будут видимы на графике
PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE);
//---- индексация элементов в буфере как в таймсерии
ArraySetAsSeries(IndBuffer,true);
//---- инициализации переменной для короткого имени индикатора
string shortname="Volatility2Step("+string(VolatilityPeriod)+")";
//--- создание имени для отображения в отдельном подокне и во всплывающей подсказке
IndicatorSetString(INDICATOR_SHORTNAME,shortname);
//--- определение точности отображения значений индикатора
IndicatorSetInteger(INDICATOR_DIGITS,0);
//---- количество горизонтальных уровней индикатора LevelsTotal
IndicatorSetInteger(INDICATOR_LEVELS,LevelsTotal);
for(int numb=0; numb<int(LevelsTotal); numb++)
{
int level=int(StartLevel+LevelsStep*numb);
//---- значения горизонтальных уровней индикатора
IndicatorSetDouble(INDICATOR_LEVELVALUE,numb,level);
//---- в качестве цветов линий горизонтальных уровней использованы серый и розовый цвета
IndicatorSetInteger(INDICATOR_LEVELCOLOR,numb,LevelsColor);
//---- в линии горизонтального уровня использован короткий штрих-пунктир
IndicatorSetInteger(INDICATOR_LEVELSTYLE,numb,STYLE_DASHDOTDOT);
}
//---- завершение инициализации
}
//+------------------------------------------------------------------+
//| Volatility 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(BarsCalculated(HMA_Handle)<rates_total
|| BarsCalculated(LMA_Handle)<rates_total
|| rates_total<min_rates_total)
return(RESET);
//---- объявления локальных переменных
int to_copy,limit,bar;
double HMA[],LMA[],Volatility,Res;
//---- расчёт стартового номера limit для цикла пересчёта баров
if(prev_calculated>rates_total || prev_calculated<=0)// проверка на первый старт расчёта индикатора
limit=rates_total-min_rates_total-1; // стартовый номер для расчёта всех баров
else limit=rates_total-prev_calculated; // стартовый номер для расчёта только новых баров
to_copy=limit+1;
//---- индексация элементов в массивах как в таймсериях
ArraySetAsSeries(HMA,true);
ArraySetAsSeries(LMA,true);
//---- копируем вновь появившиеся данные в массивы
if(CopyBuffer(HMA_Handle,0,0,to_copy,HMA)<=0) return(RESET);
if(CopyBuffer(LMA_Handle,0,0,to_copy,LMA)<=0) return(RESET);
//---- основной цикл расчёта индикатора
for(bar=limit; bar>=0 && !IsStopped(); bar--)
{
Volatility=(HMA[bar]-LMA[bar])/_Point;
IndBuffer[bar]=NULL;
if(Volatility>=StartLevel)
{
Res=MathMax(Volatility-StartLevel,0);
IndBuffer[bar]=StartLevel+LevelsStep*int(Res/LevelsStep);
}
}
//----
return(rates_total);
}
//+------------------------------------------------------------------+