Anyone using information or codes on these pages does so at their own risk - no guarantees of stability or profitability are claimed. These codes are all for testing purposes only.
{3 Pole Super Smoother - //// From 'Cybernetic Analysis for Stocks and Futures' by John Ehlers //// code compiled by dn}
// plot on a subgraph separate from the price region.
Input: Price((H+L)/2), Period(15);
Var: a1(0), b1(0), c1(0), coef1(0), coef2(0), coef3(0), coef4(0), Filt3(0);
a1=expvalue(-3.14159/Period);
b1=2*a1*Cosine(1.738*180/Period);
c1=a1*a1;
coef2=b1+c1;
coef3=-(c1+b1*c1);
coef4=c1*c1;
coef1=1-coef2-coef3-coef4;
Filt3 = coef1*Price+coef2*Filt3[1]+coef3*Filt3[2]+coef4*Filt3[3];
If CurrentBar<4 then Filt3=Price;
Plot1(Filt3,"Filt3",white);