公式网-网站导航


网站搜索：  

股票公式指标网 发表于2010/1/27 8:41:06

资产预警Z计分模型

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. {n:2008,0,99999,1}   
  2. 资产总额1:=FINANCE2(14)/10;   
  3. 负债总额1:=FINANCE2(20)/10;   
  4. 流动负债1:=FINANCE2(18)/10;   
  5. 股东权益1:=FINANCE2(21)/10;   
  6. 流动资产1:=FINANCE2(15)/10;   
  7. 流动资金本1:=流动资产1-流动负债1;   
  8. 每股收益1:=FINANCE2(3);   
  9. 每股未分配1:=FINANCE2(8);   
  10. 主营业务收入1:=FINANCE2(27)/10;   
  11. 营业利润1:=FINANCE2(29)/10;   
  12. 净利润1:=FINANCE2(33)/10;   
  13. 留存收益1:=净利润1/每股收益1*每股未分配1;{留存收益=未分配利润=净利润/每股收益*每股未分配利润}   
  14. 销售收入1:=主营业务收入1;   
  15.   
  16. x1新:=流动资金本1/资产总额1*100;   
  17. x2新:=留存收益1/资产总额1*100;   
  18. x3新:=营业利润1/资产总额1*100;   
  19. x4新:=股东权益1/负债总额1*100;   
  20. x5新:=销售收入1/资产总额1*100;   
  21. z新:(1.2*x1新+1.4*x2新+3.3*x3新+0.6*x4新+0.999*x5新)/100,linethick0;   
  22.   
  23. 资产总额2:=PFFININ(1083 ,N ,1231 )/10000;   
  24. 负债总额2:=PFFININ(1106 ,N ,1231 )/10000;   
  25. 流动负债2:=PFFININ(1097 ,N ,1231 )/10000;   
  26. 股东权益2:=PFFININ(1114 ,N ,1231 )/10000;   
  27. 流动资产2:=PFFININ(1064 ,N ,1231 )/10000;   
  28. 流动资金本2:=流动资产2-流动负债2;   
  29. 主营业务收入2:=PFFININ(1251 ,N ,1231 )/10000;   
  30. 营业利润2:=PFFININ(1263 ,N ,1231 )/10000;   
  31. 留存收益2:=PFFININ(1111 ,N ,1231 )/10000;{留存收益=未分配利润=净利润/每股收益*每股未分配利润}   
  32. 销售收入2:=主营业务收入2;   
  33.   
  34. x1K:=流动资金本2/资产总额2*100;   
  35. x2K:=留存收益2/资产总额2*100;   
  36. x3K:=营业利润2/资产总额2*100;   
  37. x4K:=股东权益2/负债总额2*100;   
  38. x5K:=销售收入2/资产总额2*100;   
  39. zK:(1.2*x1K+1.4*x2K+3.3*x3K+0.6*x4K+0.999*x5K)/100,linethick0;   
  40.   
  41. 资产总额3:=PFFININ(1083 ,n-1,1231 )/10000;   
  42. 负债总额3:=PFFININ(1106 ,n-1,1231 )/10000;   
  43. 流动负债3:=PFFININ(1097 ,n-1,1231 )/10000;   
  44. 股东权益3:=PFFININ(1114 ,n-1,1231 )/10000;   
  45. 流动资产3:=PFFININ(1064 ,n-1,1231 )/10000;   
  46. 流动资金本3:=流动资产2-流动负债2;   
  47.   
  48. 主营业务收入3:=PFFININ(1251 ,n-1,1231 )/10000;   
  49. 营业利润3:=PFFININ(1263 ,n-1,1231 )/10000;   
  50.   
  51. 留存收益3:=PFFININ(1111 ,N-1 ,1231 )/10000;{留存收益=未分配利润=净利润/每股收益*每股未分配利润}   
  52. 销售收入3:=主营业务收入3;   
  53. x1上:=流动资金本3/资产总额3*100;   
  54. x2上:=留存收益3/资产总额3*100;   
  55. x3上:=营业利润3/资产总额3*100;   
  56. x4上:=股东权益3/负债总额3*100;   
  57. x5上:=销售收入3/资产总额3*100;   
  58. z上:(1.2*x1上+1.4*x2上+3.3*x3上+0.6*x4上+0.999*x5上)/100,linethick0;   
  59.   
  60. 资产总额4:=PFFININ(1083 ,n-2,1231 )/10000;   
  61. 负债总额4:=PFFININ(1106 ,n-2,1231 )/10000;   
  62. 流动负债4:=PFFININ(1097 ,n-2,1231 )/10000;   
  63. 股东权益4:=PFFININ(1114 ,n-2,1231 )/10000;   
  64. 流动资产4:=PFFININ(1064 ,n-2,1231 )/10000;   
  65. 流动资金本4:=流动资产2-流动负债2;   
  66. 主营业务收入4:=PFFININ(1251 ,n-2,1231 )/10000;   
  67. 营业利润4:=PFFININ(1263 ,n-2,1231 )/10000;   
  68. 留存收益4:=PFFININ(1111 ,N-2 ,1231 )/10000;{留存收益=未分配利润=净利润/每股收益*每股未分配利润}   
  69. 销售收入4:=主营业务收入4;   
  70. x1前:=流动资金本4/资产总额4*100;   
  71. x2前:=留存收益4/资产总额4*100;   
  72. x3前:=营业利润4/资产总额4*100;   
  73. x4前:=股东权益4/负债总额4*100;   
  74. x5前:=销售收入4/资产总额4*100;   
  75. z前:(1.2*x1前+1.4*x2前+3.3*x3前+0.6*x4前+0.999*x5前)/100,linethick0;   
  76. DRAWTEXTREL( 0, 0, '序号' ),coloryellow;   
  77. DRAWTEXTREL( 50, 0, '指标说明' ),coloryellow;   
  78. DRAWTEXTREL(250, 0,''+NUMTOSTRN(n-2,0)+'年'),coloryellow;   
  79. DRAWTEXTREL(400, 0,''+NUMTOSTRN(n-1,0)+'年'),coloryellow;   
  80. DRAWTEXTREL(550, 0,''+NUMTOSTRN(n,0)+'年'),coloryellow;   
  81. DRAWTEXTREL(700, 0,''+NUMTOSTRN(FINANCE2(1),0)),coloryellow;   
  82. DRAWTEXTREL(850, 0, '结果（用年报）'),coloryellow;   
  83.   
  84. DRAWTEXTREL( 10, 100, 'X1' ),coloryellow;   
  85. DRAWTEXTREL( 10, 200, 'X2' ),coloryellow;   
  86. DRAWTEXTREL( 10, 300, 'X3' ),coloryellow;   
  87. DRAWTEXTREL( 10, 400, 'X4' ),coloryellow;   
  88. DRAWTEXTREL( 10, 500, 'X5' ),coloryellow;   
  89. DRAWTEXTREL( 20, 650, 'Z计分模型' ),coloryellow;   
  90. DRAWTEXTREL( 50, 100, '营运资金/资产总额' ),coloryellow;   
  91. DRAWTEXTREL( 50, 200, '留存收益/资产总额' ),coloryellow;   
  92. DRAWTEXTREL( 50, 300, '息税前收益/资产总额' ),coloryellow;   
  93. DRAWTEXTREL( 50, 400, '权益市价/负债总额' ),coloryellow;   
  94. DRAWTEXTREL( 50, 500, '销售额/资产总额' ),coloryellow;   
  95.   
  96. DRAWTEXTREL(250, 100,''+NUMTOSTRN(x1前,2)),coloryellow;   
  97. DRAWTEXTREL(400, 100,''+NUMTOSTRN(x1上,2)),coloryellow;   
  98. DRAWTEXTREL(550, 100,''+NUMTOSTRN(x1K,2)),coloryellow;   
  99. DRAWTEXTREL(700, 100,''+NUMTOSTRN(x1新,2)),coloryellow;   
  100.   
  101. DRAWTEXTREL(250, 200,''+NUMTOSTRN(x2前,2)),coloryellow;   
  102. DRAWTEXTREL(400, 200,''+NUMTOSTRN(x2上,2)),coloryellow;   
  103. DRAWTEXTREL(550, 200,''+NUMTOSTRN(x2K,2)),coloryellow;   
  104. DRAWTEXTREL(700, 200,''+NUMTOSTRN(x2新,2)),coloryellow;   
  105.   
  106. DRAWTEXTREL(250, 300,''+NUMTOSTRN(x3前,2)),coloryellow;   
  107. DRAWTEXTREL(400, 300,''+NUMTOSTRN(x3上,2)),coloryellow;   
  108. DRAWTEXTREL(550, 300,''+NUMTOSTRN(x3K,2)),coloryellow;   
  109. DRAWTEXTREL(700, 300,''+NUMTOSTRN(x3新,2)),coloryellow;   
  110.   
  111. DRAWTEXTREL(250, 400,''+NUMTOSTRN(x4前,2)),coloryellow;   
  112. DRAWTEXTREL(400, 400,''+NUMTOSTRN(x4上,2)),coloryellow;   
  113. DRAWTEXTREL(550, 400,''+NUMTOSTRN(x4K,2)),coloryellow;   
  114. DRAWTEXTREL(700, 400,''+NUMTOSTRN(x4新,2)),coloryellow;   
  115.   
  116. DRAWTEXTREL(250, 500,''+NUMTOSTRN(x5前,2)),coloryellow;   
  117. DRAWTEXTREL(400, 500,''+NUMTOSTRN(x5上,2)),coloryellow;   
  118. DRAWTEXTREL(550, 500,''+NUMTOSTRN(x5K,2)),coloryellow;   
  119. DRAWTEXTREL(700, 500,''+NUMTOSTRN(x5新,2)),coloryellow;   
  120.   
  121. DRAWTEXTREL(250, 650,''+NUMTOSTRN(z前,2)),coloryellow;   
  122. DRAWTEXTREL(400, 650,''+NUMTOSTRN(z上,2)),coloryellow;   
  123. DRAWTEXTREL(550, 650,''+NUMTOSTRN(zK,2)),coloryellow;   
  124. DRAWTEXTREL(700, 650,''+NUMTOSTRN(z新,2)),coloryellow;   
  125.   
  126. IF BARSTATUS=2 and zk>=2.675 THEN DRAWTEXTREL(250,800,'若Z≥2.675 则表明企业的财务状况良好，发生破产的可能性较小'),LINETHICK2,COLORFF00FF;   
  127. IF BARSTATUS=2 and zk<=1.81 THEN DRAWTEXTREL(250,800,'若Z≤1.81 则企业存在很大的破产危险'),LINETHICK2,COLORFF00FF;   
  128. IF BARSTATUS=2 and BETWEEN(zk,2.675,1.81) THEN DRAWTEXTREL(250,800,' 若1.81<Z<2.675 则表明企业财务是极为不稳定的。 '),LINETHICK2,COLORFF00FF;   
  129.   
  130. IF BARSTATUS=2 and zk>z上 THEN DRAWTEXTREL(850,650,'提高 '),COLORred;   
  131. IF BARSTATUS=2 and zk<=z上 THEN DRAWTEXTREL(850,650,'下降 '),COLORgreen;   
  132.   
  133. IF BARSTATUS=2 and x5k>x5上 THEN DRAWTEXTREL(850,500,'提高 '),COLORred;   
  134. IF BARSTATUS=2 and x5k<=x5上 THEN DRAWTEXTREL(850,500,'下降 '),COLORgreen;   
  135.   
  136. IF BARSTATUS=2 and x4k>x4上 THEN DRAWTEXTREL(850,400,'提高 '),COLORred;   
  137. IF BARSTATUS=2 and x4k<=x4上 THEN DRAWTEXTREL(850,400,'下降 '),COLORgreen;   
  138.   
  139. IF BARSTATUS=2 and x3k>x3上 THEN DRAWTEXTREL(850,300,'提高 '),COLORred;   
  140. IF BARSTATUS=2 and x3k<=x3上 THEN DRAWTEXTREL(850,300,'下降 '),COLORgreen;   
  141.   
  142. IF BARSTATUS=2 and x2k>x2上 THEN DRAWTEXTREL(850,200,'提高 '),COLORred;   
  143. IF BARSTATUS=2 and x2k<=x2上 THEN DRAWTEXTREL(850,200,'下降 '),COLORgreen;   
  144.   
  145. IF BARSTATUS=2 and x1k>x1上 THEN DRAWTEXTREL(850,100,'提高 '),COLORred;   
  146. IF BARSTATUS=2 and x1k<=x1上 THEN DRAWTEXTREL(850,100,'下降 '),COLORgreen;   

未命名.GIF



网站搜索：  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved.　
公式网-www.gszx.com.cn-股票指标公式网