Çevrimdışı

arkadaşlar belki verilmiş bir konu olabilir araştırdım bulamadım size verecegim komut ile artık sunucunuzdaki adminlerin eklemiş oldugu spamları kolayca kaldırabileceksiniz verecek oldugum kot sadece mirc için geçerlidir umarım beyenirsiniz

;Coded By arziment

raw 229:*:{
write aspamf.txt $+($3,$chr(9)) $+($4,$chr(9)) $+($7,$chr(9)) $+($8,$chr(9)) $+($9,$chr(9)) $10-
halt
}

raw 219:*:{
halt
}

menu status,channel,query {
-
.Spamfilter:/_spamf
}

menu @Spamfilter {
.Sil: {
.spamfilter del $gettok($remove($1-,$chr(9)),1,32) $gettok($remove($1-,$chr(9)),2,32) $gettok($remove($1-,$chr(9)),3,32) $gettok($remove($1-,$chr(9)),4,32) $gettok($remove($1-,$chr(9)),6-,32)
}
-
.Yeni Giriş Ekle: {
.spamfilter add $$?="Tipi" $$?="Ceza Şekli" $$?="Süresi" $$?="Sebep" $$?="Eklenecek Kelime(ler)"
}
-
.Satırı Göster: {
if (!$window(@Satırı.Göster)) {
window -g @Satırı.Göster -1 -1 800 100 Fixedsys 11
}
.echo -tm @Satırı.Göster $remove($1-,$chr(9))
halt
}
-
.Yardım: {
if (!$window(@Spam.Yardım)) {
window -gl @Spam.Yardım -1 -1 600 400 Fixedsys 11
}
iline @Spam.Yardım 1 Spamfilter eklerken kullanılan harflerin manaları:
iline @Spam.Yardım 2 [1]c[1] : Kanal mesajları
iline @Spam.Yardım 3 [1]p[1] : Özel mesajları
iline @Spam.Yardım 4 [1]n[1] : Özel noticeleri
iline @Spam.Yardım 5 [1]N[1] : Kanal noticleri
iline @Spam.Yardım 6 [1]P[1] : Kanaldan çıkış mesajları
iline @Spam.Yardım 7 [1]q[1] : Quit mesajları
iline @Spam.Yardım 8 [1]a[1] : Away mesajları
iline @Spam.Yardım 9 [1]t[1] : Topic
iline @Spam.Yardım 10 [1]u[1] : User (nick!user@host:realname ban) Şeklinde tanımlanır
iline @Spam.Yardım 11 [1]d[1] : dcc
iline @Spam.Yardım 12 -
iline @Spam.Yardım 13 Uygulanacak hareket (ceza) şekilleri:
iline @Spam.Yardım 14 [1]kill, kline, gline, zline, gzline, shun, tempshun, block, dccblock[1]
iline @Spam.Yardım 15 -
iline @Spam.Yardım 16
4Not :
Sebep belirtilirken kelimeler arasında boşluk olmamalıdır.

iline @Spam.Yardım 17 Boşluk yerine _ kullanın. Örnek: Yasak_Kelime_Kullanımı
}
}
alias _spamf {
stats f
.timerdenemes 1 2 /_aspamfl
}

alias _aspamfl {
if ($window(@Spamfilter)) { window -c @Spamfilter } {
window -glk0 @Spamfilter -1 -1 800 600 Fixedsys 11
iline @Spamfilter 1 Eklenmiş bir spami silerken birden fazla satırı seçmeyiniz. Tek tek siliniz.
iline @Spamfilter 2 ­
4Tipi­ [1][1] ­Ceza Şekli­ &shy
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
üresi­-­Ekleyen­-&shy
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ebep­ - ­Eklenen Kelime(ler)­

iline @Spamfilter 3
12..................
2..................
1...........
2....................
12.......................

titlebar @Spamfilter Coded By arziment
var %s = 4
while %s <= $lines(aspamf.txt) {
var %k = $read(aspamf.txt,%s)
iline @Spamfilter %s $gettok(%k,1,32) $gettok(%k,2,32) $gettok(%k,3,32) $gettok(%k,4,32) $gettok(%k,5,32) $gettok(%k,6-,32)
inc %s
unset %k
}
remove aspamf.txt
}
halt
}




4,1 AKLımı ALmaya AkLınız YeTmez Ugraşmaya Sabrınız Yetmez Ben Kendimden Bukadar Eminken Alayınız GeLsin Hiç Farketmez