[程式交易]計算最近幾日四價的均值

在前上一篇文章中寫到如何分鐘的策略中計算前幾日的最高最低價，本文將介紹如何計算前幾日四價(開高低收)的平均值。
函式原始碼：
{
    NumericType : 傳入O, H, L, C四種字串來代表開盤價, 最高價, 最低價, 收盤價
    DayCount : 計算的天數
}
Input : NumericType(String), DayCount(NumericSimple);
Variables : SumD(0), Counter(0);

SumD = 0;
For Counter = 1 To DayCount
Begin
    If NumericType = "O" Then               
        SumD = SumD + OpenD(Counter);

    If NumericType = "H" Then
        SumD = SumD + HighD(Counter);

    If NumericType = "L" Then
        SumD = SumD + LowD(Counter);

    If NumericType = "C" Then
        SumD = SumD + CloseD(Counter);
End;

_AverageD = IFF(DayCount > 0, SumD / DayCount, 0);