精准趋势线主图源码 金字塔 贴图

操作久了，大家都知道只有趋势才能赚钱，但操作趋势策略的首要是定义出趋势，纵观定义方法，大致有以下几类：
1-趋势线类；
2-高低点定义类；
3-均线定义类；
第一类的前提是先量化出趋势线，当前能取到值，除下面帖子中的定义方法外，分享一下精准趋势线自动划法

源码及注释如下：
ZIG(3,5);
G1:=1;G2:=2;F1:=1;F2:=2;P:=5;
SRQ:=CURRBARSCOUNT;{求到最后交易日的周期数}
{通达信:求到最后交易日的周期数
金字塔：函数返回当前K线是本地某品种某周期按逆序第几根K线。
注：对于日线数据就表示从上市到现在总共有多少交易日。
若需按顺序求K线位置，参考函数BARPOS
用法:BAR逆序周期:CURRBARSCOUNT,NOAXIS;
}
GZ1:=CONST(TROUGH(2,P,G1));{前一个转向的波谷值}
{用法: TROUGH(K,N,M)表示之字转向ZIG(K,N)的前M个波谷的数值,M必须大于等于1
例如: TROUGH(2,5,2)表示%5最低价ZIG转向的前2个波谷的数值;
用法: CONST(C)表示取现有最新现价，C由序列变量转变为常数。
该函数仅在序列模式有效。
所属函数组：常数函数}
GZ2:=CONST(TROUGH(2,P,G2));{前2个转向的波谷值}
GCZ:=GZ1-GZ2;{前1个与前2个波谷值的距离--这个距离相当于是低点的间距}
GN1:=CONST(TROUGHBARS(2,P,G1));{前一个波谷到当前的周期数}
GN2:=CONST(TROUGHBARS(2,P,G2));{前2个波谷到当前的周期数}

GNC:=CONST(GN2-GN1);{前2个波谷与前1个波谷周期数的差值}
Q1:=GN2-SRQ+1;{前2个波谷到当前K线周期的值，实现实时K线显示}

DWDS:=GCZ/GNC;{求两个波谷的间距与时间的比值--相当于求时间内的平均变化值}
QSX:DWDS*Q1+GZ2;{2}
//QSXD:IF(Q1>0,QSX,GZ2);{2}

FZ1:=CONST(PEAK(1,P,F1));{2}
FZ2:=CONST(PEAK(1,P,F2));{2}
FCZ:=FZ2-FZ1;{2}
FN1:=CONST(PEAKBARS(1,P,F1));{2}
FN2:=CONST(PEAKBARS(1,P,F2));{2}

FNC:=CONST(FN1-FN2);
QA:=FN2-SRQ+1;

FGWDS:=FCZ/FNC;
QSX1:FGWDS*QA+FZ2;
//FQSXD:IF(QA>0,QSX1,FZ2);