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

Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 15 Ocak 2006, 20:56   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
* kullanıyorum olmuyo kullanmıyorum gene olmuyo




Şöyle bir çalışma yaptım.

%kufurler lan ulan a.k a.q len lem lam olm mal
Bunu veriables e ekledim.
Remoteye de aşağıdakini
on @*:text:*:#:{
var %i $gettok(%kufurler,0,32)
while (0 < %i) {
if ($gettok(%kufurler,%i,32) iswm $strip($1-)) {
kick $chan $nick 4Seviye..!
}
dec %i
}
}

%kufurler adlı veriables de lan var mesela.
adam
[20:50] (emre_bjk): lan salak
yazınca atmıyor. sadece lan yazınca atıyor.

[20:49] (emre_bjk): lan
[20:49] *** emre_bjk was kicked by TimSaH (Seviye..! - kick #116024)
[20:49] *** Joins: emre_bjk (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
%kufurler veriables indeki lan kelimesini *lan* olarak değiştiğim zamanda anlamsız bi kick atıyor
[20:50] (emre_bjk): alan varmı
[20:50] *** emre_bjk was kicked by TimSaH (Seviye..! - kick #116029)

Adam lan salak yazdığında da lan yazdığında da nasıl attırırım. çözemedim bi türlü. Tabiki alan varmı yazdığında atılmicak. yardım edermisiniz.

__________________
TAVŞAN DAĞA KÜSMÜŞ, DAĞ ŞOOK
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver
Alt 15 Ocak 2006, 21:35   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



2 seçeneğin var
Alıntı:
if ($gettok(%kufurler,%i,32) iswm $strip($1-)) {

burda iswm yerine isin kullanırsın..
yada.

eklerken lan yerine *lan* eklersin....

 
Alıntı ile Cevapla

Alt 15 Ocak 2006, 21:43   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Yeniden düşündümde..

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias varmi {
%
mesaj1 = * lan *
%
mesaj2 = * len *
var %
1
while $eval($+(%,mesaj,%i),2) {
if (
$eval($+(%,mesaj,%i),2iswm $1-) {
return 
$true
}
inc %i
}
}
 
on @*:text:*:#:{
if ($varmi($strip($1-))) { kick # $nick Bad! }


%mesaj1 2 3 ... sırası önemli bu şekildede...

Yada öncekinde token 32 yerine 46 (.) kullanırsan olabilir boşluk avantajını kullanırsan.

 
Alıntı ile Cevapla

Alt 15 Ocak 2006, 22:50   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Aşağıdaki kod'da senin op olduğun kanalda olan bir userın cümlesinin her kelimesini %kufurler değişkeninde var mı diye kontrol ediyor ve eğer varsa kanaldan kick+banlıyor. İşte kod:

on @*:text:*:#:{ var %. = $0 | while %. { if $istok(%kufurler,$remove($gettok($strip($1-),%.,32),.,:,;,$chr(44)),32) { ban -k # $nick 2 out | return } | dec %. } }

Umarım işine yarar.


Konu el33t tarafından (15 Ocak 2006 Saat 23:11 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 15 Ocak 2006, 22:51   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Evet bu gayet iyi fakat ilk kelime lan olunca atmıyor yada sonunda . olunca.
[22:13] (BaD-GrL): Kes lan.
atmadı..
[22:15] (BaD-GrL): Lan kamil
başta olunca atmadı.
[22:17] (BaD-GrL): benm Lan demem hata dımı senın benı rahatsız etmen hata deıL..
[22:17] *** BaD-GrL was kicked by BLacK (Bad! - kick #116081)
ama burda attı.

__________________
TAVŞAN DAĞA KÜSMÜŞ, DAĞ ŞOOK
 
Alıntı ile Cevapla

Alt 15 Ocak 2006, 23:18   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Tamam bu sefer oldu. Çok teşekkürler.

__________________
TAVŞAN DAĞA KÜSMÜŞ, DAĞ ŞOOK
 
Alıntı ile Cevapla

Alt 16 Ocak 2006, 13:06   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



komut gercekten hos ve guzel.. peki el33t soyle birsey yapmamiz mumkunmu o kodda kisi ilk basta lan kelimesini kullaninca once uyarip ayni sekilde tekrar lan kelimesi gecince kanaldan 15 dakikalik ban atsa nasil olur?

 
Alıntı ile Cevapla

Alt 16 Ocak 2006, 13:57   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



ŞöyLe bİşey İstioSn Sanırım ;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:text:*:#:{ var %i $numtok($1-,32) while %i { if ($istok(%kufurler,$remove($gettok($1-,%i,32),:,;,.,$chr(44)),32)) { if ($eval($+(%,uyari,$nick),2) == $null) { set $+(%,uyari,$nick) 1 | msg $chan $nick Lütfen Küfür Etmeyin Bu bir Uyarıdır.. } | else { ban -ku900 $chan $nick BanneD! | unset $+(%,uyari,$nick) } } dec %i } }

Önce Kişi KanaLda bi Kere Uyarir Ardında da BanLanır..

 
Alıntı ile Cevapla

Alt 16 Ocak 2006, 20:49   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)



Op Hop ve Voice leride atıyor. Yapamadım bi türlü. Kod aşağıda.

on @*:text:*:#:{ var %. = $0 | while %. { if $istok(%kufurler,$remove($gettok($strip($1-),%.,32),.,:,;,$chr(44)),32) { kick $nick 4Bad! | return } | dec %. } }

__________________
TAVŞAN DAĞA KÜSMÜŞ, DAĞ ŞOOK
 
Alıntı ile Cevapla

Alt 16 Ocak 2006, 20:57   #10
CipriX
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)



#qswear off
on 1:TEXT:*:#: {
if $me !isop $comchan($nick,1) { halt }
if $nick isop $comchan($nick,1) { halt }
if (fuck isin $1-) || (kavat isin $1-) || (sike isin $1-) || (avradını isin $1-) || (sikti isin $1-) || (sokarım isin $1- ) || (pezevenk isin $1-) || (siktir isin $1-) || (yarak isin $1-) || (****** isin $1-) || (sikiyim isin $1-) || (sikis isin $1-) || (***** isin $1-) || (siker isin $1-) || (****** isin $1-) || (****** isin $1-) || (fahişe isin $1-) || (ananı isin $1-) || (ibne isin $1-) || (ipne isin $1-) || (amına isin $1-) || (amını isin $1-) || (***** isin $1-) || (amcik isin $1-) || (amina isin $1-) || (amini isin $1-) || (topunuzun isin $1-) || (sikik isin $1-) || (götveren isin $1-) || (shit isin $1-) || (sikerim isin $1-) || (sevişecek isin $1-) || (sux isin $1-) || (götden isin $1-) || (götün isin $1-) || (fahişe isin $1-) || (*** isin $1-) {
ban $comchan($nick,1) $nick 2 | kick $comchan($nick,1) $nick 7 $+ # 12Kanalından Uzaklaştırıldınız!.. Sebep: 2"Özelime Küfür Ettiniz!" 2(12 $+ $date $+ 4/12 $+ $time 7 $+ $me $+ 2) 0,2 (® 0,7 (CipriX v6.0) 0,2 ®) 
}
}
on 1:action:*:#: {
if $me !isop $comchan($nick,1) { halt }
if $nick isop $comchan($nick,1) { halt }
if (fuck isin $1-) || (kavat isin $1-) || (sike isin $1-) || (avradını isin $1-) || (sikti isin $1-) || (sokarım isin $1- ) || (pezevenk isin $1-) || (siktir isin $1-) || (yarak isin $1-) || (****** isin $1-) || (sikiyim isin $1-) || (sikis isin $1-) || (***** isin $1-) || (siker isin $1-) || (****** isin $1-) || (****** isin $1-) || (fahişe isin $1-) || (ananı isin $1-) || (ibne isin $1-) || (ipne isin $1-) || (amına isin $1-) || (amını isin $1-) || (***** isin $1-) || (amcik isin $1-) || (amina isin $1-) || (amini isin $1-) || (topunuzun isin $1-) || (sikik isin $1-) || (götveren isin $1-) || (shit isin $1-) || (sikerim isin $1-) || (sevişecek isin $1-) || (sux isin $1-) || (götden isin $1-) || (götün isin $1-) || (fahişe isin $1-) || (*** isin $1-) {
ban $comchan($nick,1) $nick 2 | kick $comchan($nick,1) $nick 7 $+ # 12Kanalından Uzaklaştırıldınız!.. Sebep: 2"Özelime Küfür Ettiniz!" 2(12 $+ $date $+ 4/12 $+ $time 7 $+ $me $+ 2) 0,2 (® 0,7 (CipriX v6.0) 0,2 ®) 
}
}
on 1:notice:*:#: {
if $me !isop $comchan($nick,1) { halt }
if $nick isop $comchan($nick,1) { halt }
if (fuck isin $1-) || (kavat isin $1-) || (sike isin $1-) || (avradını isin $1-) || (sikti isin $1-) || (sokarım isin $1- ) || (pezevenk isin $1-) || (siktir isin $1-) || (yarak isin $1-) || (****** isin $1-) || (sikiyim isin $1-) || (sikis isin $1-) || (***** isin $1-) || (siker isin $1-) || (****** isin $1-) || (****** isin $1-) || (fahişe isin $1-) || (ananı isin $1-) || (ibne isin $1-) || (ipne isin $1-) || (amına isin $1-) || (amını isin $1-) || (***** isin $1-) || (amcik isin $1-) || (amina isin $1-) || (amini isin $1-) || (topunuzun isin $1-) || (sikik isin $1-) || (götveren isin $1-) || (shit isin $1-) || (sikerim isin $1-) || (sevişecek isin $1-) || (sux isin $1-) || (götden isin $1-) || (götün isin $1-) || (fahişe isin $1-) || (*** isin $1-) {
ban $comchan($nick,1) $nick 2 | kick $comchan($nick,1) $nick 7 $+ # 12Kanalından Uzaklaştırıldınız!.. Sebep: 2"Özelime Küfür Ettiniz!" 2(12 $+ $date $+ 4/12 $+ $time 7 $+ $me $+ 2) 0,2 (® 0,7 (CipriX v6.0) 0,2 ®) 
}
}
#qswear end


Kelebek Scripte Aittir..

 
Alıntı ile Cevapla

Cevapla

Etiketler
gene, kullaniyorum, kullanmiyorum, mirc download, mirc indir, olmuyo


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık