on *:text:*:#avdet: {
  if $regex($1,/^(!d(o|ö)v)/i) && $2 ison # {
    if %avdetdov_ [ $+ [ $nick ] ] {
      notice $nick Servislerimden tekrar yararlanmak için %avdetdov_ [ $+ [ $nick ] ] saniye kadar beklemelisiniz.
      halt
    }
    set -z %avdetdov_ [ $+ [ $nick ] ] 60
    msg # $2 $nick tarafından dövüldü! $read(dov.txt) ( $nick )
  }
  if $regex($1,/^(!bur(c|ç))/i) && $isfile($mircdirburc\ $+ $2 $+ .txt) {
    if %burc_ [ $+ [ $nick ] ] {
      notice $nick Servislerimden tekrar yararlanmak için %burc_ [ $+ [ $nick ] ] saniye kadar beklemelisiniz.
      halt
    }
    set -z %burc_ [ $+ [ $nick ] ] 60
    var %burc 1
    while %burc <= $lines($mircdirburc\ $+ $2 $+ .txt) {
      notice $nick $read($mircdirburc\ $+ $2 $+ .txt,%burc)
      inc %burc
    }
    msg # $read(burc.txt)
  }
  if $regex($1,/^(!hediye)/i) && $2 ison # {
    if %avdethediye_ [ $+ [ $nick ] ] {
      notice $nick Servislerimden tekrar yararlanmak için %avdethediye_ [ $+ [ $nick ] ] saniye kadar beklemelisiniz.
      halt
    }
    set -z %avdethediye_ [ $+ [ $nick ] ] 60
    msg # $2 $+'e $nick tarafından hediyedir! $read(hediye.txt) ( $nick )
  }
  if $regex($1,/^(!f(i|ı)rlat)/i) && $2 ison # {
    if %avdet_ [ $+ [ $nick ] ] {
      notice $nick Servislerimden tekrar yararlanmak için %avdet_ [ $+ [ $nick ] ] saniye kadar beklemelisiniz.
      halt
    }
    set -z %avdet_ [ $+ [ $nick ] ] 60
    msg # $2 $nick tarafından fırlatıldı! HOooOoOoOp! $read(firlat.txt) ( $nick )
  }
  if $regex($1,/^(!(zar|salla))$/i) {
    if %avdet_zar_  [ $+ [ $nick ] ] {
      notice $nick Servislerimden tekrar yararlanmak için %avdet_zar_ [ $+ [ $nick ] ] saniye kadar beklemelisiniz.
      halt
    }
    set -z %avdet_zar_  [ $+ [ $nick ] ] 60
    msg # Sallıyoruz Zarları...
    set %zar1 $r(1,6)
    set %zar2 $r(1,6)
    if %zar1 == %zar2 {
      msg # Zarlar durdu: %zar1 %zar2 geldi! bu ne şans, al bakalım ödülün.
      mode # +v $nick
      halt
    }
    msg # Zarlar durdu: %zar1 %zar2 geldi! $read(teselli.txt)
  }
}