Hola a todos,
Estoy intentando crear un código screener con RSI en zona de sobreventa, con divergencia alcista y CPM alto. el código no esta muy bien. lo he copiaod y modificado de varios que tenia. A ver si alguien que sepa bien de programación me echa una mano. Gracias por adelantado.
Filtro = miRSI < 30
myCPM = CALL “CPM”[52]
myCPM5=(myCPM+myCPM[1]+myCPM[2]+myCPM[3]+myCPM[4])/5
capitalneed=WeightedAverage[50](volume)*WeightedAverage[50](close)
c1=0
c3=capitalneed>1000000000
SCREENER [ c1>0 and c3 and myCPM5>20 and filtro ](myCPM5 AS “CPM”)
¿Qué es el indicador CPM?
No puedo encontrarlo, ¿puedes publicar un enlace donde encontrarlo? o adjunte el file ITF si puede.
El CPM es un indicador creado por Javier Alfayate el cual mide el volumen de dinero negociado, tras buscar ejemplos manualmente me ha percatado que el 90% de las ocasiones que el RSI tiene una divergencia (alcista en este caso) y el CPM aumenta, el valor se podría añadir a la cartera. Si alguien completa el código seria estupendo.
CPM= VOLUME*CLOSE
VOLMAX=HIGHEST[V] (CPM)
VOL=((CPM*100/VOLMAX)*4/5)
VOLPMED=EXPONENTIALAVERAGE[V](VOL)
CPM2=(VOL-VOLPMED)
RETURN CPM2 AS “CPM”
Fr7Participant
Master
Es muy difícil encontrar valores con todos esos criterios……….He sacado las condiciones C1 y C3 porque es imposible encontrar valores con esas condiciones. Pero bueno si quieres se las puedes añadir. A ver qué tal te funciona……..Prueba USA el screener mejor.
//DIVERGENCIAS RSI
N=40///N is the number of bars to look back for a divergence. Normal values are 20-40. Must be the same in both indicators
miRSI = RSI[14](close)
IF (BarIndex > 10+1+N) THEN
///divergencia alcista
IF (miRSI[1]<miRSI AND miRSI[1]<miRSI[2]) THEN
extremum22=miRSI[1]
extremum11=lowest[N](miRSI)
preciomin2=close[1]
preciomin=lowest[N](close)
IF(extremum22>extremum11 AND preciomin2<preciomin[1]) THEN
for i2=1 to N
if miRSI[i2]=extremum11[1] then
DIVERG=1//BULLISH
endif
next
ENDIF
ENDIF
endif
filtro=rsi<30
myCPM = CALL "CPM"[52]
myCPM5=(myCPM+myCPM[1]+myCPM[2]+myCPM[3]+myCPM[4])/5
SCREENER [ myCPM5>5 and filtro and DIVERG=1](myCPM5 AS "CPM")
Hola,
Como esta este indicador, se pudo generar?
Gracias.
