资产预警Z计分模型(大智慧)

资产预警Z计分模型(大智慧)

源码正文：

资产总额1:=FINANCE2(14)/10{XG51};
负债总额1:=FINANCE2(20)/10{XG51};
流动负债1:=FINANCE2(18)/10{XG51};
股东权益1:=FINANCE2(21)/10{XG51};
流动资产1:=FINANCE2(15)/10{XG51};
流动资金本1:=流动资产1-流动负债1{XG51};
每股收益1:=FINANCE2(3){XG51};
每股未分配1:=FINANCE2(8){XG51};
主营业务收入1:=FINANCE2(27)/10{XG51};
营业利润1:=FINANCE2(29)/10{XG51};
净利润1:=FINANCE2(33)/10{XG51};
留存收益1:=净利润1/每股收益1*每股未分配1{XG51};
销售收入1:=主营业务收入1;

x1新:=流动资金本1/资产总额1*100{XG51};
x2新:=留存收益1/资产总额1*100{XG51};
x3新:=营业利润1/资产总额1*100{XG51};
x4新:=股东权益1/负债总额1*100{XG51};
x5新:=销售收入1/资产总额1*100{XG51};
z新:(1.2*x1新+1.4*x2新+3.3*x3新+0.6*x4新+0.999*x5新)/100,linethick0;

资产总额2:=PFFININ(1083 ,N ,1231 )/10000{XG51};
负债总额2:=PFFININ(1106 ,N ,1231 )/10000{XG51};
流动负债2:=PFFININ(1097 ,N ,1231 )/10000{XG51};
股东权益2:=PFFININ(1114 ,N ,1231 )/10000{XG51};
流动资产2:=PFFININ(1064 ,N ,1231 )/10000{XG51};
流动资金本2:=流动资产2-流动负债2{XG51};
主营业务收入2:=PFFININ(1251 ,N ,1231 )/10000{XG51};
营业利润2:=PFFININ(1263 ,N ,1231 )/10000{XG51};
留存收益2:=PFFININ(1111 ,N ,1231 )/10000{XG51};
销售收入2:=主营业务收入2;

x1K:=流动资金本2/资产总额2*100{XG51};
x2K:=留存收益2/资产总额2*100{XG51};
x3K:=营业利润2/资产总额2*100{XG51};
x4K:=股东权益2/负债总额2*100{XG51};
x5K:=销售收入2/资产总额2*100{XG51};
zK:(1.2*x1K+1.4*x2K+3.3*x3K+0.6*x4K+0.999*x5K)/100,linethick0;

资产总额3:=PFFININ(1083 ,n-1,1231 )/10000{XG51};
负债总额3:=PFFININ(1106 ,n-1,1231 )/10000{XG51};
流动负债3:=PFFININ(1097 ,n-1,1231 )/10000{XG51};
股东权益3:=PFFININ(1114 ,n-1,1231 )/10000{XG51};
流动资产3:=PFFININ(1064 ,n-1,1231 )/10000{XG51};
流动资金本3:=流动资产2-流动负债2;

主营业务收入3:=PFFININ(1251 ,n-1,1231 )/10000{XG51};
营业利润3:=PFFININ(1263 ,n-1,1231 )/10000;

留存收益3:=PFFININ(1111 ,N-1 ,1231 )/10000{XG51};
销售收入3:=主营业务收入3{XG51};
x1上:=流动资金本3/资产总额3*100{XG51};
x2上:=留存收益3/资产总额3*100{XG51};
x3上:=营业利润3/资产总额3*100{XG51};
x4上:=股东权益3/负债总额3*100{XG51};
x5上:=销售收入3/资产总额3*100{XG51};
z上:(1.2*x1上+1.4*x2上+3.3*x3上+0.6*x4上+0.999*x5上)/100,linethick0;

