Screener Divergence MACD

• 12/11/2017 at 10:00 AM #55321
  Talero125

  Hello!!! Thank you Nicolas for your incredible Macd divergence indicator https://www.prorealcode.com/prorealtime-indicators/macd-divergences-from-price/ I would like to use this indicator as a screener to find companies with a divergence in last days/weeks but I don´t know to change the code. Can you help me please? Thank you 

  

  Talero125

  Participant

  Topics: 3

  Replies: 2

  Been thanked: 0 times
  12/11/2017 at 11:10 AM #55327
  Nicolas

  Please find below the MACD divergence indicator converted to screener code: 

  // 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= 1 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= 1 else signH= 0 endif //////////////////////////////////////////////// SCREENER [(signB or signH)]

  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

  // 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= 1 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= 1 else signH= 0 endif   //////////////////////////////////////////////// SCREENER [(signB or signH)]

   

  2 users thanked author for this post.

  Arul143, Esprityin

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  03/08/2018 at 6:41 PM #64834
  Esprityin

  Merci Nicolas pour ce screener… très utile dès ce soir. 🙂
  J’avoue que je suis loin d’être bilingue et je suis un peu perdue dans cette masse d’infos et de mises à jour.
  Je suis créatrice mais pas en screener 😉 hélas.
  Sauriez-vous s’il existe dans la base de données de proréalcode, un screener qui détecte la MACD qui revient doucement sur son signal (comme une vague) et qui repart à la hausse et cela tout en restant proche de sa ligne 0.
  Merci pour votre réponse. Cdlt.
  Voici un exemple.
  

  

  Esprityin

  Participant

  Topics: 0

  Replies: 1

  Been thanked: 0 times
• Author
  Posts