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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Harf Uzatma (https://www.ircforumlari.net/mirc-scripting-sorunlari/35510-harf-uzatma.html)

PHP- Kodu:

   on @*:text:*:#:{ if $nick isop $chan { .halt } { if $chan == #kurul { .halt } { if $chan == #admin { .halt } { if $chan == #yardim { .halt } 
        if $regex($1-,/([[:print:]])11/gi) >= 5 { 
          var %< = $+(%,harf.,#,.,$nick) | inc $(%<,1) 
          if $(%<,2) == 2 { /samode # +b $nick | unset $(%<,1) } 
          else { 
            .msg $chan UYARI: $nick $+ , Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız
          } 
        } 
      } 
    }

1.de Uyarmasini 2.'de Ban Atmasini İstiyorum Fakat Herhangi Bir Cevap Alamıyorum,Nerede Sorun Var Acaba..

Yanıt: Harf Uzatma

PHP- Kodu:

   on @*:text:*:#: {
  if $me !isop $chan { halt } | if $nick isop $chan { halt }
  if ($regex($1-,/([[:print:]])\1\1/ig) >= $calc($coconf(U.limit)/3)) {
    inc $+(-u,$coconf(U.mem)) %uz [ $+ [ $nick ] ] 1
    if (%uz [ $+ [ $nick ] ] >= $coconf(U.LM)) {
      .ban $+(-ku,$calc($coconf(U.kbs)*60)) $chan $nick $coconf(U.sb)
      .unset %uz [ $+ [ $nick ] ]
    }
    if (%uz [ $+ [ $nick ] ] >= $coconf(U.AL)) {
      msg $chan $nick $coconf(U.yr)
    }   
  }
}
alias coconf {
  goto $1
  :U.Limit {
    ;# harf limiti 
    RETURN 10
  }
  :U.LM {
    ;# Kac kezde atsın..
    RETURN 2
  }
  :U.AL {
    ;# Uyarı limiti (üstteki deger ile aynı-yüksek olmamalıdır.)  
    RETURN 1
  }
  :U.mem {
    ;# Hatayı yapan nikc-Adres'in Hafızada kalacagı süre (sn)
    RETURN 500
  }
  :U.sb {
    ;# Kick Sebebi..
    RETURN 2Kanal Genelinde 12Uzun Harf 4Kullanıp Kullanıcıları Rahatsız Ettiğiniz icin Kanaldan ,Uzaklastırıldınız !
  }
  :U.yr {
    ;# Uyarı mesajı
    RETURN  2Uyarı : 2Lutfen Harfleri Uzatmayın , Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
  }
  :U.kbs {
    ;# kikc\ban süresi "Dk."
    RETURN  15
  }

Yanıt: Harf Uzatma

Direk verdiğim komut üzerinde ufak bir değişiklik yaparak sorun çözülemez mi ?

Yanıt: Harf Uzatma

PHP- Kodu:

   on *:text:*:#:{ if $nick isop $chan { .halt } { if $chan == #admin { .halt } { if $chan == #konsey { .halt } { if $chan == #yonetim { .halt }
        if $regex($1-,/([[:print:]])\1\1/gi) >= 8 {
          var %< = $+(%,harf.,#,.,$nick) | inc $(%<,1)
          if $(%<,2) == 2 { .samode # +b $nick | .msg $nick harfleri uzatma demiştim! }
          else {
            .msg $chan UYARI: $nick $+ , Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
          }
        }
      }
    }

Arkadaşlar Komut Bu Haliyle İstediğim Gibi SorunSuz Çalışıyor Fakat Bir Sorunum Var..

Alıntı:

[17:17:30] <Haydi61508> sssssssssssssssssss
[17:17:35] <Haydi61508> sssssssssssssssssssssssssssss
[17:17:35] <`> UYARI: Haydi61508, Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
Bilgi : #x Kanalından ` Size Sesleniyor.. " UYARI: Haydi61508, Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız! "

[17:17:38] <Haydi61508> ssssssssssssssssssssssssssssssssssss
[17:17:38] *** ` modu değiştirdi: +b Haydi61508!*@*

Buraya Kadar Her Şey Yolunda,Fakat Kişinin Banı Açıldıktan Sonra Aynı NickLe Harf Uzatman İşlemini TekrarLadiği Zaman Sürekli Uyarı Veriyor,İlk Uyarıyi Verip 2.de Banlamasi Gerekirken İlk Alıntıda Olduğu Gibi..

Dediğim Şu;

Alıntı:

[17:17:55] <Haydi61508> sssssssssssssssssssssssssssssssssssss
[17:17:55] <`> UYARI: Haydi61508, Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
Bilgi : #x Kanalından ` Size Sesleniyor.. " UYARI: Haydi61508, Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız! "
[17:17:57] <Haydi61508> ssssssssssssssssssssssssssssssssssssssssss
[17:17:58] <`> UYARI: Haydi61508, Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
Bilgi : #x Kanalından ` Size Sesleniyor.. " UYARI: Haydi61508, Lütfen Harfleri Uzatmayın, Aksi Taktirde Kanaldan Uzaklaştırılacaksınız! "

Böyle Devam Ediyor,Banlamıyor Nicki Hafızasina Mi Alıyor ?

Cevap: Harf Uzatma

Alıntı:

on @*:text:*:#: {
if $me !isop $chan { halt } | if $nick isop $chan { halt }
if ($regex($1-,/([[:print:]])11/ig) >= $calc($coconf(U.limit)/3)) {
inc $+(-u,$coconf(U.mem)) %uz [ $+ [ $nick ] ] 1
if (%uz [ $+ [ $nick ] ] >= $coconf(U.LM)) {
.ban $+(-ku,$calc($coconf(U.kbs)*60)) $chan $nick $coconf(U.sb)
.unset %uz [ $+ [ $nick ] ]
}
if (%uz [ $+ [ $nick ] ] >= $coconf(U.AL)) {
msg $chan $nick $coconf(U.yr)
}
}
}
alias coconf {
goto $1
:U.Limit {
;# harf limiti
RETURN 10
}
:U.LM {
;# Kac kezde atsın..
RETURN 2
}
:U.AL {
;# Uyarı limiti (üstteki deger ile aynı-yüksek olmamalıdır.)
RETURN 1
}
:U.mem {
;# Hatayı yapan nikc-Adres'in Hafızada kalacagı süre (sn)
RETURN 500
}
:U.sb {
;# Kick Sebebi..
RETURN 2Kanal Genelinde 12Uzun Harf 4Kullanıp Kullanıcıları Rahatsız Ettiğiniz icin Kanaldan ,Uzaklastırıldınız !
}
:U.yr {
;# Uyarı mesajı
RETURN 2Uyarı : 2Lutfen Harfleri Uzatmayın , Aksi Taktirde Kanaldan Uzaklaştırılacaksınız!
}
:U.kbs {
;# kikc\ban süresi "Dk."
RETURN 15
}

Arkadaslar Bır Seyı Merak Ettım Sımdı Bu Kod Guzel Kım Yapmıssa Elıne Saglık Bu Kodda Kısı Harf Uzatmadan Script Kullanıcıyı Uyarıyor Ve Sonra Kullanıcı Uzatıyor Bu Nasıl Bunun Mantıgı Nasıl Anlamadım :D

Alıntı:

(22:36:39) <kanryam> sunaaaaaaaaaaaaaaaaaa
(22:36:39) <Microsoft> UYARI: kanryam Harfleri uzatmayınız..

Cevap: Harf Uzatma

Alıntı:

SenSizBen Nickli Üyeden Alıntı (Mesaj 245343)

Senin bağlantından kaynaklanan birşeydir. Kişi harf uzatmadan önceki bir zaman dilimi içirsinde uyarması imkansız.