Stop de Tharp

Dans son livre "Trade Your Way To Financiel, K. Tharp préconise un stop basé sur l'ATR.
La moyenne exponentielle est ici à 10.



Code:

c=3
d=9
ONCE a=close
once b=1
if b=1 then
if close >a then
a= close
else
endif
if close < a - (c*(ExponentialAverage[10](AverageTrueRange[d](close)))) then
b=-1
e=a
a=close
f=-1
else
e= a - (c*(ExponentialAverage[10](AverageTrueRange[d](close))))
f=1
endif
else
if close < a then
a=close
else
endif
if close > a + (c*(ExponentialAverage[10](AverageTrueRange[d](close)))) then
b=1
e=a
a=close
f=1
else
e=a + (c*(ExponentialAverage[10](AverageTrueRange[d](close))))
f=-1
endif
endif

return e coloured by (f)