附录:三合线公式( Metastock 语言)

公式1:下降三合线

m1:=H>Ref(H,-1)ANDL>Ref(L,-1);

m2:=H>Ref(H,-2)ANDL>Ref(L,-2)AND

H>Ref(H,-1)ANDL<Ref(L,-1);

m3:=H>Ref(H,-3)ANDL>Ref(L,-3)AND

H>Ref(H,-2)ANDL<Ref(L,-2)AND

H>Ref(H,-1)ANDL<Ref(L,-1);

mark:=m1 OR m2 OR m3;

set:=L<ValueWhen(1,mark,L)ANDH<ValueWhen(1,mark,H)AND

HighestSince(1,Ref(mark,-1),H)<ValueWhen(1,mark,H);

sig:=If(mark,1，lf(set,0,PREV));

Cross(sig=0,0.5)

公式2:上升三合线

m1:=H<Ref(H,-1)ANDL<Ref(L,-1);

m2:=H<Ref(H,-2)ANDL<Ref(L,-2)AND

H>Ref(H,-1)ANDL<Ref(L,-1)；

m3:=H<Ref(H,-3)ANDL<Ref(L,-3)AND

H>Ref(H,-2)ANDL<Ref(L,-2)AND

H>Ref(H,-1)ANDL<Ref(L,-1);

mark:=m1 OR m2 OR m3;

set:=L>ValueWhen(1,mark，L)ANDH>ValueWhen(1,mark,H)AND

lowestSince(1,Ref(mark,-1)，L)>ValueWhen(1,mark,L);

sig:=If(mark,1,If(set,0,PREV));

Cross(sig=0,0.5)