Konu: away scan
Tekil Mesaj gösterimi
Alt 21 Ocak 2009, 08:52   #7
Ç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




kodu bir deneyiniz. eğer sorun çıkarsa başlık altında belirtiniz.

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#awayscan off
alias awayscan {
  var %
chan
  
if ($hget(awayscan)) { hfree awayscan }
  if ((!$
1) && ($active !ischan)) { msg #AzuLa - | msg #AzuLa * /awayscan: you are not on a channel(Hata) | msg #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 #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 
#AzuLa Totally found $+(,$hget(awayscan,away),) away users
    
if ($hget(awayscan,away) > 0) {
      %
away $hget(awayscan,names)
      
msg #AzuLa Away Users: %away
    
}
    
hfree awayscan
    msg 
#AzuLa End of awayscan
    
haltdef
  
}
}
#awayscan end

on *:text:*:*: {
  if 
$chan == #AzuLa && $nick isop $chan { 
    
if $== !awaytara {
      if 
$group(#awayscan) == on {
        
timer 1 2 window -#Kanal
        
timer 1 5 awayscan #Kanal
      
}
      if 
$group(#Awayscan) == off {
        
msg $chan(#AzuLa) Şu an bu komutu kullanamazsınız. Away tarama modu kapalıdır.
      
}
    }
    if $
== !awayon {
      
enable #awayscan
      
msg $chan(#AzuLa) Away Tarama modu açılmıştır.
    
}
    if $
== !awayoff {
      
disable #awayscan
      
msg $chan(#AzuLa) Away Tarama modu kapatılmıştır.
    
}
    if $
== !awaykomut {
        
msg $chan(#AzuLa) Kullanabileceğiniz komutlar; !awaytara , !awayon , !awayoff olarak belirlenmiştir.
    
}
  }



Kodun çalışma mantığı ;

#AzuLa kanalında !awaykomut yazdığınızda kullanabileceginiz komutları görebilirsiniz.

#AzuLa kanalında !awayon yazdığınızda, away tarama modunu aktif hale getirecektir. Durum bilgisini #AzuLa kanalına yansıtacaktır.

#AzuLa kanalında !awayoff yazdığınızda, away tarama modunu deaktif hale getirecektir. Durum bilgisini #AzuLa kanalına yansıtacaktır.

#AzuLa kanalında !awaytara yazdığınızda, eğer away tarama modu aktif ise; belirlediğiniz kanalda away taraması yapıp bilgileri #AzuLa kanalına yansıtacaktır. Eğer away tama modu deaktif ise taramayı yapmayacaktır, modun aktif olmadığını belirten bir mesaj yansıtacaktır.

Not: Komutları kullanacak kişinin #AzuLa kanalında Op ( @ ) yetkisinde olması gerekiyor.

Açıklama:
Kodu ekledikten sonra #Kanal olan yerleri tarama yapmasını istediğiniz kanalın adıyla değiştirin.
#AzuLa olan yerleri ise; komutların hangi kanalda kullanılmasını istiyorsanız o kanalın adıyla değiştirin.

kodun çalıştığına dair log:


Alıntı:
[08:24:47] <aSra> !awaytara
[08:24:48] <nickyaziniz> Şu an bu komutu kullanamazsınız. Away tarama modu kapalıdır.
[08:24:57] <aSra> !awayon
[08:24:57] <nickyaziniz> Away Tarama modu açılmıştır.
[08:25:00] <aSra> !awaytara
[08:25:06] <nickyaziniz> Awayscan in #Arkadas
[08:25:07] <nickyaziniz> Totally found 0 away users
[08:25:07] <nickyaziniz> End of awayscan
[08:25:10] <aSra> !awayoff
[08:25:10] <nickyaziniz> Away Tarama modu kapatılmıştır.
[08:25:14] <aSra> !awaytara
[08:25:15] <nickyaziniz> Şu an bu komutu kullanamazsınız. Away tarama modu kapalıdır.
[09:16:50] <aSra> !awaykomut
[09:16:50] <nickyaziniz> Kullanabileceğiniz komutlar; !awaytara , !awayon , !awayoff olarak belirlenmiştir.

iyi forumlar.


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

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