add divergence to indicator

• 07/22/2022 at 2:34 PM #197715
  ullle73

  A while ago i found this indicator, looked everywhere for this with a divergence. Is it possible to get help adding it? 🙂

   

  cumulativ

  tw = high - max(open, close) bw = min(open, close) - low body = abs(close - open) if volume then if open<=close then deltaup = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif if open > close then deltadown = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif endif if close >= open then delta= deltaup else delta= -deltadown endif cumdelta = cumsum(delta) drawcandle(cumdelta[1],max(cumdelta, cumdelta[1]),min(cumdelta, cumdelta[1]),cumdelta) return

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

  tw = high - max(open, close) bw = min(open, close) - low body = abs(close - open)   if volume then if open<=close then deltaup = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif   if open > close then deltadown = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif endif   if close >= open then delta= deltaup else delta= -deltadown endif   cumdelta = cumsum(delta)   drawcandle(cumdelta[1],max(cumdelta, cumdelta[1]),min(cumdelta, cumdelta[1]),cumdelta) return

   

  

  ullle73

  Participant

  Topics: 51

  Replies: 178

  Been thanked: 7 times
  08/30/2022 at 5:55 PM #199904
  robertogozzi

  Try this one (add it to your chart, like MACD, then set it to be plotted as a histogram):

  //DEFPARAM CalculateOnLastBars = 5000 //ONCE Periods = 50 srcH = high //or CLOSE srcL = low //or CLOSE // indicator BEGINNING tw = high - max(open, close) bw = min(open, close) - low body = abs(close - open) if volume then if open<=close then deltaup = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif if open > close then deltadown = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif endif if close >= open then delta= deltaup else delta= -deltadown endif cumdelta = cumsum(delta) //drawcandle(cumdelta[1],max(cumdelta, cumdelta[1]),min(cumdelta, cumdelta[1]),cumdelta) Cmax = max(cumdelta, cumdelta[1]) Cmin = min(cumdelta, cumdelta[1]) // indicator END // IF BarIndex > Periods THEN Diverg = 0 HHbar = HighestBars[Periods](srcH[1]) LLbar = lowestBars[Periods](srcL[1]) // BULLISH divergence IF high[HHbar] > high THEN IF Cmax[HHbar] <= Cmax THEN Diverg = 1 ENDIF ENDIF // // BEARISH divergence IF low[HHbar] < low THEN IF Cmin[HHbar] >= Cmin THEN Diverg = -1 ENDIF ENDIF // ENDIF x = Diverg IF Diverg = Diverg[1] THEN x = 0 ENDIF return x AS "Divergence",0 AS "Zero"

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51

  //DEFPARAM CalculateOnLastBars = 5000 //ONCE Periods = 50 srcH = high   //or CLOSE srcL = low    //or CLOSE // indicator BEGINNING tw = high - max(open, close) bw = min(open, close) - low body = abs(close - open) if volume then if open<=close then deltaup = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif if open > close then deltadown = volume*(0.5 * (tw + bw + (2 * body)) / (tw + bw + body)) endif endif if close >= open then delta= deltaup else delta= -deltadown endif cumdelta = cumsum(delta) //drawcandle(cumdelta[1],max(cumdelta, cumdelta[1]),min(cumdelta, cumdelta[1]),cumdelta) Cmax = max(cumdelta, cumdelta[1]) Cmin = min(cumdelta, cumdelta[1]) // indicator END // IF BarIndex > Periods THEN Diverg = 0 HHbar = HighestBars[Periods](srcH[1]) LLbar = lowestBars[Periods](srcL[1]) // BULLISH divergence IF high[HHbar] > high THEN IF Cmax[HHbar] <= Cmax THEN Diverg = 1 ENDIF ENDIF // // BEARISH divergence IF low[HHbar] < low THEN IF Cmin[HHbar] >= Cmin THEN Diverg = -1 ENDIF ENDIF // ENDIF x = Diverg IF Diverg = Diverg[1] THEN x = 0 ENDIF return x AS "Divergence",0 AS "Zero"

   

  1 user thanked author for this post.

  Nicolas

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16469

  Been thanked: 3643 times
• Author
  Posts