| immortaL | 30 Haziran 2016 14:54 |
!seen nick
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 $1 == !seen {
if $server {
if $1 == !seen clear {
hdel -w seen. $+ $server *
echo -a Liste Temizlendi.
hsave seen. $+ $server $+(seen.,$server,.data)
}
elseif $1 == !seen list {
var %s = 1,%nick,%time,%date
while %s <= $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 -a %s Nick: %nick Time: %time Date: %date
inc %s
}
}
elseif $_find($1,1) {
echo -a $_find($1,1) $+ , En son $_find($1,3) Tarihinde Saat $_find($1,2) Saatinde $network 'da Görüldü.
}
else echo -a $1 $+ , Listemde mevcut değil.
}
}
else echo -a Bağlı Değilsiniz.
}
!seen nick : Nickin enson nezaman server'da görüntüğüne bakar.
!seen list : listeyi gösterir.
!seen clear : listeyi temizler. |
