//+------------------------------------------------------------------+ //| Volume_Weighted_MA_Cloud_Digit.mq5 | //| Copyright © 2011, StatBars TO | //| http://ridecrufter.narod.ru | //+------------------------------------------------------------------+ #property copyright "Copyright © 2011, StatBars TO" #property link "http://ridecrufter.narod.ru" //---- номер версии индикатора #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 clrPaleTurquoise #property indicator_color2 clrLightPink //---- отображение меток #property indicator_label1 "Upper Cloud" #property indicator_label2 "Lower Cloud" //+------------------------------------------------+ //| Параметры отрисовки индикатора | //+------------------------------------------------+ //---- отрисовка индикатора в виде многоцветной линии #property indicator_type3 DRAW_COLOR_LINE //---- в качестве цветов трехцветной линии использованы #property indicator_color3 clrMagenta,clrGray,clrBlue //---- линия индикатора - непрерывная кривая #property indicator_style3 STYLE_SOLID //---- толщина линии индикатора равна 5 #property indicator_width3 5 //---- отображение метки индикатора #property indicator_label3 "Volume_Weighted_MA_Digit" //+----------------------------------------------+ //| объявление перечислений | //+----------------------------------------------+ 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 }; //+----------------------------------------------+ //| Входные параметры индикатора | //+----------------------------------------------+ input string SirName="Volume_Weighted_MA_Cloud_Digit"; //Первая часть имени графических объектов input uint Length=12; //глубина сглаживания input Applied_price_ IPC=PRICE_CLOSE_; //ценовая константа input ENUM_APPLIED_VOLUME VolumeType=VOLUME_TICK; //объём input int Shift=0; //сдвиг индикатора по горизонтали в барах input int PriceShift=0; //cдвиг индикатора по вертикали в пунктах input uint Dev=20; //Девиация заливки фоном input uint Digit=2; //количество разрядов округления input bool ShowPrice=true; //показывать ценовые метки //---- цвета ценовых меток input color Price_color=clrGray; //+----------------------------------------------+ //---- объявление динамических массивов, которые будут в дальнейшем использованы в качестве индикаторных буферов double LineBuffer[]; double ColorLineBuffer[]; double UpCloudBuffer1[],UpCloudBuffer2[]; double DnCloudBuffer1[],DnCloudBuffer2[]; //---- Объявление переменной значения вертикального сдвига мувинга double dPriceShift; //---- Объявление целых переменных начала отсчёта данных int min_rates_total; double Vol[]; double PointPow10; //---- Объявление стрингов для текстовых меток string Price_name; //+------------------------------------------------------------------+ //| Volume_Weighted_MA initialization function | //+------------------------------------------------------------------+ void OnInit() { //---- Инициализация переменных начала отсчёта данных min_rates_total=int(Length); //---- Инициализация сдвига по вертикали dPriceShift=_Point*PriceShift; PointPow10=_Point*MathPow(10,Digit); //---- Инициализация стрингов Price_name=SirName+"Price"; //---- распределение памяти под массивы переменных ArrayResize(Vol,Length); //---- превращение динамического массива в индикаторный буфер 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; StringConcatenate(shortname,"Volume_Weighted_MA_Cloud_Digit(",Length,")"); //--- создание имени для отображения в отдельном подокне и во всплывающей подсказке IndicatorSetString(INDICATOR_SHORTNAME,shortname); //--- определение точности отображения значений индикатора IndicatorSetInteger(INDICATOR_DIGITS,_Digits); //---- завершение инициализации } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //---- ObjectDelete(0,Price_name); //---- ChartRedraw(0); } //+------------------------------------------------------------------+ //| Volume_Weighted_MA 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=min_rates_total-1; // стартовый номер для расчёта всех баров else first=prev_calculated-1; // стартовый номер для расчёта новых баров //---- Основной цикл расчёта индикатора for(bar=first; barrates_total || prev_calculated<=0) // проверка на первый старт расчёта индикатора first++; //---- Основной цикл раскраски сигнальной линии for(bar=first; bar0) clr=2; if(trend<0) clr=0; } ColorLineBuffer[bar]=clr; } //---- ChartRedraw(0); return(rates_total); } //+------------------------------------------------------------------+ //| Получение значения ценовой таймсерии | //+------------------------------------------------------------------+ double PriceSeries(uint applied_price,// Ценовая константа uint bar,// Индекс сдвига относительно текущего бара на указанное количество периодов назад или вперёд). const double &Open[], const double &Low[], const double &High[], const double &Close[]) { //---- switch(applied_price) { //---- Ценовые константы из перечисления ENUM_APPLIED_PRICE case PRICE_CLOSE: return(Close[bar]); case PRICE_OPEN: return(Open [bar]); case PRICE_HIGH: return(High [bar]); case PRICE_LOW: return(Low[bar]); case PRICE_MEDIAN: return((High[bar]+Low[bar])/2.0); case PRICE_TYPICAL: return((Close[bar]+High[bar]+Low[bar])/3.0); case PRICE_WEIGHTED: return((2*Close[bar]+High[bar]+Low[bar])/4.0); //---- case 8: return((Open[bar] + Close[bar])/2.0); case 9: return((Open[bar] + Close[bar] + High[bar] + Low[bar])/4.0); //---- case 10: { if(Close[bar]>Open[bar])return(High[bar]); else { if(Close[bar]Open[bar])return((High[bar]+Close[bar])/2.0); else { if(Close[bar]Open[bar]) res=(res+High[bar])/2; if(Close[bar]==Open[bar]) res=(res+Close[bar])/2; return(((res-Low[bar])+(res-High[bar]))/2); } //---- default: return(Close[bar]); } //---- //return(0); } //+------------------------------------------------------------------+ //| 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); //---- } //+------------------------------------------------------------------+