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

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

- - küfür koruma (https://www.ircforumlari.net/mirc-scripting-sorunlari/297292-kufur-koruma.html)

alias prot {
if !$istok(repeat bword,$1,32) { return $false }
goto $1
:repeat
var %÷ = $+(%,repeat.,$2,.,$3,.,$encode($4,m))
inc $(%÷,1)
if (!$timer($gettok(%÷,1,37))) { $+(.timer,$gettok(%÷,1,37)) 1 $6 unset $(%÷,1) }
if ($(%÷,2) >= $5) { unset $(%÷,1) | return $true }
else { return $false }
:bword
var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false
}
on @*:text:*:#:{
if ($nick ison $chan) { halt }
elseif $prot(repeat,#,$nick,$strip($1-),5,1) { /gzline $nick +5h FLood yapma }
elseif $prot(bword,$1-,küfürler.txt) { /gzline $nick +5h küfür etme }
}

arkadaşlar burdaki kırmızı yeri ben ekledim. yapmak isteidğim diyelimki küfür korumasında *deneme* kelimesi eklendi diyelim kanalda deneme nicki var ise deneme yazan kişi atılıyor ben atılmasın istiyorum nasıl yapabilirim.
yani yazılan küfür kanalda bir nick ise yazna kişi atılmasın bakarmısınız

Cevap: küfür koruma

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Bunlara Bak Kardesım Isını Gorur Bunlar.

Cevap: küfür koruma

tşk ilgin için ama benim istediğim küfür koruması değil kardeşim ben zaten küfür koruması var veridğim kodda sadece eklediğim küfürde bir nick var ise kanal da biri o küfürü veya nicki yazılırsa atılmasın

örneğin amk ekledim küfür korumasına kanalda amk nickli biri var ise birisi amk yazdığında atılmasın

Cevap: küfür koruma

if ($nick ison $chan) { halt }
bunun yerine şunu kullan

if ($nick == deneme) || ($nick isop $chan) { halt }

iyi forumlar.

Cevap: küfür koruma

demek istediğimi anlamamışsın sanırım
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yinede tşk ederim

Cevap: küfür koruma

Alıntı:

Selim01 Nickli Üyeden Alıntı (Mesaj 870059)

Kod:

alias prot {

if !$istok(repeat bword,$1,32) { return $false }

goto $1

:repeat

var %÷ = $+(%,repeat.,$2,.,$3,.,$encode($4,m))

inc $(%÷,1)

if (!$timer($gettok(%÷,1,37))) { $+(.timer,$gettok(%÷,1,37)) 1 $6 unset $(%÷,1) }

if ($(%÷,2) >= $5) { unset $(%÷,1) | return $true }

else { return $false }

:bword

var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false

}

on *:text:*:#:{

elseif $prot(repeat,#,$nick,$strip($1-),5,1) { /gzline $nick +5h FLood yapma }

elseif $prot(bword,$1-,küfürler.txt) { /gzline $nick +5h küfür etme }

}

ßunu Dene.