Автоматический расчет поддержки и сопротивления
В майском за 1998 год номере STOCKS & COMMODITIES были опубликованы
формулы для расчета уровней поддержки и сопротивления, а также осцилляторы
поддержки и сопротивления WRO и WSO. Все это основывалось на моей статье
"Automated Support And Resistance," из этого номера. Я получил множество
писем от читателей STOCKS & COMMODITIES на эту тему.
Метод потребовал пояснений. Кроме того, расчет производился слишком медленно
и скрининг большого количесва акций был затруднен. Я разработал
усовершенствованный метод для более быстрого и качественного расчета этих
индикаторов.
Вначале заводим уровни поддержки от S1 до S6 и сопротивления от R1 до R6,
как раздельные индикаторы (12 штук).
S1
ValueWhen(1, Ref(L,-4) = LLV(L,9), Ref(L,-4))
S2
ValueWhen(2, Ref(L,-4) = LLV(L,9), Ref(L,-4))
S3
ValueWhen(3, Ref(L,-4) = LLV(L,9), Ref(L,-4))
S4
ValueWhen(4, Ref(L,-4) = LLV(L,9), Ref(L,-4))
S5
ValueWhen(5, Ref(L,-4) = LLV(L,9), Ref(L,-4))
S6
ValueWhen(6, Ref(L,-4) = LLV(L,9), Ref(L,-4))
R1
ValueWhen(1, Ref(H,-4) = HHV(H,9), Ref(H,-4))
R2
ValueWhen(2, Ref(H,-4) = HHV(H,9), Ref(H,-4))
R3
ValueWhen(3, Ref(H,-4) = HHV(H,9), Ref(H,-4))
R4
ValueWhen(4, Ref(H,-4) = HHV(H,9), Ref(H,-4))
R5
ValueWhen(5, Ref(H,-4) = HHV(H,9), Ref(H,-4))
R6
ValueWhen(6, Ref(H,-4) = HHV(H,9), Ref(H,-4))
Эти 12 индикаторов помещаются на график в виде точек (выбирайте
представление в меню стилей). Рекомендуется красный цвет для поддержки и
синий - для сопротивления. Все это потребует некоторого времени. но затем
следует сохранить график как шаблом. чтобы легче было применять его
впоследствии к другим акциям.
Для расчета индикаторов WRO и WSO формулы заведите, как показано ниже.
WSO
L1:=ValueWhen(1,Ref(L,-4)=LLV(L,9),Ref(L,-4));
L2:=ValueWhen(2,Ref(L,-4)=LLV(L,9),Ref(L,-4));
L3:=ValueWhen(3,Ref(L,-4)=LLV(L,9),Ref(L,-4));
L4:=ValueWhen(4,Ref(L,-4)=LLV(L,9),Ref(L,-4));
L5:=ValueWhen(5,Ref(L,-4)=LLV(L,9),Ref(L,-4));
L6:=ValueWhen(6,Ref(L,-4)=LLV(L,9),Ref(L,-4));
L1M:= Max(0,Min(1,Int(L1/C)));
L2M:= Max(0,Min(1,Int(L2/C)));
L3M:= Max(0,Min(1,Int(L3/C)));
L4M:= Max(0,Min(1,Int(L4/C)));
L5M:= Max(0,Min(1,Int(L5/C)));
L6M:= Max(0,Min(1,Int(L6/C)));
100*(1-(L1M+L2M+L3M+L4M+L5M+L6M)/6)
WRO
L1:=ValueWhen(1,Ref(H,-4)=HHV(H,9),Ref(H,-4));
L2:=ValueWhen(2,Ref(H,-4)=HHV(H,9),Ref(H,-4));
L3:=ValueWhen(3,Ref(H,-4)=HHV(H,9),Ref(H,-4));
L4:=ValueWhen(4,Ref(H,-4)=HHV(H,9),Ref(H,-4));
L5:=ValueWhen(5,Ref(H,-4)=HHV(H,9),Ref(H,-4));
L6:=ValueWhen(6,Ref(H,-4)=HHV(H,9),Ref(H,-4));
L1M:= Max(0,Min(1,Int(L1/C)));
L2M:= Max(0,Min(1,Int(L2/C)));
L3M:= Max(0,Min(1,Int(L3/C)));
L4M:= Max(0,Min(1,Int(L4/C)));
L5M:= Max(0,Min(1,Int(L5/C)));
L6M:= Max(0,Min(1,Int(L6/C)));
100*(1-(L1M+L2M+L3M+L4M+L5M+L6M)/6)
Осцилляторы WRO и WSO помещаются вместе в отдельном окне. Помогает
добавить к ним горизонтальные линии 100 и 0.
Mel Widner, Ph.D.