资产总额4:=PFFININ(1083 ,n-2,1231 )/10000{XG51};
负债总额4:=PFFININ(1106 ,n-2,1231 )/10000{XG51};
流动负债4:=PFFININ(1097 ,n-2,1231 )/10000{XG51};
股东权益4:=PFFININ(1114 ,n-2,1231 )/10000{XG51};
流动资产4:=PFFININ(1064 ,n-2,1231 )/10000{XG51};
流动资金本4:=流动资产2-流动负债2{XG51};
主营业务收入4:=PFFININ(1251 ,n-2,1231 )/10000{XG51};
营业利润4:=PFFININ(1263 ,n-2,1231 )/10000{XG51};
留存收益4:=PFFININ(1111 ,N-2 ,1231 )/10000{XG51};
销售收入4:=主营业务收入4{XG51};
x1前:=流动资金本4/资产总额4*100{XG51};
x2前:=留存收益4/资产总额4*100{XG51};
x3前:=营业利润4/资产总额4*100{XG51};
x4前:=股东权益4/负债总额4*100{XG51};
x5前:=销售收入4/资产总额4*100{XG51};
z前:(1.2*x1前+1.4*x2前+3.3*x3前+0.6*x4前+0.999*x5前)/100,linethick0{XG51};
DRAWTEXTREL( 0, 0, '序号' ),coloryellow{XG51};
DRAWTEXTREL( 50, 0, '指标说明' ),coloryellow{XG51};
DRAWTEXTREL(250, 0,''+NUMTOstRN(n-2,0)+'年'),coloryellow{XG51};
DRAWTEXTREL(400, 0,''+NUMTOSTRN(n-1,0)+'年'),coloryellow{XG51};
DRAWTEXTREL(550, 0,''+NUMTOSTRN(n,0)+'年'),coloryellow{XG51};
DRAWTEXTREL(700, 0,''+NUMTOSTRN(FINANCE2(1),0)),coloryellow{XG51};
DRAWTEXTREL(850, 0, '结果（用年报）'),coloryellow;

DRAWTEXTREL( 10, 100, 'X1' ),coloryellow{XG51};
DRAWTEXTREL( 10, 200, 'X2' ),coloryellow{XG51};
DRAWTEXTREL( 10, 300, 'X3' ),coloryellow{XG51};
DRAWTEXTREL( 10, 400, 'X4' ),coloryellow{XG51};
DRAWTEXTREL( 10, 500, 'X5' ),coloryellow{XG51};
DRAWTEXTREL( 20, 650, 'Z计分模型' ),coloryellow{XG51};
DRAWTEXTREL( 50, 100, '营运资金/资产总额' ),coloryellow{XG51};
DRAWTEXTREL( 50, 200, '留存收益/资产总额' ),coloryellow{XG51};
DRAWTEXTREL( 50, 300, '息税前收益/资产总额' ),coloryellow{XG51};
DRAWTEXTREL( 50, 400, '权益市价/负债总额' ),coloryellow{XG51};
DRAWTEXTREL( 50, 500, '销售额/资产总额' ),coloryellow;

DRAWTEXTREL(250, 100,''+NUMTOSTRN(x1前,2)),coloryellow{XG51};
DRAWTEXTREL(400, 100,''+NUMTOSTRN(x1上,2)),coloryellow{XG51};
DRAWTEXTREL(550, 100,''+NUMTOSTRN(x1K,2)),coloryellow{XG51};
DRAWTEXTREL(700, 100,''+NUMTOSTRN(x1新,2)),coloryellow;

DRAWTEXTREL(250, 200,''+NUMTOSTRN(x2前,2)),coloryellow{XG51};
DRAWTEXTREL(400, 200,''+NUMTOSTRN(x2上,2)),coloryellow{XG51};
DRAWTEXTREL(550, 200,''+NUMTOSTRN(x2K,2)),coloryellow{XG51};
DRAWTEXTREL(700, 200,''+NUMTOSTRN(x2新,2)),coloryellow;

DRAWTEXTREL(250, 300,''+NUMTOSTRN(x3前,2)),coloryellow{XG51};
DRAWTEXTREL(400, 300,''+NUMTOSTRN(x3上,2)),coloryellow{XG51};
DRAWTEXTREL(550, 300,''+NUMTOSTRN(x3K,2)),coloryellow{XG51};
DRAWTEXTREL(700, 300,''+NUMTOSTRN(x3新,2)),coloryellow;

DRAWTEXTREL(250, 400,''+NUMTOSTRN(x4前,2)),coloryellow{XG51};
DRAWTEXTREL(400, 400,''+NUMTOSTRN(x4上,2)),coloryellow{XG51};
DRAWTEXTREL(550, 400,''+NUMTOSTRN(x4K,2)),coloryellow{XG51};
DRAWTEXTREL(700, 400,''+NUMTOSTRN(x4新,2)),coloryellow;

DRAWTEXTREL(250, 500,''+NUMTOSTRN(x5前,2)),coloryellow{XG51};
DRAWTEXTREL(400, 500,''+NUMTOSTRN(x5上,2)),coloryellow{XG51};
DRAWTEXTREL(550, 500,''+NUMTOSTRN(x5K,2)),coloryellow{XG51};
DRAWTEXTREL(700, 500,''+NUMTOSTRN(x5新,2)),coloryellow;

