irchelper.net / mIRC Scripting / mIRC Scripting Yardım / nicklist baloncuk

Mesaj Önizleme 
 
Konuyu Değerlendir
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5
nicklist baloncuk
05-07-2008, 09:27 AM
Mesaj: #1
comanche Çevrimdışı
Kayıtlı Kullanıcı
 		Mesajlar: 5
Katılım: May 2007
Karma Puanı: 0

Teşekkür etiği: 0
0 konu için 0`defa teşekkür almış
nicklist baloncuk
slmlar

alias nicklust { return $shortfn($scriptdirdll\nicklust.dll) }
on *:join:*:{
if ($nick == $me) {
if (%whochan == $null) set %whochan 1
else set %whochan $calc(%whochan + 1)
.nicklist #
.enable #visiblewho
.who #
}
}
alias nicktt {
if ($1 == color) {
if ($3 == $me) return %nl.owntext
elseif ($istokcs(%nl.specialnicks,$3,44)) return %nl.specialtext
elseif ($3 ishop $active) return %nl.halftext
elseif ($3 isop $active) return %nl.optext
elseif ($3 isvoice $active) return %nl.voicetext
return %nl.regtext
}
if ($1 == tooltip) {
return Nicki: $3 $+ $crlf $+ Adresi: $address( $+ $3 $+ ,1) $+ $crlf $+ Durumu: $getStatus($3,$active)
}
}
alias getStatus {
if ($istokcs(%nl.specialnicks,$1,44)) return Arkadan
elseif ($1 == $me) return Kendi Nickin
elseif ($1 ishop $2) return Half-operatör
elseif ($1 isop $2) return Operator
elseif ($1 isvoice $2) return Voice
else return Normal User
}
alias nicklist {
dll $nicklust Mark $1 > nicktt borderselect autoarrange balloon
dll $nicklust SetTipTitle $1 1 > Nick Bilgileri
dll $nicklust SetTipDelay $1 roll default
dll $nicklust SetTipColor # text $rgb(0,0,0)
dll $nicklust SetTipColor # bkg $rgb(255,255,255)
}

bu kode mckruger tarafndan nicklist addonu yaplmadan önce yazlms bir codedir.
code nicklistin görümünü deiiyor ,nickin üstüne geldimi info bililerini baloncuk içinde veriyor. sormak istediim su orjinal nicklist görünümü bozmadan sadece nick infosunu baloncuk olarak nasl örebiliriz.yardmc olursanz sevinirim.
Bu kullanıcının gönderdiği tüm mesajları bul
Bu mesajı bir cevapta alıntı yap
05-08-2008, 10:55 PM
Mesaj: #2
McKruGer Çevrimdışı
Owner
 		Mesajlar: 725
Katılım: May 2007
Karma Puanı: 0

Teşekkür etiği: 5
18 konu için 19`defa teşekkür almış
Ynt: nicklist baloncuk
Bu kod 2005 ylnda birkaç forumda verdiim koddur. Bu kodlar nicklust.dll'nin ilk versiyonuan göredir.

Nicklust3.dll versiyonuna göre iconsuz, Kullanclar gruplandrlm ve bu kullanc gruplarn renkleri ayarlanm, Nicklistin arka plan rengi de ayarl ve Baloncuklu nicklist komutu öyle:

