IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar Hızlı Badnick korumasi (Debug sistem)
Hızlı Badnick korumasi (Debug sistem)
Aytac
Hızlı Badnick korumasi (Debug sistem)
0
188
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
sistem debug badnick korumasi hızlı

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
  • Konular335
  • Mesajlar341
  • Beğenileri:15 in 12 posts
  • Beğendiği:7
  • Rep puanı 4

Kod sahibi: Set

Bugunlerde herkes hızlı bir badnick korumasi ariyor, bende bunu debugli sistem yapayim dedim, ins işinize yarar.

Komutlar: /badnick on-/-off-/-ekle *Mask*-/-sil *Mask*

Kod :
alias badnick {
  var %1 $gettok($1-,1,32)
  if ($1 == on) { .debug -i on badnick | echo 4 -ea  Badnick korumasi acildi. }
  if ($1 == off) { .debug -i off badnick | echo 4 -ea  Badnick korumasi kapatildi }
  if ($1 == ekle) {
    if $ulist($2,bad,1) { echo -ea $2 zaten ekli | return }
    echo -ea $2 badnick eklendi.
    .auser bad $2
  }
  if ($1 == sil) {
    if !$ulist($2,bad,1) { echo -ea $2 zaten listede yok | return }
    echo -ea $2 listeden silindi.
    .ruser bad $2
  }
  if %1 = <- {
    tokenize 32 $gettok($1-,2-,32)
    if $regex($2,/join/i) {
      var %nick $right($token($1,1,33),-1), %ident $token($token($1,1,64),2,33), %host $token($1,2,64), %chan $right($3,-1)
      if $level(%nick) == bad && $nick(%chan,$me,oh) && (%nick !== $me) {
        echo %chan ***4Badnick girisi: %nick 4Mask: $maskbul(badnick,%nick) (4Bani-Ac)
        kick %chan %nick 4Badnick girisi yasak.
        mode %chan +b %nick
      }
    }
  }
}
alias maskbul {
  var %x 1
  while $ulist($2,$1,%x) {
    var %mask $addtok(%mask,$v1,32)
    inc %x
  }
  return %mask
}
on $^*:hotlink:/\Bani-Ac/S:#:return
on *:hotlink:*:#:if $regex($strip($hotline),girisi:(.+)Mask) { mode # -b $regml(1) }

mIRC Badnick koruma
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.



Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  mIRC Küfür Koruması (Hotlink) Aytac 0 430 07.07.2020, 22:38
Son Mesaj: Aytac
  mIRC Hızlı Memo Gönderimi (Multi Mesaj) Aytac 0 171 28.03.2020, 18:08
Son Mesaj: Aytac
  mIRC Kanal Yetki Koruması Aytac 0 197 19.03.2020, 22:45
Son Mesaj: Aytac
  RANDOM Nick/Ident Koruması Aytac 0 225 16.03.2020, 01:18
Son Mesaj: Aytac
asiren
Proxy Koruması - Güncel Aytac 0 231 16.03.2020, 01:12
Son Mesaj: Aytac

Foruma Git: