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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - !seslen Kodu (https://www.ircforumlari.net/mirc-scripting-sorunlari/894817-seslen-kodu.html)

Arkadaslar. #Opers kanalda !seslen yada !opers komutunu yaptigim zaman Butun oper adminlerin nickleri Tablanmasi istiyorum addon paylasirmisiniz. tskler

Yokmu Arkadaslar yardım edicek ?

Cevap: !seslen Kodu

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
!seslen komutu yazarsanız forumda bulursunuz.
Bir tane paylaşmıştım ama düzeltilecek bir yeri var, sonradan fark ettim. bulamazsanız düzeltir paylaşırım sizinle.
Keyifli İF'ler

Cevap: !seslen Kodu

Merhaba iyi forumlar dilerim.

Öncelikle konusu açılmış olan benzer bir konu mevcut. Dilerseniz burayı da inceleyebilirsiniz.. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Sayın @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] abinin paylaştığı kodu ufak bir dokunuşla istediğiniz gibi olduğunu düşünerekten, değiştirdim. Buyrun;

Kod:

on *:input:#Opers:{ 

  if $regex($1,/^([!\.]seslen)/Si) {

    var %n = 1

    while %n <= $nick(#,0) {

      if !$istok($me Alper ImBOT S-Bot,$nick(#,%n),32) {

        var %nickler %nickler $nick(#,%n)

      }

      inc %n

    }

    .timer -h 1 500 msg # %nickler Lütfen 4#Opers'e bakınız..

  }

}

Umarım işinizi görür.. Kırmızı ile yazılı kısımda muaf nick ekleyebilirsiniz..

Cevap: !seslen Kodu

Kod:

on *:text:*:#opers,#kanal,%bilgikanal: {

  if $regex($1,/[!.]seslen/i) {

    var %:cc 1 

    while %:cc <= $nick(#,0) { 

      if !$istok(Subzero Nomercy,$nick(#,%:cc),32) {

        .set %:ccc $iif(%:ccc,%:ccc $+ $chr(32) $+ $nick($chan,%:cc),$nick(#,%:cc)) 

      }

      inc %:cc 

    }     

    msg # %:ccc 

    .unset %:ccc 

  }

}