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")