Bandes de Bollinger et de Keltner
Posted: 22 Aug 2015 19:30
Bonjour
Le code ci-dessous devrait afficher les bandes de Bollinger et les Bandes de Keltner, mais seules les bandes d Bollinger s'affichent.
je ne comprends pas bien le fonctionnement de l'instruction IsFirstbar et isFinalbar
pouvez m'aider S.V.P. Merci d'avance
Express VBA_Advisor
Vars
Series MA, SD, BBH, BBL;
Series KH, KL, MM ;
series r , Factor(2) ;
numeric TrueH, TrueL, I ;
Calculation
If IsFirstBar() then
begin
MovingAverage(close, MA, 20);
StdDev(close, SD, 20);
TrueH = close[1] ;
if TrueH < High then TrueH = High ;
TrueL = close[1] ;
if TrueL > Low then TrueL = Low ;
r = TrueH - TrueL ;
movingaverage(r, MM, 20) ;
end
KH = MM + Factor * MM ;
KL = MM - Factor * MM ;
BBH = MA + 2*SD;
BBL = MA - 2*SD;
Interpretation
begin
end
plot(MA, green, 1);
plot(BBL, lightblue, 2);
plot(BBH, lightblue, 2);
plot (KH, Red, 1) ;
plot (KL, Red, 1) ;
Le code ci-dessous devrait afficher les bandes de Bollinger et les Bandes de Keltner, mais seules les bandes d Bollinger s'affichent.
je ne comprends pas bien le fonctionnement de l'instruction IsFirstbar et isFinalbar
pouvez m'aider S.V.P. Merci d'avance
Express VBA_Advisor
Vars
Series MA, SD, BBH, BBL;
Series KH, KL, MM ;
series r , Factor(2) ;
numeric TrueH, TrueL, I ;
Calculation
If IsFirstBar() then
begin
MovingAverage(close, MA, 20);
StdDev(close, SD, 20);
TrueH = close[1] ;
if TrueH < High then TrueH = High ;
TrueL = close[1] ;
if TrueL > Low then TrueL = Low ;
r = TrueH - TrueL ;
movingaverage(r, MM, 20) ;
end
KH = MM + Factor * MM ;
KL = MM - Factor * MM ;
BBH = MA + 2*SD;
BBL = MA - 2*SD;
Interpretation
begin
end
plot(MA, green, 1);
plot(BBL, lightblue, 2);
plot(BBH, lightblue, 2);
plot (KH, Red, 1) ;
plot (KL, Red, 1) ;