Buenos días,

me gustaría convertir el indicador “Fro Kiosotto” que tiene formato MT4 en código para PRT.

Es un indicador basado en el RSI que indica zonas de sobreventa/sobrecompra, no es nada especial pero me resulta útil como referencia para mi operativa.

He intentado convertirlo pero me quedo atascado en alguna parte del código y no consigo el resultado esperado.

Si alguien pudiese echarle un vistazo y orientarme sobre la posible solución sería de agradecer.

Ajunto el codigo MT4 en fichero y lo que tengo hecho hasta ahora (pero que no funciona)

Un saludo y gracias a todos

// En variables externas hay que tener en cuenta "DevPeriod=150"
vRSI = RSI[DevPeriod](close)

j = 0
TSBUL = 0
TSBER = 0
hpres =0
lpres = 9999999
while (j<DevPeriod) do
sbl = 0
sbr = 0
shift=j
kolichestvo = shift-1

if (kolichestvo < 0 ) then
kolichestvo=0
  
for n=shift TO n > kolichestvo do
n = n-1
ii = vRSI[n]
hnw = High[n]
lnw = Low[n]
cle = Close[n]

if hnw> hpres then
hpres = hnw
sbl = sbl + ii*cle
endif
if lpres > lnw then
lpres = lnw
sbr = sbr + ii*cle
endif
next
    
TSBUL = TSBUL + sbl 
TSBER = TSBER + sbr 

endif
j = j+1

wend

vSell = TSBER/TSBUL
vBuy = TSBUL/TSBER

Return vSell, vBuy