//+---------------------------------------------------------------------+ //| i-CAi_Cloud_Digit.mq5 | //| Copyright © RickD 2006, Alexander Piechotta | //| http://onix-trade.net/forum/ | //+---------------------------------------------------------------------+ //| Для работы индикатора следует положить файл SmoothAlgorithms.mqh | //| в папку (директорию): каталог_данных_терминала\\MQL5\Include | //+---------------------------------------------------------------------+ #property copyright "Copyright © RickD 2006, Alexander Piechotta" #property link "http://onix-trade.net/forum/" //---- номер версии индикатора #property version "1.00" //---- отрисовка индикатора в основном окне #property indicator_chart_window //---- количество индикаторных буферов 6 #property indicator_buffers 6 //---- использовано всего три графических построения #property indicator_plots 3 //+------------------------------------------------+ //| Параметры отрисовки фона | //+------------------------------------------------+ //---- отрисовка фона в облачном виде #property indicator_type1 DRAW_FILLING #property indicator_type2 DRAW_FILLING //---- выбор цветов фона #property indicator_color1 clrPowderBlue #property indicator_color2 clrPink //---- отображение меток #property indicator_label1 "Upper Cloud" #property indicator_label2 "Lower Cloud" //+------------------------------------------------+ //| Параметры отрисовки индикатора | //+------------------------------------------------+ //---- отрисовка индикатора в виде многоцветной линии #property indicator_type3 DRAW_COLOR_LINE //---- в качестве цветов трехцветной линии использованы #property indicator_color3 clrDodgerBlue,clrMagenta //---- линия индикатора - непрерывная кривая #property indicator_style3 STYLE_SOLID //---- толщина линии индикатора равна 5 #property indicator_width3 5 //---- отображение метки индикатора #property indicator_label3 "i-CAi_Digit" //+----------------------------------------------+ //| Описание класса CXMA | //+----------------------------------------------+ #include //+----------------------------------------------+ //---- объявление переменных классов CXMA и CStdDeviation из файла SmoothAlgorithms.mqh CXMA XMA1; CStdDeviation STD; //+----------------------------------------------+ //| объявление перечислений | //+----------------------------------------------+ enum Applied_price_ //Тип константы { PRICE_CLOSE_ = 1, //Close PRICE_OPEN_, //Open PRICE_HIGH_, //High PRICE_LOW_, //Low PRICE_MEDIAN_, //Median Price (HL/2) PRICE_TYPICAL_, //Typical Price (HLC/3) PRICE_WEIGHTED_, //Weighted Close (HLCC/4) PRICE_SIMPL_, //Simpl Price (OC/2) PRICE_QUARTER_, //Quarted Price (HLOC/4) PRICE_TRENDFOLLOW0_, //TrendFollow_1 Price PRICE_TRENDFOLLOW1_, //TrendFollow_2 Price PRICE_DEMARK_ //Demark Price }; //+----------------------------------------------+ //| объявление перечислений | //+----------------------------------------------+ /*enum SmoothMethod - перечисление объявлено в файле SmoothAlgorithms.mqh { 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 string SirName="i-CAi_Digit"; //Первая часть имени графических объектов input Smooth_Method XMA_Method=MODE_SMA_; //метод усреднения input uint XLength=12; //глубина сглаживания input int XPhase=15; //параметр сглаживания, //---- для JJMA изменяющийся в пределах -100 ... +100, влияет на качество переходного процесса; //---- Для VIDIA это период CMO, для AMA это период медленной скользящей input Applied_price_ IPC=PRICE_CLOSE_; //ценовая константа input uint Digit=2; //количество разрядов округления input uint Dev=20; //девиация заливки фоном input bool ShowPrice=true; //показывать ценовые меток input color Price_color=clrDarkViolet; //цвета ценовых меток input int Shift=0; //сдвиг индикатора по горизонтали в барах //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в дальнейшем использованы в качестве индикаторных буферов double LineBuffer[],ColorLineBuffer[]; double UpCloudBuffer1[],UpCloudBuffer2[]; double DnCloudBuffer1[],DnCloudBuffer2[]; //---- Объявление переменной значения вертикального сдвига мувинга double dPriceShift; //---- Объявление целых переменных начала отсчёта данных int min_rates_total; double PointPow10; //---- Объявление стрингов для текстовых меток string Price_name; //+------------------------------------------------------------------+ //| i-CAi indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //---- Инициализация переменных начала отсчёта данных min_rates_total=GetStartBars(XMA_Method,XLength,XPhase); PointPow10=_Point*MathPow(10,Digit); //---- Инициализация стрингов Price_name=SirName+"Price"; //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(0,UpCloudBuffer1,INDICATOR_DATA); SetIndexBuffer(1,UpCloudBuffer2,INDICATOR_DATA); SetIndexBuffer(2,DnCloudBuffer1,INDICATOR_DATA); SetIndexBuffer(3,DnCloudBuffer2,INDICATOR_DATA); SetIndexBuffer(4,LineBuffer,INDICATOR_DATA); //---- превращение динамического массива в цветовой, индексный буфер SetIndexBuffer(5,ColorLineBuffer,INDICATOR_COLOR_INDEX); //---- осуществление сдвига индикатора 1 по горизонтали PlotIndexSetInteger(0,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0.0); //---- осуществление сдвига индикатора 2 по горизонтали PlotIndexSetInteger(1,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,0.0); //---- осуществление сдвига индикатора 3 по горизонтали PlotIndexSetInteger(2,PLOT_SHIFT,Shift); //---- осуществление сдвига начала отсчета отрисовки индикатора PlotIndexSetInteger(2,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,0.0); //---- инициализации переменной для короткого имени индикатора string shortname; string Smooth1=XMA1.GetString_MA_Method(XMA_Method); StringConcatenate(shortname,"i-CAi_Digit(",XLength,", ",Smooth1,")"); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits+1); //---- завершение инициализации } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //---- ObjectDelete(0,Price_name); //---- ChartRedraw(0); } //+------------------------------------------------------------------+ //| i-CAi 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) // проверка на первый старт расчёта индикатора { first=1; // стартовый номер для расчёта всех баров } else first=prev_calculated-1; // стартовый номер для расчёта новых баров //---- Основной цикл расчёта индикатора for(bar=first; barmin_rates_total) prev=LineBuffer[bar-1]; else prev=xma; powdxma=MathPow(prev-xma,2); if(powdxmarates_total || prev_calculated<=0) // проверка на первый старт расчёта индикатора first++; //---- Основной цикл раскраски сигнальной линии for(bar=first; barLineBuffer[bar]) clr=1; ColorLineBuffer[bar]=clr; } //---- ChartRedraw(0); return(rates_total); } //+------------------------------------------------------------------+ //| RightPrice creation | //+------------------------------------------------------------------+ void CreateRightPrice(long chart_id,// chart ID string name, // object name int nwin, // window index datetime time, // price level time double price, // price level color Color // Text color ) //---- { //---- ObjectCreate(chart_id,name,OBJ_ARROW_RIGHT_PRICE,nwin,time,price); ObjectSetInteger(chart_id,name,OBJPROP_COLOR,Color); ObjectSetInteger(chart_id,name,OBJPROP_BACK,true); ObjectSetInteger(chart_id,name,OBJPROP_WIDTH,2); //---- } //+------------------------------------------------------------------+ //| RightPrice reinstallation | //+------------------------------------------------------------------+ void SetRightPrice(long chart_id,// chart ID string name, // object name int nwin, // window index datetime time, // price level time double price, // price level color Color // Text color ) //---- { //---- if(ObjectFind(chart_id,name)==-1) CreateRightPrice(chart_id,name,nwin,time,price,Color); else ObjectMove(chart_id,name,0,time,price); //---- } //+------------------------------------------------------------------+