源码:
FJ:=WEEKOFYEAR!=REF(WEEKOFYEAR,1);
融资余额:=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));融券上周净买:=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;