主力十日买卖合计(根据杨软老师的原版拼凑的)有创建方法 http://www.55188.com/viewthread. ... amp;fromuid=1595945 REFLINE:-5000,0,5000;zbddx:= "DDx.DDx";{引用正版ddx};TODAY:= zbddx=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);Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT; Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT; Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT; Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT; Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT; Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT; Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT; Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;散户:=(xhb-xhs)/10000; 中户:=(zhb-zhs)/10000; 大户:=(dhb-dhs)/10000; 超户:=(chb-chs)/10000;一日净额:超户+大户,color0036dd; 二日净额:sum(超户+大户,2),COLOR0174fa; 三日净额:sum(超户+大户,3),COLOR1ab9ff; 四日净额:sum(超户+大户,4),COLOR01ddef; 五日净额:sum(超户+大户,5),color1ab731; 六日净额:sum(超户+大户,6),COLOR49e560; 七日净额:sum(超户+大户,7),COLOR9bf149; 八日净额:sum(超户+大户,8),COLOR9bf1bf; 九日净额:sum(超户+大户,9),color0099cc; 十日净额:sum(超户+大户,10),color007799;

千钧持仓 N:=22;jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW); qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))); qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN)))); qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))); qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj))); DRAWTEXTREL(0,0,'主力持仓'),COLORYELLOW; SVZL:sum(((qj1+qj2)-(qj3+qj4))/sum(vol,60),0); CZ:=SVZL-REF(SVZL,1); STICKLINE(CZ<0,SVZL+CZ,SVZL,3,0),COLORFFFF00; STICKLINE(CZ>0,SVZL,SVZL+CZ,3,0),COLORRED; IF CZ<0 THEN DRAWFLAGTEXT(1,SVZL+CZ,'当日主力净卖出占流通盘的'+STR(ABS(CZ))+'%'); ELSE DRAWFLAGTEXT(1,SVZL+CZ,'当日主力净买入占流通盘的'+STR(ABS(CZ))+'%'),COLORRED;

没有大智慧正式账号,想到千均老师的DDX 就用以上两个指标改拼凑的,随便玩玩。 效果请自行验证。
源码如下:
N:=22;jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW); qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))); qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN)))); qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))); qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj))); SVZL:=sum(((qj1+qj2)-(qj3+qj4))/sum(vol,60),0); CZ:=(SVZL-REF(SVZL,1))*CAPITAL;
一日净额:CZ,color0036dd; 二日净额:sum(CZ,2),COLOR0174fa; 三日净额:sum(CZ,3),COLOR1ab9ff; 四日净额:sum(CZ,4),COLOR01ddef; 五日净额:sum(CZ,5),color1ab731; 六日净额:sum(CZ,6),COLOR49e560; 七日净额:sum(CZ,7),COLOR9bf149; 八日净额:sum(CZ,8),COLOR9bf1bf; 九日净额:sum(CZ,9),color0099cc; 十日净额:sum(CZ,10),color007799;
{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |