// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN("Price Oscillator");

m = Param("Periods", 10, 5, 20, 1 );
n = Param("Average", 4, 3, 10, 1 );

Var2=(High+Low+Close*2)/4;
Var3=EMA(Var2,m);
Var4=StDev(Var2,m);
Var5=(Var2-Var3)*100/IIf(Var4==0,1,Var4);
Var6=EMA(Var5,n);
Var7=EMA(Var6,n);
WW=(EMA(Var7,m)+100)/2-4;
MM=HHV(WW,n);

Plot(ww, "WW", colorBlue, 1);
Plot(mm, "MM", colorRed, styleThick, 1);
A=WW;
B=MM;
Hi = IIf(A > B, A, B);
Lo = IIf(A < B, A, B);
Color = IIf(A > B, colorBlue,colorRed);
PlotOHLC(Lo,Hi,Lo,Hi,"",COLOR, styleNoLabel | styleCloud);
Buy=IIf(ww>Ref(ww,-1) AND Ref(ww,-1)<Ref(ww,-2) AND ww<50,20,0);
Sell=IIf(ww<Ref(ww,-1) AND Ref(ww,-1)>Ref(ww,-2) AND ww>50,20,0);
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
PlotShapes(IIf(Buy,shapeUpTriangle,shapeNone) ,colorBrightGreen);
PlotShapes(IIf(Sell,shapeDownTriangle,shapeNone),colorRed);
_SECTION_END();