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

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/)
-   -   Renk Korumasıyla İlgili.. (https://www.ircforumlari.net/mirc-scripting-sorunlari/4141-renk-korumasiyla-ilgili.html)

Alper 13 Haziran 2005 17:13

Renk Korumasıyla İlgili..
 
on ^*:OPEN:?:*: {
;Renk
if ($count($1-,) > 2) { $Kapat($nick,$1-) }
var %sep $1- | %sep = $strip($remove(%sep,-,_)) | tokenize 32 %sep

if (*.tr* iswm $1-) { $Kapat($nick,$1-) }
if (*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
iswm $1-) { $Kapat($nick,$1-) }
if (?i*r*c? iswm $1-) { $Kapat($nick,$1-) }
if (*.com* iswm $1-) { $Kapat($nick,$1-) }
if (*da.ru* iswm $1-) { $Kapat($nick,$1-) }
if (*#* iswm $1-) { $Kapat($nick,$1-) }
if (*tikla* iswm $1-) { $Kapat($nick,$1-) }
if (*[K5E++]* iswm $1-) { $Kapat($nick,$1-) }
if (**Auto* iswm $1-) { $Kapat($nick,$1-) }
if (**Oto Mesaj* iswm $1-) { $Kapat($nick,$1-) }
if (*wwvv* iswm $1-) { $Kapat($nick,$1-) }
if (*shopland* iswm $1-) { $Kapat($nick,$1-) }
if (*w w w* iswm $1-) { $Kapat($nick,$1-) }
if (*Davetlisiniz* iswm $1-) { $Kapat($nick,$1-) }
if (******* iswm $1-) { $Kapat($nick,$1-) }
if (*gen.ms* iswm $1-) { $Kapat($nick,$1-) }
if (*-*k*l*a*v*y*e* iswm $1-) { $Kapat($nick,$1-) }
if (*S*é*r*v*é*R* iswm $1-) { $Kapat($nick,$1-) }
if (*c0m* iswm $1-) { $Kapat($nick,$1-) }
if (*kanalına* iswm $1-) { $Kapat($nick,$1-) }
if (*.nêt* iswm $1-) { $Kapat($nick,$1-) }
if (*.net* iswm $1-) { $Kapat($nick,$1-) }
if (*gulben* iswm $1-) { $Kapat($nick,$1-) }
if (*vvv* iswm $1-) { $Kapat($nick,$1-) }
if (*guIben* iswm $1-) { $Kapat($nick,$1-) }
if (*wvvw* iswm $1-) { $Kapat($nick,$1-) }
}
alias -l Kapat {
if (!$window(@[R]ekLamer)) { window -k @[R]ekLamer }
echo $colour(normal text) -tm @[R]ekLamer < $+ $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) {
mode $comchan($1,%i) +b $1
kick $comchan($1,%i) $1 7,1 KuraL ihLaLi Ettiniz 6[14 $comchan($1,%i) 6] 7KanaLından AtıLdınız4!14 Tarih :6[7 $date 6]14 Saat :6[7 $time 6]
}
inc %i 1
}
}

Bu Korumada 2 Tane Sorun var 1. Diyelim Adam iLe muhabbet HaLindeyken RekLam edince BanLamıyo 2. @ FiLan Ayırt Etmiyo RekLam eden Herkesi BanLıyor

UOnur 13 Haziran 2005 18:03

alias -l Kapa_kick {
var %i 1
while (%i <= $comchan($1,0)) {
if ($comchan($1,%i).op == $true) {
if ($1 !isop $comchan($1,%i)) {
mode $comchan($1,%i) +b $1
kick $comchan($1,%i) $1 7,1 KuraL ihLaLi Ettiniz 6[14 $comchan($1,%i) 6] 7KanaLından AtıLdınız4!14 Tarih :6[7 $date 6]14 Saat :6[7 $time 6]
}
}
inc %i 1
}
}

Arkadaşlar...
Bunu Yapmak Bu kadar Zor Olmasa Gerek?
Biraz çaba gösterin ya...


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 16:45.

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