on *:text:*:#:{
  if $regex($1,/^[!.-]ceza[ılİ]l$/lı) {
    if !$2 { msg # Lütfen nick belirtiniz. 4ORN 2!ceza Pcc }
    elseif ($2 == $me) { msg # Benim üzerime işlem yapamazsınız =) }
    else { .hadd -ms Baks $strip($2) # | .whois $strip($2) }
  }
}
on *:part:#cezalı:{
  if $hget(ceza,$nick) { 
    .msg $nick Süreniz daha dolmadığından #cezalı kanalından çıkamazsınız.! Kalan süre:4 $hget(cezas,$nick).unset 
    sajoin $nick #cezalı
  }
}
raw 318:*:$iif($hget(Baks,$4),.hdel -ms Baks $4)
raw 401:*:$iif($hget(Baks,$4),msg $hget(Baks,$4) $4 nick'i sunucuda bulunmamaktadır..)
raw 311:*:{
  if $hget(Baks,$4) {
    .shun $4 +7d #cezalı kanalına alındınız!
    .sajoin $4 #cezalı
    .msg $4 Merhaba, kurallara uymadığınızdan süre boyunca #cezalı kanalına alındınız ve üzerinize shun uygulandı..
    .msg $hget(Baks,$4) $4 nick'i #cezalı kanalına alındı ve shun uygulandı..
    .hadd -msu300 ceza $4 $hget(Baks,$4)
    $+(.timer,$4,¿ceza) 1 305 _ceza $4
  }
}
alias _c_cezalı { sapart $1 #cezalı | sajoin $1 #Oyun,#Radyo,#Sohbet | msg $1  cezanız bitmiştir, lütfen kurallara uyunuz! }