// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("TSV_1");
Time = 18;  

TSVd= ( C-Ref(C,-1)) / IIf(H > L, H - L, EMA(H,34)- EMA(L,34))*V;

TSV=EMA(0.10526315789473684210526315789474*(EMA(TSVd,13)),1) * Time/10000000;
dynamic_color = IIf( TSV> 0,  ParamColor("Up Color", colorGreen ), ParamColor("Down Color", colorRed )); 
Plot(TSV,"TSV",dynamic_color, ParamStyle( "Style", styleHistogram | styleThick, maskHistogram  ), 1);

Plot(0,"",47,1);
Title = "TSV"; 
_SECTION_END();