Divergencias

• 09/13/2025 at 11:39 AM #250787
  Principiante

  Intento crear un ProScreeener para detectar divergencias con el RSI 14 y el precio, he encontrado en ProRealCode el siguiente codigo pero me da error.

  ¿Hay alguna posibilidad de disponer de un código que buque divergencias alcistas en todos los marcos de tiempo? y que solo filtre valores que negocien en dia mas de 1.000.000 de titulos.

  Así como disponer de un código para buscar divergencias bajista en todos los marcos temporales y que solo filtre valores que negocien en dia mas de 1.000.000 de titulos.

  Gracias

  pego el código, el error lo da en la línea 47 :

  //-----------------------------------------------// //PRC_RSI Divergence //version = 0 //05.05.2025 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-----------------------------------------------// // inputs //-----------------------------------------------// src=(open+high+low+close)/4 x=5 z=25 revpct=0.01 ialert=25 rsiprd=14 ob=70 os=30 //-----------------------------------------------// // RSI calculation //-----------------------------------------------// rv=rsi[rsiprd](src) //-----------------------------------------------// // Bullish Divergence //-----------------------------------------------// //--- Define lower low in price llvx=lowest[x](src) llvz=lowest[z](src) srcLL=src>llvx*(1+revpct) and llvx<llvz[x] //--- Define higher low in RSI llvrsix=lowest[x](rv) llvrsiz=lowest[z](rv) rsiHL=rv>llvrsix and llvrsix>llvrsiz[x] and llvrsix<os bullishDiv=srcLL and rsiHL if bullishDiv then count=1 else count=1+count endif if count<ialert then bullishDivAlert=10+50 else bullishDivAlert=50 endif colorbetween(bullishDivAlert,50,"green",100) //-----------------------------------------------// // Bearish Divergence //-----------------------------------------------// //--- define higher high in price hhvx=highest[x](src) hhvz=highest[z](src) srcHH=src<hhvx*(1-revpct) and hhvx>hhvz[x] //--- define lower high in rsi hhvrsix=highest[x](rv) hhvrsiz=highest[z](rv) rsiLH=rv<hhvrsix and hhvrsix<hhvrsiz[x] and hhvrsix>ob bearishDiv=srcHH and rsiLH if bearishDiv then countbear=1 else countbear=1+countbear endif if countbear<ialert then bearishDivAlert=50-10 else bearishDivAlert=50 endif colorbetween(bearishDivAlert,50,"red",100) //-----------------------------------------------// if bullishdiv then red=0 green=255 blue=0 elsif bearishdiv then red=255 green=0 blue=0 else red=0 green=0 blue=255 endif //-----------------------------------------------// return rv as "RSI" coloured(red,green,blue)style(line,2), bullishDivAlert coloured("green"), bearishDivAlert coloured("red"), ob style(dottedline), os style(dottedline), 50 as "midline"

  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

  //-----------------------------------------------// //PRC_RSI Divergence //version = 0 //05.05.2025 //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-----------------------------------------------// // inputs //-----------------------------------------------// src=(open+high+low+close)/4 x=5 z=25 revpct=0.01 ialert=25 rsiprd=14 ob=70 os=30 //-----------------------------------------------// // RSI calculation //-----------------------------------------------// rv=rsi[rsiprd](src) //-----------------------------------------------// // Bullish Divergence //-----------------------------------------------// //--- Define lower low in price llvx=lowest[x](src) llvz=lowest[z](src) srcLL=src>llvx*(1+revpct) and llvx<llvz[x] //--- Define higher low in RSI llvrsix=lowest[x](rv) llvrsiz=lowest[z](rv) rsiHL=rv>llvrsix and llvrsix>llvrsiz[x] and llvrsix<os   bullishDiv=srcLL and rsiHL   if bullishDiv then    count=1 else    count=1+count endif   if count<ialert then    bullishDivAlert=10+50 else    bullishDivAlert=50 endif colorbetween(bullishDivAlert,50,"green",100) //-----------------------------------------------// // Bearish Divergence //-----------------------------------------------// //--- define higher high in price hhvx=highest[x](src) hhvz=highest[z](src) srcHH=src<hhvx*(1-revpct) and hhvx>hhvz[x]   //--- define lower high in rsi hhvrsix=highest[x](rv) hhvrsiz=highest[z](rv) rsiLH=rv<hhvrsix and hhvrsix<hhvrsiz[x] and hhvrsix>ob   bearishDiv=srcHH and rsiLH if bearishDiv then    countbear=1 else    countbear=1+countbear endif   if countbear<ialert then    bearishDivAlert=50-10 else    bearishDivAlert=50 endif colorbetween(bearishDivAlert,50,"red",100) //-----------------------------------------------// if bullishdiv then    red=0    green=255    blue=0 elsif bearishdiv then    red=255    green=0    blue=0 else    red=0    green=0    blue=255 endif //-----------------------------------------------// return rv as "RSI" coloured(red,green,blue)style(line,2), bullishDivAlert coloured("green"), bearishDivAlert coloured("red"), ob style(dottedline), os style(dottedline), 50 as "midline"

   

  

  Principiante

  Participant

  Topics: 5

  Replies: 10

  Been thanked: 0 times
  09/13/2025 at 12:21 PM #250788
  JS

  Hello,

  The code you are using is designed for an indicator…

  To convert it into a screener, you must remove all graphic elements and alert functions, and replace the RETURNwith SCREENER[…]…

  Try this…

  RSI Divergences Screener

  //-----------------------------------------------// //RSI Divergence Screener //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-----------------------------------------------// // inputs //-----------------------------------------------// src=(open+high+low+close)/4 x=5 z=25 revpct=0.01 //ialert=25 rsiprd=14 ob=70 os=30 //-----------------------------------------------// // RSI calculation //-----------------------------------------------// rv=rsi[rsiprd](src) //-----------------------------------------------// // Bullish Divergence //-----------------------------------------------// //--- Define lower low in price llvx=lowest[x](src) llvz=lowest[z](src) srcLL=src>llvx*(1+revpct) and llvx<llvz[x] //--- Define higher low in RSI llvrsix=lowest[x](rv) llvrsiz=lowest[z](rv) rsiHL=rv>llvrsix and llvrsix>llvrsiz[x] and llvrsix<os bullishDiv=srcLL and rsiHL if bullishDiv then count=1 else count=1+count endif //-----------------------------------------------// // Bearish Divergence //-----------------------------------------------// //--- define higher high in price hhvx=highest[x](src) hhvz=highest[z](src) srcHH=src<hhvx*(1-revpct) and hhvx>hhvz[x] //--- define lower high in rsi hhvrsix=highest[x](rv) hhvrsiz=highest[z](rv) rsiLH=rv<hhvrsix and hhvrsix<hhvrsiz[x] and hhvrsix>ob bearishDiv=srcHH and rsiLH if bearishDiv then countbear=1 else countbear=1+countbear endif Screener[(bullishdiv or bearishdiv) and Volume>1000000]

  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

  //-----------------------------------------------// //RSI Divergence Screener //Iván González @ www.prorealcode.com //Sharing ProRealTime knowledge //-----------------------------------------------// // inputs //-----------------------------------------------// src=(open+high+low+close)/4 x=5 z=25 revpct=0.01 //ialert=25 rsiprd=14 ob=70 os=30 //-----------------------------------------------// // RSI calculation //-----------------------------------------------// rv=rsi[rsiprd](src) //-----------------------------------------------// // Bullish Divergence //-----------------------------------------------// //--- Define lower low in price llvx=lowest[x](src) llvz=lowest[z](src) srcLL=src>llvx*(1+revpct) and llvx<llvz[x] //--- Define higher low in RSI llvrsix=lowest[x](rv) llvrsiz=lowest[z](rv) rsiHL=rv>llvrsix and llvrsix>llvrsiz[x] and llvrsix<os   bullishDiv=srcLL and rsiHL   if bullishDiv then count=1 else count=1+count endif   //-----------------------------------------------// // Bearish Divergence //-----------------------------------------------// //--- define higher high in price hhvx=highest[x](src) hhvz=highest[z](src) srcHH=src<hhvx*(1-revpct) and hhvx>hhvz[x]   //--- define lower high in rsi hhvrsix=highest[x](rv) hhvrsiz=highest[z](rv) rsiLH=rv<hhvrsix and hhvrsix<hhvrsiz[x] and hhvrsix>ob   bearishDiv=srcHH and rsiLH if bearishDiv then countbear=1 else countbear=1+countbear endif   Screener[(bullishdiv or bearishdiv) and Volume>1000000]

  

  JS

  Participant

  Topics: 29

  Replies: 2261

  Been thanked: 1315 times
• Author
  Posts