Hızlı Badnick korumasi (Debug sistem)

badnick

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*

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) }

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

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) }

önceki yazımızda « Debug Hash Tables – Badnick,Reklam Küfür Korumaları makelemiz var.

Makale Yazarı : admin

27 Kasım, 2018

193

Yazı kategorisi : mIRC Hazır Kodlar

yorum yok

Hızlı Badnick korumasi (Debug sistem)

Etiketler

badnick koruma badnick koruma addonu debug badnick koruma hızlı badnick koruma

Hızlı Badnick korumasi (Debug sistem) İle Benzer Sohbet Yazıları

mirc seslenme

Mirc Seslenme Addonu

mirc

mIRC Fullname yasaklama txt

mirc

mIRC Version Yasaklama

Hızlı Badnick korumasi (Debug sistem) yazına yapılan yorumlar

Bir Yorum Yazmak İstermisiniz ?