Code:
on *:text:where *:*: {
  if ($istok($1-,says,32)) {
    set %animal $gettok($gettok($1-,$calc($findtok($1-,says,32) - 1),32),2,47)
  }
}

Last edited by UOnur; 03/09/05 12:41 PM.