SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", colorBlack,styleCandle);
Plot(EMA(Close,200),"",ColorRGB(0,255,255),styleLine|styleNoTitle|styleNoLabel|styleNoRescale,styleNoRescale);
Plot(EMA(Close,36),"",ColorRGB(255,255,128),styleLine|styleNoTitle|styleNoLabel|styleNoRescale,styleNoRescale);
_SECTION_BEGIN("EMA 5 MIN");
TimeFrameSet(in5Minute);
m5= EMA(Close,36) ;
Plot(TimeFrameExpand(m5, in5Minute), "", colorAqua , styleDashed);
TimeFrameRestore();
_SECTION_END();
_SECTION_BEGIN("EMA 15 MIN");
TimeFrameSet(in15Minute);
m15= EMA(Close,36) ;
Plot(TimeFrameExpand(m15, in15Minute), "", colorYellow , styleDashed);
TimeFrameRestore();
_SECTION_END();
_SECTION_BEGIN("HiLo Vol N");
n=Day() != Ref(Day(), -1);
a=LowestSince(n,V);
hh=ValueWhen(V==a,H);
ll=ValueWhen(V==a,L);
//Plot(hh,"\nLVhb",colorGreen,styleDots);
//Plot(ll,"\nLVlb",colorred,styleDots);
PlotOHLC( hh, hh, ll, ll, "",colorAqua,styleCloud|styleNoRescale,Null,Null,0,-2,0);
_SECTION_END();
_SECTION_BEGIN("VKSLline");
VKSLline=ParamToggle("VKSLline","Off|On",1);
if(VKSLline)
{
n=Day() != Ref(Day(), -1);
a=LowestSince(n,V);
hh=ValueWhen(V==a,H);
ll=ValueWhen(V==a,L);
e36 = EMA(c,36);
res=max(e36,hh);
sup=min(e36,ll);
avd=IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0));
avn=ValueWhen(avd!=0,avd,1);
tsl=IIf(avn==1,sup,res);
col = IIf(avn==1,colorBrightGreen,colorRed);
col1 = IIf(avn==1,ColorRGB(64,64,64),colorRed);
plot(tsl,"\nVKSL ",col,stylethick);
y=5;
PlotOHLC(y,Y+10,y,y,"",col1,styleOwnScale|styleNoLabel|styleCloud,0,500,0,-5);
}
_SECTION_END();
_SECTION_BEGIN("EM");
EM=ParamToggle("EM","Off|On",1);
if(EM)
{
Plot( EMA( C, 36 ), "EMA36OBV", ColorRGB(255,0,255), styleLine ,styleNoLabel|styleNoRescale );
Plot( EMA( C, 200 ), "EMA200OBV", ColorRGB(102,255,204), styleLine ,styleNoLabel|styleNoRescale );
m3=EMA(C,36);
m4=EMA(C,200);
PlotOHLC(m3,m3,m4,m4,"Cloud",IIf(m3>m4,colorGreen,colorPlum),styleCloud|styleNoRescale,Null,Null,0,-2,0);
}
_SECTION_END();