飞狐DDZ副图指标

源码

AA:=SUM(IF(CLOSE>REF(CLOSE,1) AND VOL>REF(VOL,1),VOL,VOL/2),2);
BB:=SUM(IF(CLOSE<REF(CLOSE,1) AND VOL<REF(VOL,1),VOL,VOL/2),2);
DDZ:(AA-BB)/(BB+AA)*200,COLORSTICK,LINETHICK0;
DDZ1:(BB-AA)/(BB+AA)*170,colorFF00FF;
FILLRGN(DDZ>0,0,DDZ),colorFF;
FILLRGN(DDZ<0,0,DDZ),colorFF00;
VARIABLE:WDAY[7]='星期六';
WDAY[1]:='星期日';
WDAY[2]:='星期一';
WDAY[3]:='星期二';
WDAY[4]:='星期三';
WDAY[5]:='星期四';
WDAY[6]:='星期五';
FY:=YEAR;
FM:=MONTH;
FD:=DAY;
WD:=WEEKDAY;
P:=SYSPARAM(1);
STR1:=''+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1];
DRAWTEXTEX(CLOSE>0,1,650,0,STR1),colorFFAF;
DRAWTEXTEX(CLOSE>0,1,280,0,STKLABEL+' '+STKNAME+''),colorFFAF;
DRAWTEXTEX(CLOSE>0,1,10,0,'大单分差='+NUMTOSTR(DDZ,2)+' %'),colorFFFF8;