M:=14;
N:=6;

Q:=20;

CI4:=IF(PERIOD=0,M,IF(PERIOD=1,M,IF(PERIOD=2,M,IF(PERIOD=3,M,IF(PERIOD=4,M,IF(PERIOD=5,Q,IF(PERIOD=6,Q,IF(PERIOD=7,Q,0))))))));

CI5:=(HIGH+LOW+CLOSE)/3;

CI6:=(CI5-MA(CI5,CI4))/(0.015*AVEDEV(CI5,20));
//QHQQW.COM 
CI7:CI6-REF(CI6,1),NODRAW;

CI8:ABS(REF(CI6,1)-REF(CI6,2)),NODRAW;

CI9:IF(CI7>15 AND CI7<120,CI7,0),NODRAW;

200,COLORFFFF00;

-200,COLORFFFF00;

100,COLORFFFF00;

-100,COLORFFFF00;

CI10:=ATAN(1)*4;

CI11:=30;

CI12:=HHV(HIGH,CI11);

CI13:=LLV(LOW,CI11);

CI14:=25/(CI12-CI13)*CI13;

CI15:=EMA(CLOSE,34);

CI16:=0;

CI17:=1;

CI18:=0;

CI19:=(REF(CI15,1)-CI15)/CI5*CI14;

CI20:=SQRT((CI17-CI16)*(CI17-CI16)+(CI19-CI18)*(CI19-CI18));

CI21:=ROUND(ABS(180*ACOS((CI17-CI16)/CI20)/CI10),0);

CI22:=IF(CI19>0,-CI21,CI21);

CI23:=FORCAST(CLOSE,25);

CI24:=0;

CI25:=1;

CI26:=0;

CI27:=(REF(CI23,1)-CI23)/CI5*CI14;
//QHQQW.COM 
CI28:=SQRT((CI25-CI24)*(CI25-CI24)+(CI27-CI26)*(CI27-CI26));

CI29:=ROUND(ABS(180*ACOS((CI25-CI24)/CI28)/CI10),0);

CI30:=IF(CI27>0,-CI29,CI29);

CI31:=CI6;

CI32:=BARSLAST(NOT(CI31>0));

CI33:=BARSLAST(NOT(CI31<0));

CI34:=BARSLAST(CI32>=6 AND SUM(CI31>100,5)>0);

CI35:=BARSLAST(CI33>=6 AND SUM(CI31<-100,5)>0);

CI36:=CI31>0 AND CI34<CI35;

CI37:=CI31<0 AND CI34>CI35;

CI38:=CI32>=5 AND NOT(CI36) OR CI33>=5 AND NOT(CI37);

STICKLINE(CI36,0,CI6,1,0),COLORFF0000;

STICKLINE(CI37,0,CI6,1,0),COLORFF00FF;

STICKLINE(CI38,0,CI6,1,0),COLORFFFFF0;

STICKLINE(NOT(CI36 OR CI37 OR CI38),0,CI6,3,0),COLOR808080;

CI39:CI6,COLORF00FF0,LINETHICK2;

CI40:(CI5-MA(CI5,N))/(0.015*AVEDEV(CI5,N));

STICKLINE(CI22>=5,-301,-321,8,0),COLORD0E040;

STICKLINE(CI22<5 AND CI22>=3.57,-301,-321,8,0),COLORFF6400;

STICKLINE(CI22<3.57 AND CI22>=2.14,-301,-321,8,0),COLOR98FB98;

STICKLINE(CI22<2.14 AND CI22>=0.71,-301,-321,8,0),COLORFF00FF;

STICKLINE(CI22<0.71 AND CI22>-0.71,-301,-321,8,0),COLORFFF00F;

STICKLINE(CI22<=-0.71 AND CI22>-2.14,-301,-321,8,0),COLORE0FFFF;

STICKLINE(CI22<=-2.14 AND CI22>-3.57,-301,-321,8,0),COLORA5FF00;

STICKLINE(CI22<=-3.57 AND CI22>-5,-301,-321,8,0);

STICKLINE(CI22<=-5,-301,-321,8,0),COLOR8B0000;

CI41:=IF(ABS(CI22)>=15 AND ABS(CI22+CI30)>=50,IF(CI30>0,2,-2),IF(ABS(CI22)>=0 AND (CI22>=0 AND CI30>=0 OR CI22<=0 AND CI30<=0) AND ABS(CI22+CI30)>=5,IF(CI30>0,1,-1),0));

STICKLINE(ABS(CI41)=2,301,321,8,0),COLORFF0088;

STICKLINE(ABS(CI41)=1,301,321,8,0),COLORFFFF88;

STICKLINE(ABS(CI41)=0,301,321,8,0),COLORFF8800;

IF(CLOSE>CI23,0,NULL),LINETHICK3,COLORFF0099;

IF(CLOSE<CI23,0,NULL),LINETHICK3,COLORFF6666;

IF(CLOSE=CI23,0,NULL),LINETHICK3,COLORFFFF66;

DRAWICON(ABS(CI6)>=200,CI6,3);