软件名称：[B]新年上拼盘，日周叠加+五日资金动态（主图，源码）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2013-01-02 09:21:38
软件简介:

在新的一年里祝各位发财，感谢论坛老师们的源码自己略加整合。周K线与日K线相比有以下优点：
1、准确性更高。2、看得更长远。3、信号更明确，波段更分明。4、周K线还兼容了部分日K
线的优点，加入五日资金动态可看清主力动向。
 

{建立两个公式}
{001}
C1:CLOSE;
O1:OPEN;
H1:HIGH;
L1:LOW;
VVLA:VOL;
{日周叠加}
ccc1:="001.c1#week"; 
ooo1:="001.o1#week"; 
hhh1:="001.h1#week"; 
lll1:="001.l1#week"; 
vvar1:=if(WEEKDAY=3,hhh1,ccc1); 
vvar2:=if(WEEKDAY=3,lll1,ooo1); 
STICKLINE(ccc1>=ooo1,ooo1,ccc1,10,0),Color613076; 
STICKLINE(ccc1>=ooo1,vvar1,vvar2,4,0),Color613076; 
STICKLINE(ooo1>ccc1,ccc1,ooo1,10,0),ColorFA7D32; 
STICKLINE(ooo1>ccc1,vvar1,vvar2,4,0),ColorFA7D32;
STICKLINE(C>=O,C,O,8,0),COLOR0000BB;
STICKLINE(C>=O,H,L,0,0),COLOR0000BB;
STICKLINE(C<=O,C,O,8,0),COLORFFFF00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;

TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT and (ORDER(1)=0 and ORDER(2)=0);
Ddmr:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100;
Ddmrs:=sum(Ddmr,0);
小单买:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)));
小单卖:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)));
中单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)));
中单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)));
大单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)));
大单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)));
特单买:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3));
特单卖:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3));
主单买:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)),BIGORDER(1,2));
主单卖:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)),BIGORDER(2,2));
主净:(主单买-主单卖)*AMOUNT/10000,COLOR00FFFF,LINETHICK0,PRECIS2;
主增:=(VOL/CAPITAL)*100*(主单买-主单卖);
超净:(特单买-特单卖)*AMOUNT/10000,COLOR00FFFF,LINETHICK0,PRECIS2;
超增:=(VOL/CAPITAL)*100*(特单买-特单卖);
大净:(大单买-大单卖)*AMOUNT/10000,COLOR00FFFF,LINETHICK0,PRECIS2;
大增:=(VOL/CAPITAL)*100*(大单买-大单卖);
中净:(中单买-中单卖)*AMOUNT/10000,COLOR00FFFF,LINETHICK0,PRECIS2;
中增:=(VOL/CAPITAL)*100*(中单买-中单卖);
散净:(小单买-小单卖)*AMOUNT/10000,COLOR00FFFF,LINETHICK0,PRECIS2;
散增:=(VOL/CAPITAL)*100*(小单买-小单卖);
DRAWTEXTABS(0,5,'超赢今日各单动态'),COLOR1199FF;
DRAWTEXTABS(0,20,'主净:'+ NUMTOSTRN(主净,2)+'('+NUMTOSTRN(主增,2)+'%)'),COLOR00FFFF;
DRAWTEXTABS(0,35,'超净:'+ NUMTOSTRN(超净,2)+'('+NUMTOSTRN(超增,2)+'%)'),COLORFF00FF;
DRAWTEXTABS(0,50,'大净:'+ NUMTOSTRN(大净,2)+'('+NUMTOSTRN(大增,2)+'%)'),COLOR00FF00;
DRAWTEXTABS(0,65,'中净:'+ NUMTOSTRN(中净,2)+'('+NUMTOSTRN(中增,2)+'%)'),COLORB5B5B5;
DRAWTEXTABS(0,80,'散净:'+ NUMTOSTRN(散净,2)+'('+NUMTOSTRN(散增,2)+'%)'),COLORFF9911;
最大值:=50/(MAX(散净,中净,大净,超净,主净));
散户净买:=140+ABS(散净*最大值);
中户净买:=140+ABS(中净*最大值);
大户净买:=140+ABS(大净*最大值);
超大净买:=140+ABS(超净*最大值);
主力净买:=140+ABS(主净*最大值);
DRAWRECTABS(140,20,ABS(主力净买),35,(IF((主净 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(140,35,ABS(超大净买),50,(IF((超净 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
{看各单动态需在论坛下载长风老师的DDE数据}
DRAWRECTABS(140,50,ABS(大户净买),65,(IF((大净 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(140,65,ABS(中户净买),80,(IF((中净 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;
DRAWRECTABS(140,80,ABS(散户净买),95,(IF((散净 >= 0),RGB(255,0,0),RGB(0,200,0)))),COLOR000000,LAYER0;

[url=http://www.70822.com/soft/sort013/sort03/down-56748.html]新年上拼盘，日周叠加+五日资金动态（主图，源码）[/url]