当前位置:→ 公式网 > 通达信公式 > 正文 ℃ 公式解密、改选股等业务 联系点击查看详情...
以下是揭示股价涨跌秘密 (通达信-估值体系指标-源码)(无源码的请下载附件导入)
估值体系--(通达信主图-源码)
注释------------
估值的确是很复杂的事情,现金流折现估值法由于其参数的不确定性在这里被摒弃,而我用的是乘数估值法。
目前成熟市场上不同行业最常用的估值乘数分别为:
(以下摘自网络论文 )
行业下属行业最常使用的乘数
汽车制造P/S
零部件P/CE的相对指标,P/S
银行 P/BV
基本原材料造纸P/BV
化学制品EV/EBITDA,EV/S,P/CE
金属和矿物P/LFCF,EV/EBITDA
建筑 P/LFCF,EV/FCF,P/S,EV/EBITDA
商业服务 EV/EBITDA,ROCE,P/LFCF,P/S,(P/S)/GROWTH
资本性产品工程制造P/S,EV/EBITDA,EV/S
国防P/S,EV/EBITDA,EV/S
食品、饮料和烟草食品生产EV/EBITDA,EV/CE
啤酒生产和酒吧ROCE,(P/S)/GROWTH,P/S的相对指标
酒精饮料EV/EBITDA
烟草ROCE
保健 P/S的相对指标/S&P;EV/EBITDA
保险 P/AV
休闲 EV/EBITDA
传媒 P/S的相对指标;EV/EBITDA
石油天然气综合油气公司P/S,EV/CV
房地产 P/FAD,EV/EBITDA,P/NAV
零售和消费品服装与市场和部门比较的P/S,EV/EBITDA
食品P/S的相对指标
奢侈品P/S,(P/S)/GROWTH,EV/S,(EV/E)/EBITDA的增长率
技术软件,设备和半导体P/S,P/S的相对指标
电讯 (EV/E)/EBITDA的增长率,EV/S,P/CUSTOMER
交通航空EV/EBITDA
公路客运P/S
公用事业 P/S,P/CE
要做到对不同行业的精确估值是困难的,我的想法是拿股价与对应的资产比、与市场预期比、与存银行比,因此就产生了多个不同的估值区间,见图:
图中的蓝区是市场估值区、红区是资产估值区、紫线是与银行存款比较,对于虚拟资产过大的股票似也可反应。国有银行因安全起见,证券化程度有限,故此法并不适用。
(估值体系主图)--源码如下:
- VAR1:=1080531;
- 【回】:FINANCE(35)*(1+FINANCE(30)/FINANCE(19)*100*0.33),NODRAW;
- 【盈】:(FINANCE(21)/FINANCE(20)+0.038)*FINANCE(33)*100,COLORWHITE,NODRAW;
- STICKLINE(DATE>VAR1,【回】,【盈】,7,0),COLOR6A0000;
- 估:=(【回】+【盈】)/2,NODRAW;
- IF(DATE>VAR1,估,DRAWNULL),COLOREE8000;
- 绝S:=FINANCE(10)/FINANCE(1)*1.1;
- 绝X:=FINANCE(10)/FINANCE(1)*0.9;
- STICKLINE(C>0,绝S,绝X,7,0),COLOR00005F;
- 资:FINANCE(10)/FINANCE(1), LINETHICK1,COLOR9E00EF;
- 银:FINANCE(29)/FINANCE(1)/3.87*100, LINETHICK2,COLORFF00EE;
- LL:=BARSSINCE(FINANCE(42));
- 均:SUM(C,LL)/(LL+1),CIRCLEDOT,COLORRED;
- 权比:FINANCE(19)/(FINANCE(15)+FINANCE(16)),COLOR00FFCC,NODRAW;
- P/EG:(C/FINANCE(33))/(FINANCE(21)/FINANCE(20)+0.038)/100,COLOR00FFCC,NODRAW;
- ROE:FINANCE(30)/FINANCE(19)*100,COLOR00FFCC,NODRAW;
- 毛利率:FINANCE(21)/FINANCE(20)*100,COLOR00FFCC,NODRAW;
- 红息率:=FINANCE(29)/FINANCE(1)/C*100,COLOR00FFCC,NODRAW;
- 净资:FINANCE(35),COLOR00FFCC,NODRAW;
- 市净率:C/FINANCE(35),COLOR00FFCC,NODRAW;
- 市盈率:C/FINANCE(33),COLOR00FFCC,NODRAW;
- 收益:FINANCE(33),COLOR00FFCC,NODRAW;
- 公积金:=FINANCE(18),COLOR00FFCC,NODRAW;
- WZ:=30=CURRBARSCOUNT;
- DRAWTEXT(WZ=1 AND 估>=10*资,估*0.85,'虚拟过大'),COLORYELLOW;
- DRAWKLINE(H,O,L,C);