// Downloaded From https://www.WiseStockTrader.com
AvClose= (High+Low)/2;
AvOpen = Ref(AvClose,-1);
AvHigh = Max(High,Ref(High,-1)); 
AvLow  = Min(Low,Ref(Low,-1)); 

Color = IIf(AvClose <=Ref(AvClose ,-1) , colorRed, 
        IIf(AvClose >=Ref(AvClose ,-1) , colorGreen, colorBlack ) ); 

SetBarFillColor( Color ); 
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} AvOpen %g, AvHigh %g,AvLow %g, AvClose %g (%.2f%%) ", AvOpen, AvHigh, AvLow, AvClose, SelectedValue(ROC( AvClose, 1))));
PlotOHLC(AvOpen, AvHigh, AvLow, AvClose, _DEFAULT_NAME(), ParamColor("Color",colorBlack), styleCandle);