PROSCREENER DARVAS BOX

[condor45]

Ho copiato e incollato il seguente Proscreener, genera un segnale d’errore di sintassi su Return finale, gentilmente chiedo la giusta correzione per avere i segnali operativi.

DARVAS BOX

Darvas Boxes

Ringrazio anticipatamente e saluto cordialmente.

condor45

rem from hk_lisse blog
k=48
mso-ansi-language:EN-GB">once tth=
mso-ansi-language:EN-GB">undefined
mso-ansi-language:EN-GB">once ttl=
mso-ansi-language:EN-GB">undefined
n=
mso-ansi-language:EN-GB">(k*
mso-ansi-language:EN-GB">2
mso-ansi-language:EN-GB">)
mso-ansi-language:EN-GB">-
mso-ansi-language:EN-GB">4
p=
mso-ansi-language:EN-GB">(n/
mso-ansi-language:EN-GB">2
mso-ansi-language:EN-GB">)
mso-ansi-language:EN-GB">-
mso-ansi-language:EN-GB">1
h1=dpo[n](high
mso-ansi-language:EN-GB">)
moyh=
mso-ansi-language:EN-GB">high
mso-ansi-language:EN-GB">-h1
hi=
mso-ansi-language:EN-GB">(moyh-moyh[
mso-ansi-language:EN-GB">1
mso-ansi-language:EN-GB">]
mso-ansi-language:EN-GB">+
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">high
mso-ansi-language:EN-GB">[p])/n)
mso-ansi-language:EN-GB">*n
hi=
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">round
mso-ansi-language:EN-GB">(hi*
mso-ansi-language:EN-GB">100
mso-ansi-language:EN-GB">))/100
l1=dpo[n](low
mso-ansi-language:EN-GB">)
moyl=
mso-ansi-language:EN-GB">low
mso-ansi-language:EN-GB">-l1
lo=
mso-ansi-language:EN-GB">(moyl-moyl[
mso-ansi-language:EN-GB">1
mso-ansi-language:EN-GB">]
mso-ansi-language:EN-GB">+
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">low
mso-ansi-language:EN-GB">[p])/n)
mso-ansi-language:EN-GB">*n
lo=
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">round
mso-ansi-language:EN-GB">(lo*
mso-ansi-language:EN-GB">100
mso-ansi-language:EN-GB">))/100
low1=
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">round
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">low
mso-ansi-language:EN-GB">*
mso-ansi-language:EN-GB">100
mso-ansi-language:EN-GB">))/100
high1=
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">round
mso-ansi-language:EN-GB">(
mso-ansi-language:EN-GB">high
mso-ansi-language:EN-GB">*
mso-ansi-language:EN-GB">100
mso-ansi-language:EN-GB">))/100

mso-ansi-language:EN-GB">if barindex > 100 then
if box=
mso-ansi-language:EN-GB">1 and (high1>tth or low1<ttl) then
box=
mso-ansi-language:EN-GB">0
flag=
mso-ansi-language:EN-GB">0
endif
if box=
mso-ansi-language:EN-GB">0 and flag=
mso-ansi-language:EN-GB">0 and high1>=hi[
mso-ansi-language:EN-GB">46
mso-ansi-language:EN-GB">] and high1>=hi[
mso-ansi-language:EN-GB">45
mso-ansi-language:EN-GB">] and high1>=hi[
mso-ansi-language:EN-GB">44
mso-ansi-language:EN-GB">] then
th=high1
flag=
mso-ansi-language:EN-GB">1
endif
if box=
mso-ansi-language:EN-GB">0 and flag=
mso-ansi-language:EN-GB">1 then
for zz=
mso-ansi-language:EN-GB">0 to 44
if hi[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz-1
mso-ansi-language:EN-GB">]
mso-ansi-language:EN-GB">>th or hi[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz-2
mso-ansi-language:EN-GB">]
mso-ansi-language:EN-GB">>th or hi[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz-3
mso-ansi-language:EN-GB">]
mso-ansi-language:EN-GB">>th then
flag=
mso-ansi-language:EN-GB">0
break
endif
if lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz]
mso-ansi-language:EN-GB"><lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz-1
mso-ansi-language:EN-GB">] and lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz]
mso-ansi-language:EN-GB"><lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz-2
mso-ansi-language:EN-GB">] and lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz]
mso-ansi-language:EN-GB"><lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz-3
mso-ansi-language:EN-GB">] then
box=
mso-ansi-language:EN-GB">1
tth=th
ttl=lo[
mso-ansi-language:EN-GB">47
mso-ansi-language:EN-GB">-zz]
break
endif
next
mso-ansi-language:EN-GB">endif
mso-ansi-language:EN-GB">else
tth=
mso-ansi-language:EN-GB">undefined
ttl=
mso-ansi-language:EN-GB">undefined
endif
if box=
mso-ansi-language:EN-GB">1 then
ba=ttl
else
ba=tth
endif
if box=
mso-ansi-language:EN-GB">1 then
col=
mso-ansi-language:EN-GB">1
else
col=-1
endif

mso-ansi-language:EN-GB">return ba coloured by col , tth coloured by col,ttl coloured by col

 

[condor45]

SITO DI RIFERIMENTO CON LA FORMULA DA CORREGERE.

DARVAS BOX

Darvas Boxes

In attesa della correzione, ringrazio e saluto.
condor45