//+---------------------------------------------------------------------+ //| i-CAiChannel_System_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 //---- количество индикаторных буферов 11 #property indicator_buffers 11 //---- использовано всего четыре графических построения #property indicator_plots 4 //+----------------------------------------------+ //| Параметры отрисовки облака | //+----------------------------------------------+ //---- отрисовка индикатора в виде цветного облака #property indicator_type1 DRAW_FILLING //---- в качестве цвета облака использован Lavender #property indicator_color1 clrLavender //---- отображение метки индикатора #property indicator_label1 "i-CAiChannel Cloud" //+----------------------------------------------+ //| Параметры отрисовки верхней границы | //+----------------------------------------------+ //---- отрисовка индикатора 2 в виде линии #property indicator_type2 DRAW_LINE //---- в качестве цвета бычей линии индикатора использован DodgerBlue #property indicator_color2 clrDodgerBlue //---- линия индикатора 2 - непрерывная кривая #property indicator_style2 STYLE_SOLID //---- толщина линии индикатора 2 равна 2 #property indicator_width2 2 //---- отображение бычей метки индикатора #property indicator_label2 "Upper i-CAiChannel" //+----------------------------------------------+ //| Параметры отрисовки нижней линии | //+----------------------------------------------+ //---- отрисовка индикатора 3 в виде линии #property indicator_type3 DRAW_LINE //---- в качестве цвета медвежьей линии индикатора использован Orange #property indicator_color3 clrOrange //---- линия индикатора 3 - непрерывная кривая #property indicator_style3 STYLE_SOLID //---- толщина линии индикатора 3 равна 2 #property indicator_width3 2 //---- отображение медвежьей метки индикатора #property indicator_label3 "Lower i-CAiChannel" //+----------------------------------------------+ //| Параметры отрисовки индикатора 4 | //+----------------------------------------------+ //---- отрисовка индикатора в виде цветных свеч #property indicator_type4 DRAW_COLOR_CANDLES //---- в качестве цветов индикатора использованы #property indicator_color4 clrMagenta,clrPurple,clrGray,clrTeal,clrMediumSpringGreen //---- линия индикатора - сплошная #property indicator_style4 STYLE_SOLID //---- толщина линии индикатора равна 2 #property indicator_width4 2 //---- отображение метки индикатора #property indicator_label4 "PChannel_CANDLES" //+----------------------------------------------+ //| Описание класса 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-CAiChannel_System_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 Dev=1000; //половина ширины канала в пунктах input uint Digit=2; //количество разрядов округления input int Shift=2; //сдвиг канала по горизонтали в барах input bool ShowPrice=true; //показывать ценовые метки input color Upper_color=clrBlue; input color Lower_color=clrMagenta; //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в дальнейшем использованы в качестве индикаторных буферов double ExtUp1Buffer[],ExtUp2Buffer[],ExtDn1Buffer[],ExtDn2Buffer[]; double ExtOpenBuffer[],ExtHighBuffer[],ExtLowBuffer[],ExtCloseBuffer[],ExtColorBuffer[]; //---- Объявление переменной значения вертикального сдвига мувинга double dDev; //---- Объявление целых переменных начала отсчёта данных int min_rates_total; //---- Объявление стрингов для текстовых меток string upper_name,lower_name; double PointPow10; //+------------------------------------------------------------------+ //| i-CAi indicator initialization function | //+------------------------------------------------------------------+ void OnInit() { //---- Инициализация переменных начала отсчёта данных min_rates_total=GetStartBars(XMA_Method,XLength,XPhase)+Shift; //---- Инициализация стрингов upper_name=SirName+" upper text lable"; lower_name=SirName+" lower text lable"; //---- инициализация переменных PointPow10=_Point*MathPow(10,Digit); dDev=Dev*_Point; //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(0,ExtUp1Buffer,INDICATOR_DATA); SetIndexBuffer(1,ExtDn1Buffer,INDICATOR_DATA); //---- осуществление сдвига начала отсчёта отрисовки индикатора PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,EMPTY_VALUE); //---- осуществление сдвига индикатора по горизонтали PlotIndexSetInteger(0,PLOT_SHIFT,Shift); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(2,ExtUp2Buffer,INDICATOR_DATA); //---- осуществление сдвига начала отсчёта отрисовки индикатора PlotIndexSetInteger(1,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(1,PLOT_EMPTY_VALUE,EMPTY_VALUE); //---- осуществление сдвига индикатора по горизонтали PlotIndexSetInteger(1,PLOT_SHIFT,Shift); //---- превращение динамического массива в индикаторный буфер SetIndexBuffer(3,ExtDn2Buffer,INDICATOR_DATA); //---- осуществление сдвига начала отсчёта отрисовки индикатора PlotIndexSetInteger(2,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(2,PLOT_EMPTY_VALUE,EMPTY_VALUE); //---- осуществление сдвига индикатора по горизонтали PlotIndexSetInteger(2,PLOT_SHIFT,Shift); //---- превращение динамического массива IndBuffer в индикаторный буфер 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); //---- осуществление сдвига индикатора 3 по горизонтали на Shift PlotIndexSetInteger(3,PLOT_SHIFT,0); //---- осуществление сдвига начала отсчёта отрисовки индикатора 4 на min_rates_total PlotIndexSetInteger(3,PLOT_DRAW_BEGIN,min_rates_total); //---- установка значений индикатора, которые не будут видимы на графике PlotIndexSetDouble(3,PLOT_EMPTY_VALUE,0); //---- инициализации переменной для короткого имени индикатора string shortname; string Smooth1=XMA1.GetString_MA_Method(XMA_Method); StringConcatenate(shortname,"i-CAiChannel_System_Digit(",XLength,", ",Smooth1,", ",Dev,")"); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits+1); //---- завершение инициализации } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //---- ObjectDelete(0,upper_name); ObjectDelete(0,lower_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; barrates_total || prev_calculated<=0) first=min_rates_total; //---- Основной цикл раскраски баров индикатора for(bar=first; barExtUp1Buffer[bar-Shift]) { if(open[bar]<=close[bar]) clr=4; else clr=3; ExtOpenBuffer[bar]=open[bar]; ExtCloseBuffer[bar]=close[bar]; ExtHighBuffer[bar]=high[bar]; ExtLowBuffer[bar]=low[bar]; } if(close[bar]close[bar]) clr=0; else clr=1; ExtOpenBuffer[bar]=open[bar]; ExtCloseBuffer[bar]=close[bar]; ExtHighBuffer[bar]=high[bar]; ExtLowBuffer[bar]=low[bar]; } ExtColorBuffer[bar]=clr; } if(ShowPrice) { int bar0=int(rates_total-1-Shift); datetime time0=time[rates_total-1]; SetRightPrice(0,upper_name,0,time0,ExtUp1Buffer[bar0],Upper_color); SetRightPrice(0,lower_name,0,time0,ExtDn1Buffer[bar0],Lower_color); } //---- 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); //---- } //+------------------------------------------------------------------+