on *:text:*:#: {
  if $regex($1,/([.!]zar)/Si) {
    if ($nick !isvoice #) { notice $nick $nick bu komutu yalnızca voice(+v) konumunda bulunan kullanıcılar kullanabilir. | return }
    elseif $hget(zar,$nick) { notice $nick Bu komutu tekrar kullanabilmek için $zarsure($hget(zar,$nick).unset) beklemeniz gerek. | return }
    else {
      var %rand $rand(1,6), %rand2 $rand(1,6), %hediye $read(hediye.txt)
      hinc -mu3600 zar $nick
      if (%rand == %rand2) { goto kazandi }
      else { goto kaybetti }
      :kazandi
      msg # 2Sallıyoruz zarları 4 $nick 2Haydi yavrum kemik
      msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
      msg # 4 $nick 2hediyeniz ->4 %hediye
      return
      :kaybetti
      msg # 2Sallıyoruz zarları4 $nick 2Haydi yavrum kemik
      msg # 4 $nick 2Zarlar Durdu! 4 $+([ %rand ]) - $+([ %rand2 ])
    }
  }
}
alias zarsure var %zar $calc($1 - $calc($int($calc($1 / 3600)) * 3600)) | return $replace($duration(%zar),mins,$chr(32) $+ dakika,min,$chr(32) $+ dakika,secs,$chr(32) $+ saniye,sec,$chr(32) $+ saniye)