Any function for Exponential Weighted Moving Average?

[Evan]

I found the series function has Moving Average, or Exponential Average, but not Exponential Weighted Moving Average. Any idea of how to generate?

[stark]

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