MACD divergence indicator with histogram

Hello,

Sorry for this basic question but I’m switching from manual to automatic trading recently.

When I trade manually, I use for one of my strategies a divergence indicator on RSI (with a support or a resistance) and a MACD zero lag as a trigger (using the histogram to take the reversal).

I try to code an indicator that combines these 2 functions.

For this I used the MACD divergence indicator from Jose7674 (https://www.prorealcode.com/prorealtime-indicators/macd-divergences-on-price-and-indicator/).

On line 11, I modified the variables of the Exponential Average (to make it a version close to zero lag), then I added directly on the graph of the indicator an exponential AVerage [5].

I tried different codes to add a histogram as on the zero lag but I have the impression that it is not possible to return the discrepancies and a histogram.

Note that the histogram should not indicate when there is a discrepancy, but when the MACD is higher than the EMA5 I added (as the MACD zero lag on the graph)
Does anyone have the solution?

/////////////////////////////////////////////

// MACD divergences on MACD
// by Jose Callao
// twitter @jose7674
// Use this indicator in a new window

N=40///N is the number of bars to look back for a divergence. Normal values are 20-40. Must be the same in both indicators

//using any other indicator is as easy as changing the values
miMACD = exponentialAverage[5](close) - exponentialAverage[12](close)




IF (BarIndex > 10+1+N) THEN

///divergencia bajista
IF (miMACD[1]>miMACD AND miMACD[1]>miMACD[2]) THEN
extremum2=miMACD[1]
extremum1=highest[N](miMACD)

preciomax2=close[1]
preciomax=Highest[N](close)

IF(extremum2<extremum1 AND preciomax2>preciomax[1]) THEN
for i=1 to N
if mimacd[i]=extremum1 then
zz=i

drawsegment (barindex[1], mimacd[1], barindex[zz], mimacd[zz]) coloured(200,0,0)
endif
next

endif
endif

///divergencia alcista
IF (miMACD[1]<miMACD AND miMACD[1]<miMACD[2]) THEN
extremum22=miMACD[1]
extremum11=lowest[N](miMACD)

preciomin2=close[1]
preciomin=lowest[N](close)

IF(extremum22>extremum11 AND preciomin2<preciomin[1]) THEN
for i2=1 to N
if mimacd[i2]=extremum11[1] then
zz2=i2

drawsegment(barindex[1], mimacd[1], barindex[zz2], mimacd[zz2]) coloured(0,200,0)
endif
next
ENDIF

ENDIF
endif

return mimacd as "MACD", 0 as "0"

Macd-histogram.png