Oscillator True Strength Index by Jose Silva

True Strength Index

{ (c) Copyright 2003-2004 Jose Silva }
{ http://www.metastocktools.com }

pdsRoc:=Input("ROC periods",1,252,3);
pdsEma:=Input("EMA periods",1,252,5);
smooth:=Input("smoothing EMA periods",1,252,8);
display:=Input("plot TSI=1, +/- slope signals=2",1,2,1);

TSI:=100*
Mov(Mov(ROC(C,pdsRoc,%),pdsEma,E),smooth,E)/
Mov(Mov(Abs(ROC(C,pdsRoc,%)),pdsEma,E),smooth,E);
SlopeSig:=
If(TSI>Ref(TSI,-1),1,If(TSI<Ref(TSI,-1),-1,0));

0;If(display=2,SlopeSig,TSI)