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 Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Döküman : Nicklust.DLL İle İlgili. (https://www.ircforumlari.net/mirc-scripting-sorunlari/6579-dokuman-nicklustdll-ile-ilgili.html)

CoCoRiCo 18 Ağustos 2005 18:29
Döküman : Nicklust.DLL İle İlgili.
 
PHP- Kodu:
ON *:JOIN:#:{
if ($nick == $me) {
    nicklust Mark $window($chan).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge
 
 
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\op.ico)
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\voice.ico)
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\chat.ico)
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\hop.ico)
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\usr.ico)
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\spr.ico)
    dll Systeem\dll\nickLUST3.dll AddIcon $chan > $shortfn($mircdirSysteem\icons\ownr.ico)
    dll Systeem\dll\nickLUST3.dll SetGroupText $chan 1 > Chatters
    dll Systeem\dll\nicklust3.dll AddGroup $chan 10 + 2 > Voice +
    dll Systeem\dll\nicklust3.dll AddGroup $chan 11 @ 1 > Operator @
    dll Systeem\dll\nicklust3.dll AddGroup $chan 12 & 4 > Halfop %
    dll Systeem\dll\nicklust3.dll AddGroup $chan 13 - 5 > User ops
    dll Systeem\dll\nicklust3.dll AddGroup $chan 14 & 6 > Super ops
    dll Systeem\dll\nicklust3.dll AddGroup $chan 15 . 7 > Owner
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 1 normal
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 10 normal
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 11 normal
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 12 normal
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 13 normal
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 14 normal
    dll Systeem\dll\nicklust3.dll SetGroupView $chan 15 normal
    dll Systeem\dll\nicklust3.dll SetGroupIcon $chan 1 3
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 15 start
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 11 end
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 12 end
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 10 end
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 14 end
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 13 end
    dll Systeem\dll\nicklust3.dll SetGroupPos $chan 1 end
    dll Systeem\dll\nicklust3.dll SetColor $chan bkg $rgb(244,244,244)
    dll Systeem\dll\nicklust3.dll SetColor $chan text $color(14)
    dll Systeem\dll\nicklust3.dll SetColor $chan tipbkg $rgb(219,219,219)
    dll Systeem\dll\nicklust3.dll SetColor $chan tiptext $color(1)
    dll Systeem\dll\nicklust3.dll SetColor $chan hottext $color(12)
    dll Systeem\dll\nicklust3.dll SetColor $chan divider $color(12) $color(0)
    dll Systeem\dll\nicklust3.dll SetHeaderFontStyle $chan italic
    dll Systeem\dll\nicklust3.dll SetHeaderColor $chan 15 $rgb(147,147,255)
    dll Systeem\dll\nicklust3.dll SetHeaderColor $chan 11 $rgb(255,70,70)
    dll Systeem\dll\nicklust3.dll SetHeaderColor $chan 12 $rgb(170,125,164)
    dll Systeem\dll\nicklust3.dll SetHeaderColor $chan 10 $rgb(78,191,224)
    dll Systeem\dll\nicklust3.dll SetHeaderColor $chan 14 $rgb(41,209,155)
    dll Systeem\dll\nicklust3.dll SetHeaderColor $chan 1 $color(6)
}
haltdef
}
 
alias nicklust { dll %4$s(",$mircdirSysteem\dll\nickLUST3.dll,") $1- } 
alias nlust_callback {
if ($1 = tooltip) {
    var %extra
    if ($3 == $me) %extra = (Your name)
    nicklust SetTipTitle $2 1 > Info on $3 %extra
    return Status: $nlist_pnick($remove($nick($2,$3).pnick,$3)) %4$s $crlf %4$s Idle: $duration($nick($2,$nick($2,$3)).idle) %4$s $crlf %4$s Notify list: $iif($notify($3),Yes,No) %4$s $crlf %4$s Address: $iif($address($3,4),$ifmatch,Unknown) %4$s $crlf %4$s Channels: [CODE]%4$s[/CODE] comchans($3,32))
}
}
 
alias nlist_pnick {
if ($1 = @) { return Channel Operator }
elseif ($1 = .) { return Kamer Owner }
elseif ($1 = &) { return Protected User}
elseif ($1 = +) { return Voiced User }
elseif ($1 = %) { return HalveOpped User }
elseif ($1 = -) { return Operator }
elseif ($1 = $null) { return Normal User }
}
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) 
} 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

DarK^ 18 Ağustos 2005 21:32
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] bişi olmadı :)

MuJaX 18 Ağustos 2005 22:05
IconLar yOq onLarıda AtarSan..

