通达信洗盘-试盘-整理-突破“鹏腾2009版”主图 幅图 选股 源码

[复制链接]
查看163 | 回复0 | 2021-8-21 07:22:43 | 显示全部楼层 |阅读模式

以下是通达信洗盘-试盘-整理-突破“鹏腾2009版”主图 幅图 选股 源码(无源码的请下载附件导入)

通达信洗盘-试盘-整理-突破“鹏腾2009版”主图 幅图 选股 源码
 

“鹏腾2009”老师思路很好,不断提供理念。谢谢你。希望广大同学我们一起将好的理念拿出来,造福喜欢指标的散户。
 汇报一下我的改变思路:根据鹏老师提供的截图 两条线画好了。从大阴开始到红线最低点我称为---洗盘。从洗盘到黄色线开始点我称为---试盘。从试盘开始到信号出现前我称为--盘整。信号当天我称为---突破。
 指标因为有两条画线所以会涉及到未来函数。但这不可怕,我们的信号是线画出来我们再介入的,跟帖这个问题不做解释。
 指标只是给你一个范围,就像给你一篮子金矿石,你只有一次选择的机会,你能拿到含金量最高的那颗矿石吗?即使拿不到含金量最高的那一颗,但不含金的我肯定帮你过滤了一遍,多少应该会收获点吧,别贪最重要!

{主图}

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);

 

69111647.jpg

69111647.jpg

69211033.png

69211033.png

相关帖子

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则