【道法创S尾】某论坛指标主副选 源码分享

【介绍说明】

通达信【道法创S尾】某论坛收费的指标全套指标1主1副1选无加密无限制，14：30后使用。可选可设置预警使用。也可以排序使用。全套指标支持手机电脑使用。以下截图案例参考。

{主图源码复制 ↓}

DRAWTEXT_FIX(1,0.05,0.0,0,'概念:'),COLORYELLOW;

DRAWTEXT_FIX(1,0.1,0,0,GNBLOCK),COLORYELLOW;

昨涨幅:=9;

昨振幅:=10;

QCY:=BETWEEN(STR2CON(CODE),300000,309999);

QKC:=BETWEEN(STR2CON(CODE),688000,688999);

BKTJ:=QCY OR QKC;

BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板'),0.2 ,IF(INBLOCK('ST板块'),0.05,0.1)));

ZTB:=C>=ZTPRICE(REF(C,1),BK);

ZF:=(C-REF(C,1))/REF(C,1)*100;

ZFTJ:=REF(ZF,1)>昨涨幅; 

HLTJ:=REF((H-REF(C,1))/REF(C,1)*100,1)>昨振幅;

JHL:=(H-REF(C,1))/REF(C,1)*100<9;

M5:=MA(C,5); 

M10:=MA(C,10); 

MATJ:=M5>M10 AND  M5>REF(M5,1) AND M10>REF(M10,1) AND C>M5;

VOL1:=REF(V,1)>REF(V,2);

VOLTJ:=VOL1;

三日无一字板 := 

    NOT(REF(C,1) >= ZTPRICE(REF(C,2),0.1) AND REF(HIGH,1)=REF(LOW,1)) AND 

    NOT(REF(C,2) >= ZTPRICE(REF(C,3),0.1) AND REF(HIGH,2)=REF(LOW,2)) AND 

    NOT(REF(C,3) >= ZTPRICE(REF(C,4),0.1) AND REF(HIGH,3)=REF(LOW,3));   

前三日涨幅 := (REF(CLOSE,1) - REF(CLOSE,4)) / REF(CLOSE,4) * 100;

前三日 := 前三日涨幅 < 15;

A1C:=C>REF(C,4);

A2C:=BARSLASTCOUNT(A1C);

XG:=BKTJ AND ZFTJ AND HLTJ AND MATJ AND NOT(A2C=9) AND VOLTJ AND C>REF(C,1) AND JHL AND 三日无一字板 AND 前三日;{WWW.GPZBGS.COM}

STICKLINE(XG,L*0.8,L*0.95,1,0),COLORRED;

DRAWSL(XG,O,0,19,0),COLORGREEN;

DRAWICON(XG, L, 9);

{副图源码复制  ↓ }

昨涨幅:=9;

昨振幅:=10;

QCY:=BETWEEN(STR2CON(CODE),300000,309999);

QKC:=BETWEEN(STR2CON(CODE),688000,688999);

BKTJ:=QCY OR QKC;

BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板'),0.2 ,IF(INBLOCK('ST板块'),0.05,0.1)));

ZTB:=C>=ZTPRICE(REF(C,1),BK);

ZF:=(C-REF(C,1))/REF(C,1)*100;

ZFTJ:=REF(ZF,1)>昨涨幅; 

HLTJ:=REF((H-REF(C,1))/REF(C,1)*100,1)>昨振幅;

JHL:=(H-REF(C,1))/REF(C,1)*100<9;

M5:=MA(C,5); 

M10:=MA(C,10); 

MATJ:=M5>M10 AND  M5>REF(M5,1) AND M10>REF(M10,1) AND C>M5;

VOL1:=REF(V,1)>REF(V,2);

VOLTJ:=VOL1;

三日无一字板 := 

    NOT(REF(C,1) >= ZTPRICE(REF(C,2),0.1) AND REF(HIGH,1)=REF(LOW,1)) AND 

    NOT(REF(C,2) >= ZTPRICE(REF(C,3),0.1) AND REF(HIGH,2)=REF(LOW,2)) AND 

    NOT(REF(C,3) >= ZTPRICE(REF(C,4),0.1) AND REF(HIGH,3)=REF(LOW,3));   

前三日涨幅 := (REF(CLOSE,1) - REF(CLOSE,4)) / REF(CLOSE,4) * 100;

前三日 := 前三日涨幅 < 15;

A1C:=C>REF(C,4);

A2C:=BARSLASTCOUNT(A1C);

XG:BKTJ AND ZFTJ AND HLTJ AND MATJ AND NOT(A2C=9) AND VOLTJ AND C>REF(C,1) AND JHL AND 三日无一字板 AND 前三日;{WWW.GPZBGS.COM}

买入:=REF(C,BARSLAST(XG)),COLORYELLOW,NODRAW;

最高:=REF(H,BARSLAST(XG)-1),COLORFF00FF,NODRAW;

成绩:=((最高-买入)/买入)*100,COLORRED,NODRAW;

STICKLINE(REF(XG=1,1) ,0,0.50,2,0),COLORGREEN;

STICKLINE(REF(XG=1,1) AND 最高/买入>=1.01,0,0.50,2,0),COLORRED;

DRAWICON(REF(XG=1,1) AND 成绩>=1,0.68,5);

DRAWICON(REF(XG=1,1) AND 成绩<1,0.68,4);

DRAWNUMBER(REF(XG,1),0.85,成绩),COLORYELLOW;

DRAWTEXT(REF(XG,1),0.78,'          %'),COLORYELLOW;

{选股源码复制 ↓ }

昨涨幅:=9;

昨振幅:=10;

QCY:=BETWEEN(STR2CON(CODE),300000,309999);

QKC:=BETWEEN(STR2CON(CODE),688000,688999);

BKTJ:=QCY OR QKC;

BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板'),0.2 ,IF(INBLOCK('ST板块'),0.05,0.1)));

ZTB:=C>=ZTPRICE(REF(C,1),BK);

ZF:=(C-REF(C,1))/REF(C,1)*100;

ZFTJ:=REF(ZF,1)>昨涨幅; 

HLTJ:=REF((H-REF(C,1))/REF(C,1)*100,1)>昨振幅;

JHL:=(H-REF(C,1))/REF(C,1)*100<9;

M5:=MA(C,5); 

M10:=MA(C,10); 

MATJ:=M5>M10 AND  M5>REF(M5,1) AND M10>REF(M10,1) AND C>M5;

VOL1:=REF(V,1)>REF(V,2);

VOLTJ:=VOL1;

三日无一字板 := 

    NOT(REF(C,1) >= ZTPRICE(REF(C,2),0.1) AND REF(HIGH,1)=REF(LOW,1)) AND 

    NOT(REF(C,2) >= ZTPRICE(REF(C,3),0.1) AND REF(HIGH,2)=REF(LOW,2)) AND 

    NOT(REF(C,3) >= ZTPRICE(REF(C,4),0.1) AND REF(HIGH,3)=REF(LOW,3));   

前三日涨幅 := (REF(CLOSE,1) - REF(CLOSE,4)) / REF(CLOSE,4) * 100;

前三日 := 前三日涨幅 < 15;

A1C:=C>REF(C,4);

A2C:=BARSLASTCOUNT(A1C);

XG:BKTJ AND ZFTJ AND HLTJ AND MATJ AND NOT(A2C=9) AND VOLTJ AND C>REF(C,1) AND JHL AND 三日无一字板 AND 前三日;

点右下角的点“”和“”给我继续创作的动力↓↓↓