分时指标-各路资金
这个分时指标，在众多分时指标中，比较直观易懂。。希望大家喜欢{动态分时-(分时各户资金)}
N:=5;
ZLLR:=AMOUNT*(DYNAINFO(95)+DYNAINFO(94))/10000;
ZLLC:=AMOUNT*(DYNAINFO(98)+DYNAINFO(97))/10000;
主净:SUM(ZLLR-ZLLC,0),COLOR00FFFF,LINETHICK0,PRECIS2;
主现:=SUM(ZLLR-ZLLC,N);{N分钟}
TDLR:=AMOUNT*DYNAINFO(95)/10000;
TDLC:=AMOUNT*DYNAINFO(98)/10000;
超净:SUM(TDLR-TDLC,0),COLORFF00FF,LINETHICK0,PRECIS2;
超现:=SUM(TDLR-TDLC,N);{N分钟}
DDLR:=AMOUNT*DYNAINFO(94)/10000;
DDLC:=AMOUNT*DYNAINFO(97)/10000;
大净:SUM(DDLR-DDLC,0),COLOR00FF00,LINETHICK0,PRECIS2;
大现:=SUM(DDLR-DDLC,N);{N分钟}
ZDLR:=AMOUNT*DYNAINFO(93)/10000;
ZDLC:=AMOUNT*DYNAINFO(96)/10000;
中净:SUM(ZDLR-ZDLC,0),COLORB8B8B8,LINETHICK0,PRECIS2;
中现:=SUM(ZDLR-ZDLC,N);{N分钟}
XDLR:=(AMOUNT-AMOUNT*(DYNAINFO(95)+DYNAINFO(94)+DYNAINFO(93)))/10000;
XDLC:=(AMOUNT-AMOUNT*(DYNAINFO(98)+DYNAINFO(97)+DYNAINFO(96)))/10000;
散净:SUM(XDLR-XDLC,0),COLORFF9911,LINETHICK0;
散现:=SUM(XDLR-XDLC,N);{N分钟}
主力买:=(ORDERVOL(1,2)/CAPITAL)*100;
主力卖:=(ORDERVOL(2,2)/CAPITAL)*100;
主力净买:=sum((主力买-主力卖),0);
超大买:=(ORDERVOL(1,3)/CAPITAL)*100;
超大卖:=(ORDERVOL(2,3)/CAPITAL)*100;
超大净买:=sum((超大买-超大卖),0);
大户买:=((ORDERVOL(1,2)-ORDERVOL(1,3))/CAPITAL)*100;
大户卖:=((ORDERVOL(2,2)-ORDERVOL(2,3))/CAPITAL)*100;
大户净买:=sum((大户买-大户卖),0);
中户买:=(ORDERVOL(1,1)/CAPITAL-ORDERVOL(2,1)/CAPITAL)*100;
中户卖:=(ORDERVOL(1,2)/CAPITAL-ORDERVOL(2,2)/CAPITAL)*100;
中户净买:=sum((中户买-中户卖),0);
散户买:=(1-ORDERVOL(1,1)/CAPITAL)*100;
散户卖:=(1-ORDERVOL(2,1)/CAPITAL)*100;
散户净买:=sum((散户买-散户卖),0);
主力: 主力净买,COLOR3D;
主力,COLOR00FFFF,LINETHICK2;
STR1:=''+'(主力)'+NUMTOSTRN(主净,2)+' (主现)' + NUMTOSTRN(主现,2)+'\n';
DRAWTEXT(BARSTATUS,主力,STR1),COLOR00FFFF;
超大: 超大净买,COLORFF00FF,LINETHICK2;
STR1:=''+'(超大)'+NUMTOSTRN(超净,2)+' (超现)' + NUMTOSTRN(超现,2)+'\n';
DRAWTEXT(BARSTATUS,超大,STR1),COLORFF00FF;
大户: 大户净买,COLOR00FF00,LINETHICK2;
STR1:=''+'(大户)'+NUMTOSTRN(大净,2)+' (大现)' + NUMTOSTRN(大现,2)+'\n';
DRAWTEXT(BARSTATUS,大户,STR1),COLOR00FF00;
中户:中户净买,COLORB5B5B5,LINETHICK2;
STR1:=''+'(中户)'+NUMTOSTRN(中净,2)+' (中现)' + NUMTOSTRN(中现,2)+'\n';
DRAWTEXT(BARSTATUS,中户,STR1),COLORB5B5B5;
散户: 散户净买,COLORFF9911,LINETHICK2;
STR1:=''+'(散户)'+NUMTOSTRN(散净,2)+' (散现)' + NUMTOSTRN(散现,2)+'\n';
 {点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
