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

CoMMaNDeR · 16 Mart 2005, 14:44

böyle yapılmış bişey var, türkçeleştirdim. bide filtre identifierini yazdım.

Alıntı:

;kullanımı:

; $isspam(<yazı>,<kanal>,<wc>) (w website reklamı, c kanal reklamı)

;kodları:

alias _isspam {
if ($isid) {
if (w isin $3) {
var %prot.temp 1
while ($gettok($strip($1-),%prot.temp,32)) {
if ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $gettok($strip($1-),%prot.temp,32) || [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] iswm $gettok($strip($1-),%prot.temp,32)) { return $true }
inc %prot.temp
}
}
if (c isin $3) {
var %prot.temp 1
while ($gettok($strip($1-),%prot.temp,32)) {
if (#* iswm $gettok($strip($1-),%prot.temp,32) && $gettok($strip($1-),%prot.temp,32) != $2) { return $true }
inc %prot.temp
}
}
return $false
}
}

on @*:text:*:#:{
if ($isspam($1-,$chan,c)) { kick $chan $nick kanal reklamı: $filtre }
}

alias filtre {
var %i 1,%c
while %i <= $numtok($1-,32) {
%c = %c %4$s $chr(32) %4$s $left($gettok($1-,%i,32),3) %4$s ..
inc %i
}
return %c
}

bi dene, ben gelişi güzel baktım normaldi. birazı hazır kod, birazınıda ben ekledim çıkardım. umarım çalışır. benim eklediğim kısım çalışıyo ama hazır kodu test etmedim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

CoMMaNDeR · 16 Mart 2005, 14:45

kanala yapılan reklam için tabi bu.

Yeppa · 16 Mart 2005, 17:01

calismadi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

CoMMaNDeR · 16 Mart 2005, 17:30

sanada ne versek çalışmıyo. neyse benim eklediğim identifier çalışıyo. şu hani dier sayfada arkadaş eklemiş ya koruma, orda reklam mesajını gizleyip yazsın diyodun hani. onun için kullan şunu:

alias filtre {
var %i 1,%c
while %i <= $numtok($1-,32) {
%c = %c $+ $chr(32) $+ $left($gettok($1-,%i,32),3) $+ ..
inc %i
}
return %c
}

bu kod $filtre komutuna döner. $1- içeren yerde kullanılır. kendisi algılar. event içerisinde yani. oke? herşey hazır kardeşim birazınıda kendiniz yapın bu kadar beleşçi olmayın alla alla
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Yeppa · 16 Mart 2005, 22:03

calismayan koda calisiyor diyemem ya
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

CoMMaNDeR · 16 Mart 2005, 23:40

%4$s diye bişe yazmadım ama bu şekilde paste etmiş kodumu garip, $+ die düzelttim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
böle dene gözümden kaçmış.

Yeppa · 17 Mart 2005, 13:49

vallaha calistiramadim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
calissa basimin gozumun üstünede calismadi,calistiramadim. dedigin sekilde yaptim ama..:smack:

Ocean · 20 Şubat 2013, 22:01

konuyu hortlatmak gibi olmasin lakin cevabı yazayım belki birilerinin işine yarar ;

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias noktala { 
  var %getvar = $strip($1-), %retvar = $null, %i = 1
  while $iif($regex(%getvar,\.),$gettok(%getvar,%i,46),$gettok(%getvar,%i,32)) {
    var %fmatch = $ifmatch
    var %rf = $iif($len(%fmatch) <= 5,3,$rand(3,5))
    %retvar = $+(%retvar,$chr(32),$left(%fmatch,%rf),$str(.,$calc($len(%fmatch) - %rf)))
    inc %i 1
  }
  return %retvar
}

kullanımı :

Kod: Kodu kopyalamak için üzerine çift tıklayın!

$noktala($mid($gettok(%temp,4-,32),2,600)

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Koruma botu lazım	sohbetsevgi	Eggdrop, NeoStats, BNC	12	23 Aralık 2010 19:51
Koruma Menusu Lazım	neobre	mIRC Scripting Sorunları	14	12 Ağustos 2010 18:38
arkadaslar koruma botu lazım cause	CoreCore	Eggdrop, NeoStats, BNC	6	17 Mayıs 2010 16:04
Anti-Porn Kullanımı [Resimli Anlatım] her eve lazım.	blackkurt38	Bilgisayar Donanımı	0	03 Şubat 2008 23:12

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.