通達信十大股東市值等數據附圖顯示一目了然

AM:=AMOUNT/100000000;
總額億:AM,VOLSTICK,COLORRED;
流通市值換手:AMOUNT/(FINANCE(40)-C*FINONE(244,0,0))*100,NODRAW,COLORRED;
總股本:=STRCAT(STRCAT('總股本: ',CON2STR(TOTALCAPITAL/1000000,1)),'億股');
流通股:=STRCAT(STRCAT('流通股: ',CON2STR(CAPITAL/1000000,1)),'億股');
總市值:=STRCAT(STRCAT('總市值: ',CON2STR(FINANCE(1)*C/100000000,1)),'億元');
流通市值:=STRCAT(STRCAT('流通市值: ',CON2STR((CAPITAL/1000000)*C,1)),'億元');
DRAWTEXT_FIX(ISLASTBAR,0.00,0.001,0,總股本),COLORC08080;
DRAWTEXT_FIX(ISLASTBAR,0.12,0.001,0,流通股),COLORC08080;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.001,0,總市值),COLORC08080;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.001,0,流通市值),COLORRED;
{分析家公式網http://www.}
倍額:=IF(AM/REF(AM,1)>1.9 AND C>REF(C,1),1,0);
高額:=IF(AM=HHV(AM,20),3,2);
地額:=IF(AM=LLV(AM,20),9,8);
DRAWTEXT(倍額>0,總額億*0.88,'B');
DRAWTEXT(高額>2,總額億*0.68,'G');
DRAWTEXT(地額>8,總額億*1.01,'D');
十大股東:=FINONE(245,0,0),NODRAW;
十大流通:=FINONE(244,0,0),NODRAW;
第一股東:=FINONE(243,0,0),NODRAW;
十大股東市值:=STRCAT(STRCAT('十大股東市值: ',CON2STR(FINONE(245,0,0)*C/100000000,1)),'億元');
DRAWTEXT_FIX(ISLASTBAR,0.50,0.001,0,十大股東市值),COLORRED;
十大流通市值:=STRCAT(STRCAT('十大流通市值: ',CON2STR(FINONE(244,0,0)*C/100000000,1)),'億元');
DRAWTEXT_FIX(ISLASTBAR,0.65,0.001,0,十大流通市值),COLORRED;
第一股東市值:=STRCAT(STRCAT('第一股東市值: ',CON2STR(FINONE(243,0,0)*C/100000000,1)),'億元');
DRAWTEXT_FIX(ISLASTBAR,0.80,0.001,0,第一股東市值),COLORRED;