I believe the following formula echoes the results of TC2000's RSI .
A:=Input("Period",2,40,21);
B:=C;
Up:=If(B>Ref(B,-1),B-Ref(B,-1),0);
Dn:=If(B<=Ref(B,-1) ,Ref(B,-1)-B,0);
Upavg:=Mov(Up,A,S);
Dnavg:=Mov(Dn,A,S);
100-(100/(1+(Upavg/Dnavg)));
50;
Ron
|