官方DDE源码+DDE源码合集(大智慧)

官方DDE源码+DDE源码合集(大智慧)
下面是笔者曾经收集的DDE源码，本人一直就用这个。公式源至网络。
DDX——
INPUT: P1(60,0,100),P2(5,0,100),P3(10,0,100);
REFLINE:0;
VAR0:=MIN(COUNT(ORDER(2),0),P1);
DDX:(BIGORDER(1) - BIGORDER(2)) * VOL/CAPITAL * 100,COLOR3D;
DDX1:EMA((BIGORDER(1) - BIGORDER(2)) * VOL/CAPITAL * 100,VAR0) * VAR0;
DDX2:MA(DDX1,P2);
DDX3:MA(DDX1,P3);
DRAWTEXTABS(0,0,'大单动向');
1,DOTLINE;DDY——
INPUT: P1(60,0,100),P2(5,0,100),P3(10,0,100);
REFLINE:0;
VAR0:=MIN(COUNT(ORDER(2),0),P1);
VAR1:=EMA((2 - BIGORDER(1) - BIGORDER(2)) * VOL/(ORDER(1) + ORDER(2)),60);
DDY:(ORDER(2) - ORDER(1))/CAPITAL * VAR1 * 100,COLOR3D;
DDY1:EMA((ORDER(2) - ORDER(1))/CAPITAL * VAR1 * 100,VAR0) * VAR0;
DDY2:MA(DDY1,P2);
DDY3:MA(DDY1,P3);
DRAWTEXTABS(0,0,'涨跌动因');
1,DOTLINE;DDZ——
REFLINE:0;
VAR0:=BIGORDER(1) * VOL/ORDER(1);
VAR1:=BIGORDER(2) * VOL/ORDER(2);
VAR2:=2 * VOL/(ORDER(1) + ORDER(2));
DDZ:(VAR0 - VAR1)/VAR2 * 100,COLORWHITE;
FLOATRGN((VAR0 - VAR1)/VAR2 * 100,VAR0 - VAR1,VAR0 > VAR1,RGB(255,0,0),VAR0 < VAR1,RGB(0,255,0));
DRAWTEXTABS(0,0,'大单差分');ddx
input:p1(60),p2(5),p3(10);
refline:0;
DDX:(BIGORDER(1)-BIGORDER(2))*VOL/CAPITAL*100,COLORSTICK,linethick2;
DDX1:ema(DDX,p1)*60.177;
DDX2:MA(DDX1,p2);
DDX3:MA(DDX1,p3);
DRAWTEXTABS(0,0,'大单动向');ddz
DDZ:=(ORDER(2)-ORDER(1))/(ORDER(2)+ORDER(1))*200;
DDZ1:=(ORDER(2)-ORDER(1))/(ORDER(2)+ORDER(1))*170;
FILLRGN(DDZ,DDZ1,DDZ>DDZ1,RGB(255,0,0),DDZ<DDZ1,RGB(0,255,0));
DRAWTEXTABS(0,0,'大单分差');