Please find attached the indicator code for stochastic divergences. The indicator spot divergences between price and the crossover of the stochastic with its own moving average signal line.

The stochastic values are only taken into account if they are above the overbought zone or below the oversold zone (you can modify these levels at will in the parameters).

This is the same code as the ones from the MACD or RSI divergences indicators already posted into the Library in other different format:

• MACD divergence
• RSX divergence

Why the bull histogramm don't match !!??


// DIVERGENCES STO PRC adapted from HK-LISSE code


x = stochastic[p,k]
y = average[d](x)


if x>overboughtzone then
hi=max(hi,x)
hico=max(hico,max(high,high[1]))
endif
if x crosses under y then
sto2b=sto1b
sto1b=hi
hi=0
p3b=p1b
p2b=max(p1b,hico1)
p1b=max(highest[3](high),hico)
if p2b=p1b then
p2b=max(p3b,p4b)
endif
hico=0
hico1=0
endif
if x<y then
p4b=hico1
hico1=max(hico1,high)
endif
if p1b>p2b and sto1b<sto2b and x crosses under y and x<x[1] then
signB= -2
else
signB= 0
endif

if x<oversoldzone then
lo=min(lo,x)
lowco=min(lowco,min(low,low[1]))
endif
if x CROSSES OVER y  then
sto2h=sto1h
sto1h=lo
lo=100
p3h=p1h
p2h=min(p1h,lowco1)
p1h=min(lowest[3](low),lowco)
if p2h=p1h then
p2h=min(p3h,p4h)
endif
lowco=100000
lowco1=100000
endif
if x>y then
p4h=lowco1
lowco1=min(lowco1,low)
endif
if p1h<p2h and sto1h > sto2h and x crosses over y and x>x[1]  then
signH= 2
else
signH= 0
endif
////////////////////////////////////////////////
If signB CROSSES UNDER 0 then
DRAWTEXT ( "S " ,barindex,- 0.20,dialog,standard,20) coloured ( 255,0,127 )
DRAWTEXT ( "T " ,barindex,- 0.30,dialog,standard,20) coloured ( 255,0,127 )
DRAWTEXT ( "O " ,barindex,- 0.40,dialog,standard,20) coloured ( 255,0,127 )
endif

If signH CROSSES OVER  0 then
DRAWTEXT ( "O " ,barindex,0.20,dialog,standard,20) coloured ( 0,153,0 )
DRAWTEXT ( "T " ,barindex,0.30,dialog,standard,20) coloured ( 0,153,0 )
DRAWTEXT ( "S " ,barindex,0.40,dialog,standard,20) coloured ( 0,153,0 )
endif

return     signH as " div STO bull ", signB as " div STO bear " , 0 as " zero "


// Variables :
// p = 14
// Overboughzone = 80
// Oversellzone = 20
// K = 3
// D = 6

This is another mistake that the indicator gives: