通达信折腾资金数据指标源码个股DDX

说明：
从上至下分别为 当日、3日、5日、10日所列项目值。
ddx大单动向：大单买入净量占流通盘的百分比(越大越好)
ddy涨跌动因：每日卖出单数和买入单数差的累计值(越大越好)
ddz大单差分：表示了大资金买入强度，越高表示买入强度越大(越大越好)

特大单，大单差越大越好。中单差，小单差越小越好(特大：多为基金 大单：基金和游资)
特大差+大单差联合起来研判会比较好。
主力力度：正:机构买（越正买的越厉害）负:机构卖（越负卖的越厉害）
主动率：Level2数据，可以观察主动买单的动向。
主动率=((主动买量-主动卖量)/(主动买量+主动卖量))*100 。

BBD（越大越好） 正:大资金流入 负:大资金流出
BBD定义不一，有曰大单净买单数的（或金额），有曰大单净买单数与总成交单比值的。
这里按大单净买单数处理。
喜欢数据的朋友可按自己的理解处理，寻根正源才是“道”。

{个股DDX}
DRAWRECTREL(0,0,998,998,RGB(0,0,10));
DRAWRECTREL(100,0,900,998,RGB(0,0,10));
DRAWRECTREL(200,0,800,998,RGB(0,0,10));
DRAWRECTREL(300,0,700,998,RGB(0,0,10));
DRAWRECTREL(400,0,600,998,RGB(0,0,10));
DRAWRECTREL(500,0,500,998,RGB(255,255,0));
DRAWRECTREL(0,200,998,200,RGB(255,255,0));
DRAWRECTREL(0,400,998,400,RGB(255,255,0));
DRAWRECTREL(0,600,998,600,RGB(255,255,0));
DRAWRECTREL(0,800,998,800,RGB(255,255,0));

