9003b29674
Indicator Collection
553 lines
22 KiB
Plaintext
553 lines
22 KiB
Plaintext
//+------------------------------------------------------------------+
|
|
//| VWAP.mq5 |
|
|
//| Copyright 2015, SOL Digital Consultoria LTDA |
|
|
//| http://www.soldigitalconsultoria.com.br |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright 2015, SOL Digital Consultoria LTDA"
|
|
#property link "http://www.soldigitalconsultoria.com.br"
|
|
#property version "1.47"
|
|
|
|
#property indicator_chart_window
|
|
#property indicator_buffers 8
|
|
#property indicator_plots 8
|
|
|
|
//--- plot VWAP
|
|
#property indicator_label1 "VWAP Daily"
|
|
#property indicator_type1 DRAW_LINE
|
|
#property indicator_color1 clrRed
|
|
#property indicator_style1 STYLE_DASH
|
|
#property indicator_width1 2
|
|
|
|
#property indicator_label2 "VWAP Weekly"
|
|
#property indicator_type2 DRAW_LINE
|
|
#property indicator_color2 clrBlue
|
|
#property indicator_style2 STYLE_DASH
|
|
#property indicator_width2 2
|
|
|
|
#property indicator_label3 "VWAP Monthly"
|
|
#property indicator_type3 DRAW_LINE
|
|
#property indicator_color3 clrGreen
|
|
#property indicator_style3 STYLE_DASH
|
|
#property indicator_width3 2
|
|
|
|
#property indicator_label4 "VWAP Level 01"
|
|
#property indicator_type4 DRAW_LINE
|
|
#property indicator_color4 clrGray
|
|
#property indicator_style4 STYLE_DASH
|
|
#property indicator_width4 2
|
|
|
|
#property indicator_label5 "VWAP Level 02"
|
|
#property indicator_type5 DRAW_LINE
|
|
#property indicator_color5 clrYellow
|
|
#property indicator_style5 STYLE_DASH
|
|
#property indicator_width5 2
|
|
|
|
#property indicator_label6 "VWAP Level 03"
|
|
#property indicator_type6 DRAW_LINE
|
|
#property indicator_color6 clrGreen
|
|
#property indicator_style6 STYLE_DASH
|
|
#property indicator_width6 2
|
|
|
|
#property indicator_label7 "VWAP Level 04"
|
|
#property indicator_type7 DRAW_LINE
|
|
#property indicator_color7 clrBlack
|
|
#property indicator_style7 STYLE_DASH
|
|
#property indicator_width7 2
|
|
|
|
#property indicator_label8 "VWAP Level 05"
|
|
#property indicator_type8 DRAW_LINE
|
|
#property indicator_color8 clrBlue
|
|
#property indicator_style8 STYLE_DASH
|
|
#property indicator_width8 2
|
|
//+------------------------------------------------------------------+
|
|
//| |
|
|
//+------------------------------------------------------------------+
|
|
enum DATE_TYPE
|
|
{
|
|
DAILY,
|
|
WEEKLY,
|
|
MONTHLY
|
|
};
|
|
//+------------------------------------------------------------------+
|
|
//| |
|
|
//+------------------------------------------------------------------+
|
|
enum PRICE_TYPE
|
|
{
|
|
OPEN,
|
|
CLOSE,
|
|
HIGH,
|
|
LOW,
|
|
OPEN_CLOSE,
|
|
HIGH_LOW,
|
|
CLOSE_HIGH_LOW,
|
|
OPEN_CLOSE_HIGH_LOW
|
|
};
|
|
//+------------------------------------------------------------------+
|
|
//| |
|
|
//+------------------------------------------------------------------+
|
|
datetime CreateDateTime(DATE_TYPE nReturnType=DAILY,datetime dtDay=D'2000.01.01 00:00:00',int pHour=0,int pMinute=0,int pSecond=0)
|
|
{
|
|
datetime dtReturnDate;
|
|
MqlDateTime timeStruct;
|
|
|
|
TimeToStruct(dtDay,timeStruct);
|
|
timeStruct.hour = pHour;
|
|
timeStruct.min = pMinute;
|
|
timeStruct.sec = pSecond;
|
|
dtReturnDate=(StructToTime(timeStruct));
|
|
|
|
if(nReturnType==WEEKLY)
|
|
{
|
|
while(timeStruct.day_of_week!=0)
|
|
{
|
|
dtReturnDate=(dtReturnDate-86400);
|
|
TimeToStruct(dtReturnDate,timeStruct);
|
|
}
|
|
}
|
|
|
|
if(nReturnType==MONTHLY)
|
|
{
|
|
timeStruct.day=1;
|
|
dtReturnDate=(StructToTime(timeStruct));
|
|
}
|
|
|
|
return dtReturnDate;
|
|
}
|
|
|
|
sinput string Indicator_Name="Volume Weighted Average Price (VWAP)";
|
|
input PRICE_TYPE Price_Type = CLOSE_HIGH_LOW;
|
|
input bool Enable_Daily = true;
|
|
input bool Enable_Weekly = true;
|
|
input bool Enable_Monthly = true;
|
|
input bool Enable_Level_01 = false;
|
|
input int VWAP_Level_01_Period = 5;
|
|
input bool Enable_Level_02 = false;
|
|
input int VWAP_Level_02_Period = 13;
|
|
input bool Enable_Level_03 = false;
|
|
input int VWAP_Level_03_Period = 20;
|
|
input bool Enable_Level_04 = false;
|
|
input int VWAP_Level_04_Period = 30;
|
|
input bool Enable_Level_05 = false;
|
|
input int VWAP_Level_05_Period = 40;
|
|
|
|
bool Show_Daily_Value = true;
|
|
bool Show_Weekly_Value = true;
|
|
bool Show_Monthly_Value = true;
|
|
|
|
double VWAP_Buffer_Daily[];
|
|
double VWAP_Buffer_Weekly[];
|
|
double VWAP_Buffer_Monthly[];
|
|
double VWAP_Buffer_01[];
|
|
double VWAP_Buffer_02[];
|
|
double VWAP_Buffer_03[];
|
|
double VWAP_Buffer_04[];
|
|
double VWAP_Buffer_05[];
|
|
|
|
double nPriceArr[];
|
|
double nTotalTPV[];
|
|
double nTotalVol[];
|
|
double nSumDailyTPV = 0, nSumWeeklyTPV = 0, nSumMonthlyTPV = 0;
|
|
double nSumDailyVol = 0, nSumWeeklyVol = 0, nSumMonthlyVol = 0;
|
|
|
|
int nIdxDaily=0,nIdxWeekly=0,nIdxMonthly=0,nIdx=0;
|
|
|
|
bool bIsFirstRun=true;
|
|
|
|
ENUM_TIMEFRAMES LastTimePeriod=PERIOD_MN1;
|
|
|
|
string sDailyStr = "";
|
|
string sWeeklyStr = "";
|
|
string sMonthlyStr = "";
|
|
string sLevel01Str = "";
|
|
string sLevel02Str = "";
|
|
string sLevel03Str = "";
|
|
string sLevel04Str = "";
|
|
string sLevel05Str = "";
|
|
datetime dtLastDay=CreateDateTime(DAILY),dtLastWeek=CreateDateTime(WEEKLY),dtLastMonth=CreateDateTime(MONTHLY);
|
|
//+------------------------------------------------------------------+
|
|
//| |
|
|
//+------------------------------------------------------------------+
|
|
int OnInit()
|
|
{
|
|
IndicatorSetInteger(INDICATOR_DIGITS,_Digits);
|
|
|
|
SetIndexBuffer(0,VWAP_Buffer_Daily,INDICATOR_DATA);
|
|
SetIndexBuffer(1,VWAP_Buffer_Weekly,INDICATOR_DATA);
|
|
SetIndexBuffer(2,VWAP_Buffer_Monthly,INDICATOR_DATA);
|
|
SetIndexBuffer(3,VWAP_Buffer_01,INDICATOR_DATA);
|
|
SetIndexBuffer(4,VWAP_Buffer_02,INDICATOR_DATA);
|
|
SetIndexBuffer(5,VWAP_Buffer_03,INDICATOR_DATA);
|
|
SetIndexBuffer(6,VWAP_Buffer_04,INDICATOR_DATA);
|
|
SetIndexBuffer(7,VWAP_Buffer_05,INDICATOR_DATA);
|
|
|
|
ObjectCreate(0,"VWAP_Daily",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Daily",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Daily",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Daily",OBJPROP_YDISTANCE,40);
|
|
ObjectSetInteger(0,"VWAP_Daily",OBJPROP_COLOR,indicator_color1);
|
|
ObjectSetInteger(0,"VWAP_Daily",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Daily",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Daily",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Weekly",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Weekly",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Weekly",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Weekly",OBJPROP_YDISTANCE,60);
|
|
ObjectSetInteger(0,"VWAP_Weekly",OBJPROP_COLOR,indicator_color2);
|
|
ObjectSetInteger(0,"VWAP_Weekly",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Weekly",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Weekly",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Monthly",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Monthly",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Monthly",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Monthly",OBJPROP_YDISTANCE,80);
|
|
ObjectSetInteger(0,"VWAP_Monthly",OBJPROP_COLOR,indicator_color3);
|
|
ObjectSetInteger(0,"VWAP_Monthly",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Monthly",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Monthly",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Level_01",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Level_01",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Level_01",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Level_01",OBJPROP_YDISTANCE,100);
|
|
ObjectSetInteger(0,"VWAP_Level_01",OBJPROP_COLOR,indicator_color4);
|
|
ObjectSetInteger(0,"VWAP_Level_01",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Level_01",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Level_01",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Level_02",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Level_02",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Level_02",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Level_02",OBJPROP_YDISTANCE,120);
|
|
ObjectSetInteger(0,"VWAP_Level_02",OBJPROP_COLOR,indicator_color5);
|
|
ObjectSetInteger(0,"VWAP_Level_02",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Level_02",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Level_02",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Level_03",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Level_03",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Level_03",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Level_03",OBJPROP_YDISTANCE,140);
|
|
ObjectSetInteger(0,"VWAP_Level_03",OBJPROP_COLOR,indicator_color6);
|
|
ObjectSetInteger(0,"VWAP_Level_03",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Level_03",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Level_03",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Level_04",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Level_04",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Level_04",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Level_04",OBJPROP_YDISTANCE,160);
|
|
ObjectSetInteger(0,"VWAP_Level_04",OBJPROP_COLOR,indicator_color7);
|
|
ObjectSetInteger(0,"VWAP_Level_04",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Level_04",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Level_04",OBJPROP_TEXT," ");
|
|
|
|
ObjectCreate(0,"VWAP_Level_05",OBJ_LABEL,0,0,0);
|
|
ObjectSetInteger(0,"VWAP_Level_05",OBJPROP_CORNER,3);
|
|
ObjectSetInteger(0,"VWAP_Level_05",OBJPROP_XDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Level_05",OBJPROP_YDISTANCE,180);
|
|
ObjectSetInteger(0,"VWAP_Level_05",OBJPROP_COLOR,indicator_color8);
|
|
ObjectSetInteger(0,"VWAP_Level_05",OBJPROP_FONTSIZE,7);
|
|
ObjectSetString(0,"VWAP_Level_05",OBJPROP_FONT,"Verdana");
|
|
ObjectSetString(0,"VWAP_Level_05",OBJPROP_TEXT," ");
|
|
|
|
return(INIT_SUCCEEDED);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| |
|
|
//+------------------------------------------------------------------+
|
|
void OnDeinit(const int pReason)
|
|
{
|
|
ObjectDelete(0,"VWAP_Daily");
|
|
ObjectDelete(0,"VWAP_Weekly");
|
|
ObjectDelete(0,"VWAP_Monthly");
|
|
ObjectDelete(0,"VWAP_Level_01");
|
|
ObjectDelete(0,"VWAP_Level_02");
|
|
ObjectDelete(0,"VWAP_Level_03");
|
|
ObjectDelete(0,"VWAP_Level_04");
|
|
ObjectDelete(0,"VWAP_Level_05");
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//| |
|
|
//+------------------------------------------------------------------+
|
|
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(PERIOD_CURRENT!=LastTimePeriod)
|
|
{
|
|
bIsFirstRun=true;
|
|
LastTimePeriod=PERIOD_CURRENT;
|
|
}
|
|
|
|
if(rates_total>prev_calculated || bIsFirstRun)
|
|
{
|
|
ArrayResize(nPriceArr,rates_total);
|
|
ArrayResize(nTotalTPV,rates_total);
|
|
ArrayResize(nTotalVol,rates_total);
|
|
|
|
if(Enable_Daily) {nIdx = nIdxDaily; nSumDailyTPV = 0; nSumDailyVol = 0;}
|
|
if(Enable_Weekly) {nIdx = nIdxWeekly; nSumWeeklyTPV = 0; nSumWeeklyVol = 0;}
|
|
if(Enable_Monthly) {nIdx = nIdxMonthly; nSumMonthlyTPV = 0; nSumMonthlyVol = 0;}
|
|
|
|
for(; nIdx<rates_total; nIdx++)
|
|
{
|
|
if(CreateDateTime(DAILY,time[nIdx])!=dtLastDay)
|
|
{
|
|
nIdxDaily=nIdx;
|
|
nSumDailyTPV = 0;
|
|
nSumDailyVol = 0;
|
|
}
|
|
if(CreateDateTime(WEEKLY,time[nIdx])!=dtLastWeek)
|
|
{
|
|
nIdxWeekly=nIdx;
|
|
nSumWeeklyTPV = 0;
|
|
nSumWeeklyVol = 0;
|
|
}
|
|
if(CreateDateTime(MONTHLY,time[nIdx])!=dtLastMonth)
|
|
{
|
|
nIdxMonthly=nIdx;
|
|
nSumMonthlyTPV = 0;
|
|
nSumMonthlyVol = 0;
|
|
}
|
|
|
|
nPriceArr[nIdx] = 0;
|
|
nTotalTPV[nIdx] = 0;
|
|
nTotalVol[nIdx] = 0;
|
|
|
|
switch(Price_Type)
|
|
{
|
|
case OPEN:
|
|
nPriceArr[nIdx]=open[nIdx];
|
|
break;
|
|
case CLOSE:
|
|
nPriceArr[nIdx]=close[nIdx];
|
|
break;
|
|
case HIGH:
|
|
nPriceArr[nIdx]=high[nIdx];
|
|
break;
|
|
case LOW:
|
|
nPriceArr[nIdx]=low[nIdx];
|
|
break;
|
|
case HIGH_LOW:
|
|
nPriceArr[nIdx]=(high[nIdx]+low[nIdx])/2;
|
|
break;
|
|
case OPEN_CLOSE:
|
|
nPriceArr[nIdx]=(open[nIdx]+close[nIdx])/2;
|
|
break;
|
|
case CLOSE_HIGH_LOW:
|
|
nPriceArr[nIdx]=(close[nIdx]+high[nIdx]+low[nIdx])/3;
|
|
break;
|
|
case OPEN_CLOSE_HIGH_LOW:
|
|
nPriceArr[nIdx]=(open[nIdx]+close[nIdx]+high[nIdx]+low[nIdx])/4;
|
|
break;
|
|
default:
|
|
nPriceArr[nIdx]=(close[nIdx]+high[nIdx]+low[nIdx])/3;
|
|
break;
|
|
}
|
|
|
|
if(tick_volume[nIdx])
|
|
{
|
|
nTotalTPV[nIdx] = (nPriceArr[nIdx] * tick_volume[nIdx]);
|
|
nTotalVol[nIdx] = (double)tick_volume[nIdx];
|
|
} else if(volume[nIdx]) {
|
|
nTotalTPV[nIdx] = (nPriceArr[nIdx] * volume[nIdx]);
|
|
nTotalVol[nIdx] = (double)volume[nIdx];
|
|
}
|
|
|
|
if(Enable_Daily && (nIdx>=nIdxDaily))
|
|
{
|
|
nSumDailyTPV += nTotalTPV[nIdx];
|
|
nSumDailyVol += nTotalVol[nIdx];
|
|
|
|
if(nSumDailyVol)
|
|
VWAP_Buffer_Daily[nIdx]=(nSumDailyTPV/nSumDailyVol);
|
|
|
|
if((sDailyStr!="VWAP Daily: "+(string)NormalizeDouble(VWAP_Buffer_Daily[nIdx],_Digits)) && Show_Daily_Value)
|
|
{
|
|
sDailyStr="VWAP Daily: "+(string)NormalizeDouble(VWAP_Buffer_Daily[nIdx],_Digits);
|
|
ObjectSetString(0,"VWAP_Daily",OBJPROP_TEXT,sDailyStr);
|
|
}
|
|
}
|
|
|
|
if(Enable_Weekly && (nIdx>=nIdxWeekly))
|
|
{
|
|
nSumWeeklyTPV += nTotalTPV[nIdx];
|
|
nSumWeeklyVol += nTotalVol[nIdx];
|
|
|
|
if(nSumWeeklyVol)
|
|
VWAP_Buffer_Weekly[nIdx]=(nSumWeeklyTPV/nSumWeeklyVol);
|
|
|
|
if((sWeeklyStr!="VWAP Weekly: "+(string)NormalizeDouble(VWAP_Buffer_Weekly[nIdx],_Digits)) && Show_Weekly_Value)
|
|
{
|
|
sWeeklyStr="VWAP Weekly: "+(string)NormalizeDouble(VWAP_Buffer_Weekly[nIdx],_Digits);
|
|
ObjectSetString(0,"VWAP_Weekly",OBJPROP_TEXT,sWeeklyStr);
|
|
}
|
|
}
|
|
|
|
if(Enable_Monthly && (nIdx>=nIdxMonthly))
|
|
{
|
|
nSumMonthlyTPV += nTotalTPV[nIdx];
|
|
nSumMonthlyVol += nTotalVol[nIdx];
|
|
|
|
if(nSumMonthlyVol)
|
|
VWAP_Buffer_Monthly[nIdx]=(nSumMonthlyTPV/nSumMonthlyVol);
|
|
|
|
if((sMonthlyStr!="VWAP Monthly: "+(string)NormalizeDouble(VWAP_Buffer_Monthly[nIdx],_Digits)) && Show_Monthly_Value)
|
|
{
|
|
sMonthlyStr="VWAP Monthly: "+(string)NormalizeDouble(VWAP_Buffer_Monthly[nIdx],_Digits);
|
|
ObjectSetString(0,"VWAP_Monthly",OBJPROP_TEXT,sMonthlyStr);
|
|
}
|
|
}
|
|
|
|
dtLastDay=CreateDateTime(DAILY,time[nIdx]);
|
|
dtLastWeek=CreateDateTime(WEEKLY,time[nIdx]);
|
|
dtLastMonth=CreateDateTime(MONTHLY,time[nIdx]);
|
|
}
|
|
|
|
if(Enable_Level_01)
|
|
{
|
|
int nStartPos=(prev_calculated>VWAP_Level_01_Period) ?(prev_calculated-VWAP_Level_01_Period) : VWAP_Level_01_Period;
|
|
for(nIdx=nStartPos; nIdx<rates_total; nIdx++)
|
|
{
|
|
double nSumTotalTPV = 0;
|
|
double nSumTotalVol = 0;
|
|
VWAP_Buffer_01[nIdx] = EMPTY_VALUE;
|
|
|
|
for(int nSubIdx=1; nSubIdx<VWAP_Level_01_Period; nSubIdx++)
|
|
{
|
|
nSumTotalTPV += nTotalTPV[nIdx - nSubIdx];
|
|
nSumTotalVol += nTotalVol[nIdx - nSubIdx];
|
|
}
|
|
if(nSumTotalVol)
|
|
VWAP_Buffer_01[nIdx]=(nSumTotalTPV/nSumTotalVol);
|
|
else
|
|
VWAP_Buffer_01[nIdx]=0;
|
|
if(sLevel01Str!="VWAP Level 01 ("+(string)VWAP_Level_01_Period+"): "+(string)NormalizeDouble(VWAP_Buffer_01[nIdx],_Digits))
|
|
{
|
|
sLevel01Str = "VWAP Level 01 (" + (string)VWAP_Level_01_Period + "): " + (string)NormalizeDouble(VWAP_Buffer_01[nIdx], _Digits);
|
|
ObjectSetString(0,"VWAP_Level_01",OBJPROP_TEXT,sLevel01Str);
|
|
}
|
|
}
|
|
}
|
|
|
|
if(Enable_Level_02)
|
|
{
|
|
int nStartPos=(prev_calculated>VWAP_Level_02_Period) ?(prev_calculated-VWAP_Level_02_Period) : VWAP_Level_02_Period;
|
|
for(nIdx=nStartPos; nIdx<rates_total; nIdx++)
|
|
{
|
|
double nSumTotalTPV = 0;
|
|
double nSumTotalVol = 0;
|
|
VWAP_Buffer_02[nIdx] = EMPTY_VALUE;
|
|
|
|
for(int nSubIdx=1; nSubIdx<VWAP_Level_02_Period; nSubIdx++)
|
|
{
|
|
nSumTotalTPV += nTotalTPV[nIdx - nSubIdx];
|
|
nSumTotalVol += nTotalVol[nIdx - nSubIdx];
|
|
}
|
|
if(nSumTotalVol)
|
|
VWAP_Buffer_02[nIdx]=(nSumTotalTPV/nSumTotalVol);
|
|
else
|
|
VWAP_Buffer_02[nIdx]=0;
|
|
if(sLevel02Str!="VWAP Level 02 ("+(string)VWAP_Level_02_Period+"): "+(string)NormalizeDouble(VWAP_Buffer_02[nIdx],_Digits))
|
|
{
|
|
sLevel02Str = "VWAP Level 02 (" + (string)VWAP_Level_02_Period + "): " + (string)NormalizeDouble(VWAP_Buffer_02[nIdx], _Digits);
|
|
ObjectSetString(0,"VWAP_Level_02",OBJPROP_TEXT,sLevel02Str);
|
|
}
|
|
}
|
|
}
|
|
|
|
if(Enable_Level_03)
|
|
{
|
|
int nStartPos=(prev_calculated>VWAP_Level_03_Period) ?(prev_calculated-VWAP_Level_03_Period) : VWAP_Level_03_Period;
|
|
for(nIdx=nStartPos; nIdx<rates_total; nIdx++)
|
|
{
|
|
double nSumTotalTPV = 0;
|
|
double nSumTotalVol = 0;
|
|
VWAP_Buffer_03[nIdx] = EMPTY_VALUE;
|
|
|
|
for(int nSubIdx=1; nSubIdx<VWAP_Level_03_Period; nSubIdx++)
|
|
{
|
|
nSumTotalTPV += nTotalTPV[nIdx - nSubIdx];
|
|
nSumTotalVol += nTotalVol[nIdx - nSubIdx];
|
|
}
|
|
if(nSumTotalVol)
|
|
VWAP_Buffer_03[nIdx]=(nSumTotalTPV/nSumTotalVol);
|
|
else
|
|
VWAP_Buffer_03[nIdx]=0;
|
|
if(sLevel03Str!="VWAP Level 03 ("+(string)VWAP_Level_03_Period+"): "+(string)NormalizeDouble(VWAP_Buffer_03[nIdx],_Digits))
|
|
{
|
|
sLevel03Str = "VWAP Level 03 (" + (string)VWAP_Level_03_Period + "): " + (string)NormalizeDouble(VWAP_Buffer_03[nIdx], _Digits);
|
|
ObjectSetString(0,"VWAP_Level_03",OBJPROP_TEXT,sLevel03Str);
|
|
}
|
|
}
|
|
}
|
|
|
|
if(Enable_Level_04)
|
|
{
|
|
int nStartPos=(prev_calculated>VWAP_Level_04_Period) ?(prev_calculated-VWAP_Level_04_Period) : VWAP_Level_04_Period;
|
|
for(nIdx=nStartPos; nIdx<rates_total; nIdx++)
|
|
{
|
|
double nSumTotalTPV = 0;
|
|
double nSumTotalVol = 0;
|
|
VWAP_Buffer_04[nIdx] = EMPTY_VALUE;
|
|
|
|
for(int nSubIdx=1; nSubIdx<VWAP_Level_04_Period; nSubIdx++)
|
|
{
|
|
nSumTotalTPV += nTotalTPV[nIdx - nSubIdx];
|
|
nSumTotalVol += nTotalVol[nIdx - nSubIdx];
|
|
}
|
|
if(nSumTotalVol)
|
|
VWAP_Buffer_04[nIdx]=(nSumTotalTPV/nSumTotalVol);
|
|
else
|
|
VWAP_Buffer_04[nIdx]=0;
|
|
if(sLevel04Str!="VWAP Level 04 ("+(string)VWAP_Level_04_Period+"): "+(string)NormalizeDouble(VWAP_Buffer_04[nIdx],_Digits))
|
|
{
|
|
sLevel04Str = "VWAP Level 04 (" + (string)VWAP_Level_04_Period + "): " + (string)NormalizeDouble(VWAP_Buffer_04[nIdx], _Digits);
|
|
ObjectSetString(0,"VWAP_Level_04",OBJPROP_TEXT,sLevel04Str);
|
|
}
|
|
}
|
|
}
|
|
|
|
if(Enable_Level_05)
|
|
{
|
|
int nStartPos=(prev_calculated>VWAP_Level_05_Period) ?(prev_calculated-VWAP_Level_05_Period) : VWAP_Level_05_Period;
|
|
for(nIdx=nStartPos; nIdx<rates_total; nIdx++)
|
|
{
|
|
double nSumTotalTPV = 0;
|
|
double nSumTotalVol = 0;
|
|
VWAP_Buffer_05[nIdx] = EMPTY_VALUE;
|
|
|
|
for(int nSubIdx=1; nSubIdx<VWAP_Level_05_Period; nSubIdx++)
|
|
{
|
|
nSumTotalTPV += nTotalTPV[nIdx - nSubIdx];
|
|
nSumTotalVol += nTotalVol[nIdx - nSubIdx];
|
|
}
|
|
if(nSumTotalVol)
|
|
VWAP_Buffer_05[nIdx]=(nSumTotalTPV/nSumTotalVol);
|
|
else
|
|
VWAP_Buffer_05[nIdx]=0;
|
|
if(sLevel05Str!="VWAP Level 05 ("+(string)VWAP_Level_05_Period+"): "+(string)NormalizeDouble(VWAP_Buffer_05[nIdx],_Digits))
|
|
{
|
|
sLevel05Str = "VWAP Level 05 (" + (string)VWAP_Level_05_Period + "): " + (string)NormalizeDouble(VWAP_Buffer_05[nIdx], _Digits);
|
|
ObjectSetString(0,"VWAP_Level_05",OBJPROP_TEXT,sLevel05Str);
|
|
}
|
|
}
|
|
}
|
|
|
|
bIsFirstRun=false;
|
|
}
|
|
|
|
return(rates_total);
|
|
}
|
|
//+------------------------------------------------------------------+
|