Overblog Suivre ce blog
Administration Créer mon blog
27 juin 2009 6 27 /06 /juin /2009 06:33

W.Attar TREND Exponentielle et Dema .

Ci-dessous , le code W.Attar TREND : cet indicateur donne un "sens " à la volatilité.

Pour le sens : croisement de 2 moyennes exponentielles, pour la volatilité :
les bandes de Bollinger (standard déviation).

W.Attar TREND pour Metatrader voir le lien ci-dessous:


http://codebase.mql4.com/1042


Code pour Prorealtime :

 


///////////////////////////////////////
//////////// waddah attar trend

//variables   p1 =période moyenne rapide --défaut 20
///////////////// p2 = période rapide  ---défaut 40
/////////////// p3 = période bollinger -- défaut 20

cl=customclose


a1=exponentialaverage[p1](cl)-exponentialaverage[p2](cl)
a2=a1[1]
b= (a1-a2)/0.01

c1=BollingerUp[p3](close)
c2=BollingerDown[p3](close)

d=(c1-c2)/0.01

e= b*d

// mettre histogramme

return e as "W.Attar Trend",0 as "zero"
/////////////////FIN

CODE W.Attar Trend DEMA :

//////////////////////////////////////////
//////////// waddah attar trend Dema

//variables   p1 =période moyenne rapide --défaut 20
///////////////// p2 = période rapide  ---défaut 40
/////////////// p3 = période bollinger -- défaut 20

cl=customclose

a1=dema[p1](cl)-dema[p2](cl)
a2=a1[1]
b= (a1-a2)/0.01

c1=BollingerUp[p3](close)
c2=BollingerDown[p3](close)

d=(c1-c2)/0.01

e= b*d

return e as "W.Attar Trend Dema",0 as  "zero"

//////////////////FIN


 


 

 

Repost 0
Published by SOHOCOOL - dans Waddah Attar
commenter cet article
21 avril 2009 2 21 /04 /avril /2009 20:41

Voir cet indicateur sur Metatrader :
 
http://codebase.mql4.com/1289

Cet indicateur de volatilité permet de mieux visualiser le sens de la tendance, par
la couleur  verte = haussier ,et couleur rouge = baissier.

Code Prorealtime :

/////////////DEBUT

 // variable p= période de ADX  défaut =13 
//Variable q= périod écart-type  défaut = 20

a1=DIplus[p](WeightedClose)
a2=DIminus[p](WeightedClose)
a=ADX[p]
if a1>=a2 then
 f=1
else
 f=-1
endif

 

c1=BollingerUp[q](clOSE)
c2=BollingerDown[q](clOSE)

d=(c1-c2)

e= a*d

 

return e coloured by f as "wadda attar ADX x Boliinger"

////FIN

Repost 0