| 新版通达信公式，老通达信已经不能使用。 公式没加密 {一本万利} AYEAR:=IF(FINANCE(37)=4,YEAR-2,IF(FINANCE(37)!=4,YEAR-1,DRAWNULL)); RCF:=(FINONE(66,同期,0)+FINONE(68,同期,0))/FINONE(238,同期,0); NIIC:=FINONE(131,同期,0)/FINONE(238,同期,0); CASH:=FINONE(133,同期,0)/FINONE(238,同期,0); EPS:=FINONE(308,同期,0)*10000/FINONE(238,同期,0); DEPS:=FINONE(309,同期,0)*10000/FINONE(238,同期,0); DR:=FINANCE(45)*DYNAINFO(38); CFFO:=EPS*DR/100; DYR:=CFFO/C*100; MOIN:=DYR/12*10; 所属地域:=STRCAT('所属地域: ',DYBLOCK); 所属行业:=STRCAT('所属行业: ',HYZSCODE); 所属概念:=STRCAT('所属概念: ',EXTERNSTR(0,1)); 所属风格:=STRCAT('所属风格: ',FGBLOCK); 所属指数:=STRCAT('所属指数: ',ZSBLOCK); 业绩快报:=STRCAT(STRCAT('业绩快报: ',CON2STR(FINVALUE(291),2)),'元'); 留存收益:=STRCAT(STRCAT('留存收益: ',CON2STR(RCF,2)),'元'); 现金净额:=STRCAT(STRCAT('现金净额: ',CON2STR(NIIC,2)),'元'); 现金余额:=STRCAT(STRCAT('现金余额: ',CON2STR(CASH,2)),'元'); 分红率:=STRCAT(STRCAT('分红率: ',CON2STR(DR,2)),'%'); 分红:=STRCAT(STRCAT('分红: ',CON2STR(CFFO,2)),'元'); 股息率:=STRCAT(STRCAT('股息率: ',CON2STR(DYR,2)),'%'); 月息:=STRCAT(STRCAT('月息: ',CON2STR(MOIN,2)),'厘'); DRAWTEXT_FIX(1,0.00,0.00,0,所属地域),COLORMAGENTA; DRAWTEXT_FIX(1,0.00,0.06,0,所属行业),COLORCYAN; DRAWTEXT_FIX(1,0.00,0.12,0,所属概念),COLORGREEN; DRAWTEXT_FIX(1,0.00,0.18,0,所属风格),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.24,0,所属指数),COLORRED; DRAWTEXT_FIX(1,0.23,0.00,0,业绩快报),COLORMAGENTA; DRAWTEXT_FIX(1,0.23,0.06,0,留存收益),COLORCYAN; DRAWTEXT_FIX(1,0.43,0.00,0,现金净额),COLORGREEN; DRAWTEXT_FIX(1,0.43,0.06,0,现金余额),COLORGREEN; DRAWTEXT_FIX(1,0.63,0.00,0,分红率),COLORYELLOW; DRAWTEXT_FIX(1,0.63,0.06,0,分红),COLORYELLOW; DRAWTEXT_FIX(1,0.80,0.00,0,股息率),COLORRED; DRAWTEXT_FIX(1,0.80,0.06,0,月息),COLORRED; E2:=EPS+FINONE(308,同期+1,0)*10000/FINONE(238,同期+1,0);E3:=E2+FINONE(308,同期+2,0)*10000/FINONE(238,同期+2,0); E4:=E3+FINONE(308,同期+3,0)*10000/FINONE(238,同期+3,0);E5:=E4+FINONE(308,同期+4,0)*10000/FINONE(238,同期+4,0); E6:=E5+FINONE(308,同期+5,0)*10000/FINONE(238,同期+5,0);E7:=E6+FINONE(308,同期+6,0)*10000/FINONE(238,同期+6,0); E8:=E7+FINONE(308,同期+7,0)*10000/FINONE(238,同期+7,0);E9:=E8+FINONE(308,同期+8,0)*10000/FINONE(238,同期+8,0); E10:=E9+FINONE(308,同期+9,0)*10000/FINONE(238,同期+9,0);E11:=E10+FINONE(308,同期+10,0)*10000/FINONE(238,同期+10,0); E12:=E11+FINONE(308,同期+11,0)*10000/FINONE(238,同期+11,0);E13:=E12+FINONE(308,同期+12,0)*10000/FINONE(238,同期+12,0); E14:=E13+FINONE(308,同期+13,0)*10000/FINONE(238,同期+13,0);E15:=E14+FINONE(308,同期+14,0)*10000/FINONE(238,同期+14,0); E16:=E15+FINONE(308,同期+15,0)*10000/FINONE(238,同期+15,0);E17:=E16+FINONE(308,同期+16,0)*10000/FINONE(238,同期+16,0); E18:=E17+FINONE(308,同期+17,0)*10000/FINONE(238,同期+17,0);E19:=E18+FINONE(308,同期+18,0)*10000/FINONE(238,同期+18,0); E20:=E19+FINONE(308,同期+19,0)*10000/FINONE(238,同期+19,0);E21:=E20+FINONE(308,同期+20,0)*10000/FINONE(238,同期+20,0); E22:=E21+FINONE(308,同期+21,0)*10000/FINONE(238,同期+21,0);E23:=E22+FINONE(308,同期+22,0)*10000/FINONE(238,同期+22,0); E24:=E23+FINONE(308,同期+23,0)*10000/FINONE(238,同期+23,0);E25:=E24+FINONE(308,同期+24,0)*10000/FINONE(238,同期+24,0); E26:=E25+FINONE(308,同期+25,0)*10000/FINONE(238,同期+25,0);E27:=E26+FINONE(308,同期+26,0)*10000/FINONE(238,同期+26,0); E28:=E27+FINONE(308,同期+27,0)*10000/FINONE(238,同期+27,0);E29:=E28+FINONE(308,同期+28,0)*10000/FINONE(238,同期+28,0); E30:=E29+FINONE(308,同期+29,0)*10000/FINONE(238,同期+29,0);E31:=E30+FINONE(308,同期+30,0)*10000/FINONE(238,同期+30,0); E32:=E31+FINONE(308,同期+31,0)*10000/FINONE(238,同期+31,0);E33:=E32+FINONE(308,同期+32,0)*10000/FINONE(238,同期+32,0); E34:=E33+FINONE(308,同期+33,0)*10000/FINONE(238,同期+33,0);E35:=E34+FINONE(308,同期+34,0)*10000/FINONE(238,同期+34,0); E36:=E35+FINONE(308,同期+35,0)*10000/FINONE(238,同期+35,0);E37:=E36+FINONE(308,同期+36,0)*10000/FINONE(238,同期+36,0); E38:=E37+FINONE(308,同期+37,0)*10000/FINONE(238,同期+37,0);E39:=E38+FINONE(308,同期+38,0)*10000/FINONE(238,同期+38,0); E40:=E39+FINONE(308,同期+39,0)*10000/FINONE(238,同期+39,0); E:=IF(年均=2,E2,IF(年均=3,E3,IF(年均=4,E4,IF(年均=5,E5,IF(年均=6,E6,IF(年均=7,E7,IF(年均=8,E8,IF(年均=9,E9,IF(年均=10,E10,IF(年均=11,E11, IF(年均=12,E12,IF(年均=13,E13,IF(年均=14,E14,IF(年均=15,E15,IF(年均=16,E16,IF(年均=17,E17,IF(年均=18,E18,IF(年均=19,E19,IF(年均=20,E20,IF(年均=21,E21, IF(年均=22,E22,IF(年均=23,E23,IF(年均=24,E24,IF(年均=25,E25,IF(年均=26,E26,IF(年均=27,E27,IF(年均=28,E28,IF(年均=29,E29,IF(年均=30,E30,IF(年均=31,E31, IF(年均=32,E32,IF(年均=33,E33,IF(年均=34,E34,IF(年均=35,E35,IF(年均=36,E36,IF(年均=37,E37,IF(年均=38,E38,IF(年均=39,E39,IF(年均=40,E40,DRAWNULL))))))))))))))))))))))))))))))))))))))); EPSAR:=E/年均; BUS:=FINONE(35,同期,0)/FINONE(238,同期,0); OCF:=FINONE(307,同期,0)/FINONE(238,同期,0); ROS:=FINONE(202,同期,0)/FINONE(202,(复合+同期),0); ROSCAGR:=IF(FINONE(202,同期,0)!=0,(POW(ROS,(1/复合))-1)*100,DRAWNULL); EP:=EPS/C*100; ROP:=FINONE(199,同期,0)/FINONE(199,(复合+同期),0); ROPCAGR:=IF(FINONE(199,同期,0)!=0,(POW(ROP,(1/复合))-1)*100,DRAWNULL); EGR:=FINONE(276,同期,0)/FINONE(276,(复合+同期),0); ECAGR:=(POW(EGR,(1/复合))-1)*100; MGR:=FINONE(283,同期,0)/FINONE(283,(复合+同期),0); MCAGR:=(POW(MGR,(1/复合))-1)*100; BGR:=FINONE(4,同期,0)/FINONE(4,(复合+同期),0); BCAGR:=(POW(BGR,(1/复合))-1)*100; ROE:=FINONE(6,同期,0)+FINONE(6,(AYEAR-同期),1231)-FINONE(6,(同期+1),0);R2:=ROE+(FINONE(6,(同期+1),0)+FINONE(6,(AYEAR-同期-1),1231)-FINONE(6,(同期+2),0)); R3:=R2+FINONE(6,(同期+2),0)+FINONE(6,(AYEAR-同期-2),1231)-FINONE(6,(同期+3),0);R4:=R3+FINONE(6,(同期+3),0)+FINONE(6,(AYEAR-同期-3),1231)-FINONE(6,(同期+4),0); R5:=R4+FINONE(6,(同期+4),0)+FINONE(6,(AYEAR-同期-4),1231)-FINONE(6,(同期+5),0);R6:=R5+FINONE(6,(同期+5),0)+FINONE(6,(AYEAR-同期-5),1231)-FINONE(6,(同期+6),0); R7:=R6+FINONE(6,(同期+6),0)+FINONE(6,(AYEAR-同期-6),1231)-FINONE(6,(同期+7),0);R8:=R7+FINONE(6,(同期+7),0)+FINONE(6,(AYEAR-同期-7),1231)-FINONE(6,(同期+8),0); R9:=R8+FINONE(6,(同期+8),0)+FINONE(6,(AYEAR-同期-8),1231)-FINONE(6,(同期+9),0);R10:=R9+FINONE(6,(同期+9),0)+FINONE(6,(AYEAR-同期-9),1231)-FINONE(6,(同期+10),0); R11:=R10+FINONE(6,(同期+10),0)+FINONE(6,(AYEAR-同期-10),1231)-FINONE(6,(同期+11),0);R12:=R11+FINONE(6,(同期+11),0)+FINONE(6,(AYEAR-同期-11),1231)-FINONE(6,(同期+12),0); R13:=R12+FINONE(6,(同期+12),0)+FINONE(6,(AYEAR-同期-12),1231)-FINONE(6,(同期+13),0);R14:=R13+FINONE(6,(同期+13),0)+FINONE(6,(AYEAR-同期-13),1231)-FINONE(6,(同期+14),0); R15:=R14+FINONE(6,(同期+14),0)+FINONE(6,(AYEAR-同期-14),1231)-FINONE(6,(同期+15),0);R16:=R15+FINONE(6,(同期+15),0)+FINONE(6,(AYEAR-同期-15),1231)-FINONE(6,(同期+16),0); R17:=R16+FINONE(6,(同期+16),0)+FINONE(6,(AYEAR-同期-16),1231)-FINONE(6,(同期+17),0);R18:=R17+FINONE(6,(同期+17),0)+FINONE(6,(AYEAR-同期-17),1231)-FINONE(6,(同期+18),0); R19:=R18+FINONE(6,(同期+18),0)+FINONE(6,(AYEAR-同期-18),1231)-FINONE(6,(同期+19),0);R20:=R19+FINONE(6,(同期+19),0)+FINONE(6,(AYEAR-同期-19),1231)-FINONE(6,(同期+20),0); R21:=R20+FINONE(6,(同期+20),0)+FINONE(6,(AYEAR-同期-20),1231)-FINONE(6,(同期+21),0);R22:=R21+FINONE(6,(同期+21),0)+FINONE(6,(AYEAR-同期-21),1231)-FINONE(6,(同期+22),0); R23:=R22+FINONE(6,(同期+22),0)+FINONE(6,(AYEAR-同期-22),1231)-FINONE(6,(同期+23),0);R24:=R23+FINONE(6,(同期+23),0)+FINONE(6,(AYEAR-同期-23),1231)-FINONE(6,(同期+24),0); R25:=R24+FINONE(6,(同期+24),0)+FINONE(6,(AYEAR-同期-24),1231)-FINONE(6,(同期+25),0);R26:=R25+FINONE(6,(同期+25),0)+FINONE(6,(AYEAR-同期-25),1231)-FINONE(6,(同期+26),0); R27:=R26+FINONE(6,(同期+26),0)+FINONE(6,(AYEAR-同期-26),1231)-FINONE(6,(同期+27),0);R28:=R27+FINONE(6,(同期+27),0)+FINONE(6,(AYEAR-同期-27),1231)-FINONE(6,(同期+28),0); R29:=R28+FINONE(6,(同期+28),0)+FINONE(6,(AYEAR-同期-28),1231)-FINONE(6,(同期+29),0);R30:=R29+FINONE(6,(同期+29),0)+FINONE(6,(AYEAR-同期-29),1231)-FINONE(6,(同期+30),0); R31:=R30+FINONE(6,(同期+30),0)+FINONE(6,(AYEAR-同期-30),1231)-FINONE(6,(同期+31),0);R32:=R31+FINONE(6,(同期+31),0)+FINONE(6,(AYEAR-同期-31),1231)-FINONE(6,(同期+32),0); R33:=R32+FINONE(6,(同期+32),0)+FINONE(6,(AYEAR-同期-32),1231)-FINONE(6,(同期+33),0);R34:=R33+FINONE(6,(同期+33),0)+FINONE(6,(AYEAR-同期-33),1231)-FINONE(6,(同期+34),0); R35:=R34+FINONE(6,(同期+34),0)+FINONE(6,(AYEAR-同期-34),1231)-FINONE(6,(同期+35),0);R36:=R35+FINONE(6,(同期+35),0)+FINONE(6,(AYEAR-同期-35),1231)-FINONE(6,(同期+36),0); R37:=R36+FINONE(6,(同期+36),0)+FINONE(6,(AYEAR-同期-36),1231)-FINONE(6,(同期+37),0);R38:=R37+FINONE(6,(同期+37),0)+FINONE(6,(AYEAR-同期-37),1231)-FINONE(6,(同期+38),0); R39:=R38+FINONE(6,(同期+38),0)+FINONE(6,(AYEAR-同期-38),1231)-FINONE(6,(同期+39),0);R40:=R39+FINONE(6,(同期+39),0)+FINONE(6,(AYEAR-同期-39),1231)-FINONE(6,(同期+40),0); R:=IF(年均=2,R2,IF(年均=3,R3,IF(年均=4,R4,IF(年均=5,R5,IF(年均=6,R6,IF(年均=7,R7,IF(年均=8,R8,IF(年均=9,R9,IF(年均=10,R10,IF(年均=11,R11, IF(年均=12,R12,IF(年均=13,R13,IF(年均=14,R14,IF(年均=15,R15,IF(年均=16,R16,IF(年均=17,R17,IF(年均=18,R18,IF(年均=19,R19,IF(年均=20,R20,IF(年均=21,R21, IF(年均=22,R22,IF(年均=23,R23,IF(年均=24,R24,IF(年均=25,R25,IF(年均=26,R26,IF(年均=27,R27,IF(年均=28,R28,IF(年均=29,R29,IF(年均=30,R30,IF(年均=31,R31, IF(年均=32,R32,IF(年均=33,R33,IF(年均=34,R34,IF(年均=35,R35,IF(年均=36,R36,IF(年均=37,R37,IF(年均=38,R38,IF(年均=39,R39,IF(年均=40,R40,DRAWNULL))))))))))))))))))))))))))))))))))))))); ROEGR:=R/年均;{股民学院 www.58188.com 整理} ROEHY:=HYSJL/HYSYL*100; RGR1:=FINONE(200,同期,0)+FINONE(200,(AYEAR-同期),1231)-FINONE(200,(同期+1),0); RGR2:=FINONE(200,(复合+同期),0)+FINONE(200,(AYEAR-复合-同期),1231)-FINONE(200,(复合+同期+1),0); RGR:=RGR1/RGR2; ROAGR:=(POW(RGR,(1/复合))-1)*100; AGR1:=FINONE(172,同期,0)+FINONE(172,(AYEAR-同期),1231)-FINONE(172,(同期+1),0); AGR2:=FINONE(172,(复合+同期),0)+FINONE(172,(AYEAR-复合-同期),1231)-FINONE(172,(复合+同期+1),0); AGR:=IF(FINONE(172,同期,0)!=0,AGR1/AGR2,DRAWNULL); ACAGR:=(POW(AGR,(1/复合))-1)*100; IGR1:=FINONE(173,同期,0)+FINONE(173,(AYEAR-同期),1231)-FINONE(173,(同期+1),0); IGR2:=FINONE(173,(复合+同期),0)+FINONE(173,(AYEAR-复合-同期),1231)-FINONE(173,(复合+同期+1),0); IGR:=IGR1/IGR2; ICAGR:=(POW(IGR,(1/复合))-1)*100; AFGR:=IF(FINONE(45,同期,0)!=0,FINONE(45,同期,0)/FINONE(45,(复合+同期),0),DRAWNULL); AFCAGR:=(POW(AFGR,(1/复合))-1)*100; LGR:=FINONE(210,同期,0)/FINONE(210,(复合+同期),0); LCAGR:=(POW(LGR,(1/复合))-1)*100; GR:=IF(FINANCE(37)=4,FINONE(1,0,331),IF(FINANCE(37)=1,FINONE(1,0,630),IF(FINANCE(37)=2,FINONE(1,0,930),IF(FINANCE(37)=3,FINONE(1,0,1231),DRAWNULL)))); AEP1:=IF(GR>0 AND FINVALUE(285)>0,GR*(FINVALUE(285)/100)+FINONE(1,0,1231),IF(GR<0 AND FINVALUE(285)<0,GR*(-FINVALUE(285)/100)+FINONE(1,0,1231),IF(GR>0 AND FINVALUE(285)<0,GR*(FINVALUE(285)/100)+FINONE(1,0,1231),IF(GR<0 AND FINVALUE(285)>0,GR*(-FINVALUE(285)/100)+FINONE(1,0,1231),DRAWNULL)))); AEP2:=IF(GR>0 AND FINVALUE(286)>0,GR*(FINVALUE(286)/100)+FINONE(1,0,1231),IF(GR<0 AND FINVALUE(286)<0,GR*(-FINVALUE(286)/100)+FINONE(1,0,1231),IF(GR>0 AND FINVALUE(286)<0,GR*(FINVALUE(286)/100)+FINONE(1,0,1231),IF(GR<0 AND FINVALUE(286)>0,GR*(-FINVALUE(286)/100)+FINONE(1,0,1231),DRAWNULL)))); 每股收益:=STRCAT(STRCAT('每股收益: ',CON2STR(EPS,2)),'元'); 扣非:=STRCAT(STRCAT('扣非: ',CON2STR(DEPS,2)),'元'); 年均收益:=STRCAT(STRCAT('年均收益: ',CON2STR(EPSAR,2)),'元'); 商誉:=STRCAT(STRCAT('商誉: ',CON2STR(BUS,2)),'元'); 经营现金流:=STRCAT(STRCAT('经营现金流: ',CON2STR(OCF,2)),'元'); 毛利:=STRCAT(STRCAT('毛利: ',CON2STR(ROSCAGR,2)),'%'); 盈利收益率:=STRCAT(STRCAT('盈利收益率: ',CON2STR(EP,2)),'%'); 净利:=STRCAT(STRCAT('净利: ',CON2STR(ROPCAGR,2)),'%'); 净利润年复合:=STRCAT(STRCAT('净利润年复合: ',CON2STR(MCAGR,2)),'%'); 主营:=STRCAT(STRCAT('主营: ',CON2STR(ECAGR,2)),'%'); 净资产年复合:=STRCAT(STRCAT('净资产年复合: ',CON2STR(BCAGR,2)),'%'); 净资产收益率:=STRCAT(STRCAT('ROE: ',CON2STR(ROE,2)),'%'); ROE年均收益:=STRCAT(STRCAT('ROE年均收益: ',CON2STR(ROEGR,2)),'%'); 行业:=STRCAT(STRCAT('行业: ',CON2STR(ROEHY,2)),'%'); ROA年均复合:=STRCAT(STRCAT('ROA年均复合: ',CON2STR(ROAGR,2)),'%'); ROA:=STRCAT(STRCAT('ROA: ',CON2STR(RGR1,2)),'%'); 应收款周转率:=STRCAT(STRCAT('应收款周转率: ',CON2STR(ACAGR,2)),'%'); 库存:=STRCAT(STRCAT('库存: ',CON2STR(ICAGR,2)),'%'); 预收款年复合:=STRCAT(STRCAT('预收款年复合: ',CON2STR(AFCAGR,2)),'%'); 负债:=STRCAT(STRCAT('负债: ',CON2STR(LCAGR,2)),'%'); 业绩预告下限:=STRCAT(STRCAT('业绩预告下限: ',CON2STR(AEP1,2)),'元'); 业绩预告上限:=STRCAT(STRCAT('上限: ',CON2STR(AEP2,2)),'元'); DRAWTEXT_FIX(1,0.00,0.35,0,每股收益),COLORMAGENTA; DRAWTEXT_FIX(1,0.23,0.35,0,扣非),COLORMAGENTA; DRAWTEXT_FIX(1,0.00,0.41,0,年均收益),COLORCYAN; DRAWTEXT_FIX(1,0.23,0.41,0,商誉),COLORCYAN; DRAWTEXT_FIX(1,0.00,0.47,0,经营现金流),COLORGREEN; DRAWTEXT_FIX(1,0.23,0.47,0,毛利),COLORGREEN; DRAWTEXT_FIX(1,0.00,0.53,0,盈利收益率),COLORYELLOW; DRAWTEXT_FIX(1,0.23,0.53,0,净利),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.59,0,净利润年复合),COLORRED; DRAWTEXT_FIX(1,0.23,0.59,0,主营),COLORRED; DRAWTEXT_FIX(1,0.00,0.65,0,净资产年复合),COLORMAGENTA; DRAWTEXT_FIX(1,0.23,0.65,0,净资产收益率),COLORMAGENTA; DRAWTEXT_FIX(1,0.00,0.71,0,ROE年均收益),COLORCYAN; DRAWTEXT_FIX(1,0.23,0.71,0,行业),COLORCYAN; DRAWTEXT_FIX(1,0.00,0.77,0,ROA年均复合),COLORGREEN; DRAWTEXT_FIX(1,0.23,0.77,0,ROA),COLORGREEN; DRAWTEXT_FIX(1,0.00,0.83,0,应收款周转率),COLORYELLOW; DRAWTEXT_FIX(1,0.23,0.83,0,库存),COLORYELLOW; DRAWTEXT_FIX(1,0.00,0.89,0,预收款年复合),COLORRED; DRAWTEXT_FIX(1,0.23,0.89,0,负债),COLORRED; DRAWTEXT_FIX(1,0.00,0.95,0,业绩预告下限),COLORMAGENTA; DRAWTEXT_FIX(1,0.23,0.95,0,业绩预告上限),COLORMAGENTA; |