on ^*:part:#: {
  if $istok(#kelebek #radyo,$chan,32) { halt }
  if $nick == $me {
    echo -t # 14» 14»14 # kanalından çıktınız. ( $+ $me rumuzu ile, $replace($replace($asctime,sun,Pazar,mon,Pazartesi ,tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumártesi, fri,Cuma,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may ,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylü l,oct,Ekim,nov,Kasım,dec,Aralık),á,a) $+ )
    echo -ts 14» 14»14 # kanalından çıktınız. ( $+ $me rumuzu ile, $replace($replace($asctime,sun,Pazar,mon,Pazartesi ,tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumártesi, fri,Cuma,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may ,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylü l,oct,Ekim,nov,Kasım,dec,Aralık),á,a) $+ )
  }
  echo -t # $+(,$color(quit)) $+ 2 $nick $address
  if $query($nick) {
    echo -t $nick $+(,$color(quit)) $+ $nick $address # kanalından çıktı.
  }
  haltdef
}
on ^*:join:#: {
  if $istok(#kelebek #radyo,$chan,32) { halt }
  if $nick == $me {
    echo -t # 10» 10»10 # kanalına girdiniz. ( $+ $me rumuzu ile, $replace($replace($asctime,sun,Pazar,mon,Pazartesi ,tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumártesi, fri,Cuma,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may ,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylü l,oct,Ekim,nov,Kasım,dec,Aralık),á,a) $+ )
  }
  else {
    if $getoption(kisiselflood) && $me !isop # && $me !ishop # && o !isincs $usermode {
      inc $+(-u,$hget(_jpayar,saniye)) %jpff. [ $+ [ $+($address($nick,2),#) ] ] 1
      if %jpff. [ $+ [ $+($address($nick,2),#) ] ] >= $hget(_jpayar,kez) {
        if %jpff. [ $+ [ $+($address($nick,2),#) ] ] == $hget(_jpayar,kez) {
          linesep #
          _bilgiq # $address($nick,2) IP'sinden yoğun giriş/çıkış yapıldığı için gösterilmedi.
          linesep #
        }
        halt
      }
    }
    var %c # , %nc $nick , %ret
    if $ialchan($address(%nc,2),%c,0) > 1 {
      var %i 1
      while %i <= $ialchan($address(%nc,2),%c,0) {
        if $ialchan($address(%nc,2),%c,%i).nick != %nc {
          %ret = $addtok(%ret,$ialchan($address(%nc,2),%c,%i).nick, 44)
        }
        inc %i
      }
    }
    echo -t # $+(,$color(join)) $+ $nick $address
    if $query($nick) {
      echo -t $nick $+(,$color(join)) $+ Giriş: $nick $address # kanalına girdi.
    }
  }
  haltdef
}
on ^*:quit: {
  var %i 1
  while $comchan($nick,%i) {
    $iif(!$istok(#kelebek #radyo,$comchan($nick,%i),32),echo -t $comchan($nick,%i) $+(,$color(quit)) $+ 14 $nick $address $1- )
    inc %i
  }
  if $query($nick) {
    echo -t $nick $+(,$color(quit)) $+ 14 $nick 14( $address ) $1- )
  }
  halt
}