f11密集版第二次修正
作者:天量见天价,地量见地价发布时间:2019年11月26日{最左列第一列}
人均产值:=STRCAT(STRCAT('人均产值: ',CON2STR(FINANCE(30)/FINANCE(56)/10000,2)),' 万');
DRAWTEXT_FIX(ISLASTBAR,0.15,0.00,0,人均产值),COLOR008CFF;
员工人数:=STRCAT(STRCAT('员工人数: ',CON2STR((FINANCE(56)/10000),4)),' 万人');
DRAWTEXT_FIX(ISLASTBAR,0.15,0.03,0,员工人数),COLORFF80FF;
总市值:=STRCAT(STRCAT('总市值: ',CON2STR((FINANCE(1)/100000000)*C,0)),' 亿');
DRAWTEXT_FIX(ISLASTBAR,0.15,0.06,0,总市值),COLORFF80FF;
流通市值:=STRCAT(STRCAT('流通市值: ',CON2STR((CAPITAL/1000000)*C,1)),' 亿');
利润回本:=STRCAT(STRCAT('利润回本: ',CON2STR((FINANCE(1)*C)/FINANCE(30),2)),' 年');
DRAWTEXT_FIX(ISLASTBAR,0.15,0.15,0,利润回本),COLORLIRED;
负债率:=STRCAT(STRCAT('负债率: ',CON2STR((FINANCE(9)),2)),' %');
DRAWTEXT_FIX(ISLASTBAR,0.15,0.18,0,负债率),COLORLIGREEN;
{低于40%比较合适,超过60%较大风险,负债越高风险越大,与行业,举债营业}
DRAWTEXT_FIX(ISLASTBAR,0.15,0.09,0,流通市值),COLORFF80FF;
DRAWTEXT_FIX(ISLASTBAR ,0.01,0,0,STKNAME),COLORYELLOW;{名字}
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.03,0,CODE),COLORFA7BFD;{代码}
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.06,0,HYBLOCK),COLORWHITE;{所属行业}
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.09,0,DYBLOCK),COLORWHITE;{所属地区}
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.12,0, STRCAT(STRCAT( GNBLOCK, FGBLOCK),ZSBLOCKNUM )),COLORWHITE;
行业番倍:=STRCAT(STRCAT('行业番倍: ',CON2STR(HYSYL*3,1)),' 年');
DRAWTEXT_FIX(ISLASTBAR,0.01,0.15,0,行业番倍),COLORLIRED,;
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND FROMOPEN<128,0.01,0.18,0,INTPART((34200+FROMOPEN*60)/3600));
{上午的时间小时0.1代表左右相对位置,0.18距上面的距离}
DRAWTEXT_FIX(1,0.04,0.18,1,'时'),COLORRED;
{字:时”的位置}
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND FROMOPEN<120,0.05,0.18,0,60*(((34200+FROMOPEN*60)/3600)-INTPART((34200+FROMOPEN*60)/3600)));
{上午的时间分种}
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND FROMOPEN>120,0.05,0.18,0,60*(((34200+FROMOPEN*60+5400)/3600)-INTPART((34200+FROMOPEN*60+5400)/3600)));
DRAWTEXT_FIX(1,0.07,0.18,1,'分'),COLORRED;
{下午的分钟}
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND FROMOPEN>128,0.01,0.18,0,INTPART((34200+FROMOPEN*60+5400)/3600));
{下午的小时,开盘大于120,}
N0:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y:=STRCAT(CON2STR(MONTH,0),' 月 ');
R:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ:=STRCAT(STRCAT(N0,Y), R);
DRAWTEXT_FIX(C>0,0.01,0.21,0,SJ);
星期:=STRCAT(STRCAT('星期: ',CON2STR(WEEKDAY,0)),' ');
DRAWTEXT_FIX(ISLASTBAR,0.01,0.24,0,星期),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR ,0.01,0.27,0,HYZSCODE),COLORWHITE;{板块代码}
开市:=STRCAT(STRCAT('开市: ',CON2STR(FINANCE(42)/365,1)),' 年');
DRAWTEXT_FIX(ISLASTBAR,0.01,0.3,0,开市),COLOR0080FF;
{第二列}
年净利润:=STRCAT(STRCAT('去年净利润: ',CON2STR(FINANCE(30)/10000,0)),' 万');
DRAWTEXT_FIX(ISLASTBAR,0.4,0,0,年净利润),COLORDBDBDB;
营业收入:=STRCAT(STRCAT('营业收入: ',CON2STR(FINANCE(20)/100000000,1)),' 亿');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.03,0,营业收入),COLOR06FFF2;
毛率润:=STRCAT(STRCAT('毛率润: ',CON2STR(FINANCE(21)/FINANCE(20)*100,1)),' %');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.06,0,毛率润),COLOR06FFF2;
今日现价:=STRCAT(STRCAT('今日现价: ',CON2STR(DYNAINFO(7),2)),' 元');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.09,0,今日现价),COLOR008CFF;
人均持仓:=STRCAT(STRCAT('人均持仓: ',CON2STR(FINANCE(1)/FINANCE(8)*C/10000,2)),' 万元');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.18,0,人均持仓),COLORFF00FF;
股净资产:=STRCAT(STRCAT('股净资产: ',CON2STR(FINANCE(19)/FINANCE(1),2)),' 元');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.21,0,股净资产),COLORWHITE;
上年净利润:=STRCAT(STRCAT('上年净利润: ',CON2STR(FINANCE(30)/100000000,2)),' 亿');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.24,0,上年净利润),COLORLIMAGENTA;
期望收益:=STRCAT(STRCAT('期望收益: ',CON2STR(FINANCE(33)/0.07-C,1)),' 元 ');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.27,0,期望收益),COLOR06FFF2;
DGSZ:=STRCAT(STRCAT('低估市值: ',CON2STR((FINANCE(19)-FINANCE(1)*C)/100000000,0)),' 亿 ');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.30,0,DGSZ),COLOR06FFF2;
低估百分:=STRCAT(STRCAT('低估百分: ',CON2STR((FINANCE(34)-DYNAINFO(7))/DYNAINFO(7)*100,1)),' % ');
DRAWTEXT_FIX(ISLASTBAR,0.4,0.33,0,低估百分),COLOR06FFF2;
{第四列}
股东户数:=STRCAT(STRCAT('股东户数: ',CON2STR((FINANCE(8)/10000),4)),' 万人');
DRAWTEXT_FIX(ISLASTBAR,0.80,0,0,股东户数),COLORFF80FF;
主动买入:=STRCAT(STRCAT('利润同比: ',CON2STR(FINANCE(43),2)),' %');
DRAWTEXT_FIX(ISLASTBAR,0.8,0.25,0,主动买入),COLOR0000FF;
主动卖出:=STRCAT(STRCAT('分红利息: ',CON2STR(FINANCE(45),2)),' %');
DRAWTEXT_FIX(ISLASTBAR,0.8,0.5,0,主动卖出),COLOR00FF00;
JZC:=STRCAT(STRCAT('股东净资产: ',CON2STR(FINANCE(19)/100000000,0)),' 亿');
DRAWTEXT_FIX(ISLASTBAR,0.8,0.75,0,JZC),COLOR06FFF2;
静态收益:=STRCAT(STRCAT('静态收益: ',CON2STR(1/DYNAINFO(39)*100,2)),' %');
DRAWTEXT_FIX(ISLASTBAR,0.8,0.625,0,静态收益),COLOR022DF4;
股东权益:=STRCAT(STRCAT('股东权益: ',CON2STR(((FINANCE(19))/(FINANCE(10)))*100,0)),' %超70优');
DRAWTEXT_FIX(ISLASTBAR,0.8,0.875,0,股东权益),COLOR022DF4;
{第三列}
未分利润:=STRCAT(STRCAT('未分利润: ',CON2STR(FINANCE(31)/100000000,1)),' 亿');
DRAWTEXT_FIX(ISLASTBAR,0.60,0.25,0,未分利润),COLOR06FFF2;
真市盈率:=STRCAT(STRCAT('真市盈率: ',CON2STR(C/(FINANCE(33)/3),2)),' 年');
DRAWTEXT_FIX(ISLASTBAR,0.60,0.375,0,真市盈率),COLOR008080;
每股收益:=STRCAT(STRCAT('每股收益: ',CON2STR(FINANCE(33),2)),' 元');
DRAWTEXT_FIX(ISLASTBAR,0.60,0.5,0,每股收益),COLOR008080;
股东人数:=STRCAT(STRCAT('应该收益: ',CON2STR(C*0.05,2)),' 元');
DRAWTEXT_FIX(ISLASTBAR,0.60,0.625,0,股东人数),COLORFF80FF;
季每股收:=STRCAT(STRCAT('季每股收: ',CON2STR(FINANCE(38),2)),' 元');
DRAWTEXT_FIX(ISLASTBAR,0.6,0.75,0,季每股收),COLORFF80FF;
总股本:=STRCAT(STRCAT('总股本:',CON2STR(FINANCE(1)/100000000,2)),' 亿股');
DRAWTEXT_FIX(ISLASTBAR,0.6,0.875,0,总股本),COLORFF00FF;