通达信缠论顶低主图指标(源码)

顶周期:=TOPRANGE(H);底周期:=LOWRANGE(L);
上内:=LLVBARS(H,顶周期);上外:=LLVBARS(L,顶周期);
下内:=HHVBARS(L,底周期);下外:=HHVBARS(H,底周期);
上力度:=HHV(L,上内+1) LLV(H,上内+1);
下力度:=HHV(L,下内+1) LLV(H,下内+1);
上包含:=COUNT(L =REF(L,1),上外) 2 AND COUNT(H =REF(H,1),上内)
下包含:=COUNT(H =REF(H,1),下外) 2 AND COUNT(L =REF(L,1),下内)
顶0:=顶周期 AND 上力度 AND 上包含 AND 上外
底0:=底周期 AND 下力度 AND 下包含 AND 下外
顶:=顶0 AND H=HHV(H,BARSLAST(底0))AND BARSLAST(底0)
底:=底0 AND L=LLV(L,BARSLAST(顶0))AND BARSLAST(顶0)
DRAWLINE(底,L,顶,H,0),COLORLIMAGENTA,LINETHICK1;
DRAWLINE(顶,H,底,L,0),COLORLIMAGENTA,LINETHICK1;