  
等级: 新手上路 
- 注册: 
 - 2022-7-7
 
- 曾用名: 
 
 
 
 | 
 
 本帖最后由 技术006 于 2022-7-7 21:12 编辑  
 
能否编写一个股票基本面的副图,我有通达信的,请改写一下 
通达信的代码如下: 
流通市值:=STRCAT(STRCAT('【流通市值】',CON2STR((CAPITAL/1000000)*C,2)),'亿元'); 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.00,0,流通市值),COLORMAGENTA; 
流通盘:=STRCAT(STRCAT('【流通盘】',CON2STR(CAPITAL/1000000,2)),'亿'); 
DRAWTEXT_FIX(ISLASTBAR,0.15,0.00,0,流通盘),COLORD4FF7F; 
总股本:=STRCAT(STRCAT('【总股本】',CON2STR(TOTALCAPITAL/1000000,2)),'亿'); 
DRAWTEXT_FIX(ISLASTBAR,0.30,0.00,0,总股本),COLORFFBF00; 
地域:=STRCAT('【地域】',DYBLOCK); 
DRAWTEXT_FIX(ISLASTBAR,0.45,0.00,0,地域),COLORWHITE; 
行业:=STRCAT('【行业】',HYBLOCK); 
DRAWTEXT_FIX(ISLASTBAR,0.56,0.00,0,行业),COLOR00AA00; 
概念:=STRCAT('【概念】',GNBLOCK); 
DRAWTEXT_FIX(ISLASTBAR,0.68,0.00,0,概念),COLOR0099FF; 
 
 
 
净资产收益率:=STRCAT('【净资产收益率★高好】',CON2STR(FINANCE(30)/FINANCE(19)*100,2));{ROE即净资产收益率 越高越好}{好股票WWW.GOODGUPIAO.COM} 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.25,0,净资产收益率),COLORYELLOW; 
股息率:=STRCAT('【股息率】',CON2STR(FINANCE(45),2));{这样算法对吗} 
DRAWTEXT_FIX(ISLASTBAR,0.15,0.25,0,股息率),COLORCYAN; 
市净率:=STRCAT('【市净率PB★低好】',CON2STR(C/FINANCE(34),2));{PB即市净率、越低越好} 
DRAWTEXT_FIX(ISLASTBAR,0.30,0.25,0,市净率),COLORFF00FF; 
市盈率:=STRCAT('【市盈率(动)PE★0-20】',CON2STR(CONST(DYNAINFO(39)),2)); 
DRAWTEXT_FIX(ISLASTBAR,0.45,0.25,0,市盈率),COLORFF00FF; 
每股经营现金流:=STRCAT('【每股经营现金流】',CON2STR(FINANCE(25)/FINANCE(1),2)); 
DRAWTEXT_FIX(ISLASTBAR,0.60,0.25,0,每股经营现金流),COLORWHITE; 
商誉:=FINVALUE(35)/10000; 
DRAWTEXT_FIX(ISLASTBAR,0.75,0.25,0,STRCAT('商 誉 (万元) : ',CON2STR(商誉,2))),COLORYELLOW;  
商誉占净资比:=STRCAT('【商誉占净资比%】',CON2STR(FINVALUE(35)/FINVALUE(72)*100,2)); 
DRAWTEXT_FIX(ISLASTBAR,0.87,0.25,0,商誉占净资比),COLORWHITE; 
 
 
 
流动比率:=STRCAT('【流动比率★1.5-2.5】',CON2STR(FINANCE(11)/FINANCE(15),2)); 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.50,0,流动比率),COLORCYAN; 
毛利率:=STRCAT('【毛利率】',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)); 
DRAWTEXT_FIX(ISLASTBAR,0.15,0.50,0,毛利率),LINETHICK3,COLORRED; 
 
净利润率:=STRCAT('【净利润率】 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2)); 
DRAWTEXT_FIX(ISLASTBAR,0.30,0.50,0,净利润率),LINETHICK3,COLORRED; 
 
每股净资产:=STRCAT('【每股净资产】',CON2STR(FINANCE(34),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.45,0.50,0,每股净资产),COLORRED; 
 
净资产增长率:=STRCAT('【净资产增长率】',CON2STR(FINVALUE(185),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.60,0.50,0,净资产增长率),COLORRED; 
 
资产负债率:=STRCAT('【资产负债率】',CON2STR(FINANCE(9),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.75,0.50,0,资产负债率),COLORYELLOW; 
 
流通总股比:=STRCAT('【流通总股比】',CON2STR(CAPITAL/TOTALCAPITAL,3)); 
DRAWTEXT_FIX(ISLASTBAR,0.87,0.50,0,流通总股比),COLORWHITE; 
 
 
 
社保家数:=STRCAT('【社保家数】',CON2STR(FINVALUE(256),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.75,0,社保家数),COLORRED; 
 
QFII家数:=STRCAT('【QFII家数】',CON2STR(FINVALUE(248),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.15,0.75,0,QFII家数),COLORMAGENTA; 
 
公募家数:=STRCAT('【公募家数】',CON2STR(FINVALUE(254),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.30,0.75,0,公募家数),COLORYELLOW; 
 
年金家数:=STRCAT('【年金家数】',CON2STR(FINVALUE(262),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.45,0.75,0,年金家数),COLORGREEN; 
 
私募家数:=STRCAT('【私募家数】',CON2STR(FINVALUE(258),3)); 
DRAWTEXT_FIX(ISLASTBAR,0.60,0.75,0,私募家数),COLORWHITE; 
 
 
ZGB:=FINVALUE(238);      {总股本} 
LTG:=FINVALUE(239);      {流通A股} 
 
机构总数:=STRCAT('【机构总数】',CON2STR(FINVALUE(246),3));      {机构总家数} 
DRAWTEXT_FIX(ISLASTBAR,0.75,0.75,0,机构总数),COLORYELLOW; 
 
机构占比:=STRCAT('【机构占比】',CON2STR(FINVALUE(247)/FINVALUE(238),3));      {机构持股总量} 
DRAWTEXT_FIX(ISLASTBAR,0.87,0.75,0,机构占比),COLORWHITE; 
 
 
 |   
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?  
 
 
 
x
 
 
 
 
 |