软件名称：[B]机构买卖源码[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：0 Bytes
官方主页：Home Page
更新时间：2010-11-21 15:50:35
软件简介:
input:p1(5);
TODAY:="ddy.ddy"=0;{判断是否有正版数据}
TODAY1:="LXDDY.DDY";{判断是否有理想数据}
TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800; {判断是否当天}
DRAWTEXTABS(0,0,'主力大单');
主买:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3));
主卖:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3));
b1:sum(主买*vol,p1)/sum(vol,p1),colorred;
s1:sum(主卖*vol,p1)/sum(vol,p1),colorgreen;
连续飘红:LAST(b1>s1),PRECIS0,COLOR0000FF,linethick0;
连续飘绿:LAST(s1>b1),PRECIS0,colorgreen,linethick0;
十日飘红:COUNT(b1>s1,10),PRECIS0,COLOR33CCFF,linethick0;
十日飘绿:COUNT(s1>b1,10),PRECIS0,COLOR33CCFF,linethick0;
DRAWFLAGTEXT(B1>0,0,'<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+' B1 '+NUMTOSTRN(b1,3)+'\n'+'<*t=E7FFFF*><*c=0000FF*><*p=95*>'+'连续飘红'+ NUMTOSTRN(连续飘红,0)+ '天'+'<*t=E7FFFF*><*c=BB00FF*><*p=95*>'+ '十日飘红' +NUMTOSTRN(十日飘红,0)+'天');
DRAWTEXTREL(600,900,'证券代码: '+STKLABEL+' 证券名称: '+STKNAME+''),ColorFFAA00;
TODAY:="ddy.ddy"=0;{判断是否有正版数据}
TODAY1:="LXDDY.DDY";{判断是否有理想数据}
TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800; {判断是否当天}
DRAWTEXTABS(0,0,'主力大单');
主买:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3));
主卖:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3));
b1:sum(主买*vol,p1)/sum(vol,p1),colorred;
s1:sum(主卖*vol,p1)/sum(vol,p1),colorgreen;
连续飘红:LAST(b1>s1),PRECIS0,COLOR0000FF,linethick0;
连续飘绿:LAST(s1>b1),PRECIS0,colorgreen,linethick0;
十日飘红:COUNT(b1>s1,10),PRECIS0,COLOR33CCFF,linethick0;
十日飘绿:COUNT(s1>b1,10),PRECIS0,COLOR33CCFF,linethick0;
DRAWFLAGTEXT(B1>0,0,'<*t=0092F7*><*c=FFFFFF*><*p=95*>'+datestr(date)+' B1 '+NUMTOSTRN(b1,3)+'\n'+'<*t=E7FFFF*><*c=0000FF*><*p=95*>'+'连续飘红'+ NUMTOSTRN(连续飘红,0)+ '天'+'<*t=E7FFFF*><*c=BB00FF*><*p=95*>'+ '十日飘红' +NUMTOSTRN(十日飘红,0)+'天');
DRAWTEXTREL(600,900,'证券代码: '+STKLABEL+' 证券名称: '+STKNAME+''),ColorFFAA00;
[url=http://www.70822.com/soft/sort013/sort02/down-27345.html]机构买卖源码[/url]