NucLeaR 18 Ağustos 2005 22:24
çalıştıramadım ??

Mack 18 Ağustos 2005 22:37
zaten bu dll ile çalışmıyormuydu?

abi çıkart şu scripti artık :D

CoCoRiCo 20 Ağustos 2005 01:13
Alıntı:
Mack Nickli Üyeden Alıntı
zaten bu dll ile çalışmıyormuydu?

abi çıkart şu scripti artık :D
yakında bakalım kısmet :)

Enigma1 20 Ağustos 2005 12:41
verdiğin kodd sorun var

* /dll: Açılamıyor 'E:\mirc\Mark' (Satır 52, script1.mrc)


bu hatayı veriyor iconları yerleştirip isimleride düzelttim.

McKruGer 26 Ağustos 2005 01:40
bu nick lust dll yi hatırlıorum bi yerden sanırım mircscripts.org dan idi. yalnız verdiğin kod da sorun var enigmanın dediği hata veriyor.

yozgatli6644 26 Ağustos 2005 10:47
Evet Bu Aynı Hatayı Verior dLL yi tanmıor Yada acmıor ?

CoCoRiCo 30 Ağustos 2005 17:46
scripti calıstıracagınız dizin salt olmalı yani
"c:\mirc\nicklist" şayet c:\program files\mirc seklinde olursa dll hata verecektir yazan kişinin eksikligi. Code ları direk almak yerinde download dan indirin.

Cappystarjoe 30 Ağustos 2005 19:10
Evet doğru olan yolu girdikten sonra çalışır gibi oluyor fakat mirc'i çok kasıyor. mIRC donuyor ve windows dan hata mesajı geliyor.

Sanırım yoldan başka bi yerde de sorun var.

NaTSuKa 19 Kasım 2005 19:03
Senin dedigin dosyayı "nickLUST3.dll" C:\mirc\dll dosyasının içine attım fakat şu hatayı alıyorum

* /dll: Açılamıyor 'E:\mirc\Mark' (Satır 52, script1.mrc)

SeeYouCry 19 Kasım 2005 21:43

alias nicklust { dll %4$s(",$mircdirSysteem\dll\nickLUST3.dll,") $1- }

burda görüldüğü gibi dll system\dll\nickLUST3.dll

system klsörünün içinde dll klasörüne atılması gerekli yani ...

SeeYouCry 19 Kasım 2005 21:52
ON *:JOIN:#:{
if ($nick == $me) {
nicklust Mark $window($chan).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconsop.ico)
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconsvoice.ico)
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconschat.ico)
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconshop.ico)
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconsusr.ico)
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconsspr.ico)
nicklustd AddIcon $chan > $shortfn($mircdirSysteemiconsownr.ico)
nicklustd SetGroupText $chan 1 > Chatters
nicklustd AddGroup $chan 10 + 2 > Voice +
nicklustd AddGroup $chan 11 @ 1 > Operator @
nicklustd AddGroup $chan 12 & 4 > Halfop %
nicklustd AddGroup $chan 13 - 5 > User ops
nicklustd AddGroup $chan 14 & 6 > Super ops
nicklustd AddGroup $chan 15 . 7 > Owner
nicklustd SetGroupView $chan 1 normal
nicklustd SetGroupView $chan 10 normal
nicklustd SetGroupView $chan 11 normal
nicklustd SetGroupView $chan 12 normal
nicklustd SetGroupView $chan 13 normal
nicklustd SetGroupView $chan 14 normal
nicklustd SetGroupView $chan 15 normal
nicklustd SetGroupIcon $chan 1 3
nicklustd SetGroupPos $chan 15 start
nicklustd SetGroupPos $chan 11 end
nicklustd SetGroupPos $chan 12 end
nicklustd SetGroupPos $chan 10 end
nicklustd SetGroupPos $chan 14 end
nicklustd SetGroupPos $chan 13 end
nicklustd SetGroupPos $chan 1 end
nicklustd SetColor $chan bkg $rgb(244,244,244)
nicklustd SetColor $chan text $color(14)
nicklustd SetColor $chan tipbkg $rgb(219,219,219)
nicklustd SetColor $chan tiptext $color(1)
nicklustd SetColor $chan hottext $color(12)
nicklustd SetColor $chan divider $color(12) $color(0)
nicklustd SetHeaderFontStyle $chan italic
nicklustd SetHeaderColor $chan 15 $rgb(147,147,255)
nicklustd SetHeaderColor $chan 11 $rgb(255,70,70)
nicklustd SetHeaderColor $chan 12 $rgb(170,125,164)
nicklustd SetHeaderColor $chan 10 $rgb(78,191,224)
nicklustd SetHeaderColor $chan 14 $rgb(41,209,155)
nicklustd SetHeaderColor $chan 1 $color(6)
}
haltdef
}
alias nicklust { dll %4$s(",$mircdirSysteem\dll\nickLUST3.dll,") $1- }
alias nicklustd { dll $mircdirSysteem\dll\nickLUST3.dll $1- }
alias nlust_callback {
if ($1 = tooltip) {
var %extra
if ($3 == $me) %extra = (Your name)
nicklust SetTipTitle $2 1 > Info on $3 %extra
return Status: $nlist_pnick($remove($nick($2,$3).pnick,$3)) %4$s $crlf %4$s Idle: $duration($nick($2,$nick($2,$3)).idle) %4$s $crlf %4$s Notify list: $iif($notify($3),Yes,No) %4$s $crlf %4$s Address: $iif($address($3,4),$ifmatch,Unknown) %4$s $crlf %4$s Channels: %4$s comchans($3,32))
}
}

