通达信双针探底（鹏腾2009版本）源码主图选股
{主图}
TJ1:=MIN(O,C)/L>1.04;
T1:=BARSLAST(TJ1);
T2:=REF(T1,T1+1)+T1+1;
T3:=CONST(T2-T1<=30 AND BETWEEN(REF(L,T1)-REF(L,T2),0.01,-0.01));
A:=T3 AND CURRBARSCOUNT=CONST(T2)+1;
B:=T3 AND CURRBARSCOUNT=CONST(T1)+1;
E:DRAWLINE(A,L,B,L,1),DOTLINE,COLORYELLOW;
D:=BARSLAST(B);
DRAWICON(COUNT(C>REF(H,D),D+1)=1 AND C>REF(H,D),C,9);
DRAWTEXT(ISLASTBAR,E,'双针探底'),COLORCYAN;
IF(B,L,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK3;
IF(A,L,DRAWNULL),CIRCLEDOT,COLORRED,LINETHICK3;
{选股}
TJ2:=MIN(O,C)/L>1.04;
T1X:=BARSLAST(TJ2);
T2X:=REF(T1X,T1X+1)+T1X+1;
T3X:=CONST(T2X-T1X<=30 AND BETWEEN(REF(L,T1X)-REF(L,T2X),0.01,-0.01));
BX:=T3X AND CURRBARSCOUNT=CONST(T1X)+1;
DX:=BARSLAST(BX);
COUNT(C>REF(H,DX),DX+1)=1 AND C>REF(H,DX);
未来函数检测结果如下：
该公式没有未来函数
定制指标公式、软件请联系QQ或微信同号：88652583
TJ1赋值:开盘价和收盘价的较小值/最低价>1.04
T1赋值:上次TJ1距今天数
T2赋值:T1+1日前的T1+T1+1
T3赋值:T2-T1<=30ANDBETWEEN(T1日前的最低价-T2日前的最低价,0.01,-0.01)的最后一日取值设为常数
A赋值:T3 AND 到最后交易的周期=T2的最后一日取值设为常数+1
B赋值:T3 AND 到最后交易的周期=T1的最后一日取值设为常数+1
输出E:当满足条件A时,在最低价位置画直线起点，当满足条件B时,在最低价位置画直线终点,1表示是否延长.,DOTLINE,画黄色
D赋值:上次B距今天数
当满足条件统计D+1日中满足收盘价>D日前的最高价的天数=1ANDC>D日前的最高价时,在收盘价位置画9号图标
当满足条件是否最后一个周期时,在E位置书写文字,画青色
如果B,返回最低价,否则返回无效数,CIRCLEDOT,画红色,线宽为3
如果A,返回最低价,否则返回无效数,CIRCLEDOT,画红色,线宽为3
TJ2赋值:开盘价和收盘价的较小值/最低价>1.04
T1X赋值:上次TJ2距今天数
T2X赋值:T1X+1日前的T1X+T1X+1
T3X赋值:T2X-T1X<=30ANDBETWEEN(T1X日前的最低价-T2X日前的最低价,0.01,-0.01)的最后一日取值设为常数
BX赋值:T3X AND 到最后交易的周期=T1X的最后一日取值设为常数+1
DX赋值:上次BX距今天数
统计DX+1日中满足收盘价>DX日前的最高价的天数=1 AND 收盘价>DX日前的最高价
