IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - $ifmatch kullanımı [bir kod koruma lazım]

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

- - $ifmatch kullanımı [bir kod koruma lazım] (https://www.ircforumlari.net/mirc-scripting-sorunlari/1723-ifmatch-kullanimi-bir-kod-koruma-lazim.html)

$ifmatch kullanımı [bir kod koruma lazım]

bir reklam koruması lazım bana veyahut antispambot. ozelime reklam yapan birinin yazdıgı kelimeyi kick msjına nasıl aktarıcagım ? veyahut antispam botda.

yeppa bunu aktarmak zor degil ama o zaman sende reklama katkida bulunmus olmazmisin sahis ozeline reklam yapacak sen onu tum kanala okutacaksin :))) eger illakide aktarcam dersen yazarim sana ama sen bidaha dusun bence :))

Evet. Çok haklı. Küfür korumaları bazen çakışabiliyor onlar için uygun bir yöntem ama reklam için sakıncalı.

hayır alakasi. yok. nasil anlatsam. sadece bir kısmını aktaricak. e-kolayda zurna,istanbul,ankara da kullanan biri var mercilles diye. birde doruk'un services admini abbasabi kullaniyor. biri özele reklamda digeride spamda. sadece reklamin ilk basini http:// veyahut selam yazisi. birinde operler icin digerinde kullanicilar icin olcak bisi :)
[10:22] * ifICant was kicked by ChanServ (AKICK by Mercy (DNA microarray technology ; < Away/Advers > < ifICant Away Advers Message :> Hüly .. Avsa .. Adul .. Film .. Arsi .. v v .. v v .. v - .. - hu .. huly .. - tk .. - Written by MercILesS -))
[10:28] * ran was kicked by ChanServ (AKICK by MercILesS ( advertise/invite bot detected < ran : Advers Message > :daf .. Müjd .. Myne .. Scri .. giri .. Sağl .. Şuan .. Türk .. Myne .. Sade .. Sade .. Klav .. Scri .. Prof ..))

digerinin ornegini gosteremedim adam yok sunucuda. boyle birsey istiyorum? yapabilcek olan varmi ? kursat varsa zamanin yazarsan cok makbule gecer.

Reklam Korumaların Nasıl?
on *:Text:*i?r?c*:#:{ .kick $chan $nick Reklam Yaptınız... }
Gibimi?Yoksa başka mı?

O zaman sen sadece reklam korumasında geçen kısmını yansıtacaksın.
Örneğin [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yazan biri atıldığında kick mesajında "reklam tespit edildi (http://) " gibi birşey yazacaksa;

on *:text:*:?:{
if (http:// isin $1-) { allban $nick Özelime reklam yaptığınız için tüm kanallardan uzaklaştırıldınız. Kullandığınız bilmemne: ( $+ $ifmatch $+ ) | halt }
}

antispam botda olucak :) ve birde yazdigi reklamin tamami degilde bir kismi gorukcek oyle birsey istiyorum. Spam bot daha lagsiz ve kelimeleri seciyor.
[10:28] * ran was kicked by ChanServ (AKICK by MercILesS ( advertise/invite bot detected < ran : Advers Message > :daf .. Müjd .. Myne .. Scri .. giri .. Sağl .. Şuan .. Türk .. Myne .. Sade .. Sade .. Klav .. Scri .. Prof ..))
gibi.. Özele Reklamda bir cok seyi aliyor

ha özele koruma icinde su

Kod:

#reklam on

on ^*:OPEN:?:*: {

;Renk 

if ($count($1-,) > 2) { $Kapat($nick,$1-) }

var %sep $1- | %sep = $strip($remove(%sep,-,_)) | tokenize 32 %sep

if (*irc iswm $1-) { $Kapat($nick,$1-) }

if (*freesms* iswm $1-) { $Kapat($nick,$1-) }

if (*sınırsız* iswm $1-) { $Kapat($nick,$1-) }

}

alias -l Kapat {

if (!$window(@Reklam)) { window -k @Reklam }

echo $colour(normal @Reklam text) -tm @Reklam < $+ $1 $+ > $2- 

Kapa_kick $1

return halt

}

alias -l Kapa_kick {

var %i 1

while (%i <= $comchan($1,0)) {

        if ($comchan($1,%i).op == $true) {

        kick $comchan($1,%i) $1 # Yasaklı Kelime! 

        ban $comchan($1,%i) $1 2

}

inc %i 1

}

}

sende boyle yap

Alıntı:

#reklam on
on ^*:OPEN:?:*: {
;Renk
if ($count($1-,) > 2) { $Kapat($nick,$1-) }
var %sep $1- | %sep = $strip($remove(%sep,-,_)) | tokenize 32 %sep
if (*irc iswm $1-) { $Kapat($nick,$1-) | .set %reklamkelimesi $ifmatch }
if (*freesms* iswm $1-) { $Kapat($nick,$1-) | .set %reklamkelimesi $ifmatch }
if (*sınırsız* iswm $1-) { $Kapat($nick,$1-) | .set %reklamkelimesi $ifmatch }
}
alias -l Kapat {
if (!$window(@Reklam)) { window -k @Reklam }
echo $colour(normal @Reklam text) -tm @Reklam < $+ $1 $+ > $2-
Kapa_kick $1
return halt
}
alias -l Kapa_kick {
var %i 1
while (%i <= $comchan($1,0)) {
if ($comchan($1,%i).op == $true) {
kick $comchan($1,%i) $1 # Yasaklı Kelime! ( $+ %reklamkelimesi $+ )
ban $comchan($1,%i) $1 2
}
inc %i 1
}
}

(Yasaklı Kelime! () diye atiyor. yazdigi kelimeyi aktarmiyor. hem bide bana bole antispam bot lazim. varmi elinde bulunduran ?

yokmu boyle birsey ?