IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   unbanall (https://www.ircforumlari.net/mirc-scripting-sorunlari/158617-unbanall.html)

QkLa 19 Kasım 2008 17:23

unbanall
 
Selamu ALEYKUM.

arama yaptim ama bulamadim.ricam sudur.
kanalda hic bir accesi olmayan birisi ornegin Ahmet. !unban yazdiginda banlistteki tum banlar acilsin.arama yaptim ama !unban komutunu genelde aop'lar kullanacak sekilde codeler bulabildim.benim ricam bu verilecek codeyi aop mircina yukleyecek.kanalda gorevli olmayan Ahmet nicki !unban yazdiginda code yuklu olan aop'a banlari actiracak.
birde !ban mehmet yazdigimda sadece onun banini acacak bir code verilebilirmi lutfen..bani actiracak kisi yine gorevli degildir.
kanaldaki ban sekli..+b osman[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

simdiden tesekkur ederim hayirli forumlar.

XcLusive 19 Kasım 2008 17:31

Cevap: unbanall
 
Kod:

alias clearallban {
  if ($regex($usermode,/(o|O|N|a|A|C))) {
    echo 4 -a IRCop modu tespit edildi, bulunduğunuz bütün kanalların banı açılıyor..
    var %cx = 1,%xc = $chan(0)
    while (%cx <= %xc) {
      clearbans $chan(%cx)
      inc %cx 1
    }
    halt
  }
  var %u = 1,%f = $chan(0)
  while (%u <= %f) {
    if ($me isop $chan(%u) || $me ishop $chan(%u)) { clearbans $chan(%u) | echo 4 -a *** $chan(%u) Kanalının banı açılıyor.. }
    inc %u 1
  }
}
raw 478:*:{ if ($regex($usermode,/(o|O|N|a|A|C))) { echo -at $2 Kanalının Ban Listesi Dolmuş Durumda, Banlar Temizleniyor.. | clearbans $2 | Halt } }
alias massmode {
  var %i = 1, %x = $numtok($3-,32), %y = $modespl
  while (%i <= %x) {
    mode $1 $+($left($2,1),$str($right($2,1),$numtok($gettok($3-,$+(%i,-,$calc(%i + %y)),32),32))) $gettok($3-,$+(%i,-,$calc(%i + %y)),32)
    inc %i %y
  }
}
alias clearbans {
  var %1 = $iif($1,$1,$chan), %b = $ibl(%1,0), %i, %t
  if (%b == 0) {
    echo -t %1 * Ban Listesi Alınıyor $+(%1,...)
    mode %1 b
  }
  else {
    var %i = $ibl(%1,0)
    while (%i) {
      var %t = $addtok(%t,$ibl(%1,%i),32)
      dec %i
    }
    massmode %1 -b %t
  }

}

bu kod ile kendine birşeyler yapabilirsin
IRCop isen (op olduğun) bütün kanalların banını, User isen sadece op olduğun kanalların banını açar.

sniper 19 Kasım 2008 17:35

Cevap: unbanall
 
wauv eline sağlık HaLo :)

QkLa 19 Kasım 2008 17:51

Cevap: unbanall
 
ricam sadece soyle bir codeyi Ahmet nickininde kullanabimesi icin editlemek.

on *:text:*:#: { if $1 == !unban && $nick isop # { msg $chan Banlar temizleniyor. | banac # } }
alias banac { mode $1 +b | var %1 = 1,%2 = $ibl($1,0) | while %1 <= %2 { mode $1 -b $ibl($1,%1) | inc %1 } }

bunu kullanmaya aop'lar yetkili.bunu bir aop mircina ekleyecek.user olan Ahmet'de o aop kanalda iken !unban yazdiginda banlar acilacak..

Regex 19 Kasım 2008 19:24

Cevap: unbanall
 
Bir şeyleri araman ve bulduktan sonra soru ve sorunlarını dile getirmen güzel. Fakat bu arayıp da bulduğun şeyleri de ilk iletinde paylaşırsan, daha kolay ve daha hızlı yardım alabilirsin.

Kod:

on *:text:!unban:#:.msg # Banlar temizleniyor. | bnac #
alias -l bnac if $regex($1,^#) { mode $1 +b | var %1 = 1 | while $ibl($1,%1) { mode $1 -b $ibl($1,$v1) | inc %1 } }


Yukarıdaki kod, istediğin işlemi yapacaktır. Herkesin kullanımını sağlamak dışında, birkaç düzenleme daha yaptım.

Umarım işine yarar. Kolay gelsin.

QkLa 19 Kasım 2008 20:06

Cevap: unbanall
 
benim ricam suydu.kanaldaki bir aop !unban yazdiginda tum banlar acilacak.!unban nick yazdiginda sadece belirtilen nickin banini acacak.ayni zamanda bu komutu kullanmaya user olan Ahmet'te yetkili olacak.user ban actiramaz ama codeyi bir aop mircina yukler ve userin yazdigi bu komutla aop bani acarsa sorun olmaz.


hayirli forumlar..

Regex 19 Kasım 2008 21:37

Cevap: unbanall
 
Kod:

on *:text:*:#:{
  if $1 == !unban {
    if !$2 {
      .msg # Banlar temizleniyor.
      bnac #
    }
    elseif !$regex($2,@|!|\*) { .msg # Hata: Lütfen maskı tam olarak giriniz. }
    else .msg # $qt($2) maskına ait ban kaldırıldı. | mode # -b $2
  }
}
alias -l bnac if $regex($1,^#) { mode $1 +b | var %1 = 1 | while $ibl($1,%1) { mode $1 -b $ibl($1,$v1) | inc %1 } }


Şeklinde yapabilirsin.

QkLa 20 Kasım 2008 17:09

Cevap: unbanall
 
ricami ben dile getiremedim anlasilan.
rica edilenler sunlardir.

kanaldaki tum aoplar ve Ahmet nickli user bu codeyi kullanmaya yetkili olacak.sizin verdiginiz codeye gore codenin yuklu oldugu mirc kullanan bu komutu uygulayamiyor.kanaldaki dger aop'lar kullanabiliyor.benim ricam.mircinda code yuklu olan aop dahil,kanaldaki tum aoplar ve Ahmet nickli user bu komutu kullanmaya yetkili olsun.!unban yazdiklarinda tum banlar temizlenecek.!unban nick yazdiklarinda ise sadece belirtilen nick'in bani acilacak.

simdiden tesekkur ederim..

Difuzyon 20 Kasım 2008 18:01

Cevap: unbanall
 
Kod:

on *:text:*:#:{
  if $nick isop $chan || $nick == Ahmet && $1 == !unban {
    if !$2 {
      .msg # Tüm banlar temizleniyor.
      var %e 1 | while %e <= $ibl(#,0) { mode # -b $ibl(#,%e) | inc %e }
    }
    elseif !$regex($2,@|!|\*) { .msg # Hata: Lütfen maskı tam olarak giriniz. | return }
    else .msg # $qt($2) maskına ait ban kaldırıldı. | mode # -b $2
  }
}

Kod:

on *:input:#:{
  if $me isop $chan && $1 == !unban {
    if !$2 {
      msg # Tüm banlar temizleniyor.
      var %e 1 | while %e <= $ibl(#,0) { mode # -b $ibl(#,%e) | inc %e }
    }
    elseif !$regex($2,@|!|\*) { .timer 1 1 echo -a Hata: Lütfen maskı tam olarak giriniz.Örnek; Cenk!*@* | return } 
    else .timer 1 1 msg # $qt($2) maskına ait ban kaldırıldı. | mode # -b $2
  }
}

Yukardaki kodlar,kimde çalışacaksa onun scriptinde olmalı.

QkLa 21 Kasım 2008 08:33

Cevap: unbanall
 
Code icin tesekkur ederim.bunda tek bir nickin banini kaldirirken sadece nick yazdigimizda banini kaldirmak mumkunmu.tam maski yazmayip sadece !unban ali dedigimizde onun banini kaldirsa.
simdiden tesekkur ederim hayirli forumlar.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 23:51.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk