VAR1:=EMA(CLOSE,30);
VAR2:=EMA(CLOSE,900);
STICKLINE((VAR1>VAR2),VAR1,VAR2,0.8,0),COLORRED;
STICKLINE((VAR1< VAR2),VAR1,VAR2,0.8,0),COLORGREEN;
VAR3:=MAX(DYNAINFO(3),DYNAINFO(5));
VAR4:=MIN(DYNAINFO(3),DYNAINFO(6));
VAR5:=VAR3-VAR4;
VAR6:=VAR4+VAR5*7/8,COLORLIGREEN;
VAR7:=VAR4+VAR5*0.5/8,COLORLIMAGENTA;
VAR8:=(VAR7+VAR6)/2,COLORWHITE,POINTDOT;
VAR9:=SUM(V*C,0)/SUM(V,0),COLORYELLOW,DOTLINE;
VAR10:=CLOSE,COLORWHITE,LINETHICK2;
DRAWTEXT( ISLASTBAR AND VAR10,VAR10,STRCAT('←',CON2STR(VAR10,2))),COLORYELLOW;
STICKLINE(crOSS(VAR7,VAR10),VAR7,VAR8,1,0),COLORCC00FF;
STICKLINE(CROSS(VAR10,VAR6),VAR6,VAR8,1,0),COLOR33FF33;
DRAWTEXT(LONGCROSS(VAR7,VAR10,2),VAR7*1.001,'★买'),COLORFF66FF ;
DRAWTEXT(LONGCROSS(VAR10,VAR6,2),VAR6*0.999,'☆卖'),COLOR66FF33;
STICKLINE(C< VAR7,VAR7,C,2,0),COLORRED;
STICKLINE(CROSS(VAR7,VAR10),VAR7,(VAR7-VAR8)/5+VAR7,2,0),COLORYELLOW;
DRAWTEXT(CROSS(VAR7,VAR10),(VAR7-VAR8)/5+VAR7,'底'),COLORYELLOW;
STICKLINE(CROSS(VAR10,VAR6),VAR6,VAR6-(VAR7-VAR8)/5,2,0),COLORLIRED;
DRAWTEXT(CROSS(VAR10,VAR6),VAR6-(VAR7-VAR8)/5,'顶'),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=8,VAR6+0.003,'顶'),COLORGREEN,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=8,VAR7-0.003,'底'),COLORLIRED,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=8,(VAR7+VAR6)/2,'中'),COLORWHITE,LINETHICK1;
VAR11:=V*C/100,NODRAW;
VAR12:=SUM((IF(((VAR11/8>20) AND (CLOSE>(REF(CLOSE,1)))),VAR11,0)),0);
VAR13:=SUM((IF(((VAR11/8>20) AND (CLOSE< (REF(CLOSE,1)))),VAR11,0)),0);
VAR14:=(VAR12+VAR13);
VAR15:=IF((ISLASTBAR),((100*VAR12)/VAR14),0);
VAR16:=IF((ISLASTBAR),((100*VAR13)/VAR14),0);
VAR17:=1;
VAR18:=STRCAT(STRCAT('机勾买鱼',CON2STR((100*VAR12)/VAR14,0)),'％');
VAR19:=STRCAT(STRCAT('机勾卖鱼',CON2STR((100*VAR13)/VAR14,0)),'％');
VAR20:=STRCAT(STRCAT('机勾总买鱼',CON2STR((100*(VAR12-VAR13))/VAR14,0)),'％');
DRAWTEXT_FIX(VAR17=1,0,0.02,0,VAR18),COLORRED;
DRAWTEXT_FIX(VAR17=1,0,0.13,0,VAR19),COLOR00FF00;
DRAWTEXT_FIX(VAR17=1,0.88,1,0,VAR20),COLOR00FFFF;
VAR21:=BUYvol*DYNAINFO(7)*100/10000 COLOR0000FF,NODRAW;
VAR22:=SELLVOL*DYNAINFO(7)*100/10000 COLOR00FF00,NODRAW;
VAR23:=Abs(VAR21)+ABS(VAR22)COLOR80FFFF,NODRAW;
VAR24:=ABS(VAR21)-ABS(VAR22)COLOR80FFFF,NODRAW;
VAR25:=ABS(VAR21)/VAR23*100;
VAR26:=ABS(VAR22)/VAR23*100;
TESTSKIP(NOT(VAR21 OR VAR22 OR VAR23 OR VAR24 OR VAR25 OR VAR26)!=0);
DRAwrECTREL(595,1000,795,940,RGB(0,128,0));
DRAWRECTREL(595,995,795,945,RGB(0,148,0));
DRAWRECTREL(595,990,795,950,RGB(0,168,0));
DRAWRECTREL(595,985,795,955,RGB(0,188,0));
DRAWRECTREL(595,980,795,960,RGB(0,208,0));
DRAWRECTREL(595,975,795,965,RGB(0,228,0));
DRAWRECTREL(595,970,795,970,RGB(0,248,0));
DRAWRECTREL(595,1000,595+VAR21*210/VAR23,940,RGB(128,0,0));
DRAWRECTREL(595,995,595+VAR21*210/VAR23,945,RGB(148,0,0));
DRAWRECTREL(595,990,595+VAR21*210/VAR23,950,RGB(168,0,0));
DRAWRECTREL(595,985,595+VAR21*210/VAR23,955,RGB(188,0,0));
DRAWRECTREL(595,980,595+VAR21*210/VAR23,960,RGB(208,0,0));
DRAWRECTREL(595,975,595+VAR21*210/VAR23,965,RGB(228,0,0));
DRAWRECTREL(595,970,595+VAR21*210/VAR23,970,RGB(248,0,0));
DRAWRECTREL(595+VAR21*210/VAR23,940,595+VAR21*210/VAR23,1000,RGB(128,0,0));
DRAWRECTREL(795,940,795,1000,RGB(0,0.0,10));
DRAWRECTREL(594.8,939.8,594.8,1000,RGB(0,0,10));
DRAWRECTREL(594.8,939.8,594.8,939.8,RGB(0,0,10));
DRAWRECTREL(594.8,1000,594.8,1000,RGB(0,0,10));
DRAWTEXT_FIX(1,0.54,0.89,0,STRCAT(STRCAT('',CON2STR(VAR21,1)),'万')),COLOR0000FF;
DRAWTEXT_FIX(1,0.785,0.89,0,STRCAT(STRCAT('',CON2STR(VAR22,1)),'万')),COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(VAR24)>0,0.65,0.89,0,STRCAT(' ',STRCAT(CON2STR(VAR24,1),'万'))) COLOR0000FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(VAR24)< 0,0.65,0.89,0,STRCAT(' ',STRCAT(CON2STR(VAR24,1),'万'))) COLOR00FF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(VAR24)=0,0.65,0.89,0,STRCAT(' ',STRCAT(CON2STR(VAR24,1),'万'))) COLOR80FFFF;
DRAWTEXT_FIX(1,0.8,0.98,0,STRCAT(STRCAT(' ',CON2STR(VAR26,1)),'％')),COLOR00FF00;
DRAWTEXT_FIX(1,0.54,0.98,0,STRCAT(STRCAT('',CON2STR(VAR25,1)),'％')),COLOR0000FF;
VAR27:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));
VAR28:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
VAR29:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));
VAR30:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
VAR31:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
VAR32:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));
VAR33:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
VAR34:=STRCAT(' 利润同比: ',CON2STR(FINANCE(43),2));
VAR35:=STRCAT(' 收入同比: ',CON2STR(FINANCE(44),2));
VAR36:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
VAR37:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;
VAR38:=FINANCE(23)/FINANCE(10)*3.3;
VAR39:=FINANCE(19)/FINANCE(15)*0.6;
VAR40:=FINANCE(20)/FINANCE(15)*0.999;
VAR41:=VAR36+VAR37+VAR38+VAR39+VAR40;
VAR42:=IF(VAR41< 1.2,'重警',IF(VAR41>=1.2 AND VAR41< 2.6,'轻警','无警'));
VAR43:=STRCAT('财务预警: ',STRCAT(VAR42,STRCAT('-Z值: ',CON2STR(VAR41,3))));
VAR44:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));
VAR45:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));
VAR46:=STRCAT('风险系数: ',STRCAT(STRCAT(VAR43,VAR44),VAR45));
DRAWTEXT_FIX(ISLASTBAR,0.025,0.96,0,VAR46),COLORCYAN;
VAR47:=YEAR AND MONTH AND DAY;
VAR48:=STRCAT(CON2STR(YEAR,0),'年');
VAR49:=STRCAT(CON2STR(MONTH,0),'月');
VAR50:=STRCAT(CON2STR(DAY,0),'日');
VAR51:=STRCAT('星期',IF(WEEkdAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
VAR52:=STRCAT(STRCAT(STRCAT(VAR48,VAR49),STRCAT(VAR50,VAR51)),'');
DRAWTEXT_FIX(VAR47,0.83,0,0,VAR52),COLORGREEN;
