洗盘-试盘-整理-突破“鹏腾2009版”(主图 幅图 选股 通达信 源码 贴图)
2015-8-3 15:07:05点击:
{主图}
T:=HHVBARS(H,120);
HT:=BARSLAST(T=0 AND C<O);
LT:=BARSLAST(L=LLV(L,HT+1));
ZF:=(C-REF(C,HT+1))/REF(C,HT+1)*100;
DT:=BARSLAST(ZF=LLV(ZF,HT+1));
LT1:=BARSLAST(LT=0 AND DT=0 AND ZF<-10);
ZFA:=REF(ZF,LT1);
XZF:=REFX(ZF,BARSNEXT(LT1=0));
ZF2:=(C-REF(C,LT1+1))/REF(C,LT1+1)*100;
A:=ZF2/ABS(REF(ZF,LT1));
HT1:=BARSLAST(H=HHV(H,LT1+1) AND C>O AND RANGE(A,2,2.5));
EXT2:DRAWLINE(HT1=0,H,REF(HT1=0,1),REF(H,HT1),1),COLORYELLOW,DOTLINE;
EXT1:DRAWLINE(HT=0 AND XZF<-10,H,LT1=0,REF(H,HT),1),COLORRED,DOTLINE;
ST:=BARSLAST(CROSS(EXT2!=DRAWNULL,0.5));
XT:=BARSLAST(CROSS(EXT1!=DRAWNULL,0.5));
GL:=(C/EXT2-1)*100;
BL:=(EXT2/EXT1-1)*100;
TJ:=BL>10 AND XT>ST AND C>O AND BL<22.8 AND GL>0.1;
TJ1:=EVERY(MAX(C,O)>EXT1,ST+1);
TJ2:=EVERY(C<EXT2,ST);
XG:=CROSS(C,EXT2) AND EXT1!=DRAWNULL AND TJ AND TJ1 AND REF(TJ2,1);
STICKLINE(XG,C,O,3,0),COLOR0099CC;
STICKLINE(XG,H,L,0,0),COLOR0099CC;
DRAWICON(XG,L*0.95,1);
{幅图}
T:=HHVBARS(H,120);
HT:=BARSLAST(T=0 AND C<O);
LT:=BARSLAST(L=LLV(L,HT+1));
ZF:=(C-REF(C,HT+1))/REF(C,HT+1)*100;
DT:=BARSLAST(ZF=LLV(ZF,HT+1));
LT1:=BARSLAST(LT=0 AND DT=0 AND ZF<-10);
ZFA:=REF(ZF,LT1);
XZF:=REFX(ZF,BARSNEXT(LT1=0));
ZF2:=(C-REF(C,LT1+1))/REF(C,LT1+1)*100;
A:=ZF2/ABS(REF(ZF,LT1));
HT1:=BARSLAST(H=HHV(H,LT1+1) AND C>O AND RANGE(A,2,2.5));
EXT2:=DRAWLINE(HT1=0,H,REF(HT1=0,1),REF(H,HT1),1);
EXT1:=DRAWLINE(HT=0 AND XZF<-10,H,LT1=0,REF(H,HT),1);
ST:=BARSLAST(CROSS(EXT2!=DRAWNULL,0.5));
XT:=BARSLAST(CROSS(EXT1!=DRAWNULL,0.5));
GL:=(C/EXT2-1)*100;
BL:=(EXT2/EXT1-1)*100;
TJ:=BL>10 AND XT>ST AND C>O AND BL<22.8 AND GL>0.1;
TJ1:=EVERY(MAX(C,O)>EXT1,ST+1);
TJ2:=EVERY(C<EXT2,ST);
XG:=CROSS(C,EXT2) AND EXT1!=DRAWNULL AND TJ AND TJ1 AND REF(TJ2,1);
STICKLINE(XG,0,7,1.5,0),COLOR0099CC;
{选股}
T:=HHVBARS(H,120);
HT:=BARSLAST(T=0 AND C<O);
LT:=BARSLAST(L=LLV(L,HT+1));
ZF:=(C-REF(C,HT+1))/REF(C,HT+1)*100;
DT:=BARSLAST(ZF=LLV(ZF,HT+1));
LT1:=BARSLAST(LT=0 AND DT=0 AND ZF<-10);
ZFA:=REF(ZF,LT1);
XZF:=REFX(ZF,BARSNEXT(LT1=0));
ZF2:=(C-REF(C,LT1+1))/REF(C,LT1+1)*100;
A:=ZF2/ABS(REF(ZF,LT1));
HT1:=BARSLAST(H=HHV(H,LT1+1) AND C>O AND RANGE(A,2,2.5));
EXT2:=DRAWLINE(HT1=0,H,REF(HT1=0,1),REF(H,HT1),1);
EXT1:=DRAWLINE(HT=0 AND XZF<-10,H,LT1=0,REF(H,HT),1);
ST:=BARSLAST(CROSS(EXT2!=DRAWNULL,0.5));
XT:=BARSLAST(CROSS(EXT1!=DRAWNULL,0.5));
GL:=(C/EXT2-1)*100;
BL:=(EXT2/EXT1-1)*100;
TJ:=BL>10 AND XT>ST AND C>O AND BL<22.8 AND GL>0.1;
TJ1:=EVERY(MAX(C,O)>EXT1,ST+1);
TJ2:=EVERY(C<EXT2,ST);
T:=HHVBARS(H,120);
HT:=BARSLAST(T=0 AND C<O);
LT:=BARSLAST(L=LLV(L,HT+1));
ZF:=(C-REF(C,HT+1))/REF(C,HT+1)*100;
DT:=BARSLAST(ZF=LLV(ZF,HT+1));
LT1:=BARSLAST(LT=0 AND DT=0 AND ZF<-10);
ZFA:=REF(ZF,LT1);
XZF:=REFX(ZF,BARSNEXT(LT1=0));
ZF2:=(C-REF(C,LT1+1))/REF(C,LT1+1)*100;
A:=ZF2/ABS(REF(ZF,LT1));
HT1:=BARSLAST(H=HHV(H,LT1+1) AND C>O AND RANGE(A,2,2.5));
EXT2:DRAWLINE(HT1=0,H,REF(HT1=0,1),REF(H,HT1),1),COLORYELLOW,DOTLINE;
EXT1:DRAWLINE(HT=0 AND XZF<-10,H,LT1=0,REF(H,HT),1),COLORRED,DOTLINE;
ST:=BARSLAST(CROSS(EXT2!=DRAWNULL,0.5));
XT:=BARSLAST(CROSS(EXT1!=DRAWNULL,0.5));
GL:=(C/EXT2-1)*100;
BL:=(EXT2/EXT1-1)*100;
TJ:=BL>10 AND XT>ST AND C>O AND BL<22.8 AND GL>0.1;
TJ1:=EVERY(MAX(C,O)>EXT1,ST+1);
TJ2:=EVERY(C<EXT2,ST);
XG:=CROSS(C,EXT2) AND EXT1!=DRAWNULL AND TJ AND TJ1 AND REF(TJ2,1);
STICKLINE(XG,C,O,3,0),COLOR0099CC;
STICKLINE(XG,H,L,0,0),COLOR0099CC;
DRAWICON(XG,L*0.95,1);
{幅图}
T:=HHVBARS(H,120);
HT:=BARSLAST(T=0 AND C<O);
LT:=BARSLAST(L=LLV(L,HT+1));
ZF:=(C-REF(C,HT+1))/REF(C,HT+1)*100;
DT:=BARSLAST(ZF=LLV(ZF,HT+1));
LT1:=BARSLAST(LT=0 AND DT=0 AND ZF<-10);
ZFA:=REF(ZF,LT1);
XZF:=REFX(ZF,BARSNEXT(LT1=0));
ZF2:=(C-REF(C,LT1+1))/REF(C,LT1+1)*100;
A:=ZF2/ABS(REF(ZF,LT1));
HT1:=BARSLAST(H=HHV(H,LT1+1) AND C>O AND RANGE(A,2,2.5));
EXT2:=DRAWLINE(HT1=0,H,REF(HT1=0,1),REF(H,HT1),1);
EXT1:=DRAWLINE(HT=0 AND XZF<-10,H,LT1=0,REF(H,HT),1);
ST:=BARSLAST(CROSS(EXT2!=DRAWNULL,0.5));
XT:=BARSLAST(CROSS(EXT1!=DRAWNULL,0.5));
GL:=(C/EXT2-1)*100;
BL:=(EXT2/EXT1-1)*100;
TJ:=BL>10 AND XT>ST AND C>O AND BL<22.8 AND GL>0.1;
TJ1:=EVERY(MAX(C,O)>EXT1,ST+1);
TJ2:=EVERY(C<EXT2,ST);
XG:=CROSS(C,EXT2) AND EXT1!=DRAWNULL AND TJ AND TJ1 AND REF(TJ2,1);
STICKLINE(XG,0,7,1.5,0),COLOR0099CC;
{选股}
T:=HHVBARS(H,120);
HT:=BARSLAST(T=0 AND C<O);
LT:=BARSLAST(L=LLV(L,HT+1));
ZF:=(C-REF(C,HT+1))/REF(C,HT+1)*100;
DT:=BARSLAST(ZF=LLV(ZF,HT+1));
LT1:=BARSLAST(LT=0 AND DT=0 AND ZF<-10);
ZFA:=REF(ZF,LT1);
XZF:=REFX(ZF,BARSNEXT(LT1=0));
ZF2:=(C-REF(C,LT1+1))/REF(C,LT1+1)*100;
A:=ZF2/ABS(REF(ZF,LT1));
HT1:=BARSLAST(H=HHV(H,LT1+1) AND C>O AND RANGE(A,2,2.5));
EXT2:=DRAWLINE(HT1=0,H,REF(HT1=0,1),REF(H,HT1),1);
EXT1:=DRAWLINE(HT=0 AND XZF<-10,H,LT1=0,REF(H,HT),1);
ST:=BARSLAST(CROSS(EXT2!=DRAWNULL,0.5));
XT:=BARSLAST(CROSS(EXT1!=DRAWNULL,0.5));
GL:=(C/EXT2-1)*100;
BL:=(EXT2/EXT1-1)*100;
TJ:=BL>10 AND XT>ST AND C>O AND BL<22.8 AND GL>0.1;
TJ1:=EVERY(MAX(C,O)>EXT1,ST+1);
TJ2:=EVERY(C<EXT2,ST);
XG:CROSS(C,EXT2) AND EXT1!=DRAWNULL AND TJ AND TJ1 AND REF(TJ2,1);
- 上一篇:黄金分割线(源码 主图 通达信 贴图) 2015/8/3
- 下一篇:解套出逃专用公式(源码 主图 通达信 贴图) 2015/8/3