meistermdf.blogg.se

Vol.AssignValueColor(if close > close then Vol.color("Up") else if close < close then Vol.color("Down") else GetColor(1)) Vol.SetPaintingStrategy(PaintingStrategy.HISTOGRAM)

tPaintingStrategy(PaintingStrategy.Histogram) ītPaintingStrategy(PaintingStrategy.Histogram) īuyVol.SetDefaultColor(Color.Dark_Green) ĭef AvgDayVol = MovingAverage(AvgType, DayVol, AvgDayVolLength) ĭef percentOfDay = Round((DayVol / AvgDayVol) * 100, 0) ĭef AvgBarVol = MovingAverage(AvgType, Volume, AvgBarVolLength) ĭef percentOfBar = Round((Volume / AvgBarVol) * 100, 0) ĭef SellVolPercent = Round((Selling / Volume) * 100, 0) ĭef BuyVolPercent = 100 - SellVolPercent ĪddLabel(ShowDayAvg, "Avg “ + AvgDayVolLength + “ Days: " + Round(AvgDayVol, 0), Color.LIGHT_GRAY) ĪddLabel(ShowTodayVolume, "Today: " + DayVol, (if percentOfDay >= UnusualVolumePercent then Color.GREEN else if percentOfDay >= 100 then Color.ORANGE else Color.LIGHT_GRAY)) ĪddLabel(ShowPercentOfDayAvg, percentOfDay + "%", (if percentOfDay >= UnusualVolumePercent then Color.GREEN else if percentOfDay >= 100 then Color.ORANGE else Color.WHITE) ) ĪddLabel(ShowBarAvg, "Avg “ + AvgBarVolLength + ” Bars: " + Round(AvgBarVol, 0), Color.LIGHT_GRAY) ĪddLabel(ShowCurrentBar, "Cur Bar: " + volume, (if percentOfBar >= UnusualVolumePercent then Color.GREEN else if percentOfBar >= 100 then Color.ORANGE else Color.LIGHT_GRAY)) ĪddLabel(ShowPercentOfBarAvg, percentOfBar + "%", (if percentOfBar >= UnusualVolumePercent then Color.GREEN else if percentOfBar >= 100 then Color.ORANGE else Color.WHITE) ) ĪddLabel(ShowSellVolumePercent, "Cur Bar Sell %: "+SellVolPercent, if SellVolPercent > BuyVolPercent then color.red else color.black) ĪddLabel(ShowBuyVolumePercent, "Cur Bar Buy %: "+BuyVolPercent, if BuyVolPercent > SellVolPercent then een else color.black)