on *:start: { 
  hmake badnick
  hmake kufur
  hmake reklam
  hload badnick badnick.doktrin
  hload kufur kufur.doktrin
  hload reklam reklam.doktrin
  if !$isfile(muafkanal.db) { .write muafkanal.db } 
  if !$isfile(muafnick.db) { .write muafnick.db } 
}
alias _prots {
  tokenize 32 $1-
  if ($1 = <-) {
    if ($3 = JOIN) {
      var %nick = $right($gettok($2,1,33),-1),%chan = $right($4,-1)
      if $read(muafkanal.db,w,%chan) || $read(muafnick.db,w,%nick) { return }
      if $me isop %chan || o isin $usermode {
        if $hfind(badnick,%nick,1,W).data {
          ban -k %chan %nick 2 badnick
        }
      }
    }
    elseif ($3 = PRIVMSG) {
      if ($4 ischan) {
        var %nick = $right($gettok($2,1,33),-1),%text = $right($5-,-1),%chan = $4
        if $read(muafkanal.db,w,%chan) || $read(muafnick.db,w,%nick) { return }
        if $me isop %chan || o isin $usermode {
          if $hfind(kufur,%text,1,W).data {
            ban -k %chan %nick 2 kufur
          }
          if $hfind(reklam,%text,1,W).data {
            ban -k %chan %nick 2 reklam
          }
        }
      }
    }
  }
}
alias ekle {
  if !$1 { echo $colour(info) $timestamp *** Hatalı işlem! Kullanım şekli: /ekle <muafnick|muafkanal|badnick|kufur|reklam> <eklenecek>  | return }
  if $1 == muafnick {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Eklenecek muafnicki girmediniz. | return }
    else {
      write muafnick.db $2      
      echo $colour(info) $timestamp $+(7,$2,) veritabanına başarıyla eklendi.
    }
  }
  elseif $1 == muafkanal {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Eklenecek muafkanalı girmediniz. | return }
    else {
      write muafnick.db $2      
      echo $colour(info) $timestamp $+(7,$2,) veritabanına başarıyla eklendi.
    }
  }
  elseif $1 == badnick {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Eklenecek badnicki girmediniz. | return }
    else {
      hadd -m badnick $r(1000,999999) $2
      hsave badnick badnick.doktrin
      echo $colour(info) $timestamp $+(7,$2,) veritabanına başarıyla eklendi.
    }
  }
  elseif $1 == kufur {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Eklenecek küfürü girmediniz. | return }
    else {
      hadd -m kufur $r(1000,999999) $2-
      hsave kufur kufur.doktrin
      echo $colour(info) $timestamp $+(7,$2-,) veritabanına başarıyla eklendi.
    }
  }
  elseif $1 == reklam {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Eklenecek reklamı girmediniz. | return }
    else {
      hadd -m reklam $r(1000,999999) $2-
      hsave reklam reklam.doktrin
      echo $colour(info) $timestamp $+(7,$2-,) veritabanına başarıyla eklendi.
    }
  }
}
alias sil {
  if !$1 { echo $colour(info) $timestamp *** Hatalı işlem! Kullanım şekli: /sil <muafnick|muafkanal|badnick|kufur|reklam> <silinecek>  | return }
  if $1 == muafnick {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Silinecek muafnicki girmediniz. | return } 
    if $read(muafnick.db,w,$2) {
      write $+(-ds,$2) muafnick.db
      echo $colour(info) $timestamp $+(7,$2,) veritabanından başarıyla silindi.
    }
    else { echo $colour(info) $timestamp $+(7,$2,) veritabanında bulunamadı | return }
  }
  elseif $1 == muafkanal {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Silinecek muafkanalı girmediniz. | return } 
    if $read(muafkanal.db,w,$2) {
      write $+(-ds,$2) muafkanal.db
      echo $colour(info) $timestamp $+(7,$2,) veritabanından başarıyla silindi.
    }
    else { echo $colour(info) $timestamp $+(7,$2,) veritabanında bulunamadı | return }
  }
  elseif $1 == badnick {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Silinecek badnicki girmediniz. | return } 
    if $hfind(badnick,$2,1,W).data {
      hdel badnick $ifmatch
      hsave badnick badnick.doktrin
      echo $colour(info) $timestamp $+(7,$2,) veritabanından başarıyla silindi.
    }
    else { echo $colour(info) $timestamp $+(7,$2,) veritabanında bulunamadı | return }
  }
  elseif $1 == kufur {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Silinecek küfürü girmediniz. | return } 
    if $hfind(kufur,$2,1,W).data {
      hdel kufur $ifmatch
      hsave kufur kufur.doktrin
      echo $colour(info) $timestamp $+(7,$2,) veritabanından başarıyla silindi.
    }
    else { echo $colour(info) $timestamp $+(7,$2,) veritabanında bulunamadı | return }
  }
  elseif $1 == reklam {
    if !$2 { echo $colour(info) $timestamp *** Hatalı işlem! Silinecek reklamı girmediniz. | return } 
    if $hfind(reklam,$2,1,W).data {
      hdel reklam $ifmatch
      hsave reklam reklam.doktrin
      echo $colour(info) $timestamp $+(7,$2,) veritabanından başarıyla silindi.
    }
    else { echo $colour(info) $timestamp $+(7,$2,) veritabanında bulunamadı | return }
  }
}