| Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
|
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
}
}
|
|