Hi guys, I'm back with a little improvement on the Bull and Bear Signal I published just last week thanks to some feedback I received from a couple of users, which is of course highly appreciated.
Here are the changes that have been implemented compared to v01 : (version 1 is the top indicator, version 2 is the bottom one) in the chart above
Formula adapted to calculate the signal if no data is available for either bull or bear
Added the possibility to smoothen the signal using Arnaud Legroux Moving Average (the benefit of this is that it does not add any lag to the signal)
Zero line was added
If you have any further ideas on how to improve the indicator or if you are happy with it and want to share your settings or rules of engagement, please feel free to share them below.
Oh, and don't forget to click that like button ! :)
Hi Nico, @Nico.Muselle. Thanks for this script. I have adapted it by plotting another line for a long term resolution but I have observed that the color on the long term resolution line is not accurate on real time data as compared to historical data. Here is the code. Do you know how I can fix the problem?
//@version=2
// this code uses the Linear Regression Bull and Bear Power indicator created by RicardoSantos
// and adds a signal line
// Use : if signal line is changes color, you have your signal, green = buy, red = sell
// Advice : best used with a zero lag indicator like ZeroLagEMA_LB from LazyBear
// if price is above ZLEMA and signal = green => buy, price below ZLEMA and signal = red => sell
// ***** Changelog compared to v01 ******
// Adapted formula to calculate the signal in case there is no information for either bear or bull
// Added the possibility to smoothen the signal (this is done by a simple SMA)
// Added zero line
study(title='Improved Linear Regression Bull and Bear Power v02', shorttitle='Linear Regression Bull/Bear Power', overlay=false)
window = input(title='Lookback Window:', type=integer, defval=10)
smooth = input(title='Smooth ?', type=bool, defval=true)
smap = input(title='Smooth factor', type=integer, defval=5, minval=2, maxval=10)
sigma = input(title='Sigma', type=integer, defval=6)
longTermResolution = input(title='Long term resolution', type=resolution, defval='D')
divergence = (longTermDirection < 0 and direction > 0 and colorSeries[1] != colorSeries[0]) or
(longTermDirection > 0 and direction < 0 and colorSeries[1] != colorSeries[0]) ? true : false
plot(0,title='zero line', color=divergence ? blue : orange, linewidth=2)
LiamCarroll
⋅
I have found this to be an unbelievable indicator - the 1hr smoothed especially seems to pick of tops, bottoms with great accuracy. 1. Use ZTLs Bar_Trend on the time frame you are trading (colour change for trade direction) 2. Use the Lin reg bull bear signal on the next higher time frame (5m > 15m > 60m > 240M) to confirm the signal 3. When you get colour confirmation on both indicator / timescale combo take the trade and stay in the trade until Bull/Bear changes on the higher time frame.
any chance you can code this for multi time frame as would be ideal for alerts ands scanners.
By far on of the best indicators on TV.
V91494
⋅
Hi Nico, I just started following you..can you please share an overview of this indicator..like how to read this chart..what is zero line?
Thanks in advance!!
AndrewHook
⋅
Genial Nico. Thanks a lot +10
Nico.Muselle
⋅
Thanks ! :)
nboone
⋅
All I can say is wow. . . I did a little manual back testing on UJ daily using the default settings, changed the chart to Renko [close, Traditional, 0.1], and added LazyBear's ZeroLagEMA you suggested in the code comments. Following your instructions in the code comments results in a very high Win %, Great RR on each trade, and a very simple system.
I do not have a PRO account. So, I am unable to test on any time frame lower than D but I imaging there will be more false signals/losses on lower time frames. However, if further analysis supports the signals, lower time frames may still be quite profitable.
Thank you for you hard work on this indi!
tradingmania
⋅
Great improvement!
Nico.Muselle
⋅
Thanks a lot ! :)
TheAussieBogan
⋅
Thank you..
walma855027
⋅
Hey would it be possible to make a scanner for this. on tos or here but dont think thats possible
//@version=2
// this code uses the Linear Regression Bull and Bear Power indicator created by RicardoSantos
// and adds a signal line
// Use : if signal line is changes color, you have your signal, green = buy, red = sell
// Advice : best used with a zero lag indicator like ZeroLagEMA_LB from LazyBear
// if price is above ZLEMA and signal = green => buy, price below ZLEMA and signal = red => sell
// ***** Changelog compared to v01 ******
// Adapted formula to calculate the signal in case there is no information for either bear or bull
// Added the possibility to smoothen the signal (this is done by a simple SMA)
// Added zero line
study(title='Improved Linear Regression Bull and Bear Power v02', shorttitle='Linear Regression Bull/Bear Power', overlay=false)
window = input(title='Lookback Window:', type=integer, defval=10)
smooth = input(title='Smooth ?', type=bool, defval=true)
smap = input(title='Smooth factor', type=integer, defval=5, minval=2, maxval=10)
sigma = input(title='Sigma', type=integer, defval=6)
longTermResolution = input(title='Long term resolution', type=resolution, defval='D')
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) > 0 ? f_exp_lr(h_value-close, n-h_bar) : 0)
bull = 0+(f_exp_lr(close-l_value, n-l_bar) > 0 ? f_exp_lr(close-l_value, n-l_bar) : 0)
longTermBear = security(tickerid, longTermResolution, bear)
longTermBull = security(tickerid, longTermResolution, bull)
direction = smooth ? alma(bull + bear, smap, 0.9, sigma) : bull*3 + bear*3
colorSeries = smooth ? direction[0] > direction[1] ? 0 : direction[0] < direction[1] ? 1 : 2 : direction > bull ? 0 : direction < bear ? 1 : 2
dcolor = colorSeries == 0 ? lime : colorSeries == 1 ? maroon : yellow
longTermDirection = smooth ? alma(longTermBull + longTermBear, smap, 0.9, sigma) : longTermBull*3 + longTermBear*3
longTermColorSeries = smooth ? longTermDirection[0] > longTermDirection[1] ? 0 : longTermDirection[0] < longTermDirection[1] ? 1 : 2 : longTermDirection > longTermBull ? 0 : longTermDirection < longTermBear ? 1 : 2
longTermColor = longTermColorSeries == 0 ? green : longTermColorSeries == 1 ? red : yellow
divergence = (longTermDirection < 0 and direction > 0 and colorSeries[1] != colorSeries[0]) or
(longTermDirection > 0 and direction < 0 and colorSeries[1] != colorSeries[0]) ? true : false
plot(title='Bear', series=bear, style=columns, color=maroon, transp=92)
plot(title='Bull', series=bull, style=columns, color=lime, transp=92)
plot(title='Direction', series=direction, style=line, linewidth=4, color= dcolor, transp=65)
plot(title='Bear', series=longTermBear, style=columns, color=maroon, transp=92)
plot(title='Bull', series=longTermBull, style=columns, color=green, transp=92)
plot(title='Direction', series=longTermDirection, style=line, linewidth=4, color= longTermColor)
barcolor(divergence ? yellow : na )
plot(0,title='zero line', color=divergence ? blue : orange, linewidth=2)