IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Güncel badtara rakamsal sayı (https://www.ircforumlari.net/mirc-scripting-sorunlari/761201-badtara-rakamsal-sayi.html)

nikotin 27 Ekim 2016 00:05

badtara rakamsal sayı
 
Selamlar.
asagıda ki kodda bi cok kez degisiklik yapmama ragmen badnickleri nick olarak degilde rakamsal olarak gösteremedim bi türlü.
tarama yaptıdım zaman Tespit edilen. Badnickler *** nick
kısmını bu sekilde degilde
örnek: #kanal kanalında 10 adet badnick bulundu seklinde rakamsal gösterebilmemiz mümkün mü acaba.

alias tespit {
var %jnk 1
while %jnk <= $nick($1,0) {
if !$ulist($nick($1,%jnk),koruma,0) && $ulist($nick($1,%jnk),Bad,0) {
echo -a Tespit edilen. 5Badnickler 5***6 $nick($1,%jnk)
}
inc %jnk
}
}

KuL 27 Ekim 2016 00:34

Cevap: badtara rakamsal sayı
 
Selamun Aleykum @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Bir Örnek verirmisin, User Bölümünde Badnickleri nasil ekledin.

nikotin 27 Ekim 2016 00:38

Cevap: badtara rakamsal sayı
 
Alıntı:

KuL Nickli Üyeden Alıntı (Mesaj 1041815068)
Selamun Aleykum @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Bir Örnek verirmisin, User Bölümünde Badnickleri nasil ekledin.

Aleyküm Selam

Bad:nick!*@*
Bad:*nick*!*@*
koruma:nick!*@*
koruma:*nick*!*@

Mylife 27 Ekim 2016 18:39

Cevap: badtara rakamsal sayı
 
Alıntı:

nikotin01 Nickli Üyeden Alıntı (Mesaj 1041815039)
Selamlar.
asagıda ki kodda bi cok kez degisiklik yapmama ragmen badnickleri nick olarak degilde rakamsal olarak gösteremedim bi türlü.
tarama yaptıdım zaman Tespit edilen. Badnickler *** nick
kısmını bu sekilde degilde
örnek: #kanal kanalında 10 adet badnick bulundu seklinde rakamsal gösterebilmemiz mümkün mü acaba.

alias tespit {
var %jnk 1
while %jnk <= $nick($1,0) {
if !$ulist($nick($1,%jnk),koruma,0) && $ulist($nick($1,%jnk),Bad,0) {
echo -a Tespit edilen. 5Badnickler 5***6 $nick($1,%jnk)
}
inc %jnk
}
}

Sorunu anlamadım ama senin için birşeyler hazırladım umarım işine yarar...
Kod:

on *:input:#: {
  if $regex($1,/^[.!]bad.k.e/Si) {
    if (!$2) { msg # hatalı kullanım nick belirtin. }
    else if $read(badd.txt,w,$+(*,$2,*)) { msg # $2 zaten bad listesinde var }
    else {
      write badd.txt $2
      msg # bad listesine $2 eklendi.
    }
  }
  if $regex($1,/^[.!]badsi./Si) {
    if (!$2) { msg # hatalı kullanım nick belirtin. }
    else if !$read(badd.txt,w,$2) { msg # tanıma uygun nick bulunmuyor. }
    else {
      write $+(-dl,$readn) badd.txt
      msg # bad listesinden $2 silindi
    }
  }
  if $regex($1,/^[.!]bad.ist/Si) {
    if $lines(badd.txt) = 0 { msg # bad listenizde hiç kimse yok. } 
    else {
      badkontrl
    }
  }
}
on *:join:#: {
  if $read(badd.txt,w,$+(*,$nick,*)) {
    mode # +b $nick
    kick # $nick Kurallara aykırı nick kullanıyoruz lütfen nick değiştirin.
  }
}
alias badkontrl {
  var %kod 1
  var %Mylife $lines(badd.txt)
  while %Mylife >= %kod {
    echo -a $read(badd.txt,%Mylife)
    dec %Mylife
  }
}

Kullanım;
.badekle nick
.badsil nick
.badlist


Örnek görünüm ve kullanım;
[18:39:07] <Mylife> bad listesine deneme1 eklendi.
[18:39:07] <Mylife> .badekle deneme1
deneme1
deneme
[18:39:10] <Mylife> .badlist
[18:39:19] <Mylife> bad listesinden deneme1 silindi
[18:39:19] <Mylife> .badsil deneme1
[18:39:20] <Mylife> bad listesinden deneme silindi
[18:39:20] <Mylife> .badsil deneme
[18:39:22] <Mylife> tanıma uygun nick bulunmuyor.
[18:39:22] <Mylife> .badsil deneme
[18:39:27] <Mylife> bad listenizde hiç kimse yok.
[18:39:27] <Mylife> .badlist
[18:40:26] <Mylife> bad listenizde hiç kimse yok.
[18:40:26] <Mylife> .badlist
[18:41:12] <Mylife> bad listesine mircsystem eklendi.
[18:41:11] <Mylife> .badekle mircsystem
[18:42:35] * Giriş: Mircsystem (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[18:42:36] * Mylife mod değiştirdi:+b Mircsystem!*@*
[18:42:36] * Mircsystem Mylife Tarafından Kanaldan Atıldı (Kurallara aykırı nick kullanıyoruz lütfen nick değiştirin.)

aLone 27 Ekim 2016 19:07

Cevap: badtara rakamsal sayı
 
Kod:

alias tespit {
  set %:m 0
  var %jnk 1
  while %jnk <= $nick($1,0) {
    if !$ulist($nick($1,%jnk),koruma,0) && $ulist($nick($1,%jnk),Bad,0) {
      inc %:m 1
    }
    inc %jnk
  }
  echo -a Tespit edilen. 5Badnickler Sayısı 5***6  %:m
}

böylede kullanabilirsin

nikotin 27 Ekim 2016 22:56

Cevap: badtara rakamsal sayı
 
Öncelikle üsenmeyip kodu paylastıgınız icin tşk. ederim.
benzer kod bende de var fakat diger arkadasların isine yarayacagından paylasmanız güzel olmus.
Tşkler.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 22:56 -->-> Daha önceki mesaj 22:54 --

Alıntı:

aLone Nickli Üyeden Alıntı (Mesaj 1041815325)
Kod:

alias tespit {
  set %:m 0
  var %jnk 1
  while %jnk <= $nick($1,0) {
    if !$ulist($nick($1,%jnk),koruma,0) && $ulist($nick($1,%jnk),Bad,0) {
      inc %:m 1
    }
    inc %jnk
  }
  echo -a Tespit edilen. 5Badnickler Sayısı 5***6  %:m
}

böylede kullanabilirsin

İstedigim tam olarak buydu aLone. Eline emegine saglık, cok tesekkür ederim.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 16:02.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk