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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Leave a Reply

Your email address will not be published. Required fields are marked *