// Downloaded From https://www.WiseStockTrader.com _SECTION_BEGIN("Price"); 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", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); _SECTION_END(); Plot(EMA(C, 3), _DEFAULT_NAME(), IIf(C > EMA( Close,3),colorlightorange, colorseagreen), styleLine); Plot(EMA(C,4), _DEFAULT_NAME(), IIf(C > EMA( Close,4),colorlightorange, colorseagreen) ,styleLine); Plot(EMA(C, 5), _DEFAULT_NAME(), IIf(C > EMA( Close,4),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 6), _DEFAULT_NAME(), IIf(C > EMA( Close,6),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 7), _DEFAULT_NAME(), IIf(C > EMA( Close,7),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 8), _DEFAULT_NAME(), IIf(C > EMA( Close,8),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 9), _DEFAULT_NAME(), IIf(C > EMA( Close,9),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 10), _DEFAULT_NAME(), IIf(C > EMA( Close,10),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 11), _DEFAULT_NAME(), IIf(C > EMA( Close,11),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 12), _DEFAULT_NAME(), IIf(C > EMA( Close,12),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 13), _DEFAULT_NAME(), IIf(C > EMA( Close,13),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 14), _DEFAULT_NAME(), IIf(C > EMA( Close,14),colorlightorange, colorseagreen), styleLine); Plot(EMA(C,15), _DEFAULT_NAME(), IIf(C > EMA( Close,15),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 16), _DEFAULT_NAME(), IIf(C > EMA( Close,16),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 17), _DEFAULT_NAME(), IIf(C > EMA( Close,17),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 18), _DEFAULT_NAME(), IIf(C > EMA( Close,18),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 19), _DEFAULT_NAME(), IIf(C > EMA( Close,19),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 20), _DEFAULT_NAME(), IIf(C > EMA( Close,20),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 21), _DEFAULT_NAME(), IIf(C > EMA( Close,21),colorlightorange, colorseagreen), styleLine); Plot(EMA(C,22), _DEFAULT_NAME(), IIf(C > EMA( Close,22),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 23), _DEFAULT_NAME(), IIf(C > EMA( Close,23),colorlightorange, colorseagreen), styleLine); Plot(EMA(C,24), _DEFAULT_NAME(), IIf(C > EMA( Close,24),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 25), _DEFAULT_NAME(), IIf(C > EMA( Close,25),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 26), _DEFAULT_NAME(), IIf(C > EMA( Close,26),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 27), _DEFAULT_NAME(), IIf(C > EMA( Close,27),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 28), _DEFAULT_NAME(), IIf(C > EMA( Close,28),colorlightorange, colorseagreen), styleLine); Plot(EMA(C,29), _DEFAULT_NAME(), IIf(C > EMA( Close,29),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 30), _DEFAULT_NAME(), IIf(C > EMA( Close,30),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 31), _DEFAULT_NAME(), IIf(C > EMA( Close,31),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 32), _DEFAULT_NAME(), IIf(C > EMA( Close,32),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 33), _DEFAULT_NAME(), IIf(C > EMA( Close,33),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 34), _DEFAULT_NAME(), IIf(C > EMA( Close,34),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 35), _DEFAULT_NAME(), IIf(C > EMA( Close,35),colorlightorange, colorseagreen), styleLine); Plot(EMA(C,36), _DEFAULT_NAME(), IIf(C > EMA( Close,36),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 37), _DEFAULT_NAME(), IIf(C > EMA( Close,37),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 38), _DEFAULT_NAME(), IIf(C > EMA( Close,38),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 39), _DEFAULT_NAME(), IIf(C > EMA( Close,39),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 40), _DEFAULT_NAME(), IIf(C > EMA( Close,40),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 41), _DEFAULT_NAME(), IIf(C > EMA( Close,41),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 42), _DEFAULT_NAME(), IIf(C > EMA( Close,42),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 43), _DEFAULT_NAME(), IIf(C > EMA( Close,43),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 44), _DEFAULT_NAME(), IIf(C > EMA( Close,44),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 45), _DEFAULT_NAME(), IIf(C > EMA( Close,45),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 46), _DEFAULT_NAME(), IIf(C > EMA( Close,46),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 47), _DEFAULT_NAME(), IIf(C > EMA( Close,47),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 48), _DEFAULT_NAME(), IIf(C > EMA( Close,48),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 49), _DEFAULT_NAME(), IIf(C > EMA( Close,49),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 50), _DEFAULT_NAME(), IIf(C > EMA( Close,50),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 51), _DEFAULT_NAME(), IIf(C > EMA( Close,51),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 52), _DEFAULT_NAME(), IIf(C > EMA( Close,52),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 53), _DEFAULT_NAME(), IIf(C > EMA( Close,53),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 54), _DEFAULT_NAME(), IIf(C > EMA( Close,54),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 55), _DEFAULT_NAME(), IIf(C > EMA( Close,55),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 56), _DEFAULT_NAME(), IIf(C > EMA( Close,56),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 57), _DEFAULT_NAME(), IIf(C > EMA( Close,57),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 58), _DEFAULT_NAME(), IIf(C > EMA( Close,58),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 59), _DEFAULT_NAME(), IIf(C > EMA( Close,59),colorlightorange, colorseagreen), styleLine); Plot(EMA(C, 60), _DEFAULT_NAME(), IIf(C > EMA( Close,60),coloryellow, coloryellow), styleLine); Periods= Param("Darvas Periods",3,3,260); Periods1= Param("Darvas Periods",14,14,260); boxHigh = Ref(H,-3)>=Ref(HHV(H,periods),-4) AND Ref(H,-3)>Ref(H,-2) AND Ref(H,-3)>Ref(H,-1) AND Ref(H,-3)>H; boxHigh1 = Ref(H,-3)>=Ref(HHV(H,20),-4) AND Ref(H,-3)>Ref(H,-2) AND Ref(H,-3)>Ref(H,-1) AND Ref(H,-3)>H; Topbox=ValueWhen(boxHigh, Ref(H,-3)); Botbox=ValueWhen(boxHigh,LLV(L,4)); Topbox1=ValueWhen(boxHigh1, Ref(H,-3)); Botbox1=ValueWhen(boxHigh1,LLV(L,4)); /*========================= - Allow color change - Style change ==========================*/ Plot(TopBox, "Top", colorBlue); Plot(Botbox, "Bot", colorBlue); //Plot(TopBox1, "Top", colorred); //Plot(Botbox1, "Bot", colorred); _SECTION_END();