Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { var %: $lines(kufur.txt)
while (%: > 0) { if $read(kufur.txt,%:) iswm $strip($1-) {
sajoin $nick 0
msg $nick # kanalında küfür ettiginiz için tüm kanallardan çıkartılıp #X kanalına alındınız
shun $nick Kufur | sajoin $nick #X } | dec %: } }
kufur.txt dosyarlıdnan birisini ederse dedigin işlemleri yapar fakat burada kırmızı yazılı yer
sajoin $nick 0 yazan yer tüm kanllardan çıkartan kod. Eger bu kırmızı yer yerine sapart #nick # yaparsan sadece kfürü ettigi kanaldan çıkartır.