DRAWTEXTREL(250, 650,''+NUMTOSTRN(z前,2)),coloryellow{XG51};
DRAWTEXTREL(400, 650,''+NUMTOSTRN(z上,2)),coloryellow{XG51};
DRAWTEXTREL(550, 650,''+NUMTOSTRN(zK,2)),coloryellow{XG51};
DRAWTEXTREL(700, 650,''+NUMTOSTRN(z新,2)),coloryellow;

IF BARSTATUS=2 and zk>=2.675 THEN DRAWTEXTREL(250,800,'若Z≥2.675 则表明企业的财务状况良好，发生破产的可能性较小'),LINETHICK2,COLORFF00FF{XG51};
IF BARSTATUS=2 and zk<=1.81 THEN DRAWTEXTREL(250,800,'若Z≤1.81 则企业存在很大的破产危险'),LINETHICK2,COLORFF00FF{XG51};
IF BARSTATUS=2 and BETWEEN(zk,2.675,1.81) THEN DRAWTEXTREL(250,800,' 若1.81<Z<2.675 则表明企业财务是极为不稳定的。 '),LINETHICK2,COLORFF00FF;

IF BARSTATUS=2 and zk>z上 THEN DRAWTEXTREL(850,650,'提高 '),COLORred{XG51};
IF BARSTATUS=2 and zk<=z上 THEN DRAWTEXTREL(850,650,'下降 '),COLORgreen;

IF BARSTATUS=2 and x5k>x5上 THEN DRAWTEXTREL(850,500,'提高 '),COLORred{XG51};
IF BARSTATUS=2 and x5k<=x5上 THEN DRAWTEXTREL(850,500,'下降 '),COLORgreen;

IF BARSTATUS=2 and x4k>x4上 THEN DRAWTEXTREL(850,400,'提高 '),COLORred{XG51};
IF BARSTATUS=2 and x4k<=x4上 THEN DRAWTEXTREL(850,400,'下降 '),COLORgreen;

IF BARSTATUS=2 and x3k>x3上 THEN DRAWTEXTREL(850,300,'提高 '),COLORred{XG51};
IF BARSTATUS=2 and x3k<=x3上 THEN DRAWTEXTREL(850,300,'下降 '),COLORgreen;

IF BARSTATUS=2 and x2k>x2上 THEN DRAWTEXTREL(850,200,'提高 '),COLORred{XG51};
IF BARSTATUS=2 and x2k<=x2上 THEN DRAWTEXTREL(850,200,'下降 '),COLORgreen;

IF BARSTATUS=2 and x1k>x1上 THEN DRAWTEXTREL(850,100,'提高 '),COLORred{XG51};
IF BARSTATUS=2 and x1k<=x1上 THEN DRAWTEXTREL(850,100,'下降 '),COLORgreen{X~G_5-1~C~N~{};

江南鹰眼的定位仪(大智慧)

源码正文：

jnyy:=(ma(c,5)+ma(c,13)+ma(c,21)+ma(c,32))/4{XG51};
成本差:=ma(jnyy,22){XG51};
指压力:=成本差+2*std(jnyy,22){XG51};
指支撑:=成本差-2*std(jnyy,22){XG51};
var1:=ema(c,3){XG51};
ma5:=ma(c,5){XG51};
var2:=ema(c,8){XG51};
ma21:=ema(c,21){XG51};
aa1:=c*2-ref(c,3/2){XG51};
aa2:=ref(c,3/2)*2-c{XG51};
短期对称:=(aa1+aa2)/2{XG51};
定位指南针:hhv(短期对称,9/2),colorffffff{XG51};
m1:=l*2-ref(h,27/2){XG51};
m2:=ref(h,27/2)*2-l{XG51};
m3:=(m1+m2)/2{XG51};
中期对称:=forcast(m3,21){XG51};
趋势判断:=ma(m3,15){XG51};
sm:=ema(jnyy,21){XG51};
短定位:dma(sm,c/指支撑),pointdot,Linethick3,colorgreen{XG51};
中定位:dma(sm,c/m3-1),color3399ff{XG51};
长定位:dma(sm,c/短期对称-1),colorff0000{XG51};
partline(短定位,短定位>ref(短定位,1),RGB(255,0,255)),Linethick3,pointdot{XG51};
博弈点位:dma(sm,c/指压力-1),coloryellow{X-G!5+1-C-N-{};