Screener RSI multiperiods HeatMap

Viewing 2 posts - 1 through 2 (of 2 total)

Author

Posts

07/02/2019 at 1:16 PM #101809 quote

Participant

Master

¿Alguien puede realizar el screener ?Sería interesante encontrar los valores que acaban de cumplir el color más verde o más rojo en el mapa.

El screener a realizar se basaría en el indicador de Nicolás:PRC_RSI multiperiods HeatMap

//PRC_RSI multiperiods HeatMap | indicator
//Plot an heatmap of the RSI range of periods
//28.06.2019
//Nicolas @ www.prorealcode.com
//Sharing ProRealTime knowledge
 
// --- settings 
startperiod=20 //start period of the loop
maxscale=500 //end period of the loop
Step=10 //period step of the loop
// --- end of settings 
 
iPeriod=startperiod //first period to test is..startperiod
 
while iPeriod<=maxscale do
 
 // --- indicator calculation
 osc = rsi[iperiod]
 // -----
 
 result=osc
 
 R = max(0,50+(200-(result-50)*12))
 G = max(0,50+(200+(result-50)*12))
 
 drawtext("■",barindex,iperiod,dialog,bold,18) coloured(min(r,255),min(g,255),0)
 
 iPeriod=max(startperiod,iPeriod+Step) //increase indicator period for next loop iteration
wend
 
return startperiod,maxscale

07/02/2019 at 5:10 PM #101832 quote

robertogozzi

Moderator

Legend

Puedes probar este. Modifiqué 500 en 240 (+ 10) porque ProScreener no permite más de 254 barras de la historia:

startperiod = 20            //20   start period of the loop
maxscale    = 240           //500  end period of the loop
Step        = 10            //10   period step of the loop
iPeriod     = startperiod
while iPeriod <= maxscale do
   osc     = rsi[iperiod]
   result  = osc
   R       = min(max(0,50+(200-(result-50)*12)),255)
   G       = min(max(0,50+(200+(result-50)*12)),255)
   iPeriod = max(startperiod,iPeriod+Step)
wend
x = 0
IF R > R[1] AND G < G[1] THEN
   x = 2
ELSIF G > G[1] AND R < R[1] THEN
   x = 1
ENDIF
SCREENER[x](x AS "1=↑, 2=↓")

Nicolas thanked this post