on 1:start:{
  hmake kufur
  hload kufur kufur.mercy
}
 on 1:text:*:#:{
  var %::text = $1-
  if $hfind(kufur,$1-,1,W).data && $nick {
    if $me !isop $comchan($nick,1) { halt }
    if $nick isop $comchan($nick,1) { halt }
    if ($nick == BehroozWolf) { halt }
    msg $chan $nick Argo/kufur icerikli konusmalariniz yuzunden 30 dk sureyle susturuldunuz/engellendiniz.
    msg $nick Kanal genelinde kufur/argo icerikli cumleler kurmayalim, seviyeli bir sohbet kurmaya ozen gosterelim.
    msg $nick Yakalanan kelimeniz: 4,4 $hget(kufur,$hfind(kufur,$1-,1,W).data) 
    onotice $chan Küfür korumasina yakalanan user : $nick  
    mode $chan +b $nick
  }
  on *:text:*:#ekşi:{
    if !kotusoz isin $1 {
      hadd -m kufur $r(1000,999999) $gettok($1-,2-,32)
      hsave kufur kufur.mercy
      msg # Kötü Söz Eklendi: $gettok($1-,2-,32)
    }
    if !kotusil isin $1 {
      if $hfind(kufur,$gettok($1-,2-,32),1,W).data {
        hdel kufur $ifmatch
        hsave kufur kufur.mercy
        msg # Kötü Söz Silindi: ( $+ $ifmatch $+ ) $gettok($1-,2-,32)
      }
    }
  }
}