N:=14;
TYP:=(H+L+C)/3;
AA00:MA(TYP,N),COLORRED,LINETHICK2;
AA00N:MA(TYP,N*5),COLOR8F8F8F,LINETHICK2;
DRAWBAND(AA00,RGB(120,0,0),AA00N,RGB(50,120,120));
AA200:3*AVEDEV(TYP,N)+MA(TYP,N),COLOR0000FF;
AA100:1.5*AVEDEV(TYP,N)+MA(TYP,N),COLOR0000FF;
BB200:MA(TYP,N)-3*AVEDEV(TYP,N),COLOR0000FF;
BB100:MA(TYP,N)-1.5*AVEDEV(TYP,N),COLOR0000FF;
BBL200:MA(TYP,N)+2*STD(TYP,N),LINETHICK2;
BBL100:MA(TYP,N)-2*STD(TYP,N),LINETHICK2;
BBH200:MA(TYP,N)+STD(TYP,N),LINETHICK2;
BBH100:MA(TYP,N)-STD(TYP,N),LINETHICK2;
{----------------------------------------------------------------};
AA200N:3*AVEDEV(TYP,70)+MA(TYP,70),COLORGRAY,DOTLINE;
AA100N:1.5*AVEDEV(TYP,70)+MA(TYP,70),COLORGRAY,DOTLINE;
BB200N:MA(TYP,70)-3*AVEDEV(TYP,70),COLORGRAY,DOTLINE;
BB100N:MA(TYP,70)-1.5*AVEDEV(TYP,70),COLORGRAY,DOTLINE;
{----------------------------------------------------------------};
CCIN:=(TYP-MA(TYP,70))/(0.015*AVEDEV(TYP,70));
GJ:=(CCIN/10)+40;
WR:=REF(C,5);
ZFU:=((C/WR)-1)*100;
WRG:=((GJ/REF(GJ,1))-1)*100;
ZSH:=((C/REF(C,10))-1)*100;
ZES:=((C/REF(C,20))-1)*100;
SG:=((GJ/REF(GJ,6))-1)*100;
ESG:=((GJ/REF(GJ,16))-1)*100;
LEN:=(ESG-ZES)+30;
MEN:=(SG-ZSH)+30;
SEN:=(WRG-ZFU)+30;
TEN:=LEN+MEN+SEN;
ENCH:=TEN>90 AND HHV(REF(TEN,1),14)<=TEN;
LJGJ:=(LEN>80 OR MEN>80 OR SEN>80) AND LEN>30 AND MEN>30 AND SEN>30;
TENMAVOL:=HHV(REF(TEN,1),15);
TENMDAY:=BARSLAST(TENMAVOL);
ZNTP:=TEN>TENMAVOL AND CLOSE>REF(CLOSE,TENMDAY+1);
XG:LJGJ AND ENCH AND ZNTP,NODRAW;
DRAWICON(FILTER(XG,5),L-4*MINDIFF,34);
DRAWKLINE(H,O,L,C);