Code:
on *:INPUT:#,?:{
  if (!$ctrlenter && /* !iswm $1) {
    var %wordMistakes = /\b(word1|word2|word3|...)\b/ig
    tokenize 32 $regsubex($1-,%wordmistakes,$fixword(\t))
    msg $active $1-
    halt
  }
}
alias fixword {
  if ($1- == word1) { return word1replacement }
  elseif ($1- == word2) { return word2replacement }
  elseif ($1- == word3) { return word3replacement }
  elseif ($1- == ...) { return ...replacement }
  else { return $1- }
}

how I would do it, anyways

Last edited by FroggieDaFrog; 14/05/10 12:15 AM.
I am SReject
My Stuff