发出以上文章后很多股友留言讨论,扣非净利润更贴近我们市场需求: “扣非净利润”是“扣除非经常性损益后的净利润”的简称,主要用于衡量一个公司在一定时期内的核心盈利能力。这个指标排除了那些一次性的、非经常性的收益或损失,从而更准确地反映了公司的经营状况。 “归属于母公司股东的净利润”是指在一定会计期间内,扣除了所有成本、费用、利息、税费以及少数股东权益后,归属于母公司股东的利润部分。这个指标在合并财务报表中尤为重要,更好地了解母公司股东实际拥有的盈利情况。 我们结合成长股赚钱逻辑的业绩数据找出这一例子: 扣非净利润(亿元) 23年 16.69 22年 10.59 21年 5.19 归属母公司净利润(亿元)23年 19.04 22年 9.48 21年 6.90 {******************************************************} 以下是本文基本面财务数据净利润核心公式: 扣非净利润主图源代码如下(可自行添加指标公式进主图首行): {涨停红色}CYBKG:=IF(DATE>1200823,1,0); {创业板从2020年8月24日开始20%涨跌限制} BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('ST板块') AND NOT(INBLOCK('创业板')),0.05,IF(INBLOCK('创业板') AND CYBKG,0.2,0.1))); STICKLINE((ABS(C-(REF(C,1)*(1+BK)))<=0.01 AND C=H),C,O,3,0),COLORRED; {日期相关板块指标} N:=STRCAT(CON2STR(YEAR,0),'/'); Y:=STRCAT(CON2STR(MONTH,0),'/'); R:=STRCAT(CON2STR(DAY,0),'/'); W:=STRCAT('',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日'))))))); SJ:=STRCAT(STRCAT(STRCAT(N,Y),STRCAT(R,W)),''); XSSJHYQYFG:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('',SJ),' '),HYBLOCK),' '),DYBLOCK),' '),FGBLOCK);{时间、行业、区域、风格} XSGNZDY:= STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('',GNBLOCK),''),''),ZDBLOCK),CODE);{概念、自定义、代码} XSSJ:=STRCAT('',SJ);{时间} XSZD:=STRCAT('',ZDBLOCK);{自定义} XSDY:=STRCAT('',DYBLOCK);{地域} XSHY:=STRCAT('',HYBLOCK);{行业} XSFG:=STRCAT('',FGBLOCK);{风格} XSGN:=STRCAT('',GNBLOCK);{概念} DRAWTEXT_FIX(C>0,0,0,0,XSSJHYQYFG),COLORFFFF55; DRAWTEXT_FIX(C>0,0,0.055,0,XSGNZDY),COLORFFFF55; {**********以上日期相关板块指标**************} {扣非净利润+连续三年归属于母公司股东的净利润} 年份:=23;{2022年就是22 2021就是21 以此类推,年报披露时间:每年1月1日--4月30日} 今年扣非第一季:=FINONE(233,年份,331)/100000000; 今年扣非第二季:=FINONE(233,年份,630)/100000000; 今年扣非第三季:=FINONE(233,年份,930)/100000000; 今年扣非第四季:=FINONE(233,年份,1231)/100000000; 今年扣非:=SUM(今年扣非第一季+ 今年扣非第二季 + 今年扣非第三季 + 今年扣非第四季,1); DRAWTEXT_FIX(C>0,0.03,0.1,0,STRCAT('扣非净利润(元)','')); DRAWTEXT_FIX(C>0,0.12,0.1,0,STRCAT(CON2STR(年份,0),'年')),COLORRED; DRAWTEXT_FIX(C>0,0.14,0.1,0,STRCAT(CON2STR(今年扣非,2),'亿')),COLORWHITE; 去年扣非第一季:=FINONE(233,年份-1,331)/100000000; 去年扣非第二季:=FINONE(233,年份-1,630)/100000000; 去年扣非第三季:=FINONE(233,年份-1,930)/100000000; 去年扣非第四季:=FINONE(233,年份-1,1231)/100000000; 去年扣非:=SUM(去年扣非第一季+ 去年扣非第二季 + 去年扣非第三季 + 去年扣非第四季,1); DRAWTEXT_FIX(C>0,0.18,0.1,0,STRCAT(CON2STR(年份-1,0),'年')),COLORRED; DRAWTEXT_FIX(C>0,0.20,0.1,0,STRCAT(CON2STR(去年扣非,2),'亿')),COLORWHITE; 前年扣非第一季:=FINONE(233,年份-2,331)/100000000; 前年扣非第二季:=FINONE(233,年份-2,630)/100000000; 前年扣非第三季:=FINONE(233,年份-2,930)/100000000; 前年扣非第四季:=FINONE(233,年份-2,1231)/100000000; 前年扣非:=SUM(前年扣非第一季+ 前年扣非第二季 + 前年扣非第三季 + 前年扣非第四季,1); DRAWTEXT_FIX(C>0,0.24,0.1,0,STRCAT(CON2STR(年份-2,0),'年')),COLORRED; DRAWTEXT_FIX(C>0,0.26,0.1,0,STRCAT(CON2STR(前年扣非,2),'亿')),COLORWHITE; {*****************************************************}; 今年第一季:=FINONE(232,年份,331)/100000000; 今年第二季:=FINONE(232,年份,630)/100000000; 今年第三季:=FINONE(232,年份,930)/100000000; 今年第四季:=FINONE(232,年份,1231)/100000000; 今年:=SUM(今年第一季+ 今年第二季 + 今年第三季 + 今年第四季,1); DRAWTEXT_FIX(C>0,0.0,0.15,0,STRCAT('归属于母公司股东的净利润(元)','')); DRAWTEXT_FIX(C>0,0.12,0.15,0,STRCAT(CON2STR(年份,0),'年')),COLORRED; DRAWTEXT_FIX(C>0,0.14,0.15,0,STRCAT(CON2STR(今年,2),'亿')),COLORCYAN; 去年第一季:=FINONE(232,年份-1,331)/100000000; 去年第二季:=FINONE(232,年份-1,630)/100000000; 去年第三季:=FINONE(232,年份-1,930)/100000000; 去年第四季:=FINONE(232,年份-1,1231)/100000000; 去年:=SUM(去年第一季+ 去年第二季 + 去年第三季 + 去年第四季,1); DRAWTEXT_FIX(C>0,0.18,0.15,0,STRCAT(CON2STR(年份-1,0),'年')),COLORRED; DRAWTEXT_FIX(C>0,0.20,0.15,0,STRCAT(CON2STR(去年,2),'亿')),COLORCYAN; 前年第一季:=FINONE(232,年份-2,331)/100000000; 前年第二季:=FINONE(232,年份-2,630)/100000000; 前年第三季:=FINONE(232,年份-2,930)/100000000; 前年第四季:=FINONE(232,年份-2,1231)/100000000; 前年:=SUM(前年第一季+ 前年第二季 + 前年第三季 + 前年第四季,1); DRAWTEXT_FIX(C>0,0.24,0.15,0,STRCAT(CON2STR(年份-2,0),'年')),COLORRED; DRAWTEXT_FIX(C>0,0.26,0.15,0,STRCAT(CON2STR(前年,2),'亿')),COLORCYAN; {**显示器分辨率显示位置有区别,部分笔记本屏显示年份及数字会重叠,以上蓝色字体为笔记本显示屏调整位置的参数,如:DRAWTEXT_FIX(C>0,0.26,0.15,0,STRCAT(CON2STR(前年,2),'亿')),COLORCYAN;中0.26是字体间距,0.15是行距 ;请自行设置**}; {*******************主图源代码完成*************************} 扣非净利润的条件选股公式的源代码如下(自行CRTL+F建立该条件选股公式): {扣非净利润条件选股} 年份:=23;{2022年就是22 2021就是21 以此类推,年报披露时间:每年1月1日--4月30日} 今年扣非第一季:=FINONE(233,年份,331)/100000000; 今年扣非第二季:=FINONE(233,年份,630)/100000000; 今年扣非第三季:=FINONE(233,年份,930)/100000000; 今年扣非第四季:=FINONE(233,年份,1231)/100000000; JN1:=SUM(今年扣非第一季 + 今年扣非第二季 + 今年扣非第三季 + 今年扣非第四季,1); 去年扣非第一季:=FINONE(233,年份-1,331)/100000000; 去年扣非第二季:=FINONE(233,年份-1,630)/100000000; 去年扣非第三季:=FINONE(233,年份-1,930)/100000000; 去年扣非第四季:=FINONE(233,年份-1,1231)/100000000; QN2:=SUM(去年扣非第一季 + 去年扣非第二季 + 去年扣非第三季 + 去年扣非第四季,1); 前年扣非第一季:=FINONE(233,年份-2,331)/100000000; 前年扣非第二季:=FINONE(233,年份-2,630)/100000000; 前年扣非第三季:=FINONE(233,年份-2,930)/100000000; 前年扣非第四季:=FINONE(233,年份-2,1231)/100000000; QN3:=SUM(前年扣非第一季 + 前年扣非第二季 + 前年扣非第三季 + 前年扣非第四季,1); JN1>QN2 AND QN2>QN3 ; {****您也可以多加一条件AND QN3>0******选股公式完成********************} |
|
来自: 常思一二m1zya7 > 《通达信及公式》