Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#opers:{
if $1 == !muafkanal {
if !$read(admin.txt,w,$nick) { msg # 2 Bu komutu kullanmaya yetkili degilsin. | return }
if !$2 { msg # Komut kullanımı; 2 !muafkanal ekle - sil - list | return }
if $2 == ekle {
if !$3 || *.*.* !iswm $3 { msg # 2 Lütfen kanal belirtiniz. | return }
if $read(muafkanal.txt,w,$3) { msg # 2 Belirtilen kanal listede ekli. | return }
.write muafkanal.txt $3 | msg # $3 2 muaf kanal olarak eklendi.
}
if $2 == sil {
if !$3 || *.*.* !iswm $3 { msg # Lütfen kanal belirtiniz. | return }
if !$read(muafkanal.txt,w,$3) { msg # 2 Belirtilen kanal listede bulunmamaktadır. | return }
.write $+(-ds,$3) muafkanal.txt | msg # $3 2 muaf kanal listesinden silindi.
}
if $2 == list {
if $lines(muafkanal.txt) == 0 { msg # 2 Muaf Kanal listesi boş. | return }
msg # 2 Muaf Kanal Listesi
msg #
var %:ip = 1 | while %:ip <= $lines(muafkanal.txt) {
msg # %:ip $+ -) $read(muafkanal.txt,%:ip)
inc %:ip
}
msg #
msg # 2 Muaf Kanal Listesi Sonu
}
}
}
eksık olabilie : d