150 • ПРИЛОЖЕНИЕ В ФУНКЦИЯ ПОЛЬЗОВАТЕЛЯ DXAverage
{Функция пользователя: DXAverage = Двойное Экспоненциальное Скользящее Среднее по Bill Blau}
{ФОРМАТ: DXAverage (Price, г, s)}
Inputs: Price(NumericSeries), r(NumericSimple),
s(NumericSimple);
DXAverage = XAverage(XAverage(XAverage(Price,r),s);
Рис. B-6. DXAverage: Двойное ЕМА.
ФУНКЦИЯ ПОЛЬЗОВАТЕЛЯ SM Код
{Функция пользователя: SM = Стохастический Моментум по Bill Blau}
{Используется двойное экспоненциальное скользящее среднее}
{ФОРМАТ: SM(q, г, s), где
q = период, по которому вычисляется Моментум г = порядок первой Экспоненты S = порядок второй Экспоненты}
Inputs: q(NumericSeries), r(NumericSimple),
s(NumericSimple);
Valuel = 100*DXAverage{C-0.5*{Highest(H.q)-Lowest(L,q).r.s);
SM = Valuel:
{где С = цена закрытия, Н = максимум, L = минимум} Рис. В-7. SM: Стохастический Моментум.
ФУНКЦИЯ ПОЛЬЗОВАТЕЛЯ SMI
{Функция пользователя: SMI = Индекс Стохастического Моментума по Bill Blau}
{Используется двойное экспоненциальное скользящее среднее}
{ФОРМАТ SMI(q, г, s). где
q = период, по которому вычисляется Моментум г = порядок первой Экспоненты S = порядок второй Экспоненты}
Inputs: q(NumericSeries), r(NumericSimple),
s(NumericSimple);
Valuel = DXAverage(C -0.5*(Highest(H.q) + Lowest(L,q)).r.s);
Value2 = 0.5*DXAverage(Highest(H.q) -Lowest(L.q),r.s);
If Value2<> 0 then
Values =100*Valuel/Value2
Else
Value3=0; SMI = Values;
Рис. B-8. SMI: Индекс Стохастического Моментума.