通达信整理三角形主图画线主图源码

以下是通达信整理三角形主图画线主图源码

1、找到最近的高点，该天的最高价高于前一天和后一天的最高价；找到第二近的高点，该天的最高价高于前一天和后一天的最高价，且高于最近高点的最高价；
2、在这两天的最高价之间划条向右延伸的连线；
3、如果有最近的高点，与原最近高点满足条件1，去除原有划线，重新划一条新的直线；
 于是乎想到干脆取这条下降趋势线开始后的最低点，但这个低点同样要是最低价小于前一天最低价和最低价小于后一天最低价和最近一个符合最低价小于前一天最低价和最低价小于后一天最低价再加上一条连线，形成一个整理三角形或者叫 **三角形的画线趋势主图，献给喜欢研究趋势的同学。高手绕道。”没用的指标“只献给支持我  喜欢我的同学们。

{整理三角形主图画线}
T:=BARSLAST(CROSS((H>REF(H,1) AND H>REFX(H,1)),0.5));
 A:=IF(T=0,H,DRAWNULL);
 HH:=ALIGNRIGHT(A);
 H1:=CONST(HH);
 GD:=BARSLAST(CROSS(A>H1,0.5));
 DT:=BARSLAST(A=H1);
 T1:=BARSLAST(CROSS((L<REF(L,1) AND L<REFX(L,1)),0.5));
 LT:=BARSLAST(L=LLV(L,GD+1) AND T1=0);
 LL:=CONST(REF(L,T1));
 LT1:=BARSLAST(L=LL);
 DRAWLINE(CURRBARSCOUNT=CONST(GD)+1,A,CURRBARSCOUNT=CONST(DT)+1,H1,1),COLORYELLOW;
 DRAWLINE(CURRBARSCOUNT=CONST(LT)+1,L,CURRBARSCOUNT=CONST(LT1)+1,L,1),COLORYELLOW;