股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
    上一主题 下一主题

    [通达信] 「指标」通达信主图资金博弈副图指标 源码 贴图


        [-----复制链接-----]

    22万

    主题

    22万

    帖子

    14

    精华

    积分
    11040
    楼主
    2023-12-31 23:07:05
    【资料名称】:通达信主图资金博弈副图指标 源码 贴图介绍
    【资料描述】:

    通达信主图资金博弈副图指标 源码 贴图

    通达信主图资金博弈副图指标 源码 贴图

    万:VOL/10000,LINETHICK0;
    AA:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);
    预测:AA/10000;
    BB:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
    主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
    主买:主动买/10000,COLORRED;
    主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));
    主卖:-主动卖/10000,COLORLIBLUE;
    主力净买:(主动买+主动卖)/10000,COLORMAGENTA;
    持币:IF(SAR(10,2,20)>=H,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORBLUE;
    持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),CIRCLEDOT,COLORRED;


    上涨家:INDEXADV,COLOR0080FF,NODRAW;
    下跌家:INDEXDEC,COLORGREEN,NODRAW;
    涨停:DYNAINFO(3)*1.1,COLORRED,NODRAW;
    跌停:DYNAINFO(3)*0.9,COLORGREEN,NODRAW;
    STICKLINE(CLOSE=REF(CLOSE,1),0,VOL,3.5,0),COLORWHITE;
    STICKLINE(CLOSE>REF(CLOSE,1),0,VOL,3.5,0),COLORRED;
    STICKLINE(CLOSE<REF(CLOSE,1),0,VOL,3.5,0),COLORGREEN;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 3.5 , 0 ) , COLOR00FFFF ;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 3.2 , 0 ) , COLOR007777 ;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 2.7 , 0 ) , COLOR009999 ;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 2.1 , 0 ) , COLOR00BBBB ;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 1.5 , 0 ) , COLOR00DDEE ;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 0.9 , 0 ) , COLOR66FFFF ;
    STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,AA,1 , 0.2 , 0 ) , COLORFFFFFF ;
    STICKLINE(主动买>=0,VOL,-主动卖,3.2,0),COLOR000033;
    STICKLINE(主动买>=0,VOL,-主动卖,2.7,0),COLOR000066;
    STICKLINE(主动买>=0,VOL,-主动卖,2.1,0),COLOR000099;
    STICKLINE(主动买>=0,VOL,-主动卖,1.5,0),COLOR0000CC;
    STICKLINE(主动买>=0,VOL,-主动卖,0.9,0),COLOR0000FF;
    STICKLINE(主动买>=0,VOL,-主动卖,0.2,0),COLORCC66FF;
    STICKLINE(主动卖<=0,0,-主动卖,3.2,0),COLOR990000;
    STICKLINE(主动卖<=0,0,-主动卖,2.7,0),COLORCC0000;
    STICKLINE(主动卖<=0,0,-主动卖,2.1,0),COLORFF4400;
    STICKLINE(主动卖<=0,0,-主动卖,1.5,0),COLORFF8800;
    STICKLINE(主动卖<=0,0,-主动卖,0.9,0),COLORFFCC00;
    STICKLINE(主动卖<=0,0,-主动卖,0.2,0),COLORCYAN;
    AA01:=VOL>REF(V,1)*1.9;
    STICKLINE(AA01,0,V,0.5,0),COLORYELLOW;
    五日:=MA(V,5),COLOR40FF00,LINETHICK2;
    三五日:= MA(V,35),COLORYELLOW;
    一三五日:=MA(V,135),COLOR0080FF;
    NOTEXT强:=IF(五日>MA(五日,2),五日,DRAWNULL),COLORRED,LINETHICK2;


    N:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT);
    HH0:=HHV(H,N);
    LL0:=LLV(L,N);
    MM0:=CONST((HH0+LL0)*0.5);
    S01:=CONST(IF(REF(C,N-15)>MM0,1.00,-0.08));
    S02:=CONST(IF(REF(C,N-15)>MM0,-1,1));
    S1:=IF(FINDSTR(EXTERNSTR(0,13),'万元'),S01+(0.08*S02),S01),NODRAW;
    S2:=IF(FINDSTR(EXTERNSTR(0,12),'。'),S1+(0.08*S02),S1),NODRAW;
    S3:=IF(FINDSTR(EXTERNSTR(0,8),'公告'),S2+(0.08*S02),S2),NODRAW;
    S4:=IF(FINDSTR(EXTERNSTR(0,10),','),S3+(0.08*S02),S3);
    S5:=IF(FINDSTR(EXTERNSTR(0,15),'-'),S4+(0.08*S02),S4);
    S6:=IF(FINDSTR(EXTERNSTR(0,1),','),S5+(0.08*S02),S5);
    S7:=IF(FINDSTR(EXTERNSTR(0,14),'-'),S6+(0.08*S02),S6);
    S8:=IF(FINDSTR(EXTERNSTR(0,11),'-'),S7+(0.08*S02),S7);
    S9:=IF(FINDSTR(EXTERNSTR(0,9),'-'),S8+(0.08*S02),S8);
    K:=IF(S1<=0,0.05,IF(S1>=0,-0.05,0));

    量_价:=1;
    CTKG:=1;
    W:=量_价;
    EPSL:=0.0001;
    ZZ:=(C+H+L)/3;
    TJA:=ZZ>=MAX(C,O) AND CTKG=1;
    TJB:=ZZ<=MIN(C,O) AND CTKG=1;
    ZF:=IF(TJA,1,IF(TJB,-1,0));
    TJ0:=TJA OR TJB;
    TJ1:=H=L AND C>REF(C,1);
    TJ2:=H=L AND C<REF(C,1);
    TJ3:=H=L AND C=REF(C,1);
    量_价:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE;
    EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
    ZL:=2*(H-L)+ABS(C-O)+3*IF(TJ3,EPSL,ABS(EE));
    JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL;
    买卖差:=JGL_DX*量_价,COLOR13AADD,NODRAW;
    DX%:JGL_DX*100,NODRAW,COLORGREEN,LINETHICK0;
    DX连红:BARSLASTCOUNT(DX%>0),COLORRED,NODRAW,LINETHICK0;
    买盘:=量_价*(1+JGL_DX)/2,COLOR1133AA,NODRAW;
    卖盘:=量_价*(1-JGL_DX)/2,COLORFFFF00,NODRAW;
    VAR11:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
    DDX:=买盘-卖盘;
    MADDX:=MA(DDX,5)*15;
    DDX1:SMA(MADDX,3,1),COLORRED,LINETHICK1;
    DDX2:SMA(DDX1,3,1),COLORGREEN,LINETHICK1;
    DDX3:SMA(DDX2,3,1),COLORYELLOW,LINETHICK1;


    DRAWRECTREL(0,250,175,999.4,IF(120,RGB(10,0,0),0));
    超B:=L2_AMO(0,2)/10000.0;
    大B:=L2_AMO(1,2)/10000.0;
    中B:=L2_AMO(2,2)/10000.0;
    小B:=L2_AMO(3,2)/10000.0;
    超S:=L2_AMO(0,3)/10000.0;
    大S:=L2_AMO(1,3)/10000.0;
    中S:=L2_AMO(2,3)/10000.0;
    小S:=L2_AMO(3,3)/10000.0;
    净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),NODRAW;
    超大单:=(超B)-(超S),NODRAW;
    大单:=(大B)-(大S),NODRAW;
    中单:=(中B)-(中S),NODRAW;
    小单:=(小B)-(小S),NODRAW;
    DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;


    DRAWRECTREL(0,CONST(830-(ABS(超大单)*500/DAZHI)),30,935,IF(CONST(超大单)>0,RGB(255,0,0),RGB(23,125,255)));
    DRAWRECTREL(35,CONST(830-(ABS(大单)*500/DAZHI)),65,935,IF(CONST(大单)>0,RGB(255,0,0),RGB(23,125,255)));
    DRAWRECTREL(70,CONST(830-(ABS(中单)*500/DAZHI)),100,935,IF(CONST(中单)>0,RGB(255,0,0),RGB(23,125,255)));
    DRAWRECTREL(105,CONST(830-(ABS(小单)*500/DAZHI)),135,935,IF(CONST(小单)>0,RGB(255,0,0),RGB(23,125,255)));
    DRAWRECTREL(140,CONST(830-(ABS(净流入)*500/DAZHI)),170,935,IF(CONST(净流入)>0,RGB(255,0,0{255,255,255}),RGB(23,125,255)));

    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,0.25,0,'资金搏弈 (万元)'),COLORYELLOW;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.002,0.55,0,INTPART(超大单)),COLORYELLOW;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.035,0.555,0,INTPART(大单)),COLORYELLOW;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.070,0.550,0,INTPART(中单)),COLORYELLOW;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.106,0.55,0,INTPART(小单)),COLORYELLOW;
    DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.55,0,INTPART(净流入)),COLORYELLOW;


    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,1,0,'超大'),COLORYELLOW;
    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.040,1,0,'大单'),COLORYELLOW;
    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.075,1,0,'中单'),COLORYELLOW;
    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.112,1,0,'小单'),COLORYELLOW;
    DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,1,0,'净流'),COLORYELLOW;


    {T6:=IF(FINDSTR(EXTERNSTR(0,1),','),STRCAT('千股千评:',EXTERNSTR(0,1)),'');
    DRAWTEXT_FIX(1,0.00,0.00,0,T6),COLOR00FFFF;};


     










    gd61921


    【下载地址隐藏】:                    点:回复可见地址
    游客,如果您要查看本帖隐藏内容请回复






    上一篇:「指标」多空波段操作提示主图指标 源码 通达信 贴图
    下一篇:「指标」深山老妖副图/选股预警 源码 通达信 贴图
    回复

    举报

    QQ|

    GMT+8, 2024-11-11 17:13

    快速回复 返回顶部 返回列表