Kase Dev Stop Long & Short
Plot this indicator on top of the Price chart, Change the color of each line and style to dots and thickness to a medium weight 

Per1:=Input("max length",10,100,30); 
RWH:=(H-Ref(L,-Per1))/(ATR(Per1)*Sqrt(Per1)); 
RWL:=(Ref(H,-Per1)-L)/(ATR(Per1)*Sqrt(Per1)); 
Pk:=Mov((RWH-RWL),3,W); 
AVTR:=Mov(HHV(H,2) - LLV(L,2),20, S); 
SD:=Stdev(HHV(H,2) - LLV(L,2),20); 
Val6:=If(Pk>0,HHV(H-AVTR-(4*SD),20),LLV(L+AVTR+(4*SD),20)); 
Val5:=If(Pk>0,HHV(H-AVTR-(3*SD),20),LLV(L+AVTR+(3*SD),20)); 
Val4:=If(Pk>0,HHV(H-AVTR-(2*SD),20),LLV(L+AVTR+(2*SD),20)); 
Val3:=If(Pk>0,HHV(H-AVTR-SD,20),LLV(L+AVTR+SD,20)); 
Val2:=If(Pk>0,HHV(H-AVTR,20),LLV(L+AVTR,20)); 
Val1:=If(Pk>0,HHV(H-AVTR+SD,20),LLV(L+AVTR-SD,20)); 
Val6;Val5;Val4;Val3;Val2;Val1;