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]/278.099396
CountR=CountR+R
i=i-1

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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