alias nlist_pnick {
if ($1 = @) { return Channel Operator }
elseif ($1 = .) { return Kamer Owner }
elseif ($1 = &) { return Protected User}
elseif ($1 = +) { return Voiced User }
elseif ($1 = %) { return HalveOpped User }
elseif ($1 = -) { return Operator }
elseif ($1 = $null) { return Normal User }
}
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)
}

McKruGer 20 Kasım 2005 02:40
Kodun Düzeltilmil Hali
 
Daha önce de Söylediğim gibi uzantıyı belirten kod satırında sorun var... Ayrıca Kanal Durumunu göstermede, ve Kullanıcı durumlarını göstermede sorun var. Kod'a bir kaç şey daha ekledim.. Kodu denedim tıkır tıkır çalışıyor..

Bu Kodu bugünlerde tam olarak verecektim. Nicklust.dll ile ilgili resimli açıklamalı döküman yazmıştım. Bu dökümanla ilgili başka bir forumda bir soru sorulmuştu. Bu soru şununla ilgili idi : İlk çıkan Nicklust.dll de biz bazı serverlerde kullanılan . ve ~ karakterlerinde kullanamıyorduk. İşte Nicklust3.dll ile bunu artık gerçekleştirebiliyoruz..

Not : Bu Kodu kullanabilmeniz için nicklust3.dll nin yüklü olması gerekir. Nicklust3.dll sistem\dll dosyasının içinde olmak zorunda.
Ayrıca iconlarınız da sistem\icons dosyasının içinde olmak zorundadır.
Uzantıları bu şekilde ayarladım...

Bu Kodu Alt+R ye bastığınız zaman karşınızda çıkan boş bir remote penceresine kopyalayınız...


Düzeltilmiş kod :


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\operator.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\operator.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(244,244,244)
dll sistem\dll\nickLUST3.dll SetColor $chan text $color(14)
dll sistem\dll\nickLUST3.dll SetColor $chan tipbkg $rgb(219,219,219)
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(147,147,255)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 11 $rgb(255,70,70)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 12 $color(15)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 10 $rgb(78,191,224)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 14 $rgb(41,209,155)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 1 $color(6)
}
haltdef
}
alias nicklust { dll $+(",$mircdirsistem\dll\nickLUST3.dll,") $1- }
alias nlust_callback {
if ($1 = tooltip) {
var %extra
if ($3 == $me) %extra = (Kendi Nickin)
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 $+
}


Kod sonucu oluşan görüntülere 2 resimli örnek :

Birinci Resim:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]




İkinci Resim :

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[NoFeAr] 21 Kasım 2005 13:47
ya beyler su iconları bizlede paylassanızda bitirsek su işi ?

NaTSuKa 21 Kasım 2005 17:30
Yaws peki burda ircoplara adinlere ayrı bir icon verebilirmiyiz ?

CoCoRiCo 21 Kasım 2005 23:46
on *^:join:# {
if (*oper* iswm $wildsite) && (*admin* iswm $wildsite) {
dll DLLdizini\nickLUST3.dll AddIcon $chan > $shortfn($mircdirsistem\icons\oper.ico)
}
}

[NoFeAr] 22 Kasım 2005 22:40
beyler bu kodları aynen uyguladığımda. yani aynı dediğiniz gibi yaptım ancak bi sorun var büyük bi sorun mirc i açıyorum bağlantıyı kuruyo ilk kanalı açtığı zaman mirc kilitleniyo ve hata raporu gonder sayfası çıkıyo ? neden olur bu sorun ?

