同花顺财务因子，自带判断出五色五角星，每分一星，共计20分.
农历:LUNARDATE(2);
交易所市盈率:HQSYL,nodraw;
每股净资产增长率:=TOSTRING('每股净资产增长率:',1);
mgj:=(REP(&MGJZC,1,1)-REP(&MGJZC,1,4))/REP(&MGJZC,1,4)*100;
////////////////////////////
//DRAWTEXT_FIX(ISLASTBAR,0.43,0.02,0,'实际流通股:'),colorcyan;
股数:=TOSTRING(ZYLTGB/100000000,2);
//DRAWTEXT_FIX(ISLASTBAR,0.50,0.02,0,股数),colorred;
机构区间:=SUM(JGCC,30);
机构区间变化:JGCC-REF(JGCC,60),colormagenta;
股东本季:JGCGS;
股东上季:=REF(JGCGS,60);
股东增减:=(股东本季-股东上季)/SHGZG*100;
DRAWTEXT_FIX(ISLASTBAR,0.33,0.00,0,'机构增减仓:'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.43,0.00,0,TOSTRING(机构区间变化,2)+'%'),colorred;
//DRAWTEXT_FIX(ISLASTBAR,0.40,0.00,0,'机构持股数:'),colorcyan;
//DRAWTEXT_FIX(ISLASTBAR,0.48,0.00,0,TOSTRING(REPDATE(&JGCGS,1,4),2)),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.33,0.15,0,'现金流净利润比：'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.43,0.15,0,TOSTRING(JYXJLRBL,2)+'%'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.33,0.30,0,'年报净利润：'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.43,0.30,0,TOSTRING(YEARJLR/100000000,2)+'亿'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.33,0.45,0,'扣非净利润：'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.43,0.45,0,TOSTRING(REP(&KFJLR,1)/100000000,2)+'亿'),colorred;
Q4:=YEARREP(&JLR,2);
QA:=JLRNEW;
Q6:=(QA-Q4)/Q4*100;
DRAWTEXT_FIX(ISLASTBAR,0.33,0.60,0,'净利润同比增长：'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.43,0.60,0,TOSTRING(Q6,2)+'%'),colorred;
Q5:=QUARTERREP(&JLR,1,2);
Q7:=(JLR-Q5)/Q5*100;;
DRAWTEXT_FIX(ISLASTBAR,0.33,0.75,0,'净利润环比增长：'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR,0.43,0.75,0,TOSTRING(Q7,2)+'%'),colorred;
//LASTREP
净利增值:=TOSTRING((REP(&JLR,1)-REP(&JLR,2))/REP(&JLR,2)*100,1);
//DRAWTEXT_FIX(ISLASTBAR,0.43,0.30,0,净利润增长),colorcyan;
//DRAWTEXT_FIX(ISLASTBAR,0.50,0.30,0,净利增值),colorred;
//每股公积金:=TOSTRING('每股公积金:',1);
公积金值:=TOSTRING(MGGJJ,2);
//DRAWTEXT_FIX(ISLASTBAR,0.43,0.60,0,每股公积金),colorcyan;
//DRAWTEXT_FIX(ISLASTBAR,0.50,0.60,0,公积金值),colorred;
每股未分配:=TOSTRING('每股未分配:',1);
未分配值:=TOSTRING(WFPLR/ZGB,2);
//DRAWTEXT_FIX(ISLASTBAR,0.43,0.70,0,每股未分配),colorcyan;
//DRAWTEXT_FIX(ISLASTBAR,0.50,0.70,0,未分配值),colorred;
每股现金流:=TOSTRING('每股现金流:',1);
现金流值:=TOSTRING(JYJE/ZGB,2);
//DRAWTEXT_FIX(ISLASTBAR,0.43,0.80,0,每股现金流),colorcyan;
//DRAWTEXT_FIX(ISLASTBAR,0.50,0.80,0,现金流值),colorred;
资产负债率:=TOSTRING('资产负债率:',1);
资产负债值:=TOSTRING(FZHJ/ZCZJ*100,2);
//DRAWTEXT_FIX(ISLASTBAR,0.43,0.90,0,资产负债率),colorcyan;
//DRAWTEXT_FIX(ISLASTBAR,0.50,0.90,0,资产负债值),colorred;
/////////////////////////////////
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.02,0,'流通市值亿:'),coloryellow;
市值:=TOSTRING(LTSZ/100000000,2);
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.02,0,市值),colorred;
//静态市盈率:=TOSTRING(JTSYL,2);
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.10,0,"*静态市盈率:"),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.10,0,静态市盈率),colorred;
;
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.30,0,市净率),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.30,0,市净率值),colorred;
毛利率:=TOSTRING('毛利率:',1);
毛利率值:=TOSTRING((ZYYWSR-ZYYWCB)/ZYYWSR*100,2);
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.40,0,毛利率),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.40,0,毛利率值),colorred;
净利润:=TOSTRING('净利润:',1);
净利率值:=TOSTRING((JLRNEW)/100000000,2);
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.50,0,'净利润:'),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.50,0,净利率值),colorred;
主营利润率:=TOSTRING('主营利润率:',1);
利润率值:=TOSTRING(ZYYWLR/ZYYWSR*100,2);
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.60,0,主营利润率),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.60,0,利润率值),colorred;
主营增长率:=TOSTRING('主营增长率:',1);
主增率值:=TOSTRING((ZYYWSR-REP(&ZYYWSR,2))/REP(&ZYYWSR,2)*100,2);
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.70,0,主营增长率),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.70,0,主增率值),colorred;
收益率值A:=TOSTRING(JLR/GDQYHJ*100,2);
净资产收益率:=TOSTRING('*净资收益率:',1);
JZC:=(ZCZJNB-FZHJ);
杜邦收益率值:=TOSTRING((JLRNEW/GDQYHJ)*100,2);
收益率值:=TOSTRING(JZCSYL,2);
//DRAWTEXT_FIX(ISLASTBAR,0.55,0.90,0,净资产收益率),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.62,0.90,0,杜邦收益率值),colorred;
动态市盈率值:=C/MGSY;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.75,0,'动态市盈率：'),colormagenta;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.75,0,TOSTRING(动态市盈率值,2)),coloryellow;
DRAWTEXT_FIX(ISLASTBAR AND 动态市盈率值<15,0.00,0.90,0,'★★★★★价值被低估'),colorred;
DRAWTEXT_FIX(ISLASTBAR AND 动态市盈率值>=15 AND 动态市盈率值<25,0.00,0.90,0,'★★★★★价值正常'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR AND 动态市盈率值>25 AND 动态市盈率值<40,0.00,0.90,0,'★★★★★价值被高估'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR AND 动态市盈率值>40,0.00,0.90,0,'★★★★★有投机泡沫'),colorgreen;
///小于15价值被低估，15-25正常，25-40价值被高估。大于40有投机泡沫，市净率8倍以上处于高位区间，市净率在8-3之前处于中间区间，市盈率在3以下处于低位区间。
安全因子:=动态市盈率值*SJL,colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.00,0,'安全因子：'+TOSTRING(安全因子,2)),colormagenta;
市净率:=TOSTRING('市净率:',1);
//JZFX:=(JLRNEW/ZGB/MGJZC)*100;
//DRAWTEXT_FIX(ISLASTBAR,0.00,0.15,0,'未加权价值因子PR：'+TOSTRING(JZFX,2)),colormagenta;
//DRAWTEXT_FIX(ISLASTBAR,0.00,0.15,0,'价值因子PR：'+TOSTRING(BJJCGZS,2)),colormagenta;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.15,0,'价值因子PR：'+TOSTRING(LC_YQYL,2)),colormagenta;
预期盈利值:LC_YQYL;
盈利值:=TOSTRING(MGSYX,2);
DRAWTEXT_FIX(ISLASTBAR,0.00,0.30,0,'每股盈利EPS：'),colormagenta;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.30,0,盈利值),coloryellow;
每股净资产:=TOSTRING('每股净资产:',1);
净资产值:=TOSTRING(MGJZC,2);
DRAWTEXT_FIX(ISLASTBAR,0.00,0.45,0,每股净资产),colormagenta;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.45,0,净资产值),coloryellow;
sxlz:=ZSZ/LASTREP(&ZYYWSR,1);
DRAWTEXT_FIX(ISLASTBAR,0.00,0.60,0,'市销率：'),colormagenta;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.60,0,TOSTRING(sxlz,2)+'%'),coloryellow;
长期借款:=LASTREP(&CQJK,1)/100000000;
经营活动现金流:=JYJE/100000000;
长期借款:=LASTREP(&CQJK,1)/100000000;
短期借款:=LASTREP(&DQJK,1)/100000000;
净收益:=CJ_JZCSYL;
市销率:=C/ZYYWSR/SHGZG/;
DRAWTEXT_FIX(ISLASTBAR,0.17,0.00,0,'长期借款：'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.00,0,TOSTRING(长期借款,2)+'亿'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.17,0.15,0,'短期借款：'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.15,0,TOSTRING(短期借款,2)+'亿'),coloryellow;
SJDXJL:=LASTREP(&JYJE,2)/100000000;
DRAWTEXT_FIX(ISLASTBAR,0.17,0.30,0,'上季现金流：'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.30,0,TOSTRING(SJDXJL,2)+'亿'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.17,0.45,0,'本季现金流：'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.45,0,TOSTRING(经营活动现金流,2)+'亿'),coloryellow;
XJLBH:=(JYJE-LASTREP(&JYJE,2))/LASTREP(&JYJE,2)*100;
DRAWTEXT_FIX(ISLASTBAR,0.17,0.60,0,'现金增长率：'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.60,0,TOSTRING(XJLBH,2)+'%'),coloryellow;
XJLZL:=(JYJE-LASTREP(&JYJE,2))/100000000;
DRAWTEXT_FIX(ISLASTBAR,0.170,0.75,0,'现金增长额：'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.75,0,TOSTRING(XJLZL,2)+'亿'),coloryellow;
主力持仓:=JGCC,coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.52,0.00,0,'主力持仓：'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.00,0,TOSTRING(主力持仓,2)+'%'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.52,0.15,0,'派息合计：'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.15,0,TOSTRING(PXHJ,2)+'元'),colorred;
杜邦收益率值:=TOSTRING((JLRNEW/GDQYHJ)*100,2),colorcyan;
净资产收益率值:=TOSTRING(JZCSYL,2),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.52,0.30,0,'净资产收益率：'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.30,0,杜邦收益率值+'%'),colorred;
市净率值:=(CLOSE/MGJZC);
DRAWTEXT_FIX(ISLASTBAR,0.52,0.45,0,'市净率：'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.45,0,TOSTRING(市净率值,2)+'%'),colorred;
JZC:=(ZCZJNB-FZHJ)/100000000;
DRAWTEXT_FIX(ISLASTBAR,0.52,0.60,0,'净资产：'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.60,0,TOSTRING(JZC,2)+'亿'),colorred;
所有者权益:=GDQYHJ/100000000;
DRAWTEXT_FIX(ISLASTBAR,0.52,0.75,0,'股东权益：'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.75,0,TOSTRING(所有者权益,2)+'亿'),colorred;
本季股东人数:=LASTREP(&GDZS,1),colorlired,DOTLINE;//LINETHICK2;
上季股东人数:=LASTREP(&GDZS,2),colorlired,DOTLINE;//LINETHICK2;
股东人数增减:=(本季股东人数-上季股东人数);
DRAWTEXT_FIX(ISLASTBAR,0.66,0.00,0,'股东增减：'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.00,0,TOSTRING(股东人数增减,0)),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.66,0.15,0,'年报利润率：'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.15,0,TOSTRING(ZYYWLRLNB,2)+'%'),colorred;
负债:=FZHJNB/100000000;
DRAWTEXT_FIX(ISLASTBAR,0.66,0.300,0,'年报负债合计：'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.300,0,TOSTRING(负债,2)+'亿'),colorred;
DRAWTEXT_FIX(ISLASTBAR,0.66,0.45,0,'销售毛利率：'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.45,0,TOSTRING(XSMLL,2)+'%'),colorred;
股东权益值:=TOSTRING(GDQYHJNB/100000000,2);
DRAWTEXT_FIX(ISLASTBAR,0.66,0.60,0,'年报股东权益：'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.60,0,股东权益值+'亿'),colorred;
资产:=ZCZJNB/100000000;
DRAWTEXT_FIX(ISLASTBAR,0.66,0.75,0,'年报资产总计：'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.75,0,TOSTRING(资产,2)+'亿'),colorred;
//DRAWTEXT_FIX(ISLASTBAR,0.54,0.45,0,'实际价值：'),coloryellow;
//DRAWTEXT_FIX(ISLASTBAR,0.61,0.45,0,TOSTRING(MGSY*动态市盈率值,2)),colorred;
DRAWTEXT_FIX(C>0,0.90,0.00,0,'1'),colormagenta;
DRAWTEXT_FIX(C>0,0.92,0.00,0,'2'),colorred;
DRAWTEXT_FIX(C>0,0.94,0.00,0,'3'),colorcyan;
DRAWTEXT_FIX(C>0,0.96,0.00,0,'4'),coloryellow;
DRAWTEXT_FIX(C>0,0.98,0.00,0,'5'),colorgreen;
DRAWTEXT_FIX(净利增值>=20,0.90,0.20,0,'★'),colormagenta;
DRAWTEXT_FIX(盈利值>=0.8,0.92,0.20,0,'★'),colorred;
DRAWTEXT_FIX(公积金值>=3,0.94,0.20,0,'★'),colorcyan;
DRAWTEXT_FIX(未分配值>=1,0.96,0.20,0,'★'),coloryellow;
DRAWTEXT_FIX(现金流值>=0.2,0.98,0.20,0,'★'),colorgreen;
DRAWTEXT_FIX(资产负债值<50,0.90,0.40,0,'★'),colormagenta;
DRAWTEXT_FIX(长期借款=0,0.92,0.40,0,'★'),colorred;
DRAWTEXT_FIX(短期借款=0,0.94,0.40,0,'★'),colorcyan;
DRAWTEXT_FIX(净利增值>20,0.96,0.40,0,'★'),coloryellow;
DRAWTEXT_FIX(主增率值>20,0.98,0.40,0,'★'),colorgreen;
DRAWTEXT_FIX(现金流值>=0.2,0.90,0.60,0,'★'),colormagenta;
DRAWTEXT_FIX(杜邦收益率值>10,0.92,0.60,0,'★'),colorred;
DRAWTEXT_FIX(净资产值>=5,0.94,0.60,0,'★'),colorcyan;
DRAWTEXT_FIX(动态市盈率值>20,0.96,0.60,0,'★'),coloryellow;
DRAWTEXT_FIX(市净率值<9,0.98,0.60,0,'★'),colorgreen;
DRAWTEXT_FIX(毛利率值>30,0.90,0.80,0,'★'),colormagenta;
DRAWTEXT_FIX(净利率值>1,0.92,0.80,0,'★'),colorred;
DRAWTEXT_FIX(利润率值>50,0.94,0.80,0,'★'),colorcyan;
DRAWTEXT_FIX(XJLBH>20,0.96,0.80,0,'★'),coloryellow;
DRAWTEXT_FIX(Q7>20,0.98,0.80,0,'★'),colorgreen;
YYY:=MONEY/100000000;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.82,0.00,0,'▏成交金额亿'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.82,0.15,0,TOSTRING(YYY,2)),colorred;
WSS:=V/1000000;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.82,0.30,0,'▏成交量万手'),colorcyan;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.82,0.45,0,TOSTRING(WSS,2)),coloryellow;
DRAWTEXT_FIX(ISLASTBAR AND 机构区间变化<0,0.82,0.90,0,'★★★★★'),colorgreen;
DRAWTEXT_FIX(ISLASTBAR AND 机构区间变化>0,0.82,0.75,0,'★★★★★'),coloryellow;
DRAWTEXT_FIX(ISLASTBAR AND WSS>10,0.82,0.60,0,'★★★★★'),colorred;
//DRAWGBK(净利增值>20,STRIP(RGB(144,238,144),RGB(127,255,0),3));
20204168574759440.png
20204168575268684.png
|
