% Trailing stoploss Optimised System

Hi!

I require the Enhanced optimized System with the help of following indicator. Please anybody code it.

Stop_Trail%

perc:=Input("Trailing Loss % :",0,100,14);
loss:=C*perc/100;
trail:=
If(C>PREV AND Ref(C,-1)>PREV,
Max(PREV,C-loss),
If(C<PREV AND Ref(C,-1)<PREV,
Min(PREV,C+loss),
If(C>PREV,C-loss,C+loss)));
Trail

Thanks in Advance