飞狐:千钧DDE系统公式源码

【千钧DDE系统】公式源码:

{千钧DDX}

input:p1(60),p2(5),p3(10);

DRAWGBK(C>0,COLORRGB(100,120,180),0,1);

varl1:=(EXTDATA(9)+EXTDATA(10)+EXTDATA(11))/CAPITAL100;

varl2:=(EXTDATA(6)+EXTDATA(7))/SUM(VOL,120);

DDX:IF(C>1000,varl2,varl1),PRECISION3,COLORSTICK,LINETHICK4;

DDX1:(ema(DDX,p1)60.177)/5;

DDX2:(MA(DDX1,p2));

DDX3:(MA(DDX1,p3));

{显示时间}

variable:day[7]='星期六';

day[1]:='星期日';

day[2]:='星期一';

day[3]:='星期二';

day[4]:='星期三';

day[5]:='星期四';

day[6]:='星期五';

fy:=年份;

fm:=月份;

fd:=日期;

d:=星期;

p:=系统参数(1);

str1:=''+numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'+数字转化为字符串(fd[p],0)+'日 '+day[d[p]+1];

DRAWTEXT(BARPOS=DATACOUNT-103,0,str1),ALIGN4,PXDN0,Color00FFaF;

DRAWTEXT(BARPOS=DATACOUNT-128,0,STKLABEL+' '+STKNAME+''),ALIGN4,PXDN0,Color00FFaF;

DRAWTEXTEX(c,1,10,150,'大单动向='+NUMTOSTR(DDX,2)+''),ColorFFFF8;

 

 

{千钧ddy}

DRAWGBK(C>0,COLORRGB(100,120,180),0,1);

input:p1(60),p2(5),p3(10);

大单量差:=EXTDATA(9)+EXTDATA(10)+EXTDATA(11);

DDy:大单量差/CAPITAL100,COLORSTICK,lihick4;

买:(ema(DDy,p1)60.177)/10,Color0000FF,lihick1;

加仓:MA(DDy,p2),Color00FFFF,lihick1;

卖:MA(DDy,p3),Color00FF00,lihick1;

DRAWTEXTEX(c>0,1,10,0,'涨跌动因='+NUMTOSTR(DDy,2)),ColorFFFF8,LINETHICK3;

 

 

 

{千钧DDZ}

DRAWGBK(C>0,COLORRGB(100,120,180),0,1);

大单量差:=EXTDATA(9)+EXTDATA(10)+EXTDATA(11);

大单净值:=大单量差100c;

DDZ:((大单净值c)/CAPITAL200)/1000;

DDZ1:(大单量差c)/CAPITAL170;

FILLRGN(DDZ>DDZ1,DDZ10,DDZ1),Color0000FF;

FILLRGN(DDZ<DDZ1,DDZ,DDZ110),Color00FF00;

DRAWTEXTEX(c>0,1,10,0,'大单分差='+NUMTOSTR(DDZ,2)+' %'),ColorFFFF8;