RicardoSantos

[RS]Linear Regression Bull and Bear Power Accumulation V1

EXPERIMENTAL:
Bull and Bear power based on linear regression (this is a non lagging oscillator, the parameter are for the lookup window for the donchian extremes)
this indicator can also be used for convergence/divergence.
(accidentjev2) added multi timeframe support (indicator may repaint values)

Open-source Skript

Ganz im Spirit von TradingView hat der Autor dieses Skripts es als Open-Source veröffentlicht, damit Trader es besser verstehen und überprüfen können. Herzlichen Glückwunsch an den Autor! Sie können es kostenlos verwenden, aber die Wiederverwendung dieses Codes in einer Veröffentlichung unterliegt den Hausregeln. Sie können es als Favoriten auswählen, um es in einem Chart zu verwenden.

Haftungsausschluss

Die Informationen und Veröffentlichungen sind nicht als Finanz-, Anlage-, Handels- oder andere Arten von Ratschlägen oder Empfehlungen gedacht, die von TradingView bereitgestellt oder gebilligt werden, und stellen diese nicht dar. Lesen Sie mehr in den Nutzungsbedingungen.

Möchten Sie dieses Skript auf einem Chart verwenden?
//@version=2
study(title='[RS]Linear Regression Bull and Bear Power Accumulation V1', shorttitle='BBPa', overlay=false)
SHOW_REM = input(title='Show as (bull-bear)?', type=bool, defval=false)
SHOW_ACC = input(title='Show as accumulation?', type=bool, defval=true)
window = input(title='Lookback Window:', type=integer, defval=10)
smoothing = input(title='Smoothing Length:', type=integer, defval=4)
acc_length = input(title='Accumulation Length:', type=integer, defval=100)
USE_ALT_TF = input(title='Use alternative timeframe?', type=bool, defval=false)
alt_tf = input(title='Alternative timeframe:', type=string, defval='D', confirm=false)

f_exp_lr(_height, _length)=>
    _ret = _height + (_height/_length)

h_value = highest(close, window)
l_value = lowest(close, window)

h_bar = n-highestbars(close, window)
l_bar = n-lowestbars(close, window)

bear = 0-f_exp_lr(h_value-close, n-h_bar)
bull = 0+f_exp_lr(close-l_value, n-l_bar)

bear_acc = sum(nz(bear, 0), acc_length)
bull_acc = sum(nz(bull, 0), acc_length)

rem = SHOW_ACC ? bull_acc-abs(bear_acc) : bull - abs(bear)
rem_bull = rem > 0 ? rem : 0
rem_bear = rem < 0 ? rem : 0

bear_output = USE_ALT_TF ? security(tickerid, alt_tf, SHOW_REM?rem_bear:SHOW_ACC?bear_acc:bear) : SHOW_REM?rem_bear:SHOW_ACC?bear_acc:bear
bull_output = USE_ALT_TF ? security(tickerid, alt_tf, SHOW_REM?rem_bull:SHOW_ACC?bull_acc:bull) : SHOW_REM?rem_bull:SHOW_ACC?bull_acc:bull

plot(title='Bear', series=bear_output, style=columns, color=maroon)
plot(title='Bull', series=bull_output, style=columns, color=green)