Bear and Bull volume indicator
This code is mainly for Wyckoffians and can be used in accumulation/distribution phases to spot the change of forces.
The volume bars are showing who is stronger in the period defined in the timeframe (more green means that bulls are running the show, in this case, in the weekly period).
The moving averages are showing the same information but based on an historical point of view (when the bull line crosses over the bear line bulls are becoming stronger in the longer period).
I suggest to use a period of 22 or more and always based on the timeframe in use.
Blue skies!!
ref=(close-low)/range
volbull=ref*volume
volbear=volume
if close>=open then
greenbarcount=1
greenvolume=volume
redbarcount=0
redvolume=0
else
greenbarcount=0
greenvolume=0
redbarcount=1
redvolume=volume
endif
//media volumi rossi e verdi per media mobile semplice
mmred=summation[period](redvolume)/summation[period](redbarcount)
mmgreen=summation[period](greenvolume)/summation[period](greenbarcount)
return volbear coloured (205,0,0) style (histogram), volbull coloured (0,190,0) style (histogram), mmred coloured (255,0,0) as "Bear average",mmgreen as "Bull average"
Comments
You must be logged in to post a comment.
ref=(close-low)/range volbull=ref*volume volbear=volume ADvolbull = volbull ADvolbear = volume – ADvolbull BullAD = summation[ADvolbull*((Close-Low) – (High-Close)) / (High-Low)] BearAD = summation[ADvolbear*((Close-Low) – (High-Close)) / (High-Low)] if close>=open then greenbarcount=1 greenvolume=volume redbarcount=0 redvolume=0 else greenbarcount=0 greenvolume=0 redbarcount=1 redvolume=volume endif //media volumi rossi e verdi per media mobile semplice mmred=summation[period](redvolume)/summation[period](redbarcount) mmgreen=summation[period](greenvolume)/summation[period](greenbarcount) return volbear coloured (205,0,0) style (histogram), volbull coloured (0,190,0) style (histogram), mmred coloured (255,0,0) as “Bear average”,mmgreen as “Bull average”
ref=(close-low)/range volbull=ref*volume volbear=volume ADvolbull = volbull ADvolbear = volume – ADvolbull BullAD = sum[ADvolbull*((Close-Low) – (High-Close)) / (High-Low)] BearAD = sum[ADvolbear*((Close-Low) – (High-Close)) / (High-Low)] if close>=open then greenbarcount=1 greenvolume=volume redbarcount=0 redvolume=0 else greenbarcount=0 greenvolume=0 redbarcount=1 redvolume=volume endif //media volumi rossi e verdi per media mobile semplice mmred=summation[period](redvolume)/summation[period](redbarcount) mmgreen=summation[period](greenvolume)/summation[period](greenbarcount) return volbear coloured (205,0,0) style (histogram), volbull coloured (0,190,0) style (histogram), mmred coloured (255,0,0) as “Bear average”,mmgreen as “Bull average”,BullAD as “AD volume Bull”, BearAD as “AD volume Bear”
Ho provato in questo modo ma da errore: ref=(close-low)/range volbull=ref*volume volbear=volume ADvolbull = volbull ADvolbear = volume - ADvolbull BullAD = sum[ADvolbull*((Close-Low) - (High-Close)) / (High-Low)] BearAD = sum[ADvolbear*((Close-Low) - (High-Close)) / (High-Low)] Return BullAD as "AD volume Bull", BearAD as "AD volume Bear" if close>=open then greenbarcount=1 greenvolume=volume redbarcount=0 redvolume=0 else greenbarcount=0 greenvolume=0 redbarcount=1 redvolume=volume endif //media volumi rossi e verdi per media mobile semplice mmred=summation[period](redvolume)/summation[period](redbarcount) mmgreen=summation[period](greenvolume)/summation[period](greenbarcount) return volbear coloured (205,0,0) style (histogram), volbull coloured (0,190,0) style (histogram), mmred coloured (255,0,0) as "Bear average",mmgreen as "Bull average"
Ciao Gabry, provo a spiegarmi meglio in italiano. Innanzitutto complimenti per l´indicatore. Trovo che la suddivisione che hai fatto tra i volumi in buy e i volumi in sell sia la parte + geniale. Abbinato ai volumi Buy/sell utilizzo l´indicatore Accumulation-Distribution (indicatore di default). L´indicatore classico AD tuttavia, nel calcolo considera i volumi totali per ogni barra senza scindere quelli in buy o in sell. Io ho fatto una simulazione in Excel (non so come condividertela) dove oltre all´AD classico ci sono AD buy e Ad sell. Io non sono un programmatore, ma vedo che tu sei molto bravo. Saresti in grado eventualmente di programmare questo nuovo indicatore con 3 linee AD/AD buy/AD sell? Grazie per il supporto. Un saluto Marco
Ciao, ora ho capito. Devi aggiungere le seguenti righe: riga 4: ADvolbull = volbull ADvolbear = volume - ADvolbull riga 5: BullAD = sum[ADvolbull*((Close-Low) - (High-Close)) / (High-Low)] BearAD = sum[ADvolbear*((Close-Low) - (High-Close)) / (High-Low)] alla fine dell'istruzione return aggiungi una virgola e poi il seguente testo: BullAD as "AD volume Bull", BearAD as "AD volume Bear" la visualizzazione potrebbe diventare un problema a causa delle scale, disattiva magari quali linee non vedere dalla finestra principale
What I mean is not a bear/bull Average as integrated in the indicator but a new Accumulation-Distribution Indicator able to splitted the buy volume and the sell volume. It means AD buy line + AD sell line. Ho fatto una simulazione in Excel con 3 linee (AD/ADbuy/ADsell). Thanks M
when pasted into the indicator area it says THE FOLLOWING VARIABLE IS UNDEFINED:PERIOD any idea why? ref=(close-low)/range volbull=ref*volume volbear=volume if close>=open then greenbarcount=1 greenvolume=volume redbarcount=0 redvolume=0 else greenbarcount=0 greenvolume=0 redbarcount=1 redvolume=volume endif //media volumi rossi e verdi per media mobile semplice mmred=summation[period](redvolume)/summation[period](redbarcount) mmgreen=summation[period](greenvolume)/summation[period](greenbarcount) return volbear coloured (205,0,0) style (histogram), volbull coloured (0,190,0) style (histogram), mmred coloured (255,0,0) as "Bear average",mmgreen as "Bull average"
hello, im getting an error when i paste in the code... return volbear coloured (205,0,0) style (histogram), volbull coloured (0,190,0) style (histogram), mmred coloured (255,0,0) as "Bear average",mmgreen as "Bull average" this is the issue, please can you adise me on this many thanks
Segie, I can add text on the graph of THIS indicator. To add text ALSO on the price graph you need to do another code and everytime you change the settings on the bear bull volume indicator you need to change the settings also on the second one....you might end up having not the same info and this is not good in my opinion.
Hi Guys, Will it be possible to add "Texts" to this code. When the bull line crosses over the bear line I would like to insert a “BULL” text on the: 1.Corresponding volume bar or histogram on this indicator 2.On the corresponding Price candle. I would like the “Bull” text to appear just above the candle stick. 3.Vice versa for when the bear line crosses the bull line. Regards, Segie
Hi Gabri, I am trying to set a simple strategy based on your very cool indicator Here are the conditions: BUY = ENTRY : if the bull-volume-green-bar CROSSES (i.e is superior) the simple moving average of the past 23 bull-volumes if the bull-volume-green-bar CROSSES (i.e is superior) the simple moving average of the past 23 bear-volumes SELL = EXIT: if the bear-volume-green-bar CROSSES the simple moving average of the past 23 bull-volumes if the bear-volume-green-bar CROSSES the simple moving average of the past 23 bear-volumes I tried to use the automatic coding system but it does not work; I tried also to code it myself using moving average but it is not working either. Can you help me on this? Thanks ! Chris
LINEA 20 CARATTERE 35 ..... link sopra con screenshot. Grazie mille
https://ibb.co/hpjcuc
scusami non appena sono a casa ti posto la riga 12 (ma non è altro che quella del file itf. Rigrazie
Bonjour, J'essaye d'utiliser le script avec le graphique renko mais sa ne marche pas, quelqu'un pourrait m'aider. Merci Hugo