NaTSuKa 23 Kasım 2005 18:16
Walla yanlış yapmısındır tıkır tıkır çalısıyor herşey :D ne hata verdigini yaz beliki cvp bulabilirsin

aGe 06 Aralık 2005 18:00
Sanirim idle sürelerinde bir sorun var baloncuk farkli bir süre veriyor whois ile baloncuktaki idle sürelerinin aynisi olmasi icin ne yapmamiz gerekir bu konuda bilgilendirirmisiniz

TrancEnergy 26 Mart 2006 09:25
iconLar diyorum ßizimLe PayLaşında ßizde Tıkır Tıkır ÇalıŞtıraLim:D

McKruGer 26 Mart 2006 18:12
git kendine icon bul. birde ağzına emzik verseydik?

bu kadarı da pes doğrusu...

TrancEnergy 27 Mart 2006 09:12
ßen PayLaşan PayLaşır Dedim Sen Ne AtLiorsun'ky Ordan Kumda Oyna...

Silencer 27 Mart 2006 18:19
adam sormus sende ne biçim cwp wermişin.. yardımcı olacaksan olursun olmayacaksan kasmana gerek yok....

Deejays HaLLettik kardeşim zaten oky. Umarım işiNe yarar....

eywallah.

RhomaNtiC 27 Mart 2006 18:36
Alıntı:
McKruGer Nickli Üyeden Alıntı
git kendine icon bul. birde ağzına emzik verseydik?

bu kadarı da pes doğrusu...
Bir Sey Biliyorsan Söyle Ibret Alsınlar , Bilmiyorsan Sus ADAM Sansınlar.

Silencer 27 Mart 2006 18:37
Alıntı:
Bir Sey Biliyorsan Söyle Ibret Alsınlar , Bilmiyorsan Sus ADAM Sansınlar.
İMZALARIM !

djiNn 27 Mart 2006 19:46
E-kolay Kokusu Aliyorum :)

Silencer 27 Mart 2006 23:38
Alıntı:
djiNn Nickli Üyeden Alıntı
E-kolay Kokusu Aliyorum :)
Dogru izdesin :P ;oki

Linux 28 Mart 2006 19:40
olmadiqi calistiramadim

muratt_aziz 13 Aralık 2011 20:33
Cevap: Kodun Düzeltilmil Hali
 
Alıntı:
McKruGer Nickli Üyeden Alıntı (Mesaj 73138)
Daha önce de Söylediğim gibi uzantıyı belirten kod satırında sorun var... Ayrıca Kanal Durumunu göstermede, ve Kullanıcı durumlarını göstermede sorun var. Kod'a bir kaç şey daha ekledim.. Kodu denedim tıkır tıkır çalışıyor..

Bu Kodu bugünlerde tam olarak verecektim. Nicklust.dll ile ilgili resimli açıklamalı döküman yazmıştım. Bu dökümanla ilgili başka bir forumda bir soru sorulmuştu. Bu soru şununla ilgili idi : İlk çıkan Nicklust.dll de biz bazı serverlerde kullanılan . ve ~ karakterlerinde kullanamıyorduk. İşte Nicklust3.dll ile bunu artık gerçekleştirebiliyoruz..

Not : Bu Kodu kullanabilmeniz için nicklust3.dll nin yüklü olması gerekir. Nicklust3.dll sistem\dll dosyasının içinde olmak zorunda.
Ayrıca iconlarınız da sistem\icons dosyasının içinde olmak zorundadır.
Uzantıları bu şekilde ayarladım...

Bu Kodu Alt+R ye bastığınız zaman karşınızda çıkan boş bir remote penceresine kopyalayınız...


Düzeltilmiş kod :


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\operator.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\operator.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(244,244,244)
dll sistem\dll\nickLUST3.dll SetColor $chan text $color(14)
dll sistem\dll\nickLUST3.dll SetColor $chan tipbkg $rgb(219,219,219)
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(147,147,255)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 11 $rgb(255,70,70)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 12 $color(15)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 10 $rgb(78,191,224)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 14 $rgb(41,209,155)
dll sistem\dll\nickLUST3.dll SetHeaderColor $chan 1 $color(6)
}
haltdef
}
alias nicklust { dll $+(",$mircdirsistem\dll\nickLUST3.dll,") $1- }
alias nlust_callback {
if ($1 = tooltip) {
var %extra
if ($3 == $me) %extra = (Kendi Nickin)
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 $+
}


Kod sonucu oluşan görüntülere 2 resimli örnek :

Birinci Resim:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]




İkinci Resim :

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
alias _comchans aliasında gözden kacan bişey var gibi hocam


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk