elseif $regex($remove($4,:),/([.!]zar)/Si)  {
    if $hget(zar,$_nick($1)) { swbot notice $_nick($1) 1 Dakika içersinde, Yalnız 1 defa [!]zar Komutunu Kullanabilirsiniz. | return }
    swbot privmsg $3 :Sallıyoruz zarları.. haydi yavrum kemik! $+($_nick($1),...) 
    swbot privmsg $_botchan $_nick($1) $3 kanalında .zar $5 komutunu kullandı.
    if !$hget(zar) { hmake zar }
    hinc -mu1 zar $_nick($1)
    var %dice $rand(1,6)
    var %dice2 $rand(1,6)
    swbot privmsg $3 2Zarlar durdu! $+(%dice,-,%dice2), $+ $read(zar.txt,w)
    if (%dice == %dice2) {
      swbot privmsg $3 Kazandın! Tebrikler $+($_nick($1),!)
      swbot privmsg $3 Hediyen: $+$read(hediye.txt)
    }
    elseif (%dice != $dice2) {
      swbot privmsg $3 Üzgünüm $+($_nick($1),$chr(32)) kazanamadın. Tekrar dene!
    }
  }