A:=HHV(HIGH,5); B:=LLV(LOW,5); HH:=BARSLAST(CLOSE>REF(a,1)); LL:=BARSLAST(CLOSE<REF(b,1)); PARTLINE(b,HH<LL),ColorFF00FF,LINETHICK2; PARTLINE(a,HH>LL),Color00FF00,LINETHICK2; {资金} TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判断是否有数据} {TODAY:="ddx.ddx"=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; 超资增仓:=超资; 大资增仓:=大资; 中资增仓:=中资; 散资增仓:=散资; BBD净额:=(超资+大资); DRAWTEXTREL(5,15,'BBD (万):'+NUMTOSTRN(BBD净额,0)),LINETHICK3,Color0080FF; DRAWTEXTREL(5,90,'超资(万):'+NUMTOSTRN(超资增仓,0)),LINETHICK2,COLORYELLOW; DRAWTEXTREL(5,165,'大资(万):'+NUMTOSTRN(大资增仓,0)),LINETHICK2,Color62FFFF; DRAWTEXTREL(5,235,'中资(万):'+NUMTOSTRN(中资增仓,0)),LINETHICK2,ColorACFFFF; DRAWTEXTREL(5,315,'散资(万):'+NUMTOSTRN(散资增仓,0)),LINETHICK2,ColorFFFFFF;
{点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |