// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Chart Settings");
SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkColor(ParamColor("Outer Panel",colorPaleBlue));
SetChartBkGradientFill(ParamColor("Upper Chart",1),ParamColor("Lower Chart",1));
_SECTION_END();



P=30;
CMO30=100*((Sum(IIf(C>Ref(C,-1),(C-Ref(C,-1)),0),P))-(Sum(IIf(C<Ref(C,-1),(Ref(C,-1)-C),0),P)))/((Sum(IIf(C>Ref(C,-1),(C-Ref(C,-1)),0),P)+(Sum(IIf(C<Ref(C,-1),(Ref(C,-1)-C),0),P))));
C1=DEMA(CMO30,30);
D_sat10=RSIa(C1,10);
D_sat5=RSIa(C1,5);

Plot(D_sat10,"",14,1);Plot(D_sat5,"",2,1);Plot(D_sat5-D_sat10,"",10,2);

Cross(d_sat5,d_sat10)OR d_sat5 > d_sat10;
Cross(d_sat10,d_sat5)OR d_sat10 > d_sat5;
Buy =Cross(d_sat5,d_sat10);
Sell =Cross(d_sat10,d_sat5);
Filter= Buy OR Sell;


_SECTION_BEGIN("PlotVapOverlayA Fonksiyonu");
segments = IIf(Cross(d_sat5,d_sat10) ,Cross(d_sat5,d_sat10), Cross(d_sat10,d_sat5));

PlotVAPOverlayA( segments , Param("Lines", 300, 100, 1000, 1 ), Param("Width", 100, 1, 100, 1 ), ParamColor("Color", colorGold ), ParamToggle("Side", "Left|Right" ) | 2 * ParamToggle("Style", "Fill|Lines", 0) | 4*ParamToggle("Z-order", "On top|Behind", 1 ) );
Plot(segments, "", IIf(Buy,colorYellow,colorRed), styleHistogram | styleOwnScale );
_SECTION_END();