p=10 //période du calcul des boll
s=1.618 //écart type
REM Calcule la moyenne mobile de bollinger et l'écart-type
moyenneBollinger = AVERAGE[p](CLOSE)
REM Détermine l'écart type (sans passer par la fonction STD)
REM pour l'exemple, dans la pratique il faut utiliser STD !
IF BARINDEX >= p-1 THEN
sumy2 = 0
sumy = 0
FOR i = 0 TO p-1
sumy2 = sumy2 + SQUARE(CLOSE[i])
sumy = sumy + CLOSE[i]
NEXT
ecartType = SQRT(sumy2 / p - SQUARE(sumy / p))
ELSE
ecartType = UNDEFINED
ENDIF
REM En déduit les courbes de Bollinger
bollSup = moyenneBollinger + s * ecartType
bollInf = moyenneBollinger - s * ecartType
C1=bollSup > bollSup[1]
C2=bollInf > bollInf[1]
IF C1 AND C2 THEN
INDIC=1
ELSE
INDIC=0
ENDIF
RETURN
Voilà rapidement ce que j’ai fais:
p=10 //période du calcul des boll
s=1.618 //écart type
REM Calcule la moyenne mobile de bollinger et l'écart-type
moyenneBollinger = AVERAGE[p](CLOSE)
REM Détermine l'écart type (sans passer par la fonction STD)
REM pour l'exemple, dans la pratique il faut utiliser STD !
IF BARINDEX >= p-1 THEN
sumy2 = 0
sumy = 0
FOR i = 0 TO p-1
sumy2 = sumy2 + SQUARE(CLOSE[i])
sumy = sumy + CLOSE[i]
NEXT
ecartType = SQRT(sumy2 / p - SQUARE(sumy / p))
ELSE
ecartType = UNDEFINED
ENDIF
REM En déduit les courbes de Bollinger
bollSup = moyenneBollinger + s * ecartType
bollInf = moyenneBollinger - s * ecartType
C1=bollSup > bollSup[1]
C2=bollInf > bollInf[1]
test = c1 and c2
if test and not test[1] then
start=barindex
endif
IF barindex-start<=2 THEN
INDIC=1
ELSE
INDIC=0
ENDIF
RETURN indic
Je test à quel moment c1 et c2 sont vrai alors qu’ils ne l’étaient pas à la barre précédente et ensuite j’affiche le signal que durant 2 périodes depuis cet instant.
Merci Nicolas mais ce n’est pas trop le résultat que j’attendais.
Maintenant j’ai une question un peu plus perso : depuis que ce cite existe tu as en voir vu passé des indicateurs passés ou crées, pour toi quel est l’indicateur le plus performant pour du très court terme?
En tout cas merci encore pour ce cite j’ai beaucoup appris grâce a tout ce partage et ta disponibilité.
cdlt
Oraclus
