Simple snippet to censor your queries.

; Simple <censored> snippet for pms
; Code written by Taurus 
; Please make sure to edit the variable or this snippet will not work.
; Enable or disable script through the menu

on !^*:text:*:?:{ 
  if (%censor.pms) { 
    var %c = $1-, %x = swears go here separated by spaces, %y = 1
    while ($gettok(%x,%y,32)) { 
      if ($findtok(%c,$v1,32)) { var %c = $replacex(%c,$gettok(%x,%y,32),<censored>) } 
      inc %y
    }
    echo $nick $+(<,$nick,>) %c 
    haltdef
  }
}

menu query { 
  $iif(%censor.pms,$style(1) Censor PMs, Censor PMs):$iif(%censor.pms,unset %censor.pms,set %censor.pms true)
}