main afl (supported 1)(watch price bar touched yellow line )

_SECTION_BEGIN("Background_Setting");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),
ParamColor("BgBottom", colorBlack),ParamColor("titleblock",colorLightGrey ));
_SECTION_END();

Plot(100,"",7,styleLine);
Plot(70,"", colorRed, styleDots, styleLine);
Plot(-100,"",1,styleLine);
Plot (30, "", colorRed, styleDots, styleNoLabel);
Plot(0,"",7,styleLine);

_SECTION_BEGIN("Stoch K");
SetChartOptions(0,0,ChartGrid30 | ChartGrid70 );
r = StochK(15);
Plot( r, "StochK", colorLightYellow );
PlotOHLC( r,r,50,r, "", IIf( r > 50, colorGreen, colorRed ), styleCloud | styleClipMinMax, 30, 70 );
_SECTION_END();

Plot( Volume, "Volume", colorLightBlue, styleHistogram | styleOwnScale );

_SECTION_BEGIN("trend");
uptrend=PDI(20)>MDI(10)AND Signal(26)<MACD(13);
downtrend=MDI(10)>PDI(20)AND Signal(26)>MACD(13);


Plot( 2, /* defines the height of the ribbon in percent of pane width */"ribbon",
IIf( uptrend, colorGreen, IIf( downtrend, colorRed, 0 )), /* choose color */
styleOwnScale|styleArea|styleNoLabel, -0.5, 100 );

_SECTION_END();