薛斯通道 源码

[复制链接]
查看135 | 回复0 | 2021-8-20 14:01:07 | 显示全部楼层 |阅读模式

以下是薛斯通道 源码(无源码的请下载附件导入)

薛斯通道 源码

非常好用的薛斯通道主图,进出一目了然

LY:=10;
 BL:=40;
 CJQS:=XMA(CLOSE,LY);
 JBQS:=XMA(CLOSE,BL);
 N:=REF(JBQS,BL/2+1-CURRBARSCOUNT)/REF(JBQS,BL/2+2-CURRBARSCOUNT);
 M:=REF(CJQS,LY/2+1-CURRBARSCOUNT)/REF(CJQS,LY/2+2-CURRBARSCOUNT);
 JB上轨:IF(CURRBARSCOUNT>BL/2,JBQS*1.1,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*1.1);
 JB下轨:IF(CURRBARSCOUNT>BL/2,JBQS*0.9,REF(JBQS,BL/2+1-CURRBARSCOUNT)*POW(N,BL/2+1-CURRBARSCOUNT)*0.9);
 CJ上轨:IF(CURRBARSCOUNT>LY/2,CJQS*1.05,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*1.05);
 CJ下轨:IF(CURRBARSCOUNT>LY/2,CJQS*0.95,REF(CJQS,LY/2+1-CURRBARSCOUNT)*POW(M,LY/2+1-CURRBARSCOUNT)*0.95);
 DRAWTEXT(O<=CJ下轨,(L * 0.98),'抢'),COLORYELLOW;
 DRAWTEXT(CROSS(H,CJ上轨),(H * 1.01),'逃'),COLORYELLOW;
 {立桩量}
TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
 STICKLINE(TJ,C,O+(C-O)/2,1,0),COLOR00FFFF;
 {一穿三:5、10、20}
 MA1:=MA(CLOSE,5);
 MA2:=MA(CLOSE,10);
 MA3:=MA(CLOSE,20);
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;
 STICKLINE(一穿三,O,O+(C-O)/2,1,0),COLORFF00FF;
 AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);
 AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);
 AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);
 BB1:=0;
 B1万元:=DVOL*DCLOSE/100;
 B1差:=B1万元-REF(B1万元,1);
 B2万元:=DVOL*DCLOSE/100;
 B2比:=B2万元/REF(B2万元,1);
净流入万元:=(AAA2-AAA3-0.5*AAA4);
 PM:=MA(净流入万元,1);
 PMA:=PM/REF(PM,1)>1;
 PMB:=REF(PMA,1)<1 AND PMA;
密码:(EMA(MA(B1万元,2),2))/100000,COLORYELLOW,NODRAW;
二日比:=密码/REF(密码,1);
选股:PMB AND 密码>REF(密码,1) AND 二日比>1,COLORRED,NODRAW;
 Y:=CLOSE/REF(CLOSE,1)>1.07;
 X:=VOL>MA(VOL,5);
 A1:=Y AND X;
 DRAWTEXT(A1,MA(CLOSE,5),'攻涨停'),COLORMAGENTA;
 

63288053.jpg

63288053.jpg

回复

使用道具 举报

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

本版积分规则