融资余额、融券余量通达信副图指标 数据信息显示 源码附图

融资余额、融券余量通达信副图指标 数据信息显示 源码附图

源码:


FJ:=WEEKOFYEAR!=REF(WEEKOFYEAR,1);
D:=BARSLAST(FJ);
融资余额:=INTPART(GPJYVALUE(3,1,1));
融资净买:=INTPART((融资余额-REF(融资余额,1)));
融资本周净买:=INTPART(SUM(融资净买,D+1));
融资上周净买:=REF(SUM(融资净买,D+1),D+1);
融资余额增减:=(融资余额-REF(融资余额,2))/REF(融资余额,2)*100;
融资:=VARCAT(VARCAT(VARCAT('融资余额(万元): ',VAR2STR(融资余额,0)),VARCAT(VARCAT('  环比: ',CON2STR(融资余额增减,2)),'%')),
VARCAT(VARCAT(' 融资本周(万元): ',VAR2STR(融资本周净买,0)),VARCAT('  融资上周(万元): ',VAR2STR(融资上周净买,0))));
融券余量:=GPJYVALUE(3,2,1)/10000;
融券净买:=(融券余量-REF(融券余量,1));
融券本周净买:=SUM(融券净买,D+1);
融券上周净买:=REF(SUM(融券净买,D+1),D+1);
融券余量增减:=(融券余量-REF(融券余量,2))/REF(融券余量,2)*100;
融券:=STRCAT(STRCAT(VARCAT('&& 融券余量(万手): ',VAR2STR(融券余量,2)),VARCAT(VARCAT('  环比: ',CON2STR(融券余量增减,2)),'%')),
STRCAT(VARCAT(' 融券本周(万手): ',VAR2STR(融券本周净买,2)),VARCAT('  融券上周(万手): ',VAR2STR(融券上周净买,2))));
外资净买:=INTPART(GPJYVALUE(6,1,1)/100);
外资净买增减:=(外资净买-REF(外资净买,2))/REF(外资净买,2)*100;
本周净买:=SUM(外资净买-REF(外资净买,1),D+1);
上周净买:=INTPART(REF(SUM(外资净买-REF(外资净买,1),D+1),D+1));
外资:=STRCAT(STRCAT(VARCAT('&&外资持股(手): ',VAR2STR(外资净买,0)),VARCAT(VARCAT('  环比: ',CON2STR(外资净买增减,2)),'%')),
STRCAT(VARCAT('  本周(手): ',VAR2STR(本周净买,0)),VARCAT('  上周(手): ',VAR2STR(上周净买,0))));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.25,0.21,0,STRCAT(融资,STRCAT(融券,外资))),COLORCYAN;



发表评论 取消回复

电子邮件地址不会被公开。 必填项已用*标注

有些内容是需要登录本网站才可以查看的,若是需要登录的话,欢迎加站长微信“laogong0311”,站长免费帮大家注册账号!

遇到问题?请给我们留言

请填写您的电话号码,我们将回复您电话