// Downloaded From https://www.WiseStockTrader.com
p1=IIf(C>MA(C,20),1,IIf(C<MA(C,20),-1,0));
p2=IIf(C>MA(C,30),1,IIf(C<MA(C,30),-1,0));
p3=IIf(C>MA(C,5),1,IIf(C<MA(C,5),-1,0));
p4=IIf(C>MA(C,15),1,IIf(C<MA(C,15),-1,0));
p5=IIf(C>MA(C,60),1,IIf(C<MA(C,60),-1,0));
p6=IIf(C>MA(C,10),1,IIf(C<MA(C,10),-1,0));
p7=IIf(C>MA(C,25),1,IIf(C<MA(C,25),-1,0));

d1=(p1+p2+p3+p4+p5+p6+p7)/7;

C5=round(d1);

Plot(C5,"INSYK H",ParamColor("BLUE",colorBlue),
ParamStyle("style",0,maskAll));