Kod:
ON *:JOIN:#:{
  if ($nick == $me) {
    nicklust Mark $window($chan).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge
    dll dll\nicklust.dll SetGroupText $chan 1 > Userler
    dll dll\nicklust.dll AddGroup $chan 10 + 2 > Voiceler +
    dll dll\nicklust.dll AddGroup $chan 11 @ 1 > Operatorler @
    dll dll\nicklust.dll AddGroup $chan 12 % 4 > Halfopler %
    dll dll\nicklust.dll AddGroup $chan 13 - 5 > Normal Oplar
    dll dll\nicklust.dll AddGroup $chan 14 & 6 > Soplar
    dll dll\nicklust.dll AddGroup $chan 15 . 7 > Kanal Sahibi
    dll dll\nicklust.dll AddGroup $chan 16 ~ 7 > Kanal Sahibi
    dll dll\nicklust.dll SetGroupView $chan 1 normal
    dll dll\nicklust.dll SetGroupView $chan 10 normal
    dll dll\nicklust.dll SetGroupView $chan 11 normal
    dll dll\nicklust.dll SetGroupView $chan 12 normal
    dll dll\nicklust.dll SetGroupView $chan 13 normal
    dll dll\nicklust.dll SetGroupView $chan 14 normal
    dll dll\nicklust.dll SetGroupView $chan 15 normal
    dll dll\nicklust.dll SetGroupView $chan 16 normal
    dll dll\nicklust.dll SetGroupIcon $chan 1 3
    dll dll\nicklust.dll SetGroupPos $chan 15 start
    dll dll\nicklust.dll SetGroupPos $chan 11 end
    dll dll\nicklust.dll SetGroupPos $chan 12 end
    dll dll\nicklust.dll SetGroupPos $chan 10 end
    dll dll\nicklust.dll SetGroupPos $chan 14 end
    dll dll\nicklust.dll SetGroupPos $chan 13 end
    dll dll\nicklust.dll SetGroupPos $chan 1 end
    dll dll\nicklust.dll SetColor $chan bkg $rgb(244,244,244)
    dll dll\nicklust.dll SetColor $chan text $color(14)
    dll dll\nicklust.dll SetColor $chan tipbkg $rgb(219,219,219)
    dll dll\nicklust.dll SetColor $chan tiptext $color(1)
    dll dll\nicklust.dll SetColor $chan hottext $color(12)
    dll dll\nicklust.dll SetColor $chan divider $color(12) $color(0)
    dll dll\nicklust.dll SetHeaderFontStyle $chan italic
    dll dll\nicklust.dll SetHeaderColor $chan 15 $rgb(147,147,255)
    dll dll\nicklust.dll SetHeaderColor $chan 11 $rgb(255,70,70)
    dll dll\nicklust.dll SetHeaderColor $chan 12 $color(15)
    dll dll\nicklust.dll SetHeaderColor $chan 10 $rgb(78,191,224)
    dll dll\nicklust.dll SetHeaderColor $chan 14 $rgb(41,209,155)
    dll dll\nicklust.dll SetHeaderColor $chan 1 $color(6)
  }
  haltdef
}
alias nicklust { dll $+(",$mircdirdll\nicklust.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 Deil) $+ $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 Kullanc }
}
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 $+
}

Iconsuz, Kullanc gruplandrmalar yaplm ama renksiz (sade beyaz yani) olarak düz bir ekilde, baloncuklu Nicklist komutu öyle:

Kod:
ON *:JOIN:#:{
  if ($nick == $me) {
    nicklust Mark $window($chan).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge
    dll dll\nicklust.dll SetGroupText $chan 1 > Userler
    dll dll\nicklust.dll AddGroup $chan 10 + 2 > Voiceler +
    dll dll\nicklust.dll AddGroup $chan 11 @ 1 > Operatorler @
    dll dll\nicklust.dll AddGroup $chan 12 % 4 > Halfopler %
    dll dll\nicklust.dll AddGroup $chan 13 - 5 > Normal Oplar
    dll dll\nicklust.dll AddGroup $chan 14 & 6 > Soplar
    dll dll\nicklust.dll AddGroup $chan 15 . 7 > Kanal Sahibi
    dll dll\nicklust.dll AddGroup $chan 16 ~ 7 > Kanal Sahibi
    dll dll\nicklust.dll SetGroupView $chan 1 normal
    dll dll\nicklust.dll SetGroupView $chan 10 normal
    dll dll\nicklust.dll SetGroupView $chan 11 normal
    dll dll\nicklust.dll SetGroupView $chan 12 normal
    dll dll\nicklust.dll SetGroupView $chan 13 normal
    dll dll\nicklust.dll SetGroupView $chan 14 normal
    dll dll\nicklust.dll SetGroupView $chan 15 normal
    dll dll\nicklust.dll SetGroupView $chan 16 normal
    dll dll\nicklust.dll SetGroupIcon $chan 1 3
    dll dll\nicklust.dll SetGroupPos $chan 15 start
    dll dll\nicklust.dll SetGroupPos $chan 11 end
    dll dll\nicklust.dll SetGroupPos $chan 12 end
    dll dll\nicklust.dll SetGroupPos $chan 10 end
    dll dll\nicklust.dll SetGroupPos $chan 14 end
    dll dll\nicklust.dll SetGroupPos $chan 13 end
    dll dll\nicklust.dll SetGroupPos $chan 1 end
  }
  haltdef
}
alias nicklust { dll $+(",$mircdirdll\nicklust.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 Deil) $+ $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 Kullanc }
}
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 $+
}

Kullanc gruplandrmalar yapmak zorundasn. Çünkü Kullanc gruplandrmalar yapmazsan baloncuk çkan bilgiler olumaz. Baloncuk ona bal olarak çalr.

Ayrca Kullanc gruplandrma oluturmazsan (AddGroup) baloncuk gene çalr. Ama kim op, kim voice, kim normal user belli deil. O zaman karna nicklistte herkes user olarak gözükür ve baloncukta da Kullanc Durumu: Bilgisinde Normal User olarak gösterilir.
ölümü özlemeyen gerçek a$k anlayamaz...
Kullanıcının websitesini ziyaret et Bu kullanıcının gönderdiği tüm mesajları bul
Bu mesajı bir cevapta alıntı yap
05-09-2008, 08:36 PM (En son düzenleme: 05-10-2008 12:49 PM comanche.)
Mesaj: #3
comanche Çevrimdışı
Kayıtlı Kullanıcı
 		Mesajlar: 5
Katılım: May 2007
Karma Puanı: 0

Teşekkür etiği: 0
0 konu için 0`defa teşekkür almış
Ynt: nicklist baloncuk
tkler mckruger. Bir ey daha soracaktm kendi nickimi nasl farkl olarak renklendirebilirim.
Bu kullanıcının gönderdiği tüm mesajları bul
Bu mesajı bir cevapta alıntı yap
05-23-2008, 01:38 PM
Mesaj: #4
comanche Çevrimdışı
Kayıtlı Kullanıcı
 		Mesajlar: 5
Katılım: May 2007
Karma Puanı: 0

Teşekkür etiği: 0
0 konu için 0`defa teşekkür almış
Ynt: nicklist baloncuk
mckruger baloncukta fullnameyi ve nickin regli olup olmadn göstertebilirmiyiz.
Bu kullanıcının gönderdiği tüm mesajları bul
Bu mesajı bir cevapta alıntı yap
05-23-2008, 08:41 PM
Mesaj: #5
McKruGer Çevrimdışı
Owner
 		Mesajlar: 725
Katılım: May 2007
Karma Puanı: 0

Teşekkür etiği: 5
18 konu için 19`defa teşekkür almış
Ynt: nicklist baloncuk
(05-09-2008 08:36 PM)comanche demiş ki  tkler mckruger. Bir ey daha soracaktm kendi nickimi nasl farkl olarak renklendirebilirim.

Kendi nicke grup oluturamayacan için onu ayrca iconlatrp, renklendiremessin. Sadece kendi nickine renk verirsin ama O zaman iconlu nicklist özelliini deil, dier renk menüsünü sadece kullanman gereklidir.
ölümü özlemeyen gerçek a$k anlayamaz...
Kullanıcının websitesini ziyaret et Bu kullanıcının gönderdiği tüm mesajları bul
Bu mesajı bir cevapta alıntı yap
Mesaj Önizleme 


Benzer Konular...
Konu: Yazar Cevaplar Gösterim: Son Mesaj
  nicklist color simsiyah 1 146 08-01-2009 06:08 PM
Son Mesaj: Alience
  nicklist genilii hakknda TYavuz 3 191 09-20-2008 10:13 AM
Son Mesaj: TYavuz
  NickList Hata! IceBerg 5 208 03-13-2008 11:19 PM
Son Mesaj: McKruGer
  Nicklist ByDeniS 16 492 05-12-2007 01:16 AM
Son Mesaj: ByDeniS



Forum izinleri
yeni konu açamazssın
cevap yazamazssın
eklenti yüklemesi yapamazssın
HTML kodu kapalı.
BBCODE kodu açık.
smilie`ler açık.
[img] kodu açık.

Bize Ulaşın | irchelper.net | En Üste Dön | İçeriğe Dön | Arşiv | RSS Beslemesi