badkoruma mask(s) yardımı - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

mys_35 · 12 Mart 2015, 02:26

Kod: Kodu kopyalamak için üzerine çift tıklayın!

#badnick on
on @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]:JOIN:*:{
  if ($ulist($fulladdress,koruma,0) >= 1) { return }
  elseif !$istok(#operhelp #help #sales #karantina #kanal5,$chan,32) {
    inc %kicksayi | mode $chan +b $nick | //var %AjaN $+($chan,help) | /kick $chan $nick  8,2 -=[ $ulist($nick) ]=-     Kick:-=[ %kicksayi $+ ]=-   8,2 ••[ AjaN ]••    
  }
}
alias tara {
  set %:bulunan 0
  var %s 1
  while %s <= $nick(#,0) {
    %:gnick = $nick(#,%s)
    if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
      inc %:bulunan 1
      mode # +b $address(#,2)(%:gnick,666,1)
      inc %kicksayi | kick # %:gnick  0,1 $ulist($nick) 8,2Kick:  %kicksayi $+ %logo
    }
    inc %s
  }
  echo 0,1 ßadNickLer Tarandi:4,1 # - %:bulunan 0,1ßad Nick  ßuLundu.
}
on *:NICK:{ 
  if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
  else {
    if $ulist($+($newnick,!*@*),badnick,0) { 
      var %Cnk = 1 
      while $comchan($newnick,%Cnk) { 
        var %e = $v1 
        if $me isop %e && !$istok(#Radyo #operhelp #help #sales #karantina #kanal5,%e,32) { 
          mode %e +b $newnick 
          kick %e $newnick 8,2 ßad Nick'e Geçtiqiniz için  AjaN Tarafından AtıLdınız ! %logo
        } 
        inc %Cnk 
      } 
    } 
  }
}
alias badnickekle {
  auser badnick $1 $+ !*@*
}
alias badnicksil {
  ruser badnick $1 $+ !*@*
}
alias nickkoruma {
  auser koruma $1 $+ !*@*
}
alias badidentekle {
  auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
  ruser badnick *! $+ $1 $+ @*
}
alias identkoruma {
  auser koruma *! $+ $1 $+ @*
}
#Badnick end
menu *  {
  .AjaN Blacklist Koruması
  ..Aç :.enable #badnick | echo AjaN Blacklist koruması açılmıştır
  ..Kapat:.disable #badnick | echo AjaN Blacklist koruması kapatılmıştır
}

bu şekil bi badnick korumam var attıgım nickleri örnek [02:21:38] *** ABAZA_ERKEKKhzrr AjaN Tarafından Kanaldan Atıldı ( -=[ *abaza*!*@* ]=- Kick:-=[ 6937]=- ••[ AjaN ]•• ) bu şekilde atıyor benim sitedigim *abaza*!*@* ve *hzrr*!*@* bad listemde olan iki farklı maskıda göstersin şimdiden teşekürler yardımcı olacak arkadaşa
örnek olarak [02:21:38] *** ABAZA_ERKEKKhzrr AjaN Tarafından Kanaldan Atıldı ( -=[ *abaza*!*@* ]=- -=[ *hzrr*!*@* ]=- Kick:-=[ 6937]=- ••[ AjaN ]•• ) olsun

Feragat · 12 Mart 2015, 03:15

mys_35 Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

bu şekil bi badnick korumam var attıgım nickleri örnek [02:21:38] *** ABAZA_ERKEKKhzrr AjaN Tarafından Kanaldan Atıldı ( -=[ *abaza*!*@* ]=- Kick:-=[ 6937]=- ••[ AjaN ]•• ) bu şekilde atıyor benim sitedigim *abaza*!*@* ve *hzrr*!*@* bad listemde olan iki farklı maskıda göstersin şimdiden teşekürler yardımcı olacak arkadaşa
örnek olarak [02:21:38] *** ABAZA_ERKEKKhzrr AjaN Tarafından Kanaldan Atıldı ( -=[ *abaza*!*@* ]=- -=[ *hzrr*!*@* ]=- Kick:-=[ 6937]=- ••[ AjaN ]•• ) olsun

Kod: Kodu kopyalamak için üzerine çift tıklayın!

#badnick on
on badnick:JOIN:#:{
  if ($ulist($fulladdress,koruma,0) >= 1) { return }
  elseif !$istok(#operhelp #help #sales #karantina #kanal5,$chan,32) {
    var %xnick = $regsubex(zz,$str(.,$ulist($nick,0)),/./g, $ulist($nick,\n) $chr(32))
    inc %kicksayi | mode $chan +b $nick | var %AjaN $+($chan,help) | kick $chan $nick  8,2 -=[ %xnick ]=-     Kick:-=[ %kicksayi $+ ]=-   8,2 ••[ AjaN ]••    
  }
}
alias tara {
  set %:bulunan 0
  var %s 1
  while %s <= $nick(#,0) {
    %:gnick = $nick(#,%s)
    if %:gnick isreg # && $level(%:gnick $+ !*@*) == badnick {
      inc %:bulunan 1
      var %xnick1 = $regsubex(zz,$str(.,$ulist(%:gnick,0)),/./g, $ulist(%:gnick,\n) $chr(32))
      mode # +b $address(#,2)(%:gnick,666,1)
      inc %kicksayi | kick # %:gnick  0,1 %xnick1 8,2Kick:  %kicksayi $+ %logo
    }
    inc %s
  }
  echo 0,1 ßadNickLer Tarandi:4,1 # - %:bulunan 0,1ßad Nick  ßuLundu.
}


on *:NICK:{ 
  if ($ulist($+($newnick,!*@*),koruma,0) >= 1) { return }
  else {
    if $ulist($+($newnick,!*@*),badnick,0) { 
      var %Cnk = 1 
      while $comchan($newnick,%Cnk) { 
        var %e = $v1 
        if $me isop %e && !$istok(#Radyo #operhelp #help #sales #karantina #kanal5,%e,32) { 
          var %znick = $regsubex(zz,$str(.,$ulist($newnick,0)),/./g, $ulist($newnick,\n) $chr(32))
          mode %e +b $newnick 
          kick %e $newnick 8,2 ßad Nick'e Geçtiqiniz için  AjaN Tarafından AtıLdınız ! %logo Etkilenen Masklar: %znick
        } 
        inc %Cnk 
      } 
    } 
  }
}
alias badnickekle {
  auser badnick $1 $+ !*@*
}
alias badnicksil {
  ruser badnick $1 $+ !*@*
}
alias nickkoruma {
  auser koruma $1 $+ !*@*
}
alias badidentekle {
  auser badnick *! $+ $1 $+ @*
}
alias badidentsil {
  ruser badnick *! $+ $1 $+ @*
}
alias identkoruma {
  auser koruma *! $+ $1 $+ @*
}
#Badnick end
menu *  {
  .AjaN Blacklist Koruması
  ..Aç :.enable #badnick | echo AjaN Blacklist koruması açılmıştır
  ..Kapat:.disable #badnick | echo AjaN Blacklist koruması kapatılmıştır
}

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
İnvaled Mask	Extre	mIRC Scripting Sorunları	14	04 Ağustos 2012 04:06
Mask tanıtımı	codcu	mIRC Scripting Sorunları	1	09 Temmuz 2006 15:22
Ban mask'ı ile ilgili...	MaeLStrOm	mIRC Scripting Sorunları	16	19 Temmuz 2005 18:05

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.