MACD/RSI divergence

• 10/31/2016 at 11:14 PM #15796
  ullle73

  Hi!

  Im wondering if anyone could code a macd or rsi divergence on the lines? I downloaded the one nicolas did on the zerolag. But it i would want the divergence on the lines and not the macd.

  

  ullle73

  Participant

  Topics: 51

  Replies: 178

  Been thanked: 7 times
  11/03/2016 at 10:07 AM #15896
  Nicolas

  >> Please update your country flag in your profile. Thank you 🙂 <<

  Not possible with version 10.2, but It would be something possible with the new graphical possibilities of the version 10.3 of prorealtime.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  09/27/2018 at 7:48 PM #81490
  ullle73

  Nicolas wrote:

  >> Please update your country flag in your profile. Thank you <<

  Not possible with version 10.2, but It would be something possible with the new graphical possibilities of the version 10.3 of prorealtime.

  would this be possible now nicolas? Would you be able to help me with it? 🙂

  

  ullle73

  Participant

  Topics: 51

  Replies: 178

  Been thanked: 7 times
  09/28/2018 at 8:15 AM #81514
  Nicolas

  Sure, would you point me in the right direction and with the code/indicator you are mentioning?

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  09/28/2018 at 4:50 PM #81561
  Meta Signals Pro

  If I understood right, this will please you 😉

   

  Nicolas wrote:

  Hi Nicolas?

  There is a problem though when I use it in weekly; there is a slipage of the line rightwise that I compensated, but I do not really understand why this happens; do you have any clue?

   

  

  Meta Signals Pro

  Participant

  Topics: 41

  Replies: 321

  Been thanked: 38 times
  09/28/2018 at 11:55 PM #81586
  ullle73

  Nicolas wrote:

  Sure, would you point me in the right direction and with the code/indicator you are mentioning?

  Ofc, macd lines, not histogram, see pic below.

  1 user thanked author for this post.

  swapping

  

  ullle73

  Participant

  Topics: 51

  Replies: 178

  Been thanked: 7 times
  10/01/2018 at 9:38 AM #81654
  Nicolas

  Ok, I changed the original MACD ZeroLag divergence indicator to add lines that identified the 2 tops or bottoms that create that divergences.

  // DIVERGENCES ZeroLag MACD adapted from HK-LISSE RSI divergences code //MACD periods short = 12 long = 26 signal = 9 //----------- EMAshort1 = exponentialaverage[short](close) EMAshort2 = exponentialaverage[short](EMAshort1) DifferenceShort = EMAshort1 - EMAshort2 ZeroLagShort = EMAshort1 + DifferenceShort EMAlong1 = exponentialaverage[long](close) EMAlong2 = exponentialaverage[long](EMAlong1) DifferenceLong = EMAlong1 - EMAlong2 ZeroLagLong = EMAlong1 + DifferenceLong ZeroLagMACD = ZeroLagShort - ZeroLagLong signal1=ExponentialAverage[signal](ZEROLAGMACD) signal2=ExponentialAverage[signal](signal1) DIFFERENCE2=signal1-signal2 SignalMACD=signal1+DIFFERENCE2 x = ZeroLagMACD y = SignalMACD // BEARISH DIVERGENCES MACD hi=max(hi,x) hico=max(hico,max(high,high[1])) 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 //drawtext("0",barindex,y,dialog,bold,22) drawarrowdown(barindex,y) coloured(255,0,0) for i = 1 to 100 do if(sto1b[i]<>sto1b[i+1]) then //drawtext("0",barindex[i],y[i],dialog,bold,22) coloured(255,0,0) drawsegment(barindex[i],y[i],barindex,y) coloured(255,0,0) break endif next else //signB= 0 endif // BULLISH MACD DIVERGENCES lo=min(lo,x) lowco=min(lowco,min(low,low[1])) 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 drawarrowup(barindex,y) coloured(0,255,0) for i = 1 to 100 do if(sto1h[i]<>sto1h[i+1]) then drawsegment(barindex[i],y[i],barindex,y) coloured(0,255,0) break endif next else //signH= 0 endif //////////////////////////////////////////////// RETURN x coloured by x style(histogram,1) as "MACD", y style(line,2) as "MACD signal line"//,signH as "Bullish MACD Divergence", signB as "Bearish MACD 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 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109

  // DIVERGENCES ZeroLag MACD adapted from HK-LISSE RSI divergences code   //MACD periods short = 12 long = 26 signal = 9 //-----------   EMAshort1 = exponentialaverage[short](close) EMAshort2 = exponentialaverage[short](EMAshort1) DifferenceShort = EMAshort1 - EMAshort2 ZeroLagShort = EMAshort1 + DifferenceShort   EMAlong1 = exponentialaverage[long](close) EMAlong2 = exponentialaverage[long](EMAlong1) DifferenceLong = EMAlong1 - EMAlong2 ZeroLagLong = EMAlong1 + DifferenceLong   ZeroLagMACD = ZeroLagShort - ZeroLagLong   signal1=ExponentialAverage[signal](ZEROLAGMACD) signal2=ExponentialAverage[signal](signal1) DIFFERENCE2=signal1-signal2   SignalMACD=signal1+DIFFERENCE2 x = ZeroLagMACD y = SignalMACD   //  BEARISH DIVERGENCES MACD   hi=max(hi,x) hico=max(hico,max(high,high[1]))   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 //drawtext("0",barindex,y,dialog,bold,22) drawarrowdown(barindex,y) coloured(255,0,0)   for i = 1 to 100 do if(sto1b[i]<>sto1b[i+1]) then //drawtext("0",barindex[i],y[i],dialog,bold,22) coloured(255,0,0) drawsegment(barindex[i],y[i],barindex,y) coloured(255,0,0) break endif next   else //signB= 0 endif   // BULLISH MACD DIVERGENCES   lo=min(lo,x) lowco=min(lowco,min(low,low[1]))   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 drawarrowup(barindex,y) coloured(0,255,0)   for i = 1 to 100 do if(sto1h[i]<>sto1h[i+1]) then drawsegment(barindex[i],y[i],barindex,y) coloured(0,255,0) break endif next   else //signH= 0 endif   //////////////////////////////////////////////// RETURN x coloured by x style(histogram,1) as "MACD", y  style(line,2) as "MACD signal line"//,signH as "Bullish MACD Divergence", signB as "Bearish MACD Divergence" , 0 as " zero "

   

  1 user thanked author for this post.

  swapping

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  10/01/2018 at 6:41 PM #81689
  ullle73

  absolutely perfect Nicolas!! big thank you!

  One last thing, could you also make a screener out of this? a bullish screener

  

  ullle73

  Participant

  Topics: 51

  Replies: 178

  Been thanked: 7 times
  10/02/2018 at 7:36 AM #81731
  Nicolas

  You’ll find a screener made of this MACD zerolag indicator in this thread: Screener Divergence MACD

  1 user thanked author for this post.

  ullle73

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
• Author
  Posts