Tekil Mesaj gösterimi
Alt 25 Ekim 2010, 12:44   #1
Çevrimdışı
ekselansx
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
whoiste önceki nick görünümü




Öncelikler merhabalar arkadaşlar..
Elimde bi kod var ..nick listesinde sağ tıklayıp trackusers/ view other nicknames dediğimde önceki nickleri varsa gösteriyor...
Ben bunu nick listesinde olduğu gibi whoise entegre etmek istiyorum..
Yani whoise tıkladığım zaman varsa eğer önceki nicki çıkacak..
Önceki nicki gösteren kod;
ON *:START: {
; Create a hash table and load the saved user data
hmake trackusers 10
if ($isfile(trackusers.dat)) {
hload trackusers trackusers.dat
}
}
on *:JOIN:#: {
; Check if there are any nicknames for this mask
if ($hget(trackusers,$address($nick,2))) {
var %n = $ifmatch
; Delete the current nickname from the list of used nicknames
if ($istok(%n,$nick,32)) { var %d = $deltok(%n,$findtok(%n,$nick,1,32),32) }
else { var %d = %n }
; If there are no nicknames left in the list then stop
if (!%d) { return }
; Display the nicknames
echo $colour(info) -ti2 $chan 5 *** 3 $nick 7 [ONCEKI NICKLERI] 4 $+ $iif($numtok(%d,32) > 1,s:,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
%d
if (!$istok(%n,$nick,32)) {
; Add the current nickname to the list
hadd trackusers $address($nick,2) %n $nick
}
}
else {
; Create a new entry for this mask
hadd trackusers $address($nick,2) $nick
}
}
on *:NICK: {
if ($hget(trackusers,$address($newnick,2))) {
var %n = $ifmatch
if (!$istok(%n,$newnick,32)) {
; Append the new nickname to the list for this mask
hadd trackusers $address($newnick,2) %n $newnick
}
}
else {
; Create a new entry for this mask
hadd trackusers $address($nick,2) $newnick
}
}
menu nicklist {
Track Users
.View Other Nicknames:{
if (!$address($$1,2)) { echo $colour(info) -ti2 # * IAL not updated for $$1 $+ , performing userhost lookup | userhost $$1 | return }
if ($hget(trackusers,$address($$1,2))) {
var %n = $ifmatch
if ($istok(%n,$$1,32)) { var %d = $deltok(%n,$findtok(%n,$$1,1,32),32) }
else { var %d = %n }
if (!%d) { goto notknown }
echo $colour(info) -ti2 # * $$1 5 *** 3 $nick 7 [ONCEKI NICKLERI] 4 $+ $iif($numtok(%d,32) > 1,s:,
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
%d
}
else {
:notknown
echo $colour(info) -ti2 # * $$1 has not been known by any other nickname
}
}
; This resets the data for this nick's mask only
.Reset:hdel trackusers $address($$1,2)
}
ON *:EXIT: {
; Save data on exit
if ($hget(trackusers)) { hsave -o trackusers trackusers.dat }
}

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan