最牛抓板分时,和谐源码分享 通达信分时副图 源码 测试图

{公式名称: 最牛抓板分时

画线方法: 副图}

VAR1:=STRCAT(HYBLOCK,1);

VAR2:=STRCAT(VAR1,DYBLOCK);

VAR3:=STRCAT(VAR2,1);

DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(VAR3,GNBLOCK)),COLORYELLOW;

VAR4:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),(-VOL)/CAPITAL*100,0)),0);

VAR5:=VOL*CLOSE/100;

VAR6:=SUM(IF(VAR5/8>20 AND CLOSE>REF(CLOSE,1),VAR5,0),0);

VAR7:=SUM(IF(VAR5/8>20 AND CLOSE<REF(CLOSE,1),VAR5,0),0);

VAR8:=SUM(IF(VAR5/8<20 AND CLOSE>REF(CLOSE,1),VAR5,0),0);

VAR9:=SUM(IF(VAR5/8<20 AND CLOSE<REF(CLOSE,1),VAR5,0),0);

VAR10:=VAR6+VAR7+VAR8+VAR9;

VAR11:=IF(ISLASTBAR,100*VAR6/VAR10,0);

VAR12:=IF(ISLASTBAR,100*VAR7/VAR10,0);

VAR13:=IF(ISLASTBAR,100*VAR8/VAR10,0);

VAR14:=IF(ISLASTBAR,100*VAR9/VAR10,0);

机构买:VAR6,COLORRED,LINETHICK6;

机构卖:VAR7,COLORGREEN,LINETHICK6;

机构进出:机构买-机构卖,NODRAW;

散户买:VAR8,COLOR5555FF;

散户卖:VAR9,COLOR55FF55;

强势:100*VAR6/VAR10>50;

拉升:100*VAR6/VAR10-100*VAR7/VAR10>18 AND 100*VAR6/VAR10-100*VAR9/VAR10>18;

DRAWTEXT(ISLASTBAR=1,机构买*0.95,2),COLORRED,LINETHICK2;

DRAWTEXT(ISLASTBAR=1,机构卖*0.95,2),COLORFFFF55,LINETHICK2;

VAR15:=BETWEEN(CLOSE/(SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(VOL*100,BARSCOUNT(CLOSE))),1.05,0.95);

VAR16:=IF(VAR15=0,MA(CLOSE,BARSCOUNT(CLOSE)),SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(VOL*100,BARSCOUNT(CLOSE)));

DRAWICON(CROSS(CLOSE/VAR16,1.03),机构买*1.01,17);

VAR17:=1;

VAR18:=STRCAT(STRCAT(3,CON2STR(100*VAR6/VAR10,0)),4);

VAR19:=STRCAT(STRCAT(5,CON2STR(100*VAR7/VAR10,0)),4);

VAR20:=STRCAT(STRCAT(6,CON2STR(100*(VAR6-VAR7)/VAR10,0)),4);

VAR21:=STRCAT(STRCAT(7,CON2STR(100*VAR8/VAR10,0)),4);

VAR22:=STRCAT(STRCAT(8,CON2STR(100*VAR9/VAR10,0)),4);

VAR23:=STRCAT(STRCAT(9,CON2STR(100*(VAR8-VAR9)/VAR10,0)),4);

DRAWTEXT_FIX(VAR17=1,0.35,0.25,0,VAR18),COLORRED;

DRAWTEXT_FIX(VAR17=1,0.35,0.45,0,VAR20),COLORCYAN,LINETHICK5;

VAR24:=IF(DATE<=1590301,1,0);

VAR25:=BETWEEN(CLOSE*VAR24/(SUM(AMOUNT,BARSCOUNT(CLOSE*VAR24))/SUM(VOL*100,BARSCOUNT(CLOSE*VAR24))),1.05,0.95);

VAR26:=IF(VAR25=0,MA(CLOSE*VAR24,BARSCOUNT(CLOSE*VAR24)),SUM(AMOUNT,BARSCOUNT(CLOSE*VAR24))/SUM(VOL*100,BARSCOUNT(CLOSE*VAR24)));

{分析家公式网 WWW.70822.COM 整理}

VAR27:=CROSS(EMA(CLOSE/VAR26,120),1.02);

VAR28:=CROSS(EMA(CLOSE/VAR26,120),1.04);

DRAWTEXT(CROSS(EMA(CLOSE/VAR26,120),1.0029),机构买*1.01,10),COLORWHITE;

DRAWICON(CROSS(EMA(CLOSE/VAR26,120),1.0029),机构买*0.95,9);

DRAWTEXT(CROSS(EMA(CLOSE/VAR26,120),1.08),机构买*1.015,11),COLORYELLOW;

DRAWTEXT(CROSS(EMA(CLOSE/VAR26,120),1.04),机构买*1.02,12),COLORYELLOW;

DRAWICON(CROSS(EMA(CLOSE/VAR26,120),1.04),机构买*1.015,9);

20206133505823063.png