A Smoothed RSI Inverse Fisher Transform
The article by Sylvain Vervoort in this issue, “A Smoothed RSI Inverse Fisher Transform”, demonstrates an indicator that gives clear entry and exit signals, making it easier to make your entry and exit decisions.
Using Indicator Builder, one needs to create the SVE inverse Fisher RSI indicator:
SVE inverse Fisher RSI:
input
RSIper : "RSI Period?",4,2,30;
EMAper : "Exponential Moving AveragePeriod?",4,1,100;
end_input
var
RainbW:=0;
x:=0;
EMA1:=0;
EMA2:=0;
Difference:=0;
ZlEma:=0;
invfish:=0;
end_var
RainbW:=(5 * Mov(C, 2, W) + 4 * Mov(Mov(C, 2, W),
2, W) +
3 * Mov(Mov(Mov(C, 2, W), 2, W), 2, W) +
2 * Mov(Mov(Mov(Mov(C, 2, W), 2, W), 2,
W), 2, W) +
Mov(Mov(Mov(Mov(Mov(C, 2, W), 2, W), 2, W), 2, W),
2, W) +
Mov(Mov(Mov(Mov(Mov(Mov(C, 2, W), 2, W),
2, W), 2, W), 2, W), 2, W) +
Mov(Mov(Mov(Mov(Mov(Mov(Mov(C, 2, W),
2, W), 2, W), 2, W), 2, W), 2, W), 2, W) +
Mov(Mov(Mov(Mov(Mov(Mov(Mov(Mov(C, 2, W),
2, W), 2, W), 2, W), 2, W), 2, W), 2, W), 2, W) +
Mov(Mov(Mov(Mov(Mov(Mov(Mov(Mov(Mov(C, 2, W),
2, W), 2, W), 2, W), 2, W), 2, W), 2, W), 2, W),
2, W) +
Mov(Mov(Mov(Mov(Mov(Mov(Mov(Mov(Mov(Mov(C, 2, W),
2, W), 2, W), 2, W), 2, W), 2, W), 2, W), 2, W),
2, W), 2, W)) / 20;
x:=0.1 * (RSI(RainbW, RSIper) - 50);
EMA1:=Mov(x, EMAper, Exponential);
EMA2:=Mov(EMA1, EMAper, Exponential);
Difference:=EMA1 - EMA2;
ZlEma:=EMA1 + Difference;
invfish:=((Exp(2*ZlEma)-1)/(Exp(2*ZlEma)+1)+1)*50;
return invfish;
|