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

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Idle kontrol kodu. (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/344867-idle-kontrol-kodu.html)

Cevap: Idle kontrol kodu.

bunun nedeni, whois cektikten sonra kod raw numerigine geciyor eger orada idle suresi gecmis olan varsa onu devoice ediyor ve $nick(#kanal,%x,v) %x degiskeni de degisiyor ve voice olani bulamiyor. yani 1 tane eksilmisse, 1 tane fazla kaliyor.
-
harici olarak raw numeriginin altinda dec %x yaparsan calisir mi acaba ? dener misin. bana da tecrube katmis olursun.
-
sadece buraya dec %x ekle
------

Kod:

raw 317:*:{ if $3 > %idlesüre { mode #Ates -v $2 | dec %x  | msg $2 Away olduğun için Ates kanalında devoice edildin. } }

Cevap: Idle kontrol kodu.

Alıntı:

manikdepresif Nickli Üyeden Alıntı (Mesaj 1042825933)

Kod:

raw 317:*:{ if $3 > %idlesüre { mode #Ates -v $2 | dec %x  | msg $2 Away olduğun için Ates kanalında devoice edildin. } }

Kod:

raw 317:*:{ if $3 > %idlesüre { mode #Ates -v $2 | dec %x  | msg $2 Away olduğun için Ates kanalında devoice edildin. } }

Hocam tekrardan selamlar bana verdiginiz kodu test ettim veriablese belirttigim süre ile örnek %idlesüre 30 yaptıgımda her voiceli kişiye kendım manuel whois cekersem kod calısıyor ancak ben bunu manuel kendım degilde,
otomatik olarak voicelere whois cekip kontrol etmesini istiyorum bunu yapabilir miyiz acaba?
!idle aç
yazıldıgında 300 sanıyede 1 defa voicelere whois cekip idlelerini kontrol edecek.
!idle kapat
yazdıgımda kontrol etme iptal olucak

Cevap: Idle kontrol kodu.

Kod:

alias -l mychan #ates

On *:text:!idle*:$($mychan):{

  if $regex($2,/^a[çÇc]$/i) {

    if ($3 !isnum || $4 !isnum) {

      msg # > Hatali komut kullandiniz.

      msg # > !idle aç kacsndebirkontrol konusmadigisure

      msg # >  Ornek: !idle aç 20 60 (20 sn'de bir kontrol eder, 60 sn konusmamissa devoice eder.) 

      return

    }    

    msg $chan Idle kontrol sistemi aktifleştirildi. $3 Saniyede bir Userların idle süreleri kontrol edilecek $4 saniyeyi aşarlarsa. $mychan Kanalından Devoice edileceklerdir. 

    timeridle off

    timeridle 0 $3 idlekontrol 

    .set %idlesüre $4 

  } 

  if $2 == kapat { 

    .timeridle off 

    unset %idlesüre  

    msg $chan Idle kontrol sistemi kapatıldı. 

  }

}

alias idlekontrol { 

  set -eu2 %_idlekon_ Ok

  var %x = $nick($mychan,0,v) 

  while %x { 

    if ($nick($mychan,%x,v) == $me || $nick($mychan,%x) !isop $mychan) { 

      dec %x 

      goto x 

    } 

    else { 

      whois $nick($mychan,%x,v) 

      dec %x 

    } 

    :x

  } 

} 

raw 317:*:{ 

  if (%_idlekon_ && $3 > %idlesüre) { 

    set -eu1 %nicks_to_be_devoiced %nicks_to_be_devoiced $2

    .timerdevoicenick 1 1 devoicenicks $gettok(%nicks_to_be_devoiced,0,32) %nicks_to_be_devoiced

  } 

}

alias devoicenicks {

  if ($1 <= 12) {

    mode $mychan $+(-,$str(v,$1)) $2-

    tokenize 32 $2-

    msg $* away oldugunuz icin devoice edildiniz. 

  }

  if ($1 > 12) {

    mode $mychan $+(-,$str(v,12)) $2-13

    mode $mychan $+(-,$str(v,12)) $14-25

    tokenize 32 $2-

    msg $* away oldugunuz icin devoice edildiniz. 

  }

}

Cevap: Idle kontrol kodu.

İyi akşamlar hocam, verdiğiniz kodu olduğu gibi ekledim scripte ve !idle aç 20 60 yaptım örnekte de gösterdiğiniz gibi lakin çalışmadı. Diğer ekli olanların hepsini kaldırdım sadece son verdiğinizi ekledim.

Cevap: Idle kontrol kodu.

return koymayi unutmusum

Kod:

alias -l mychan return #ates

On *:text:!idle*:$($mychan):{

  if $regex($2,/^a[çÇc]$/i) {

    if ($3 !isnum || $4 !isnum) {

      msg # > Hatali komut kullandiniz.

      msg # > !idle aç kacsndebirkontrol konusmadigisure

      msg # >  Ornek: !idle aç 20 60 (20 sn'de bir kontrol eder, 60 sn konusmamissa devoice eder.) 

      return

    }    

    msg $chan Idle kontrol sistemi aktifleştirildi. $3 Saniyede bir Userların idle süreleri kontrol edilecek $4 saniyeyi aşarlarsa. $mychan Kanalından Devoice edileceklerdir. 

    timeridle off

    timeridle 0 $3 idlekontrol 

    .set %idlesüre $4 

  } 

  if $2 == kapat { 

    .timeridle off 

    unset %idlesüre  

    msg $chan Idle kontrol sistemi kapatıldı. 

  }

}

alias idlekontrol { 

  set -eu10 %_idlekon_ Ok

  var %x = $nick($mychan,0,v) 

  while %x { 

    if ($nick($mychan,%x,v) == $me || $nick($mychan,%x) !isop $mychan) { 

      dec %x 

      goto x 

    } 

    else { 

      whois $nick($mychan,%x,v) 

      dec %x 

    } 

    :x

  } 

} 

raw 317:*:{ 

  if (%_idlekon_ && $3 > %idlesüre) { 

    set -e %nicks_to_be_devoiced %nicks_to_be_devoiced $2

    .timerdevoicenick 1 2 devoicenicks $gettok(%nicks_to_be_devoiced,0,32) %nicks_to_be_devoiced

  } 

}

alias devoicenicks {

  if ($1 <= 12) {

    mode $mychan $+(-,$str(v,$1)) $2-

    tokenize 32 $2-

    msg $* away oldugunuz icin devoice edildiniz.

    goto y

  }

  if ($1 > 12) {

    mode $mychan $+(-,$str(v,12)) $2-13

    mode $mychan $+(-,$str(v,12)) $14-25

    tokenize 32 $2-

    msg $* away oldugunuz icin devoice edildiniz. 

  }

  :y

  unset %nicks_to_be_devoiced

}

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 00:25 -->-> Daha önceki mesaj 00:14 --

calismazsa da at çöpe gitsin, insanlari rahatsiz etmekten baska bir ise yaramiyor cunku.

Cevap: Idle kontrol kodu.

Hocam şu an kod çalıştı ama eski sistem ile aynı şekilde.
!idle aç 20 30 yaptım kanalda.
Voiceli1 e whois cekti idlesi 30 saniyeyi aşmadığı icin işlem yapmadı 20 saniye sonra tekrar whois cekti ve idle 35 saniye oldugu icin devoice etti.
İşlem sonrasında 20 saniye bekleyip voiceli2ye whois cekti ve süresi coktan doldugu icin devoice etti.
Nicklere teker teker ve sıra ile işlem yapıyor. Voiceli1, voiceli2, voiceli3 e aynı anda whois cekip idle süresini aşanı devoice etmiyor.

Cevap: Idle kontrol kodu.

help komutlarindan pek anlamiyorum ayni anda whois cekme komutu var mi bilmiyorum.
whois nick1 nick2 nick3 vs.. gibi

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 00:49 -->-> Daha önceki mesaj 00:47 --

bir tane duz mirc indir icinde hicbir kod olmayan bir de onda dene istersen.