My eng. is very bad,i don't understand you, but i hope this code is right code confused :tongue:

Code:
on ^*:text:*:#pets:echo #pets $+(<,$nick,>) $animal($1-) | haltdef
alias animal {
  var %i = $gettok(%animals,0,44),%m = $strip($1-)
  while (0 < %i) {
    if ($istok(%m,$gettok(%animals,%i,44),) set %m $replace(%m,$gettok(%animals,%i,44),Animal!)
   dec %i
  }
  return %m
}
alias ani.add {
 var %k = %animals
 set %animals $addtok(%k,$1,44)
}
alias ani.del {
  var %k = %animals
  set %animals $remtok(%k,$1,44)
}


to add: /ani.add "animal" (e.g: /ani.add cat )
to del: /anidel "animal" (e.g: /ani.del dog )