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

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

morveotesii

22 Haziran 2006 00:31

Harf Uzatma

<sasja> ahmettttttttttt
bu şekilde bir yazı yazıor userler ama ben bu harf uzatmanın 7yi geçmesini istemiyorum boyle bir cod mevcutmu şimdiden teşekkuler

LeadeR

22 Haziran 2006 20:58

Yanıt: Harf Uzatma

Kod:

on *:text:*:#: {

  if $regex($1-,/([[:print:]])\1\1/gi) >= 7 {

    mode # +b $wildsite | kick $chan $nick Harfleri uzatmak yasaktır

  }

}

By_GuRbey

23 Haziran 2006 12:30

Yanıt: Harf Uzatma

Bunun Nickê ßan AtıLmasını Istıyorum.. Onu verirmisin ?

NaTSuKa

23 Haziran 2006 12:38

Yanıt: Harf Uzatma

Alıntı:

mode # +b $wildsite

yerine

Alıntı:

mode # +b $nick

yaz

AsiL	12 Temmuz 2006 21:08

Yanıt: Harf Uzatma

peki harf uzatmada 1 bişey demiyecek 2 de uyaracak 3 de atıcak böyle bir kod varmı ?

el33t

12 Temmuz 2006 23:23

Yanıt: Harf Uzatma

Kişi harf uzatıp kodu trigger ettirdikten sonra %harf.<#kanal>.<nick> değerini 1 arttır /inc komutuyla.
Eğer bu değer 2'ye eşitse /notice $nick komutuyula uyarabilirsin, 3'e eşitse kanaldan atarsın. Yani kodun yeni hali şöyle olur:

Kod:

on @*:text:*:#:{

  if $regex($1-,/([[:print:]])\1\1/gi) >= 7 {

    var %< = $+(%,harf.,#,.,$nick) | inc $(%<,1)

    if $(%<,2) == 2 { notice $nick <uyarı mesajı> }

    elseif $(%<,2) == 3 { ban -k # $nick 3 kez harf uzattığın i&#231;in kicklendin. | unset $(%<,1) }

  }

}

Umarım işine yarar...

By_GuRbey

17 Temmuz 2006 00:48

Yanıt: Harf Uzatma

Sadece ßi kre Uyarsın 2.ye Atsın ßunu nasıL yapacaqız.. | inc $(%<,1)
Bunu Silecekmiyiz

UpsIDintAgain

17 Temmuz 2006 02:23

Yanıt: Harf Uzatma

on @*:text:*:#:{
if $regex($1-,/([[:print:]])\1\1/gi) >= 7 {
var %< = $+(%,harf.,#,.,$nick) | inc $(%<,1)
if $(%<,2) == 2 { ban -k # $nick 3 kez harf uzattığın için kicklendin. | unset $(%<,1) }
else {
notice $nick <uyarı mesajı>
}
}
}

Bu Çalışıyor

Gene banla Leader .) ( CipriX )

Sadece soruyu yanıtlamak için üye oldum

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