DDX:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*10000/FINANCE(7);
DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0),NODRAW;
DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0),NODRAW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.03,0.03,0,'DDX') COLOR0000FF;{项目};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.13,0.03,0,'DDY') COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.23,0.03,0,'DDZ') COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(DDX)>=0,0.03,0.25,0,STRCAT(STRCAT(' ',CON2STR(DDX,2)),' ')),COLOR0000FF;{数据}
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(DDX)<0,0.02,0.25,0,STRCAT(STRCAT(' ',CON2STR(DDX,2)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(DDY)>=0,0.13,0.25,0,STRCAT(STRCAT(' ',CON2STR(DDY,2)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(DDY)<0,0.12,0.25,0,STRCAT(STRCAT(' ',CON2STR(DDY,2)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(DDZ)>=0,0.23,0.25,0,STRCAT(STRCAT(' ',CON2STR(DDZ,2)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(DDZ)<0,0.22,0.25,0,STRCAT(STRCAT(' ',CON2STR(DDZ,2)),' ')),COLOR00FF00;

特大单:=(L2_AMO(0,2)/10000.0)+(-L2_AMO(0,3)/10000.0);
大单:=(L2_AMO(1,2)/10000.0)+(-L2_AMO(1,3)/10000.0);
中单:=(L2_AMO(2,2)/10000.0)+(-L2_AMO(2,3)/10000.0);
小单:=(L2_AMO(3,2)/10000.0)+(-L2_AMO(3,3)/10000.0);
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.32,0.03,0,'特大单') COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.43,0.03,0,'大单') COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.53,0.03,0,'中单') COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.63,0.03,0,'小单') COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单)>=0,0.33,0.25,0,STRCAT(STRCAT(' ',CON2STR(特大单,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单)<0,0.32,0.25,0,STRCAT(STRCAT(' ',CON2STR(特大单,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(大单)>=0,0.43,0.25,0,STRCAT(STRCAT(' ',CON2STR(大单,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(大单)<0,0.42,0.25,0,STRCAT(STRCAT(' ',CON2STR(大单,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(中单)>=0,0.53,0.25,0,STRCAT(STRCAT(' ',CON2STR(中单,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(中单)<0,0.52,0.25,0,STRCAT(STRCAT(' ',CON2STR(中单,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(小单)>=0,0.63,0.25,0,STRCAT(STRCAT(' ',CON2STR(小单,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(小单)<0,0.62,0.25,0,STRCAT(STRCAT(' ',CON2STR(小单,1)),' ')),COLOR00FF00;
主力力度:=ABS(LARGEINTRDVOL*100/VOL)-ABS(LARGEOUTTRDVOL*100/VOL),NODRAW;
主动率:=(ACTINVOL-ACTOUTVOL)/(ACTINVOL+ACTOUTVOL)*100 ;
BBD:=(LARGETRDINNUM-LARGETRDOUTNUM);
DRAWTEXT_FIX(1,0.715,0.03,0,STRCAT('主力力度',' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(主力力度)>=0,0.73,0.25,0,STRCAT(STRCAT(' ',CON2STR(主力力度,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(主力力度)<0,0.72,0.25,0,STRCAT(STRCAT(' ',CON2STR(主力力度,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.81,0.03,0,STRCAT('主动率','%% ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(主动率)>=0,0.83,0.25,0,STRCAT(STRCAT(' ',CON2STR(主动率,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(主动率)<0,0.82,0.25,0,STRCAT(STRCAT(' ',CON2STR(主动率,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.93,0.03,0,STRCAT('BBD',' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(BBD)>=0,0.94,0.25,0,STRCAT(STRCAT(' ',CON2STR(BBD,0)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(BBD)<0,0.93,0.25,0,STRCAT(STRCAT(' ',CON2STR(BBD,0)),' ')),COLOR00FF00;
特大单3:=SUM(特大单,3);
特大单5:=SUM(特大单,5);
特大单10:=SUM(特大单,10);
大单3:=SUM(大单,3);
大单5:=SUM(大单,5);
大单10:=SUM(大单,10);
中单3:=SUM(中单,3);
中单5:=SUM(中单,5);
中单10:=SUM(中单,10);
小单3:=SUM(小单,3);
小单5:=SUM(小单,5);
小单10:=SUM(小单,10);
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单3)>=0,0.33,0.45,0,STRCAT(STRCAT(' ',CON2STR(特大单3,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单3)<0,0.32,0.45,0,STRCAT(STRCAT(' ',CON2STR(特大单3,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(大单3)>=0,0.43,0.45,0,STRCAT(STRCAT(' ',CON2STR(大单3,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(大单3)<0,0.42,0.45,0,STRCAT(STRCAT(' ',CON2STR(大单3,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(中单3)>=0,0.53,0.45,0,STRCAT(STRCAT(' ',CON2STR(中单3,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(中单3)<0,0.52,0.45,0,STRCAT(STRCAT(' ',CON2STR(中单3,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(小单3)>=0,0.63,0.45,0,STRCAT(STRCAT(' ',CON2STR(小单3,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(小单3)<0,0.62,0.45,0,STRCAT(STRCAT(' ',CON2STR(小单3,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单5)>=0,0.33,0.65,0,STRCAT(STRCAT(' ',CON2STR(特大单5,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单5)<0,0.32,0.65,0,STRCAT(STRCAT(' ',CON2STR(特大单5,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(大单5)>=0,0.43,0.65,0,STRCAT(STRCAT(' ',CON2STR(大单5,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(大单5)<0,0.42,0.65,0,STRCAT(STRCAT(' ',CON2STR(大单5,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(中单5)>=0,0.53,0.65,0,STRCAT(STRCAT(' ',CON2STR(中单5,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(中单5)<0,0.52,0.65,0,STRCAT(STRCAT(' ',CON2STR(中单5,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(小单5)>=0,0.63,0.65,0,STRCAT(STRCAT(' ',CON2STR(小单5,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(小单5)<0,0.62,0.65,0,STRCAT(STRCAT(' ',CON2STR(小单5,1)),' ')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单10)>=0,0.33,0.85,0,STRCAT(STRCAT(' ',CON2STR(特大单10,1)),' ')),COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(特大单10)<0,0