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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   /seen Kodu (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/6673-seen-kodu.html)

goXXip 20 Ağustos 2005 17:40

/seen Kodu
 
PHP- Kodu:

;$_find($1,1) = nick$_find($1,2) = time$_find($1,3) == date
alias _find 
return $gettok($hget(seen. $+ $server,$hfind(seen. $+ $server,$+(*,$1,*),1,w).data),$2,46)
on *:JOIN:#: {
  
if !$findfile($mircdir,$+(seen.,$server,.data),1) { 
    
hmake seen. $+ $server 50
    hsave seen
. $+ $server $+(seen.,$server,.data
  }
  elseif !
$hget(seen. $+ $server) { hmake seen. $+ $server hload seen. $+ $server $+(seen.,$server,.data) } 
  if 
$_find($nick,1) { hdel seen. $+ $server $hfind(seen. $+ $server,$+(*,$1,*),1,w).data }
  
hadd seen. $+ $server $r(0,99999999) $+($nick,$chr(46),$time,$chr(46),$date)
  
hsave seen. $+ $server $+(seen.,$server,.data)
  
}
alias seen {
  if 
$server {
    if $
{
      if $
== clear {
        
hdel -w seen. $+ $server *
        echo -
a Temizlendi
        hsave seen
. $+ $server $+(seen.,$server,.data)
      }
      elseif $
== list {
        var %
1,%nick,%time,%date
        
while %<= $hget(seen. $+ $server,0).item {
          %
nick $gettok($hget(seen. $+ $server,%s).data,1,46)
          %
time $gettok($hget(seen. $+ $server,%s).data,2,46)
          %
date $gettok($hget(seen. $+ $server,%s).data,3,46)
          echo -
%s Nick: %nick Time: %time Date: %date
          inc 
%s
        
}
      }
      elseif 
$_find($1,1) {
        echo -
a $_find($1,1) $+ , En son $_find($1,3Tarihinde Saat $_find($1,2Saatinde Görüldü...
      }
      else echo -
$$+ , Listemde yok....
    }
  }
  else echo -
a Bağlı Değilsiniz...



/seen nick yazın... En son ne zaman Nick ile aynı ortamda bulunduğunuzu görün...
/seen list yazarak Tüm Listeyi görün
/seen clear Tüm Listeyi silin :)

sinans 21 Aralık 2007 23:28

Cevap: /seen Kodu
 
tsklerde kardes bunu kodu nereye yapıyoruz

Regex 22 Aralık 2007 00:24

Cevap: /seen Kodu
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] adlı konuyu arama yapsaydın eminim görecektin. Arama yapmaktan ziyade, konu zaten "mIRC Scripting Dersleri" bölümünde sabitlenmiş.


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

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