以下是通达信后漏早启(鹏腾2009版)主图 幅图选股源码(无源码的请下载附件导入)
首先谢谢鹏老师无私提供思路。
取大盘上一波低点(大概在5.7左右)对应个股的最低点画线至今。比较个股后与大盘跌破这个支撑线,较大盘早于突破这跟支撑线出信号。取名叫“后漏早启”。
公式中“相差天”表示大盘早于个股跌破支撑的天数。绿色K线是大盘跌破支撑这一天,黄色K线是个股跌破支撑日,红箭头出信号。
N自己调节一下,N越大出票越少。
因为要对照大盘所以先建一个引用
名字 YYY
LL:=IF(BETWEEN(DATE,1150501,1150530),L,999999);
LT:=BARSLAST(LL=LLV(LL,0));
T:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
TT:BARSLAST(CROSS(REF(L,T),C));
退出 再建下面主图 幅图 选股
{主图}
N:=3;
LL:=IF(BETWEEN(DATE,1150501,1150530),L,999999);
LT:=BARSLAST(LL=LLV(LL,0));
T:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
DT:=CALCSTOCKINDEX('999999','YYY',1);
TJ:=COUNT(CROSS(REF(L,T),C),DT+1)=1 AND CROSS(REF(L,T),C) AND DT>=3;
TT:=BARSLAST(TJ);
TJA:=COUNT(CROSS(REF(L,T),C),T+1)=1;
XG:=COUNT(CROSS(C,REF(L,T)),TT+1)=1 AND CROSS(C,REF(L,T)) AND DT-TT>=N AND TJA;
STICKLINE(T>=0,REF(LL,T),REF(LL,T),6,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=CONST(DT)+1,L,REF(L,T)*0.9,2,0),COLORGREEN;
STICKLINE(TJ,C,O,2,0),COLORYELLOW;
STICKLINE(TJ,H,L,0,0),COLORYELLOW;
DRAWICON(XG,L,1);
DRAWTEXT(T=0,H*1.02,VARCAT(VARCAT('突破价:',VAR2STR(REF(LL,T),2)),'元'))COLORYELLOW;
相差天:DT-TT NODRAW;
{幅图}
N:=3;
LL:=IF(BETWEEN(DATE,1150501,1150530),L,999999);
LT:=BARSLAST(LL=LLV(LL,0));
T:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
DT:=CALCSTOCKINDEX('999999','YYY',1);
TJ:=COUNT(CROSS(REF(L,T),C),DT+1)=1 AND CROSS(REF(L,T),C) AND DT>=3;
TT:=BARSLAST(TJ);
TJA:=COUNT(CROSS(REF(L,T),C),T+1)=1;
XG:=COUNT(CROSS(C,REF(L,T)),TT+1)=1 AND CROSS(C,REF(L,T)) AND DT-TT>=N AND TJA;
STICKLINE(XG,0,8,1.5,0),COLORRED;
{选股}
N:=3;
LL:=IF(BETWEEN(DATE,1150501,1150530),L,999999);
LT:=BARSLAST(LL=LLV(LL,0));
T:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
DT:=CALCSTOCKINDEX('999999','YYY',1);
TJ:=COUNT(CROSS(REF(L,T),C),DT+1)=1 AND CROSS(REF(L,T),C) AND DT>=3;
TT:=BARSLAST(TJ);
TJA:=COUNT(CROSS(REF(L,T),C),T+1)=1;
XG:COUNT(CROSS(C,REF(L,T)),TT+1)=1 AND CROSS(C,REF(L,T)) AND DT-TT>=N AND TJA;
7366757.jpg
73122635.jpg
73177775.jpg
73222639.jpg
72499235.rar
(3.37 KB, 下载次数: 0, 售价: 1 金钱)
|