Forums Scripts & Popups isin

alias badword {
  var %ctr = 1,%tmp = swear.txt
  while ($read(%tmp,%ctr)) {
    if ($istok($strip($1-),$ifmatch,32)) { return $true | halt }
    inc %ctr
  }
  return $false
}

On @*:TEXT:*:#:{
  if ($badword($1-)) { echo -a Bad word detected from $nick $+ . Do whatever you want here. }
}