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

- - Q-lined sorunu (https://www.ircforumlari.net/mirc-scripting-sorunlari/566875-q-lined-sorunu.html)

Cpu	20 Şubat 2014 12:28

Q-lined sorunu

on $*:snotice:/Forbidding\sQ\-lined.+\[(\S+)\]\./:zline $+(*@,$regml(1)) +0 Yasak

Bu koda aynı ip ile 3 kişi girmeye çalıştığında gline yesin istiyorum nasıl yapabiliriz.

Set	20 Şubat 2014 22:26

Cevap: Q-lined sorunu

Kod:

on *:snotice:*: {

  if $regex($1-,/connecting/i) {

    var %ip $remove($token($10,2,64),$chr(41))

    hinc -m ip %ip 1

    if $hget(ip,%ip) == 3 { gzline $9 +0 Ban! }

  }

  if $regex($1-,/client.exiting/i) {

    var %ip $remove($token($8,2,64),$chr(41))

    if $hget(ip,%ip) { hdel -m ip %ip }

  }

}

bu kod isini görür herhalde denemedim cunki, birde verdiğin kod yasaklı nickten biri girmeye calıstıgında ip'e ban atmaya yarar, Hayırlı IF'ler.

Cpu	20 Şubat 2014 23:35

Cevap: Q-lined sorunu

Alıntı:

Set Nickli Üyeden Alıntı (Mesaj 1041395731)

Kod:

on *:snotice:*: {

  if $regex($1-,/connecting/i) {

    var %ip $remove($token($10,2,64),$chr(41))

    hinc -m ip %ip 1

    if $hget(ip,%ip) == 3 { gzline $9 +0 Ban! }

  }

  if $regex($1-,/client.exiting/i) {

    var %ip $remove($token($8,2,64),$chr(41))

    hdel -m ip %ip

  }

}

bu kod isini görür herhalde denemedim cunki, birde verdiğin kod yasaklı nickten biri girmeye calıstıgında ip'e ban atmaya yarar, Hayırlı IF'ler.

* /hdel: Yetersiz veya eksik parametre (Satır 9, qlined.txt)

Set	21 Şubat 2014 21:08

Cevap: Q-lined sorunu

Pardon bir yeri es geçmişim, kodu tekrar alabilirsin.

Cpu	21 Şubat 2014 22:05

Cevap: Q-lined sorunu

Alıntı:

Set Nickli Üyeden Alıntı (Mesaj 1041396107)

Pardon bir yeri es geçmişim, kodu tekrar alabilirsin.

Peki buna muaf ident eklesek

WingmaN

26 Şubat 2014 02:22

Cevap: Q-lined sorunu

Kod:

on *:snotice:*: {

  if $regex($1-,/connecting/i) {

    var %ip $remove($token($10,2,64),$chr(41)), %_id = $right($token($10,1,64),-1)

    ;-- muaf ident.

    if ($regex(%_id,/(muaf|muaf2|muaf3)/i)) { return }

    hinc -m ip %ip 1

    if $hget(ip,%ip) == 3 { gzline $9 +0 Ban! }

  }

  if $regex($1-,/client.exiting/i) {

    var %ip $remove($token($8,2,64),$chr(41))

    hdel -m ip %ip

  }

}

Muaf ident eklerken, @ koymana gerek yok ve aynı kelimeyi içerenleri ekleme. Eğer ki çok kısa kelime ekleyeceksende, sonuna $ işareti koy. Örnek: ali$|muaf2|muaf3 vs ..

Not: Sonuna $ işareti koyman demek, sadece o kelimeyi kapsaması anlamına gelir. Yani, ali$ yazarsan, aliler yazan ident'i muaf olarak görmeyecektir. Lâkin $ koymazsan, aliler yazan ident'i de muaf olarak kabul edecektir.

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