;=====================
;Nick Completion v2.0
;      By Ss
;=====================


on *:input:#:{ 
 if (/* !iswm  $1) { var %NCc = 1
  while ($gettok($1-,%NCc,32)) { 
   if ($gettok($1-,%NCc,32) ison #) { set %NC %NC [- $+ $gettok($1-,%NCc,32) -] }
   else { set %NC %NC $gettok($1-,%NCc,32) }
   inc %Ncc
  }
  msg # %NC
  unset %NC
  halt
 }
}

;¿Facil?. Veamoslo pasa a paso.
; --> while ($gettok($1-,%NCc,32)) [ mientras halla palabras "sin escanear" ejecutamos el bucle ]
; --> if ($gettok($1-,%NCc,32) ison #) [ si la palabra(nick) esta en el canal, se setea la variable con su contenido mas la "palabra/nick" con los adornos ]
; --> else [ en caso de que la palabra no este en el canal, se setea la variable con su contenido y la palabra sin completar ]
; --> msg # %NC [ enviamos al canal la cadena modificada ]



		_-_-_-_-_-_-_-_-_-_-_-_-_--_-_-_-_-_-_-_-_-
		_-            \\  ||  //                 _-
		_-             [- Ss -]                  _-
		_-            //  ||  \\                 _-
		_-     http://Sscript.infdj.com          _-
		-_-_-_-_-_-_-_-_-_-_-_-_-_--_-_-_-_-_-_-_-_