附件指标为完全加密，作者发了简单的源码，但没附件里的准确，而且有未来函数，附件里的显示没有未来函数。代码如下：
{www.9m8.cn}*********************************************************BUILD:20141102****};
{www.9m8.cn}一、标记所有顶分型及底分型的顶部或底部，以下简称 节点 。};
{www.9m8.cn}11、非包含关系的分型端点预选};
分型顶0:=H REF(H,1) AND L REF(L,1);
分型底0:=L REF(L,1) AND H REF(H,1);
{www.9m8.cn}12、包含关系的K线处理：凡不符合上述类型的K线，均处于包含关系之中};
{www.9m8.cn}包含关系分为二种：一、当前K线包含前一根K线时，需进行合并处理；二、当前K线被前一根K线包含时，因不涉及端点，无需处理。};
分型顶1:=(H =REF(H,1) AND L =REF(L,1)) AND (BARSLAST(分型顶0) BARSLAST(分型底0));
分型底1:=(H =REF(H,1) AND L =REF(L,1)) AND (BARSLAST(分型底0) BARSLAST(分型顶0));
{www.9m8.cn}13、将前述二种分型节点作为备选分型。}
分型顶2:=分型顶0 OR 分型顶1;
分型底2:=分型底0 OR 分型底1;
{www.9m8.cn}14、对连续的同向分型节点，取最高点或最低点为本笔分型的节点，并向前过滤掉中间满足条件的分型。};
{www.9m8.cn}注：过滤的目的是仅保留最后一次的最高最低节点分型，确保预选分型节点的唯一性。}
分型顶:=FILTERX(分型顶2 AND H=HHV(H,BARSLAST(分型底2)),BARSLAST(分型底2));
IF(分型顶,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;
分型底:=FILTERX(分型底2 AND L=LLV(L,BARSLAST(分型顶2)),BARSLAST(分型顶2));
IF(分型底,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;
{www.9m8.cn}二、对符合形成笔条件的分型节点进行粗选。}
{www.9m8.cn}注：符合笔条件的分型应符合缠论以下条件：
1、力度：本笔的起点与终点之间，必须存在最高的低点与最低的高点分离（缠论无要求，可删除）
2、包含：无包含关系的K线数量必须达到二根以上，即：右肩+左肩+本笔。
3、数量：本笔所有K线数量，在无包含关系的情况下，除起点K线外，其余数量必须达到三以上，即：右肩+过渡+左肩+本笔。};
{www.9m8.cn}21、以分型顶底为起点形成笔的要求，进行第一次筛选，得到笔的第一类过渡期顶、底。};
{www.9m8.cn}顶力度1:=HHV(L,UP1+1) LLV(H,UP1+1);}
UP1:=BARSLAST(分型底);
顶包含1:=COUNT(L REF(L,1) AND H REF(H,1),UP1)
{www.9m8.cn}底力度1:=HHV(L,DN1+1) LLV(H,DN1+1);}
DN1:=BARSLAST(分型顶);
底包含1:=COUNT(H REF(H,1) AND L REF(L,1),DN1)
笔顶10:=分型顶 AND{www.9m8.cn} 顶力度1 AND }顶包含1;
笔底10:=分型底 AND{www.9m8.cn} 底力度1 AND }底包含1;
{www.9m8.cn}211：取同一笔中的最高点或最低点为笔的分型顶、底端};
笔顶1:=笔顶10 AND H=HHV(H,BARSLAST(笔底10));
笔底1:=笔底10 AND L=LLV(L,BARSLAST(笔顶10));
DRAWLINE(笔顶1,H,笔底1,L,0),COLORYELLOW,LINETHICK2;
DRAWLINE(笔底1,L,笔顶1,H,0),COLORYELLOW,LINETHICK2;
