Kod: Kodu kopyalamak için üzerine çift tıklayın!
;Kanal'a benim haricimde birisi giriş yaptığı zaman,
on !*:join:#: {
;Eğer ~&@%+ prefixlerinden birine sahib isem,
if ($regex($nick(#,$me).pnick,@|&|~|%|(\+))) {
;Kanal tablosuna nick'i kaydet(5 saniye sonra silinmek üzere)
hadd -mu5 # $+(#,½,$nick) 1
;Eğer tablodaki veri sayısı, 4 veya fazlası olur ise
if ($hget(#,0).item >= 4) {
;Kanal'ı +MR moduna al,
mode # +MR
;/msg ile kanal'a text gönder,
.msg # Kanal modları değişti vs.
;2 değişken oluştur,
var %1 = $v1,%2 = 1
;While ile %1 değişkenini %2 değişkenine eşitle
while (%2 <= %1) {
;Eşitleme işleminde, tablodaki tüm verileri yani kayıt olan nickleri kanal'dan banla.
ban -k # $removecs($hget(#,%2).item,#,½) 2 sebeb.
inc %2
}
}
}
}
Sanırım gayet açık.