on *:join:#guvenlik:{
  var %muaf = 1
  var %muafnicks = nick1,nick2,nick3,nick4,nick5
  if %muaf && $istok(%muafnicks,$nick,44) { halt }
  if $nick != $me {
    set %onaykode $rand(100,999)
    write onaykode.txt %onaykode
    .privmsg $chan Sunucumuzda güvenlik nedeni ile bot olarak algılandınız $nick $+ .  60 saniye içersinde Özelime !onay %onaykode yazmalısınız. Aksi halde sunucudan uzaklaştırılacaksınız.
    $+(.timer,$nick) 1 60 zline $nick +0 Bot olarak algılandınız.
    unset %onaykode
  }
  if $lines(onaykode.txt) == 5 {
    write -c onaykode.txt
    write onaykode.txt %onaykode
  }
}
on *:text:*:?:{
  if !onay isin $1 {
    if $read(onaykode.txt,w,$2) {
      privmsg $nick Teşekkürler, güvenlik kodu doğrulandı. Hoş sohbetler dileriz.
      sapart $nick #guvenlik
      unset %onaykode
    }
    if $timer($nick) {
      $+(.timer,$nick) off 
    }
  }
}