As you know ..nick completions only apears at the begining of the text , my idea is to make it apears anywhere on the text ...here is the part i asume it has to be modificate or change it .. if someone cane help me with this ...

/corrige.nicks {
if ( $right($1,1) = : ) {
%nc = 0
%nn = $nick(#,0)
:1
inc %nc 1
if (%nc > %nn) goto 3
%nac = $nick(#,%nc)
%ntm = $len(%nac)
%nsf = $ncmuestra(%nac)
%npart = $remove( $1 ,:)
if (%npart isin %nac) {
%texto = %nsf $+ $right(%texto,$calc($len(%texto) - $len($$1)))
goto 3
}
else { goto 1 }
:3
unset %nac %ntm %nsf %nn %nc %npart
}
elseif ($$1 ison #) {
; %texto = $replace(%texto,$$1,$ncmuestra($nick(#,$nick(#,$$1))))
%texto = $ncmuestra($nick(#,$nick(#,$$1))) $+ $right(%texto,$calc($len(%texto) - $len($$1)))
}
}
ncmuestra {
return $+ %nc1.c $+ $+ %nc1 $+ [ $ $+ [ texto $+ [ %ncnick ] $+ ($$1) ] ] $+ $+ %nc2.c $+ $+ %nc2 $+
}