1000字范文,内容丰富有趣,学习的好帮手!
1000字范文 > 今日资金流入流出净比例 以及机构购买比例 和内外盘比例!通达信指标公式源码

今日资金流入流出净比例 以及机构购买比例 和内外盘比例!通达信指标公式源码

时间:2023-11-20 06:44:52

相关推荐

今日资金流入流出净比例 以及机构购买比例 和内外盘比例!通达信指标公式源码

多年使用的分时指标

分享一个我自己修改的分时指标,带今日资金流入流出净比例,以及机构购买比例,和内外盘比例~

超引B1:="总引.超B#DAY";

超引B2:="总引.大B#DAY";

超引B3:="总引.中B#DAY";

超引B4:="总引.小B#DAY";

超引S1:="总引.超S#DAY";

超引S2:="总引.大S#DAY";

超引S3:="总引.中S#DAY";

超引S4:="总引.小S#DAY";

TESTSKIP(NOT(超引B1 OR 超引B2 OR 超引B3 OR 超引B4 OR 超引S1 OR 超引S2 OR 超引S3 OR 超引S4)!=0);

总A:=(超引B1+超引B2+超引B3+超引B4)+(超引S1+超引S2+超引S3+超引

S4),NODRAW;

净流入1:=SUM((超引B1+超引B2+超引B3+超引B4)-(超引S1+超引S2+超引S3+超引S4),1),NODRAW,COLORCYAN;

流入:=(超引B1+超引B2+超引B3+超引B4),COLORRED,NODRAW; 流出:=(超引S1+超引S2+超引S3+超引S4),COLORGREEN,NODRAW; 流入比:=(超引B1+超引B2+超引B3+超引B4)/总A*100;

流出比:=(超引S1+超引S2+超引S3+超引S4)/总A*100;

DRAWRECTREL(640,1000,940,940,RGB(190,190,190)); DRAWRECTREL(640,995,940,945,RGB(200,200,200)); DRAWRECTREL(640,990,940,950,RGB(210,210,210)); DRAWRECTREL(640,985,940,955,RGB(220,220,220)); DRAWRECTREL(640,980,940,960,RGB(230,230,230)); DRAWRECTREL(640,975,940,965,RGB(240,240,240)); DRAWRECTREL(640,970,940,970,RGB(250,250,250)); DRAWRECTREL(790-CONST(流入*300/总A),1000,790,940,RGB(140,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),995,790,945,RGB(148,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),990,790,950,RGB(168,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),985,790,955,RGB(188,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),980,790,960,RGB(208,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),975,790,965,RGB(228,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),970,790,970,RGB(248,0,0)); DRAWRECTREL(790-CONST(流入*300/总A),940,790-CONST(流入*300/总

A),1000,RGB(128,0,0));

DRAWRECTREL(790,1000,790+CONST(流出*300/总A),940,RGB(0,128,0)); DRAWRECTREL(790,995,790+CONST(流出*300/总A),945,RGB(0,148,0)); DRAWRECTREL(790,990,790+CONST(流出*300/总A),950,RGB(0,168,0)); DRAWRECTREL(790,985,790+CONST(流出*300/总A),955,RGB(0,188,0)); DRAWRECTREL(790,980,790+CONST(流出*300/总A),960,RGB(0,208,0)); DRAWRECTREL(790,975,790+CONST(流出*300/总A),965,RGB(0,228,0));

1/5页

DRAWRECTREL(790,970,790+CONST(流出*300/总A),970,RGB(0,248,0)); DRAWRECTREL(790+CONST(流出*300/总A),940,790+CONST(流出*300/总

A),1000,RGB(0,128,0));

