N:=34;M:=0;

0,coloryellow;
C0:=(h+l+c)/3;
(EMA(C0,14)+EMA(C0,28)+EMA(C0,56))/3,color008800;
(EMA(C0,13)+EMA(C0,26)+EMA(C0,52))/3,color008f00;
(EMA(C0,12)+EMA(C0,24)+EMA(C0,48))/3,color009800;
(EMA(C0,11)+EMA(C0,22)+EMA(C0,44))/3,color009f00;
(EMA(C0,10)+EMA(C0,20)+EMA(C0,40))/3,color00a800;
(EMA(C0,9)+EMA(C0,18)+EMA(C0,36))/3,color00af00;
(EMA(C0,8)+EMA(C0,16)+EMA(C0,32))/3,color00b800;
(EMA(C0,7)+EMA(C0,14)+EMA(C0,28))/3,color00bf00;
(EMA(C0,6)+EMA(C0,12)+EMA(C0,24))/3,color00c800;
(EMA(C0,5)+EMA(C0,10)+EMA(C0,20))/3,color00cf00;
(EMA(C0,4)+EMA(C0,8)+EMA(C0,16))/3,color00df00;
(EMA(C0,3)+EMA(C0,6)+EMA(C0,12))/3,color00ef00;
(EMA(C0,2)+EMA(C0,4)+EMA(C0,8))/3,color00ff00;

a:=BARSCOUNT(c);
ah:=hhv(h,200);al:=llv(l,200);a0:=(ah-al)/40;a1:=h+a0;a2:=l-a0;
if((a+m)/n=FLOOR((a+m)/n),a1,0),color0000ff;
{stickline((a+m)/n=FLOOR((a+m)/n),a2,a2-8*a0,9,0),color0000ff;}
{drawtext((a+m)/n=FLOOR((a+m)/n),a2-7*a0,'警戒'),colorffffff;}