Mirc Oto Hazir Kodları
Bu Kodlarla:

Away oldugunuz nickten oto olarak kanallardaki yetkili oldugunuz nicke dönersiniz. nickiniz oto identify edilir seçili olan nicki oto olarak banlarsınız. ve yeniden eski nickinize geri dönüş yaparsınız:

Kurulumu:

Mircde ALT +R Yapınız aliases kısmına kodu ekleyiniz.

F1 {
set %jw $me
set %bn NİCKİNİZZ
set %xs $$1
.nick %bn
.ns identify ŞİFRENİZ
.timer 1 1 tban %xs
.timer 1 1 onluk %xs
.timer 1 2 atm %xs
.timer 1 5 /yetkial %bn
.timer 1 11 /nick %jw
}
yetkial { if $1 { var %\\ = 1,%/ = $comchan($1,0) | while %\\ <= %/ { if $1 !isreg $comchan($1,%\\) { mode $comchan($1,%\\) -voqah $str($+($1,$chr(32)),5) } | inc %\\ } } }

Aynı kodu remote kısmındada kullanabilirsini. ALT +R yaparak kodu remote kısmına ekleyiniz.

alias ATM { if $$1 { var %ü = $comchan($$1,0) | while %ü { if ($me isop $comchan($$1,%ü)) { ban -k $v2 $$1 2 EFENDİ OL } | dec %ü } } }
alias tban {
var %a 1
while ($chan(%a) != $null) {
if (($me isop $chan) || ($me ishelp $chan)) {
if ($1 ison $chan(%a)) { ban -ku180 $1 2 Yetkili oldugum tüm kanallardan atıldın. }
}
inc %a 1
break
}
}
alias onluk { var %£n $comchan($$1,0) | var %^ 1
while %^ <= %£n { set -u3 %£chan $addtok(%£chan,$comchan($$1,%^),32) | inc %^ }
var %£Cs $numtok(%£chan ,32) | var %£^ 1
while %£^ <= %£Cs { if $me isop $gettok(%£chan,%£^,32) {
mode $gettok(%£chan,%£^,32) +b $$1 | kick $gettok(%£chan,%£^,32) $$1 Bla bla…
inc %£^ } | else { samode $gettok(%£chan,%£^,32) +b $$1 | inc %£^
}
}
}