Re JCP,
Très juste!
Merci, pour ta remarque judicieuse. Oui on doit bien attendre P1+P2 périodes pour disposer de MogH(1) et de MogB(1)!
<u>Code v 0.4 :</u>
//==============
//Bandes_Mogalef
//==============
//d'après code communiqué par Anaphraïs
//pour la WHS NANO FutureStation
//
//transcodé par smallcaps90
//le 20/05/2011
//v 0.4
//Avec initialisation des bandes
//===============================
//1---- Cours pondéré "Mogalef"
//
CP(0)=(Haut+Bas+Ouverture+2*Cloture)/5
//2---- Régression linéaire du cours pondéré sur P1 périodes
//
<font color='#0000FF'>Si RangHisto>=P1 Alors</font>
somx = 0
somy = 0
somxx = 0
somxy = 0
Pour P1 Cours
somx = somx+RangPour
somy = somy+CP
somxx = somxx+RangPour*RangPour
somxy = somxy+RangPour*CP
FinPour
a = (P1*somxy-somx*somy)/(P1*somxx-somx*somx)
b = (somy-a*somx)/P1
MogRegLin = b + a*P1
<font color='#0000FF'>FinSi</font>
//3---- Ecart-type de la régression linéaire sur P2 périodes
//
<font color='#0000FF'>Si RangHisto>=P1+P2-1 Alors</font>
ETyp(0)=Ecartype(MogRegLin,P2)
<font color='#0000FF'>FinSi</font>
//4---- Bandes "Mogalef"
//
<font color='#0000FF'>Si RangHisto>=P1+P2 Alors</font>
Si MogRegLin<MogH(1) ET MogRegLin>MogB(1) //pas de décalage si Reg Lin intérieure aux bandes
Alors
ETyp=ETyp(1)
MogM=MogM(1)
MogH=MogH(1)
MogB=MogB(1)
Sinon //décalage calcul des nouvelles valeurs des bandes
MogM=MogRegLin
MogH=MogRegLin+P3*ETyp
MogB=MogRegLin-P3*ETyp
FinSi
<font color='#0000FF'>FinSi</font>
//fin du code
Et cela donne :
<center><img src='http://www.pro-at.com/forums-bourse/0511/3668_210834.png' alt='' /></center>
Ok mais cela ne règle pas les différences entre nos tracés plus loin dans l'historique...
Il serait intéressant que nous utilisions le même historique.
As-tu pu comparer leurs formats dans Walmaster et GrapheAT Pro?
Cordialement.
Très juste!
Merci, pour ta remarque judicieuse. Oui on doit bien attendre P1+P2 périodes pour disposer de MogH(1) et de MogB(1)!
<u>Code v 0.4 :</u>
//==============
//Bandes_Mogalef
//==============
//d'après code communiqué par Anaphraïs
//pour la WHS NANO FutureStation
//
//transcodé par smallcaps90
//le 20/05/2011
//v 0.4
//Avec initialisation des bandes
//===============================
//1---- Cours pondéré "Mogalef"
//
CP(0)=(Haut+Bas+Ouverture+2*Cloture)/5
//2---- Régression linéaire du cours pondéré sur P1 périodes
//
<font color='#0000FF'>Si RangHisto>=P1 Alors</font>
somx = 0
somy = 0
somxx = 0
somxy = 0
Pour P1 Cours
somx = somx+RangPour
somy = somy+CP
somxx = somxx+RangPour*RangPour
somxy = somxy+RangPour*CP
FinPour
a = (P1*somxy-somx*somy)/(P1*somxx-somx*somx)
b = (somy-a*somx)/P1
MogRegLin = b + a*P1
<font color='#0000FF'>FinSi</font>
//3---- Ecart-type de la régression linéaire sur P2 périodes
//
<font color='#0000FF'>Si RangHisto>=P1+P2-1 Alors</font>
ETyp(0)=Ecartype(MogRegLin,P2)
<font color='#0000FF'>FinSi</font>
//4---- Bandes "Mogalef"
//
<font color='#0000FF'>Si RangHisto>=P1+P2 Alors</font>
Si MogRegLin<MogH(1) ET MogRegLin>MogB(1) //pas de décalage si Reg Lin intérieure aux bandes
Alors
ETyp=ETyp(1)
MogM=MogM(1)
MogH=MogH(1)
MogB=MogB(1)
Sinon //décalage calcul des nouvelles valeurs des bandes
MogM=MogRegLin
MogH=MogRegLin+P3*ETyp
MogB=MogRegLin-P3*ETyp
FinSi
<font color='#0000FF'>FinSi</font>
//fin du code
Et cela donne :
<center><img src='http://www.pro-at.com/forums-bourse/0511/3668_210834.png' alt='' /></center>
Ok mais cela ne règle pas les différences entre nos tracés plus loin dans l'historique...
Il serait intéressant que nous utilisions le même historique.
As-tu pu comparer leurs formats dans Walmaster et GrapheAT Pro?
Cordialement.
Commentaire