Skip to content

RSCMansfield2 ProRealTime indicator

This is the code of the RSCMansfield2 indicator for ProRealTime.
You can use it for your own screeners.

Updated every weekend.

REM Indicador realizado por Javier Alfayate
REM administrador de Aguila Roja Sistemas de
REM trading y autor de accionesdebolsa.com
REM si vas a utilizar este código, no lo difundas
REM sin autorización expresa de mi parte.

REM este indicador está diseñado para los foreros
REM y no es un código definitivo. Es necesaria la
REM actualización de ciertos valores para su
REM correcto funcionamiento.

CountR=0
i=51

R= Close[i]/256.625458
CountR=CountR+R
i=i-1

R= Close[i]/268.019012
CountR=CountR+R
i=i-1

R= Close[i]/269.589203
CountR=CountR+R
i=i-1

R= Close[i]/264.064148
CountR=CountR+R
i=i-1

R= Close[i]/273.671661
CountR=CountR+R
i=i-1

R= Close[i]/269.088745
CountR=CountR+R
i=i-1

R= Close[i]/254.253998
CountR=CountR+R
i=i-1

R= Close[i]/259.278992
CountR=CountR+R
i=i-1

R= Close[i]/255.899429
CountR=CountR+R
i=i-1

R= Close[i]/261.249573
CountR=CountR+R
i=i-1

R= Close[i]/262.688080
CountR=CountR+R
i=i-1

R= Close[i]/262.638824
CountR=CountR+R
i=i-1

R= Close[i]/262.106781
CountR=CountR+R
i=i-1

R= Close[i]/268.836273
CountR=CountR+R
i=i-1

R= Close[i]/267.338654
CountR=CountR+R
i=i-1

R= Close[i]/268.146606
CountR=CountR+R
i=i-1

R= Close[i]/269.575287
CountR=CountR+R
i=i-1

R= Close[i]/274.097778
CountR=CountR+R
i=i-1

R= Close[i]/273.053345
CountR=CountR+R
i=i-1

R= Close[i]/271.914032
CountR=CountR+R
i=i-1

R= Close[i]/268.489624
CountR=CountR+R
i=i-1

R= Close[i]/272.587036
CountR=CountR+R
i=i-1

R= Close[i]/276.714142
CountR=CountR+R
i=i-1

R= Close[i]/276.803223
CountR=CountR+R
i=i-1

R= Close[i]/278.525330
CountR=CountR+R
i=i-1

R= Close[i]/280.682892
CountR=CountR+R
i=i-1

R= Close[i]/280.247437
CountR=CountR+R
i=i-1

R= Close[i]/282.127899
CountR=CountR+R
i=i-1

R= Close[i]/284.552673
CountR=CountR+R
i=i-1

R= Close[i]/287.323883
CountR=CountR+R
i=i-1

R= Close[i]/284.641754
CountR=CountR+R
i=i-1

R= Close[i]/287.888000
CountR=CountR+R
i=i-1

R= Close[i]/288.986572
CountR=CountR+R
i=i-1

R= Close[i]/289.032166
CountR=CountR+R
i=i-1

R= Close[i]/286.148987
CountR=CountR+R
i=i-1

R= Close[i]/274.347931
CountR=CountR+R
i=i-1

R= Close[i]/274.646179
CountR=CountR+R
i=i-1

R= Close[i]/263.789551
CountR=CountR+R
i=i-1

R= Close[i]/270.311493
CountR=CountR+R
i=i-1

R= Close[i]/276.147400
CountR=CountR+R
i=i-1

R= Close[i]/272.140808
CountR=CountR+R
i=i-1

R= Close[i]/261.721649
CountR=CountR+R
i=i-1

R= Close[i]/274.049652
CountR=CountR+R
i=i-1

R= Close[i]/262.039795
CountR=CountR+R
i=i-1

R= Close[i]/258.957794
CountR=CountR+R
i=i-1

R= Close[i]/239.302551
CountR=CountR+R
i=i-1

R= Close[i]/247.750000
CountR=CountR+R
i=i-1

R= Close[i]/252.389999
CountR=CountR+R
i=i-1

R= Close[i]/258.980011
CountR=CountR+R
i=i-1

R= Close[i]/266.459991
CountR=CountR+R
i=i-1

R= Close[i]/262.859985
CountR=CountR+R
i=i-1

R= Close[i]/261.466309
CountR=CountR+R

BasePrice = CountR / 52
FR = ((R / BasePrice) – 1) * 10

CERO = 0
SENYAL = FR
RETURN CERO AS “CERO”, SENYAL AS “FR”