DRAWRECTREL(789.8,940,790.2,1000,RGB(0,0.0,10)); DRAWRECTREL(639.8,940,640.2,1000,RGB(0,0,10)); DRAWRECTREL(939.8,940,940.2,1000,RGB(0,0,10)); DRAWRECTREL(0,940,1000,940.2,RGB(0,0,10)); DRAWTEXT_FIX(1,0.61,0.88,0,STRCAT(STRCAT("流入=",CON2STR(流入,1)),"万

")),COLOR0000FF;

DRAWTEXT_FIX(1,0.9,0.88,0,STRCAT(STRCAT("流出=",CON2STR(流出,1)),"万

")),COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(净流入1)>0,0.755,0.88,0,STRCAT("净流=

",STRCAT(CON2STR(净流入1,1),"万"))) COLOR0000FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(净流入1)<0,0.755,0.88,0,STRCAT("净流=

",STRCAT(CON2STR(净流入1,1),"万"))) COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(净流入1)=0,0.755,0.88,0,STRCAT("净流=

",STRCAT(CON2STR(净流入1,1),"万"))) COLOR80FFFF;

DRAWTEXT_FIX(1,0.80,0.955,0,STRCAT(STRCAT(" ",CON2STR(流出

比,1)),"%%")),COLORBLUE;

DRAWTEXT_FIX(1,0.74,0.955,0,STRCAT(STRCAT("",CON2STR(流入

比,1)),"%%")),COLORBLUE;

{放量}

DRAWTEXT_FIX(ISLASTBAR,0.50,0,0,DYBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.55,0.0,0,CODE),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.60,0.0,0,STKNAME)COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.65,0.0,0,HYBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.25,0.85,0,GNBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.25,0.90,0,FGBLOCK),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.25,0.95,0,ZSBLOCK),COLORYELLOW; 现在价:=CONST(C),COLORYELLOW,DOTLINE;

昨开:="REF(O,1)#DAY",NODRAW;

昨高:="REF(H,1)#DAY",NODRAW;

昨低:="REF(L,1)#DAY",NODRAW;

昨收:=DYNAINFO(3),NODRAW;

今开:=DYNAINFO(4),NODRAW;

昨与今对比:=(DYNAINFO(4)-DYNAINFO(3)),NODRAW;

昨与今跳跃比例%:=((DYNAINFO(4)-DYNAINFO(3))*100/DYNAINFO(4)),NODRAW; A1:=CROSS(C,昨高);

B:=CROSS(昨高,C);

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.01,0,0,STRCAT("昨收: ",CON2STR(昨

收,2))),COLORYELLOW;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.09,0.00,0,STRCAT("今开: ",CON2STR(今

开,2))),COLORMAGENTA;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.17,0.00,0,STRCAT("昨与今对比: ",CON2STR(昨与

2/5页

今对比,2))),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.28,0.00,0,STRCAT("昨与今跳跃比例%:

",CON2STR(昨与今跳跃比例%,2))),COLORWHITE;

成交额:=V*C/100,NODRAW;{万元}

A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0); A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0); A6:=(A2+A3);

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

DD1:=1;

ZTJ:=ZTPRICE(REF(CLOSE,1),0.1);

AAA1:=STRCAT(STRCAT("机构买",CON2STR((100*A2)/A6,0)),"%"); AAA2:=STRCAT(STRCAT("机构卖",CON2STR((100*A3)/A6,0)),"%"); AAA3:=STRCAT(STRCAT("总买入",CON2STR((100*(A2-A3))/A6,0)),"%"); AAA4:=STRCAT(STRCAT("预估涨停: ",CON2STR(ZTJ,3)),"元");

DRAWTEXT_FIX(DD1=1,0.01,0.90,0,AAA1),COLORRED; DRAWTEXT_FIX(DD1=1,0.08,0.90,0,AAA2),COLOR00FF00; DRAWTEXT_FIX(DD1=1,0.15,0.90,0,AAA3),COLOR00FFFF; DRAWTEXT_FIX(DD1=1,0.01,0.80,0,AAA4),COLOR00FFFF;

N0:=STRCAT(CON2STR(YEAR,0)," 年 ");

Y:=STRCAT(CON2STR(MONTH,0)," 月 ");

R:=STRCAT(CON2STR(DAY,0)," 日 ");

SJ:=STRCAT(STRCAT(N0,Y), R);

DRAWTEXT_FIX(C>0,0.01,0.85,0,SJ),COLORMAGENTA; 大单买量1:=SUM(IF(C>REF(C,1) AND V>4000,V/1000,0),0),NODRAW; 大单卖量1:=SUM(IF(C<REF(C,1) AND V>4000,V/1000,0),0),NODRAW; 买单总量1:=SUM(IF(C>REF(C,1),V/1000,0),0),NODRAW; 卖单总量1:=SUM(IF(C<REF(C,1),V/1000,0),0),NODRAW; 小单买量1:=买单总量1-大单买量1,NODRAW;

