联系方式 Contact

云指标公式网

淘宝:zb-mart.taobao.com

电话:18020657357

微信:18020657357

Q Q:396950280

点击这里给我发消息

网址:www.yzhibiao.com

搜索 Search

后漏早启“鹏腾2009版”(主图 幅图 选股 源码 通达信 贴图)

2015-7-19 16:00:32点击:

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;