总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');上市日期:=STRCAT(' 上市日期: ',CON2STR(FINANCE(42),0));股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期));市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));净利润率:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率));X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;X3:=FINANCE(23)/FINANCE(10)*3.3;X4:=FINANCE(19)/FINANCE(15)*0.6;X5:=FINANCE(20)/FINANCE(15)*0.999;Z值:=X1+X2+X3+X4+X5;预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'轻警','无警'));财务预警:=STRCAT('财务预警: ',STRCAT(预警,STRCAT('-Z值: ',CON2STR(Z值,3))));优质资产率:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));现金负债比:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));财务系数:=STRCAT('风险系数: ',STRCAT(STRCAT(财务预警,优质资产率),现金负债比));DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,财务系数),COLOR888888;DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,当前业绩),COLOR888888;DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,股本市值),COLOR888888;CA:=LLVBARS(L,60);CAT:=BArslAST(CURRBARSCOUNT=CONST(CA)+1);CAT1:=FINDHIGHBARS(H,CA+1,60,1);CAT2:DRAWLINE(CURRBARSCOUNT=CONST(CAT1)+1,H,ISLASTBAR,REF(H,CAT1),0),COLORFFFFFF,LINETHICK2;CAT3:=BARSLAST(CURRBARSCOUNT=CONST(CAT1)+1);DRAWLINE(CAT3=0,H,CAT=0,L,0),COLORFF8000,LINETHICK2;CAT4:DRAWLINE(CAT=0,(CAT2-L)*0.618+L,ISLASTBAR,REF((CAT2-L)*0.618+L,CAT),0)DOTLINE,COLORLIMAGENTA;CAT5:=IF(C>O OR (C=O AND C>=REF(C,1)),vol,0);CAT6:=IF(C<O OR (C=O AND C<REF(C,1)),VOL,0);CAT7:=SUM(CAT5,CAT)/SUM(CAT6,CAT);XGG:=COUNT(crOSS(C>=CAT2,0.5),CAT+1)=1 AND CROSS(C>=CAT2,0.5) AND CAT7>1.5;DRAWICON(XGG,L,9);DRAWTEXT(XGG,L*0.98,'←突破'),COLORYELLOW;STICKLINE(XGG,C,O,2,0),COLORYELLOW;STICKLINE(XGG,H,L,0,0),COLORYELLOW;DRAWTEXT(CAT=0,L*0.98,'←V型底'),COLORYELLOW;T:=BARSLAST(CROSS(C,REF(H,CAT3)));CAT8:=C/REF(H,CAT3);CAT9:=BARSLAST(CAT8=HHV(CAT8,T+1));DF:=(C-REF(C,CAT9+1))/REF(C,CAT9+1)*100;JL:=L/REF(H,CAT3);CAT10:=DF<-8 AND JL<1.075 AND MIN(C,O)*1.005>=REF(H,CAT3);CAT11:=BARSLAST(COUNT(CAT10,T+1)=1 AND CAT10);CAT12:=BacKSET(CAT11=0,CAT9+1);CAT13:=BARSLAST(CROSS(CAT12=1,0.5));CAT14:=REFX(DF,BARSNEXT(CAT11=0));DRAWICON(CROSS(CAT11=0,0.5),L*0.99,1);DRAWTEXT(CROSS(CAT11=0,0.5),L*0.980,'←回踩'),COLORYELLOW;DRAWLINE(T=0,REF(H,CAT3),CAT13=0,REF(H,CAT13),0),DOTLINE,COLORYELLOW;DRAWLINE(CAT13=0,REF(H,CAT13),CAT11=0,REF(H,CAT3),0),DOTLINE,COLORYELLOW;DRAWTEXT(CAT3=0,REF(H,CAT3)*1.05,VARCAT(VARCAT('压力价：',VAR2STR(REF(H,CAT3),2)),'元'))COLORYELLOW;DRAWLINE(CAT13=0,REF(H,CAT13)*1.05,CAT13=10,REF(H,CAT13)*1.05,0),COLORWHITE,LINETHICK3;DRAWTEXT(CAT13=0,REF(H,CAT13)*1.01,VARCAT(VARCAT('信号处跌幅：',VAR2STR(CAT14,2)),'%'))COLORYELLOW;
