Konu: away scan
Tekil Mesaj gösterimi
Alt 21 Ocak 2009, 02:06   #2
Çevrimdışı
AzuLa
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: away scan




Doğruluğundan tam emin olmamakla beraber;

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:connect: {
  .
timer 0 1800 /awayscan
}

#awayscan on
alias awayscan {
  var %
chan
  
if ($hget(awayscan)) { hfree awayscan }
  if ((!$
1) && ($active !ischan)) { msg $chan(#AzuLa) - | msg $chan(#AzuLa) * /awayscan: you are not on a channel | msg $chan(#AzuLa) - | halt }
  
if ($1) { %chan = $}
  else { %
chan $active }
  
hmake awayscan $nick(%chan,0)
  
hadd awayscan chan %chan
  hadd awayscan scan 1
  hadd awayscan away 0
  
.who $hget(awayscan,chan)
  
msg $chan(#AzuLa) Awayscan in %chan 
}
raw 352:*:{
  if ((
$hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
    if (
$left($7,1) == G) {
      
hinc awayscan away 1
      
if (!$hget(awayscan,names)) { hadd awayscan names $}
      else {
        var %
names $hget(awayscan,names)
        
hadd awayscan names $+(%names,$chr(32),$6)
      }
    }
    
haltdef
  
}
}
raw 315:*:{
  if ((
$hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
    var %
away
    msg $chan
(#AzuLa) Totally found $+(,$hget(awayscan,away),) away users
    
if ($hget(awayscan,away) > 0) {
      %
away $hget(awayscan,names)
      
msg $chan(#AzuLa) Away Users: %away
    
}
    
hfree awayscan
    msg $chan
(#AzuLa) End of awayscan
    
haltdef
  
}
}
#awayscan end 

connect eventine timer koydum; 30 dakikada bir /awayscan taraması yapacak.
codda echo -a olan yerleri msg $chan(#AzuLa) olarak değiştirdim. sonucları #AzuLa kanalına yansıtacak. kodu 15 saniyede bir olarak denedim bende calıstı. Kendi belirlediğiniz knala gitmesi için #AzuLa kısımlarını #kanalım şeklinde değiştirmeniz yeterli olacaktır.

Fakat bot komutları aynı olur mu bilemiyorum.



calıstıgına dair;

Alıntı:
[01:49] <@aLias> Awayscan in #Radyo
[01:49] <@aLias> Totally found 1 away users
[01:49] <@aLias> Away Users: aLias
[01:49] <@aLias> End of awayscan
[01:50] <@aLias> -
[01:50] <@aLias> * /awayscan: you are not on a channel
[01:50] <@aLias> -
[01:50] <@aLias> -
[01:50] <@aLias> * /awayscan: you are not on a channel
[01:50] <@aLias> -
[01:50] <@aLias> Awayscan in #AzuLa
[01:50] <@aLias> Totally found 1 away users
[01:50] <@aLias> Away Users: aLias
[01:50] <@aLias> End of awayscan

log buradadır.

herhangi bir sorun ile karsılasırsanız yardımcı olmaya calısırım.


Konu AzuLa tarafından (21 Ocak 2009 Saat 02:20 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet