IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar RANDOM Nick/Ident Koruması
irc

RANDOM Nick/Ident Koruması
Aytac
RANDOM Nick/Ident Koruması
0
494
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
koruması ident random nick

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular351
  • Mesajlar364
  • Verilen beğeni8 in 5 posts
  • Alınan beğeni6
  • Rep puanı 6

Random nick ve ident koruması;

Kod :
on *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    ;- Muaf port ekleme.
    if $istok(7000 7005 1453,%_port,32) { return }
    ;- Muaf nick ekleme
    elseif $istok(Nick Nick1 Nick2 Nick3,%_nick,32) { return }
    ;- Muaf ident ekleme
    elseif $istok(Sohbet mIRC Kelebek SoyLe,%_ident,32) { return }
    ;- Muaf IP ekleme
    elseif $istok(88.888.55.258 78.458.88.888,%_ip,32 ) { return }
    elseif $len(%_nick) >= 5 && $_rand(%_nick) >= 80 {
      gzline $+(*@,%_ip) - Random nick ile sunucuya girmek yasak! [ $+(%,$_rand(%_nick)) $_randyz($_rand(%_nick)) ]
      msg #güvenlik $+(4,%_nick,) nick'i random nick kullandığı tespit edildi. $+(%,$_rand(%_nick)) $_randyz($_rand(%_nick))
    }
    elseif $len(%_ident) >= 5 && $_rand(%_ident) >= 80 {
      gzline $+(*@,%_ip) - Random ident ile sunucuya girmek yasak! [ $+(%,$_rand(%_ident)) $_randyz($_rand(%_ident)) ]
      msg #güvenlik $+(4,%_nick,) nick'i random ident kullandığı tespit edildi. $+(%,$_rand(%_ident)) $_randyz($_rand(%_ident))
    }
  }
}
alias _rand {
  var %:sebsessiz $len($regsubex($1,/[aeioöuüÖÜİ0-9]/gSi,\t))
  return $round($iif($round($calc((%:sebsessiz * 100) / $len($1)),1) > 100, 100, $round($calc((%:sebsessiz * 100) / $len($1)),1)),0)
}
alias _randyz {
  var %:yz $iif($len($1) == 3,$+(4,$str(|,10)),$+(4,$str(|,$left($1,1))))
  return $iif($right($1,1) < 5,%:yz,$+(%:yz,ı))   
}
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
asiren
Proxy Koruması - Güncel Aytac 2 998 15.01.2021, 00:04
Son Mesaj: PamiR
asiren
Web Nick Kayıt Aytac 2 611 05.12.2020, 14:21
Son Mesaj: Sadullah
  mIRC Küfür Koruması (Hotlink) Aytac 0 750 07.07.2020, 22:38
Son Mesaj: Aytac
  !gbt Nick/!gbtip IP Aytac 0 504 14.04.2020, 00:58
Son Mesaj: Aytac
  Girişte Nick Şehir Ülke İp Gosterme ve Hotlink İp Banlama Aytac 0 696 02.04.2020, 18:20
Son Mesaj: Aytac

Foruma Git: