在文章《顶底分型的应用举例》与《顶底分型的应用举例（续一）》
网友留言
留言的意思说，脚踏前期的头，限定条件是这样的数据内在形态，发生在相对历史的低位，并起了一个名字是“底分型选股公式”，如何建立算法呢？先看如下示意图：
思路示意图
思路步骤
有了上面的留言需求的示意图，全部的思路显而易见了：
罗列出TE1以及TE2的位置；TB1以及TB2的位置；
计算RE2的值；计算RB2的值；
左侧高点的位置与数值；
由最值函数计算得到的底点位置与底点值；
限定TB2的位置以及RB2的值，是向下的多少（多久）数据以来的低位以及是下跌多少空间以来的低价；
顶底分型的时间序列；
应用ABS函数，限定当前的筛选条件---当前L与RE2的空间百分比。
算法建立
1.计算相应顶底分型对儿的位置：
TE1:=CONST(PEAKBARS(1,转向比/10,1));
TE2:=CONST(PEAKBARS(1,转向比/10,2));
DRAWICON(CURRBARSCOUNT=TE1+1,H*1.01,39);
DRAWICON(CURRBARSCOUNT=TE2+1,H*1.01,39);
TB1:=CONST(TROUGHBARS(2,转向比/10,1));
TB2:=CONST(TROUGHBARS(2,转向比/10,2));
DRAWICON(CURRBARSCOUNT=TB1+1,L*0.99,38);
DRAWICON(CURRBARSCOUNT=TB2+1,L*0.99,38);
2.计算相应顶底分型对称的数值：
RE2:IF(CURRBARSCOUNT<=TE2+1,CONST(REF(H,TE2)),DRAWNULL);
RB2:IF(CURRBARSCOUNT<=TB2+1,CONST(REF(L,TB2)),DRAWNULL);
3.由最值函数计算得到的左侧高点的位置与数值：
左侧高点位:=CONST(REF(HHVBARS(H,跌多久-TB2),TB2))+TB2;
左侧高点值:=CONST(REF(H,左侧高点位));
距高点跌多少:=左侧高点值*(1-跌多少/100);
4. 由最值函数计算得到的底点位置与底点值：
底点位:=CONST(LLVBARS(L,跌多久));
底点值:=CONST(REF(L,底点位));
5. 限定TB2的位置以及RB2的值
左侧高点位>TB2 AND 底点位<=50 AND RB2=底点值AND RB2<=距高点跌多少
6. 顶底分型的时间序列
B2>TE2 AND TE2>TB1 AND TB1>TE1
7. 应用ABS函数，限定当前的筛选条件
ABS(CONST(L)/RE2-1)<=0.03 {3%的限定可以自定义}
数据筛选
三个参数
TE1:=CONST(PEAKBARS(1,转向比/10,1));
TE2:=CONST(PEAKBARS(1,转向比/10,2));
TB1:=CONST(TROUGHBARS(2,转向比/10,1));
TB2:=CONST(TROUGHBARS(2,转向比/10,2));
RE2:=CONST(REF(H,TE2));
RB2:=CONST(REF(L,TB2));
底点位:=CONST(LLVBARS(L,跌多久));
底点值:=CONST(REF(L,底点位));
左侧高点位:=CONST(REF(HHVBARS(H,跌多久-TB2),TB2))+TB2;
左侧高点值:=CONST(REF(H,左侧高点位));
距高点跌多少:=左侧高点值*(1-跌多少/100);
左侧高点位>TB2 AND 底点位<=50 AND RB2=底点值 AND RB2<=距高点跌多少 AND TB2>TE2 AND TE2>TB1 AND TB1>TE1 AND ABS(CONST(L)/RE2-1)<=0.03;
主图标注
三个参数与完整代码
三个参数
TE1:=CONST(PEAKBARS(1,转向比/10,1));
TE2:=CONST(PEAKBARS(1,转向比/10,2));
DRAWICON(CURRBARSCOUNT=TE1+1,H*1.01,39);
DRAWICON(CURRBARSCOUNT=TE2+1,H*1.01,39);
TB1:=CONST(TROUGHBARS(2,转向比/10,1));
TB2:=CONST(TROUGHBARS(2,转向比/10,2));
DRAWICON(CURRBARSCOUNT=TB1+1,L*0.99,38);
DRAWICON(CURRBARSCOUNT=TB2+1,L*0.99,38);
RE2:IF(CURRBARSCOUNT<=TE2+1,CONST(REF(H,TE2)),DRAWNULL);
RB2:IF(CURRBARSCOUNT<=TB2+1,CONST(REF(L,TB2)),DRAWNULL);
底点位:=CONST(LLVBARS(L,跌多久));
底点值:IF(CURRBARSCOUNT<=跌多久,CONST(REF(L,底点位)),DRAWNULL);
左侧高点位:=CONST(REF(HHVBARS(H,跌多久-TB2),TB2))+TB2;
左侧高点值:IF(CURRBARSCOUNT<=跌多久,CONST(REF(H,左侧高点位)),DRAWNULL);
距高点跌多少:左侧高点值*(1-跌多少/100);
计算创造价值，分享助力成功，代码均可运行。
联系客服
