大智慧分单指标 用雨杨数据制作源码
{分单差额}
TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and CURRENTTIME>90000 and CURRENTTIME<180000 and BETWEEN(WEEKDAY,1,5);
特大买入:=if(TODAY,"DDEDATA@BIGORDER"(1,3),BIGORDER(1,3));
特大卖出:=if(TODAY,"DDEDATA@BIGORDER"(2,3),BIGORDER(2,3));
特大差:(特大买入-特大卖出)*AMOUNT/10000,LINETHICK0,PRECIS0,Color0000FF;
大单买入:=if(TODAY,"DDEDATA@BIGORDER"(1,2),BIGORDER(1,2))-if(TODAY,"DDEDATA@BIGORDER"(1,3),BIGORDER(1,3));
大单卖出:=if(TODAY,"DDEDATA@BIGORDER"(2,2),BIGORDER(2,2))-if(TODAY,"DDEDATA@BIGORDER"(2,3),BIGORDER(2,3));
大单差:(大单买入-大单卖出)*AMOUNT/10000,LINETHICK0,PRECIS0,ColorFF00FF;
中单买入:=if(TODAY,"DDEDATA@BIGORDER"(1,1),BIGORDER(1,1))-if(TODAY,"DDEDATA@BIGORDER"(1,2),BIGORDER(1,2));
中单卖出:=if(TODAY,"DDEDATA@BIGORDER"(2,1),BIGORDER(2,1))-if(TODAY,"DDEDATA@BIGORDER"(2,2),BIGORDER(2,2));
中单差:(中单买入-中单卖出)*AMOUNT/10000,LINETHICK0,PRECIS0,Color00FFFF;
小单买入:=1-if(TODAY,"DDEDATA@BIGORDER"(1,1),BIGORDER(1,1));
小单卖出:=1-if(TODAY,"DDEDATA@BIGORDER"(2,1),BIGORDER(2,1));
小单差:(小单买入-小单卖出)*AMOUNT/10000,LINETHICK0,PRECIS0,ColorFFFF00;
BBD:特大差+大单差,LINETHICK0,PRECIS0,ColorFFFFFF;
小轴:=0;
中轴:=HHVALL(小单差)+abs(LLVALL(中单差));
大轴:=HHVALL(小单差)+abs(LLVALL(中单差))+HHVALL(中单差)+abs(LLVALL(大单差));
特轴:=HHVALL(小单差)+abs(LLVALL(中单差))+HHVALL(中单差)+abs(LLVALL(大单差))+HHVALL(大单差)+abs(LLVALL(特大差));
BBD轴:=HHVALL(小单差)+abs(LLVALL(中单差))+HHVALL(中单差)+abs(LLVALL(大单差))+HHVALL(大单差)+abs(LLVALL(特大差))+HHVALL(特大差)+abs(LLVALL(BBD));
STICKLINE(小单差>0,小单差,0,6,0),Color0000FF,LAYER0;
STICKLINE(小单差<0,小单差,0,6,0),ColorFFFF00;
STICKLINE(中单差>0,中单差+中轴,中轴,6,0),Color0000FF,LAYER0;
STICKLINE(中单差<0,中单差+中轴,中轴,6,0),ColorFFFF00,LAYER0;
STICKLINE(大单差>0,大单差+大轴,大轴,6,0),Color0000FF,LAYER0;
STICKLINE(大单差<0,大单差+大轴,大轴,6,0),ColorFFFF00,LAYER0;
STICKLINE(特大差>0,特大差+特轴,特轴,6,0),Color0000FF,LAYER0;
STICKLINE(特大差<0,特大差+特轴,特轴,6,0),ColorFFFF00,LAYER0;
STICKLINE(BBD>0,BBD+BBD轴,BBD轴,6,1),Color0000FF,LAYER0;
STICKLINE(BBD<0,BBD+BBD轴,BBD轴,6,1),ColorFFFF00,LAYER0;
DRAWTEXT(DISPSTATUS=1,BBD轴*1.20,' BBD'),Color00FFFF;
DRAWTEXT(DISPSTATUS=1,特轴*1.20,' 特大'),Color0000FF;
DRAWTEXT(DISPSTATUS=1,(特轴+大轴)/2,' 大单'),ColorFF00FF;
DRAWTEXT(DISPSTATUS=1,(中轴+大轴)/2,' 中单'),Color00FFFF;
DRAWTEXT(DISPSTATUS=1,中轴/2,' 小单'),Color00FFFF;
STICKLINE(c,BBD轴,BBD轴,6,0),Color808080;
STICKLINE(c,特轴,特轴,6,0),Color808080;
STICKLINE(c,大轴,大轴,6,0),Color808080;
STICKLINE(c,中轴,中轴,6,0),Color808080;
STICKLINE(c,0,0,6,0),Color808080;
