在新的一年里祝各位发财,感谢论坛老师们的源码自己略加整合。周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;  |