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 %£^ 
    }
  }
}

 Mirc.gen.tr Hazır Kod sistemi:

This entry was posted on Cuma, Aralık 4th, 2009 at 13:04 and is filed under Hazir Kodlar, Mirc Script Dersleri. You can follow any responses to this entry through the RSS 2.0 feed. You can leave a response, or trackback from your own site.