Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#: { if ($regex($1-,/[\.!]giri[sş]\s/Si) && $2) { write girisizinn.txt $2 | msg # $2 için giriş izni verildi. } | elseif ($regex($1-,/[\.!]giri[şs]sil\s/Si) && $2) && $read(girisizinn.txt,w,$2) { write $+(-dl,$2) girisizinn.txt | msg # $2 Giriş izin listesinden silindi. } | elseif $regex($1-,/[\.!]glist$/Si) && ($lines(girisizinn.txt) == 0) { msg # Giriş izin listesi boş. } | elseif $regex($1,/[\.!]glist$/Si) { msg # Giriş izni verilen kanallar listeleniyor... | .play # girisizinn.txt 1000 } }
on *:join:#: { if ($nick == $me) && !$read(girisizinn.txt,w,#) { part # } | else { return } }
Kodun amacı;
Sunucu girişlerinde birden fazla kanallara alınıyorsunuz bu kanallardan çıkmak bazen yorucu olabiliyor bunu kolaylaştırma acısından yazılmış olan basit bir kod. Giriş izini vermediğiniz bir kanala siz veya sistem tarafından alınırsanız oto çıkış yaparsanız.
Kullanım;
.giriş #kanal => Belirtilen kanala giriş izni verilir ve girdiğiniz de oto çıkış yapılmaz.
.girişsil # => Belirtilen kanalın giriş iznini iptal eder.
.glist => Giriş izni verilen kanalları listeler.