抢新鲜啦！！大智慧分时DDX,分时大单、分时小单！自修改扣除停牌DDX排序！

分时DDX
input:p1(60),p2(5),p3(10);
variable:ddx=0;
DDX:(ordervol(1,2)-ordervol(2,2))/capital*100,colorstICK,LINETHICK2;
DDX累积:SUM(ddx,0);

接下来的都是我自己写的有什么不足的地方大家多多建议，我尽量修改
分时大单0,COLORGRAY;
中单:(ORDERNUM( 1, 1)-ORDERNUM( 2, 1))*VOL/CAPITAL*1000,LINETHICK0;
STICKLINE(中单<0 ,中单,0 ,2 ,0 ),ColorE82E90,LINETHICK2;
STICKLINE(中单>0 ,中单,0 ,2 ,0 ),ColorBLUE,LINETHICK2;
大单:(ORDERNUM( 1, 2)-ORDERNUM( 2, 2))*VOL/CAPITAL*1000,LINETHICK0;
STICKLINE(大单<0 ,大单,0 ,2 ,0 ),ColorFFFFFF,LINETHICK2;
STICKLINE(大单>0 ,大单,0 ,2 ,0 ),ColorFF00FF,LINETHICK2;
特大单:(ORDERNUM( 1, 3)-ORDERNUM( 2, 3))*VOL/CAPITAL*1000,LINETHICK0;
STICKLINE(特大单<0 ,特大单,0 ,2 ,0 ),ColorGREEN,LINETHICK2;
STICKLINE(特大单>0 ,特大单,0 ,2 ,0 ),ColorRED,LINETHICK2;
DDX累积:SUM(中单+特大单+大单,0);

分时小单
0,COLORGRAY;
DDX:=(ORDERNUM( 1, 0)-ORDERNUM( 2, 0))*VOL/CAPITAL*100;
DDX1:=(ORDERNUM( 1, 1)-ORDERNUM( 2, 1))*VOL/CAPITAL*100;
DDX2:=(ORDERNUM( 1, 2)-ORDERNUM( 2, 2))*VOL/CAPITAL*100;
DDX3:=(ORDERNUM( 1, 3)-ORDERNUM( 2, 3))*VOL/CAPITAL*100;
DDX4:DDX-DDX1-DDX2-DDX3,LINETHICK0;
STICKLINE(DDX4<0 ,DDX4 ,0 ,2 ,0 ),COLORGREEN,LINETHICK2;
STICKLINE(DDX4>0 ,DDX4 ,0 ,2 ,0 ),COLORRED,LINETHICK2;
DDX累积:SUM(DDX4,0);

扣除排序（包括DDX\DDY\DDZ\飘红）
停牌:=(DYNAINFO(8)=0);
DDX:IF(停牌=0 AND "DDX.DDX","DDX.DDX",0);
昨日DDX:REF(DDX,1);
DDY:IF(停牌=0 AND "DDY.DDY","DDY.DDY",0);
DDZ:IF(停牌=0 AND "DDZ.DDZ","DDZ.DDZ",0);
N日飘红天数:count("ddx.ddx">0,10),PRECIS0;
连续飘红天数:last("ddx.ddx">0),PRECIS0;;

[ 本帖最后由 af8889 于 2008-6-19 21:31 编辑 ]