IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   * kullanıyorum olmuyo kullanmıyorum gene olmuyo (https://www.ircforumlari.net/mirc-scripting-sorunlari/10861-kullaniyorum-olmuyo-kullanmiyorum-gene-olmuyo.html)

Black 15 Ocak 2006 20:56
* 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 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
%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.

aSii_GeNc 15 Ocak 2006 21:35
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....

aSii_GeNc 15 Ocak 2006 21:43
Yeniden düşündümde..

PHP- Kodu:
alias varmi {
%mesaj1 = * lan *
%mesaj2 = * len *
var %i = 1
while $eval($+(%,mesaj,%i),2) {
if ($eval($+(%,mesaj,%i),2) iswm $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.

el33t 15 Ocak 2006 22:50
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.

Black 15 Ocak 2006 22:51
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ı.

Black 15 Ocak 2006 23:18
Tamam bu sefer oldu. Çok teşekkürler.

XooM 16 Ocak 2006 13:06
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?

SCouNDReL 16 Ocak 2006 13:57
ŞöyLe bİşey İstioSn Sanırım ;
Kod:
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..

Black 16 Ocak 2006 20:49
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 %. } }

CipriX 16 Ocak 2006 20:57
#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..


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 12:23.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net