// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN(" JFK Base Line");


EH= EMA(H,5);
EC= EMA(C,5);
EL= EMA(L,5);

R = ((HHV(EMA(C,5),5) - EMA(C,5)) /(HHV (EMA(C,5),5) -LLV (EMA(C,5),5))) *-100;
R1 = ((HHV(EMA(C,5),10) - EMA(C,5)) /(HHV (EMA(C,5),10) -LLV (EMA(C,5),10))) *-100;
R2 = ((HHV(EMA(C,5),15) - EMA(C,5)) /(HHV (EMA(C,5),15) -LLV (EMA(C,5),15))) *-100;

Plot(R, "Williams %R", colorPaleBlue, styleThick);
Plot(R1, "Williams %R", colorBlue, styleThick);
Plot(R2, "Williams %R", colorDarkBlue, styleThick);

_SECTION_END();