on *:open:?:*:{  
  if $hget(Kod,$nick) || $hget(Yanlıs,$nick) { .closemsg $nick | return } 
  .hadd -msu20 Mesaj $nick $1-
  .hadd -msu20 Kod $nick $+($rand(a,z),$rand(1,9),$rand(A,Z),$rand(a,z),$rand(1,9),$rand(a,z),$rand(1,9),$rand(A,Z),$rand(1,9))
  .msg $nick Kontrol ediliyorsunuz... 
  $+(.timer,$nick) 1 4 .msg $nick Selam $nick $(|) .msg $nick Bot olmadığınızı kanıtlamak için özelime !kod $hget(Kod,$nick) yazınız. $(|) .msg $nick Kodu 15 saniye içinde girmediğiniz zaman mesajlarınızı göremiyeceğim. 
  $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),.window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
  .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 1,4 $timestamp Özel isteği Nick: $nick
  .closemsg $nick
}
on *:text:*:?:{
  if ($1 == !kod) {
    if !$2 { .msg $nick Lütfen kodu giriniz kullanımı; !kod ŞİFRE | return }
    if ($2 == $hget(Kod,$nick)) {
      $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),.window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
      .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 1,4 $timestamp $nick şifreyi doğru girdiği için özelinize kabul edilmiştir... 
      .msg $nick Şifreniz Doğru. Görüşme talebiniz kabul edilmiştir... Not Sadece İlk Yazdığınız $me Nickine ulaşacaktır... 
      .query $nick
      .echo $nick $timestamp < $+ $nick $+ > $hget(Mesaj,$nick)
      .hdel -ms Mesaj $nick | .hdel -ms Kod $nick
    }
    else {
      .msg $nick Girdiğiniz kod yanlıştır 60 saniyeliğine bana yazmanız engellenmiştir... 
      .ignore $nick
      $+(.timer,$nick) 1 60 .ignore -r $nick
      .closemsg $nick
      $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),.window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
      .echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 1,4 $timestamp $nick ile özel görüşme reddedilmiştir... Çünkü kodu yanlış girmiştir. Girmesi gereken kod: $hget(Kod,$nick) Kod olarak gösterilen yazı: $2 
      .hdel -ms Mesaj $nick | .hdel -ms Kod $nick
      .hadd -msu60 Yanlıs $nick 1
    }
  }
}