小单卖量1:=卖单总量1-大单卖量1,NODRAW;

{DRAWRECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0)); } 大宗进:=大单买量1,NODRAW;

大宗出:=大单卖量1,NODRAW;

非大宗进:=小单买量1,NODRAW;

非大宗出:=小单卖量1,NODRAW;

主力净流入:=大单买量1-大单卖量1,COLORRED,NODRAW;

散户净流入:=小单买量1-小单卖量1,COLORRED,NODRAW;

净流入:=买单总量1-卖单总量1,COLORRED,NODRAW;

DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗

出))))),NODRAW;

DRAWTEXT_FIX(1,0.01,0.95,0,STRCAT(STRCAT("主力 ",CON2STR(主力净流入,0)),"万

")),COLORMAGENTA;

DRAWTEXT_FIX(1,0.08,0.95,0,STRCAT(STRCAT("散户 ",CON2STR(散户净流入,0)),"万

3/5页

")),COLORCYAN;

DRAWTEXT_FIX(1,0.15,0.95,0,STRCAT(STRCAT("净流入 ",CON2STR(净流入,0)),"万

")),COLOR8000FF;

放量:=SUM(V,3)>REF(SUM(V,7),3)*2;

DRAWICON(放量=1 AND FILTER(放量=1,6),C,11);

DRAWTEXT(放量=1 AND FILTER(放量=1,6),C-C*0.015,"?量"),COLORYELLOW; {价}

现价:C,COLORMAGENTA,LINETHICK3;

均价:SUM(V*C,0)/SUM(V,0),COLORGREEN,LINETHICK3; 绿跌:IF(均价<=REF(均价,1),均价,DRAWNULL),COLORGREEN,LINETHICK5; 蓝涨:IF(均价>=REF(均价,1),均价,DRAWNULL),COLORBLUE,LINETHICK5; {分时MACD}{ 好股票网指标公式}

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIF,9);

MACD:=2*(DIF-DEA);

X:=CONST(HHV(ABS(C-DYNAINFO(3)),FROMOPEN))/CONST(HHV(ABS(DIF),FROMOPEN)

)*0.6;

DI:DIF*X+DYNAINFO(3),COLORGRAY;

DE:DEA*X+DYNAINFO(3),COLOR7700AA;

MAC:=MACD*X;

STICKLINE(MAC>0,DYNAINFO( 3),MAC+DYNAINFO( 3),0,1),COLORRED; STICKLINE(MAC<0,DYNAINFO( 3),MAC+DYNAINFO( 3),0,1),COLORCYAN; DRAWTEXT((CROSS(DIF,DEA) AND 蓝涨),C,"?买"),COLORYELLOW;

{======================================================}

DRAWRECTREL(IF(CODELIKE("999999") OR

CODELIKE("399001"),0,760),IF(CODELIKE("999999") OR CODELIKE("399001"),0,12),IF(CODELIKE("999999") OR CODELIKE("399001"),0,890),IF(CODELIKE("999999") OR CODELIKE("399001"),0,70),RGB(255,0,0));

DRAWRECTREL(IF(CODELIKE("999999") OR

CODELIKE("399001"),0,760),IF(CODELIKE("999999") OR CODELIKE("399001"),0,12),IF(CODELIKE("999999") OR CODELIKE("399001"),0,890),IF(CODELIKE("999999") OR CODELIKE("399001"),0,70),IF(CONST(DYNAINFO(51))>=1,RGB(0,255,0),RGB(255,0,0)));

NNN1:=CON2STR(CONST(DYNAINFO(51)),2);

NNN2:=STRCAT("【 内外比:",NNN1);

NNN3:=STRCAT(NNN2," 】");

DRAWTEXT_FIX(IF(CODELIKE("999999") OR

CODELIKE("399001"),DRAWNULL,1),0.76,0.015,0,NNN3),COLORYELLOW; DRAWTEXT_FIX(IF(CODELIKE("999999") OR

CODELIKE("399001"),DRAWNULL,CONST(DYNAINFO(51))>=1),0.76,0.015,0,NNN3),COL

ORBLACK;

4/5页

{=======================均线解盘

===============================};

5/5页

本内容不代表本网观点和政治立场,如有侵犯你的权益请联系我们处理。
网友评论
网友评论仅供其表达个人看法,并不表明网站立场。