Function Fisher Transform V1
added ability for selecting src to the fisher() function. now can be used with rsi/stoch/macd/etc...
study(title="Function Fisher Transform V1", shorttitle="F")
window01 = input(12)
window02 = input(48)
window03 = input(144)
f_fisher(_src, _window)=>
_h = highest(_src, _window)
_l = lowest(_src, _window)
_value0 = .66 * ((_src - _l) / max(_h - _l, .001) - .5) + .67 * nz(_value0[1])
_value1 = _value0 > .99 ? .999 : _value0 < -.99 ? -.999 : _value0
_fisher = .5 * log((1 + _value1) / max(1 - _value1, .001)) + .5 * nz(_fisher[1])
r = rsi(close, 5)
fish1 = f_fisher(r, window01)
fish2 = f_fisher(r, window02)
fish3 = f_fisher(r, window03)
hline(1.5, color=black)
hline(0, color=black)
hline(-1.5, color=black)
plot(fish1, color=blue, title="Fast")
plot(fish2, color=black, title="Normal")
plot(fish3, color=red, title="Slow")