Page 1 of 1

Any function for Exponential Weighted Moving Average?

Posted: Wed Aug 02, 2006 9:13 am
by 9531912
I found the series function has Moving Average, or Exponential Average, but not Exponential Weighted Moving Average. Any idea of how to generate?

Posted: Wed Aug 02, 2006 11:00 am
by 9531990
Hello Evan,

you can add your own function at TChart1_OnSeriesBeforeAdd(ByVal SeriesIndex As Long, MoreValues As Boolean)

here is small example:

Private Sub TChart1_OnSeriesBeforeAdd(ByVal SeriesIndex As Long, MoreValues As Boolean)
If SeriesIndex = 1 Then
TChart1.Series(SeriesIndex).YValues.TempValue _
= TChart1.Series(0).YValues.Value(TChart1.Series(SeriesIndex).Count) + 10
End If