evet kendi kullandığım bir kodu anlatayım
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#:{
if ($nick == $me) {
nicklust Mark $window($chan).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\op.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\voice.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\user.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\halfop.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\op.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\sop.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\sahip.ico)
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\sahip.ico)
dll sistem\dll\nickLUST3.dll SetGroupText $chan 1 > Userler
dll sistem\dll\nickLUST3.dll AddGroup $chan 10 + 2 > Voiceler +
dll sistem\dll\nickLUST3.dll AddGroup $chan 11 @ 1 > Operatorler @
dll sistem\dll\nickLUST3.dll AddGroup $chan 12 % 4 > Halfopler %
dll sistem\dll\nickLUST3.dll AddGroup $chan 13 - 5 > Normal Oplar
dll sistem\dll\nickLUST3.dll AddGroup $chan 14 & 6 > Soplar
dll sistem\dll\nickLUST3.dll AddGroup $chan 15 . 7 > Kanal Sahibi
dll sistem\dll\nickLUST3.dll AddGroup $chan 16 ~ 7 > Kanal Sahibi
dll sistem\dll\nickLUST3.dll SetGroupView $chan 1 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 10 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 11 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 12 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 13 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 14 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 15 normal
dll sistem\dll\nickLUST3.dll SetGroupView $chan 16 normal
dll sistem\dll\nickLUST3.dll SetGroupIcon $chan 1 3
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 15 start
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 11 end
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 12 end
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 10 end
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 14 end
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 13 end
dll sistem\dll\nickLUST3.dll SetGroupPos $chan 1 end
dll sistem\dll\nickLUST3.dll SetColor $chan bkg $rgb(173,214,73)
dll sistem\dll\nickLUST3.dll SetColor $chan text $color(1)
dll sistem\dll\nickLUST3.dll SetColor $chan tipbkg $rgb(26,90,0)
dll sistem\dll\nickLUST3.dll SetColor $chan tiptext $color(1)
dll sistem\dll\nickLUST3.dll SetColor $chan hottext $color(12)
dll sistem\dll\nickLUST3.dll SetColor $chan divider $color(12) $color(0)
dll sistem\dll\nickLUST3.dll SetHeaderFontStyle $chan italic
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 15 $rgb(1,99,37)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 11 $rgb(236,4,2)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 12 $color(13)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 10 $rgb(10,68,132)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 14 $rgb(245,188,36)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 1 $color(0)
}
if (*oper* iswm $wildsite) && (*admin* iswm $wildsite) {
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\oper.ico)
}
haltdef
}
alias nicklust { dll $+(",$mircdirsistem\dll\nickLUST3.dll,") $1- }
alias nlust_callback {
if ($1 = tooltip) {
var %extra
if ($3 == $me) %extra = (Kendi Nickim)
nicklust SetTipTitle $2 1 > $3 %extra Nickinin Bilgisi
return Durumu: $nlist_pnick($remove($nick($2,$3).pnick,$3)) $+ $crlf $+ Idlesi: $duration($nick($2,$nick($2,$3)).idle) $+ $crlf $+ Notify list: $iif($notify($3),Notify Listesine Ekli,Notifyde Değil) $+ $crlf $+ Adresi: $iif($address($3,1),$ifmatch,Unknown) $+ $crlf $+ Kanal: $_comchans($3,32))
}
}
alias nlist_pnick {
if ($1 = @) { return Kanal Operatörü }
elseif ($1 = .) { return Kanal Sahibi }
elseif ($1 = &) { return Super Op (Sop) }
elseif ($1 = +) { return Voice }
elseif ($1 = %) { return Halfoperatör }
elseif ($1 = -) { return Operator }
elseif ($1 = ~) { return Kanal Sahibi }
elseif ($1 = $null) { return Normal Kullanıcı }
}
alias _isnotifylist {
if ($notify($1)) return $2
return $3
}
alias _comchans {
var %tokk = $iif($2,$ifmatch,$chr(32)), %iii = 1, %chh
while (%iii <= $comchan($1,0)) {
%chh = $addtok(%chh,$comchan($1,%iii),%tokk) | inc %iii
}
return $sorttok(%chh,%tokk)
}
if ($1 == nickadded) {
if ($3 == $me) return 2 $rgb(255,0,255) > $me $crlf $+
}
#end end
öncelikle kodlamaya göre iconlar
sistem\icons\op.ico gibi mircinde yer almalı
ve dll gereklidir nickLUST3.dll bir dll kullanıldı kodda bu dll ise
sistem\dll\nickLUST3.dll olarak mircinde yer almalı kodu remoteye kopyalıyoruz
Koddaki bu kısımdan icon isimleri veya iconları değiştirebilirsin
dll sistem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdir
sistem\icons\op.ico)
Bu satırlar ise gurup isimleridir
dll sistem\dll\nickLUST3.dll SetGroupText $chan 1 >
Userler Şimdiki kodlama ise Nicklistteki renkleri ifade eder dll sistem\dll\nickLUST3.dll SetColor $chan bkg $rgb(173,214,73)
dll sistem\dll\nickLUST3.dll SetColor $chan text $color(1)
dll sistem\dll\nickLUST3.dll SetColor $chan tipbkg $rgb(26,90,0)
dll sistem\dll\nickLUST3.dll SetColor $chan tiptext $color(1)
dll sistem\dll\nickLUST3.dll SetColor $chan hottext $color(12)
dll sistem\dll\nickLUST3.dll SetColor $chan divider $color(12) $color(0)
dll sistem\dll\nickLUST3.dll SetHeaderFontStyle $chan italic
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 15 $rgb(1,99,37)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 11 $rgb(236,4,2)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 12 $color(13)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 10 $rgb(10,68,132)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 14 $rgb(245,188,36)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 1 $color(0) Kısadan alatıyorum renk kodlamasını $rgb(173,214,73) budarada ki kırmızı yerdeki rakamlarla belirliyoruz atıyorum 255,255,255 gibi mdx dll renk kodları gibidir
kişi bilgilerini maus'u nick üzerine getirince cıkan bilgileri ise nlust_callback aliasımızla gercekleştiriyoruz join eventindeki 3'üncü satırla bağdaştırılmış şekilde yazılmıştır yap boz misali kurcalayıp bilgini geliştirebilirsin arama yapmamışsın anladığım kadarıyla bircok bilgi var bu konuda kolay gelsin