Nicklist İle İlgili (.dll)
 

daha oncede bu konu ile ilgili sormustum ama cevap alamadim dll ilgili oldugu icinmi bilemiyorum ilgilenen cikmadi
bazi scriplerde goruyorum
nicklisteki nickin ustune mausu getirdigin zaman nickin registirli olup olmadigini op olup olmadigi ip adresini felan bi balonda gorebiliyorsun yani nick infosunu diyelim kisaca boyle biseyi yapabilen varmi dll pek aram iyi degildir hic denemdim dll li bisey yardimci olacak ?

bi yildir su kodla ilgili bi satir alamadik pe s valla :))) ama pes etmiyecem israrla gundemde tutacam :))) yazdirana kadar

balon malon yapamam ama :) ßi pencerede istediklerini gosteririz sanırım

bu bahsettiğin baloncuk addonu. bununla ilgili mircscripts.org sitesinde addon var. Adı Nicklust yapımcısı loner. yapım yılı 2003 .. biraz arka sayfalarda dır. search yerınden ara bul yaparak gorursun. addonu bulunca balon olayın nereden yapıldığını öğrenmek istiorsan

if ($1 == tooltip) {
return Nicki: $3 $+ $crlf $+ Adresi: $address( $+ $3 $+ ,1) $+ $crlf $+ Durumu (status ) : $getStatus($3,$active)
}
}

satır budur.

veya nicklust.dll yi kullanarakda kendin yapabilirsin. ondada uygulanışı bunun gibidir.

Onemli : örnek gösterdiğim addon win 200* ve xp içindir. 98 lerde sorun verir. icon yuklemede hata diye uyarı verir. ama baloncuk olayı gene çalışır. sadece icon yuklemede sorun verir. tabi yapmak istediğin baloncuk olayı o yuzden senın için soru değildir bu .. Addondan baloncuk kısmını içeren komut dizini alırsın ve oyle kullanırsın..

mskruker ben o isi denemistim ama ayiramadim :))
maelstrom pencere den gorunsun zarari yok whois cekmeden mausu ustune tutunca gorunsunde bilgiler sorun degil

konu üzerinde uzman olarak super moderatör cocorico yu tavsiye ediyorum :) baloncuklardan ii anlıo kendisi

tavsiye felan iyide bakan yok vay be bi kod cikaramadik surda

raw 301:*: {
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Away: Evet: ( $+ $3- $+ )
}
raw 307:*: {
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Nick Kayıtlımı?: Evet
}
raw 310:*: {
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» IRC Helper: Evet.
}
raw 311:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 15-----14<15whois14>15----------------------------
aline @whois 4» Nick: $2
aline @whois 4» İsim: $6-
aline @whois 4» Hostmask: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 312:*:{
if !$window(@whois) { window -a @whois }
haltdef
aline @whois 4» Server: $3
}
raw 313:*: {
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Network Functions: $5 $6 $7 $8 $9
}
raw 314:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 15-----14<15whowas14>15----------------------------
aline @whois 4» Nick: $2
aline @whois 4» Name: $6-
aline @whois 4» Hostmask: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 317:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Bağlantı Zamanı: $asctime($4,dddd dd/mm/yyyy HH:nn:ss)
aline @whois 4» Aylak süresi: $duration($3)
aline @whois 4» Online olduğu zaman: $duration($calc($ctime - $4))
}
raw 318:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 15-----14<15/whois14>15---------------------------
}
raw 319:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Kanallar: $3-
}
raw 330:*: {
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Authname: $3
}
raw 338:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» Real Hostmask: $3
aline @whois 4» Real IP: $4
}
raw 369:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 15-----14<15/whowas14>15---------------------------
}
raw 401:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» The nickname " $+ $2 $+ " online değil!
}
raw 406:*:{
haltdef
if !$window(@whois) { window -a @whois }
aline @whois 4» The nickname " $+ $2 $+ " has been recently online.

kusura bakma sorunu whois cekince başka pencerede gostersin olarak aldıladım.ama buda işine yarar sanırım kişinin üstünde sağ tıklayıp whois diyeceksin sadece.ayrıca nicklistte 50 kişi olduğunu varsayarsak senin istediğin kimin üstünde durursa onun ßilgilerini gostersin dediğin şekilde feci kasar excess flood tan ucarsın :)

bu istediğin özellik diaolog scriptde mevcutdur yapıcsına ulaşırsan yardımcı olur yada arkadaşında dediği gibi c0c0ric0 ya özel mesaj at oda yardımcı olur.

Kolay gelsin...

Not:[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] dialog scriptin sitesi...

balon kodu
 

nicklust.dll yi kullanarak balon olayını bu satır ile yapabilirsin flyman

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 $+ ,2) $+ $crlf $+ Durumu: $getStatus($3,$active)
}
alias getStatus {
if ($istokcs(%nl.specialnicks,$1,44)) return Arkadaşın
elseif ($1 == $me) return Kendi Nickin
elseif ($1 ishop $2) return Halfops
elseif ($1 isop $2) return Operator
elseif ($1 isvoice $2) return Voice
else return Normal User
}

Eline sağlık Mc.

nicklist.dll mi nicklust.dll mi bu
bulamadim nerden bulurum bu dll dosyasini

buldumda o dll yapamadim yine ben bu isi tam olarak ne yapmam gerek?

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] da Olması Gerek :p

arkadaşım nicklust.dll diye yazdım.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

buraya tıkla cek. verdiğim kodu remoteye ekle. mirce gir sonra. nick üstüne gel azıcık bekle gorursun.

e gene yapamıyorsan ilerde biraz daha geliştirince kendini yaparsın.
hazır verdik kodu daha bir şey yapamam. yapacak bir şey kalmadı cunku :)

Yabancı bir scriptin Türkçeleştirilmişi Dialog Script.

O eleman Benimle İddaalaşıyordu :)
Senin bilmediğin Coder'larda var v.s.

İstediği kadar iddalaşsın UOnur. Scripti incelediysen, System dosyalarındaki kodlamaları görmüşsündür. Aşırı derecede karmaşık ve agresif kodlamalar mevcut; o şekil kodlamaları Türkiyede yapabilecek kişi sayısı yok denecek kadar az.

Bende Aynen Böyle demiştim :)
Tabi ben hala o kodlamaları onun yaptığına inanmıyorum...
Neyse Günahı Boynuna :)

:) ne varyahu nuryol script in yaptığı diyaloglarda mdx i bilen herkes yapar. az bucuk dll lerden de anlican ki dll lerin mantığı aynıdır hep. ayrıca dll lerinde nasıl kullanacağına dair komut ornekleri var..

mckruger eminmisin verdigin kodu remoteye koyup bide nicklust.dll mirc dosyasina atinca bu is olacagindan denedinmi sen bend eolmuyor anlamadigim senin dedigin gibi nasil bu kod dll dosyasiyla baglanti kuruyorki bi eksiklik oldugunu dusunuyorum
help dosyasini inceledim ama ordada join yaparken dll dosyasini cagirmakdan bahsediyor ama ben anlamiyorum dll o yuzden bisey yapamadim

evet yokmu bi cevap forumumuz geri gelmis bu arada sevindik :))

Verdiği kodu remoteye atma bence, ilk olarak notepad'i aç o kodu kopyalayıp oraya yapıştır daha sonra onu farklı kaydet de, tüm dosyalar kısmını seç ve nicklust.mrc olarak mirc'in ana dizinine kaydet mIRC 'ini açıp o addonu yükle. Daha sonra mIRC 'in ana dizinine 'dll' diye bir klasör aç ve nickLUST.dll 'yi o klasörün içine at. Herşeyi yaptıktan sonra scriptin açık iken /dialog -m nicklistedit nicklistedit yaz ve çıkan diyalogtan ikonları ayarlayıp kaydet de. En son olarakta gireceğin servera gir ve bak bakalım olmuş mu :)

oyle bi tablo yok diyor feridun * /dialog: 'nicklistedit' Tablo yok

Bunu aynen remoteye yapıştır, artık öyle bir diyalog var :p

ferudun bu nicklis e icon eklemek felan sanirim
benim istedigim bu degil saol
ben nicklerin ustune maus gelince o nickin infosunu gormeye calisuyorum sadece whois cekmeden yani

Flyman ucuk bi hayal değil mi senin ki :) cidden herkesin ustunden geciceksin nicklistte info cekicek herkeze feci kastırırsın scripte yazık :p

vardır bi 3 kağıdı :)
ama .dll .mdx gibi şeyler gerek oda beni aşar :)

maelstrom var oyle dll yapiyor whois cekmiyor nickin ustune tuttugunda nickin ip bilgisi acces durumu felan girnuyor bi balon icinde windos veya mircin kendind evardir mesela remote tusuna muasunu goturdugunde felan yazmazmi remote diye oyle bisey kasma yok dll oluyor gordum bir kac scripte ama onlar nickliste icon ekleme ile beraberdi cok sasali o yuzden ben sadece o kismini istedim nur scriopte ve siber miydi onda var sanirim o durum
uonur :))) evet o yuzden sana hic demedim ben while ustasi sin sen dll re seni sokmayalim biz :)

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] da nicklist diye arattır sana ilgili add onu verecek.
hazır code almakyerine burada verilen derslerden örneklerden fikir olusturun bence hazırcılık iyi bişi degil.

coco onu biliyorum o cok sasali bisey oyle bisey istemiyorum ben yazimi iyi okumamissin
nasihatin icinde saol dikkate aliriz
hadi ver bi ders de basliyalim dikkate almaya dll dosyasiyle biseyler yap ve aanlat ogrenelim...

bana bakma:) ben acemiyim dll ler ile hiçbir bilgim yok şaka bi yana gerçekten şu dll olayını açıklayan biri olursa mükemmel olur

ingilizcesi olanlar faydalanabilir :)

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

dökümanı bulamadım ama buralardan faydalanabilirsiniz...

el33t egerki buraya uye olan biri hakaret kufur reklam veya kotu bisey yazmiyorsa o mesaji silmek bence biraz ayip niye gereksiz mesaj oluyorki yazdigim aciklarmisin?
mesaj yazilmayan basliklar geride kaliyor ve unutulup gidiyor bende kalmasin geride diye mesaj attim ben nice mesajlar goruyorum baslikla alakasi olmayan vede burda yetkili olanlarin yaziklari onlara mesajini duzeltirmisin uyarisi yapip biz uyerlerinkini pat silmekte ne oluyor arkadasim
cevabi olan yazar demissin ve baska bi basligimda ki mesajimida silmissin altinada kod yazmissin bak varmis senin cevabin ama ben yokmu cevabi olan diyene kadar yazmamistin demekki baslik geride kaliyor veya gozden kaciyor bend gundemde tutmak icin cevabi olan yokmu yazdim sayfaya yukmu oldu 4 kelimemiz?

bir süredir fındık toplamakla meşguldum bugün işim bitti. o yüzden mesajım biraz geç olmuştur kusura bakma Flyman... Nick Listesindeki info ile ilgili yazılmış nicklust dll si var..

bir kaç türlü info gösterdiği şekilde yollicam buraya

1.kod : Bu kodda nick renkleri sabittir , hepsi siyahtır. Arka planda beyazdır. Nick info penceresinin arka planı da beyaz yazıları ise siyahtır. Bu renkleri el ile ancak değişirsin. ctrl+k ile çıkan Renkler ( colors ) menüsünden değiştiremessin. Ayrıca kanal penceresinin en üstünde Kanal adı yazmaz.

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 Arkadaşın
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)
}


2.ci Kod : Bu kodda ise kanal ismi kanal penceresinin en üstünde yazar. Şimdi bunu nasıl yaptık dersen 1.ci koddan tek farkı şu satır dır : dll $nicklust SetHeaderText $1 > $1 işte bu satır kanal penceresinin üstünde kanal isminin yazmasını sağlar.

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 Arkadaşın
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)
dll $nicklust SetHeaderText $1 > $1
}


3.cü Kod : Bu kod ilede Nick renklerinide belirtebilirsin ve değiştirebilirsin.. Ayrıca Kanal penceresi arka planınıda değiştirebilirsin..

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 Arkadaşın
elseif ($1 == $me) return Kendi Nickin
elseif ($1 ishop $2) return Halfops
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)
dll $nicklust SetHeaderText $1 > $1
dll $nicklust SetColor # bkg $rgb(255,255,255)
dll $nicklust SetColor # op $rgb(221,0,0)
dll $nicklust SetColor # halfop $rgb(255,94,0)
dll $nicklust SetColor # normal $rgb(0,0,255)
dll $nicklust SetColor # voice $rgb(0,110,0)
}

dll $nicklust SetColor # bkg $rgb(255,255,255) satırı ile kanalın arka plan rengini değiştirirsin.. Parantez içinde yer alan 255,255,255 rgb renklendirme kodudur...

dll $nicklust SetTipColor # bkg $rgb(255,255,255) satırı ile info penceresinin arka plan rengini değişirsin. ki arka plan rengi şu an beyaz.

dll $nicklust SetTipColor # text $rgb(0,0,0) satırı ilede info penceresindeki yazı rengini değişirsin. ki yazıların rengi siyahtır.


dll $nicklust SetColor # op $rgb(221,0,0) satırı op rengini
dll $nicklust SetColor # halfop $rgb(255,94,0) halfop rengini
dll $nicklust SetColor # normal $rgb(0,0,255) Normal user rengini
dll $nicklust SetColor # voice $rgb(0,110,0) voice rengini değiştirir. Parantez içindekiler yukarıda dediğim gibi rgb renklendirme kodudur.


rgb renkleri hakkında yardım istiyorsan hangi rakamlar hangi renge işaret eder diyorsan o koduda yazayım remoteye eklersin.

Rgb kodu :

alias -l preview {
window -phn +b @Color -1 -1 270 25
drawfill -r @Color $rgb($1,$2,$3) 1 1 1
drawsave @Color preview.bmp
window -c @Color
}
alias -l color {
window -phn +b @Color -1 -1 18 18
drawfill -r @Color $rgb($1,$2,$3) 1 1 1
drawsave @Color $+($4,.bmp)
window -c @Color
}

dialog RGB {
title "RGB Renkleri"
size -1 -1 126 102
option dbu
icon 1, 4 45 117 15, preview.bmp, 0
scroll "", 3, 24 5 96 8, range 0 255 horizontal
scroll "", 4, 24 19 96 8, range 0 255 horizontal
scroll "", 5, 24 33 96 8, range 0 255 horizontal
icon 6, 4 3 15 10, r.bmp, 0
icon 7, 4 17 15 10, g.bmp, 0
icon 8, 4 31 15 10, b.bmp, 0
text "RGB", 10, 10 65 16 8
text "HEX", 11, 10 74 16 8
button "Çıkış", 12, 89 89 33 11, ok
text "", 13, 31 64 32 8
text "", 14, 31 74 32 8
box "", 15, 4 59 118 25
button "HEX Kopyala", 16, 47 89 38 11
button "RGB Kopyala", 17, 4 89 38 11
}
on *:dialog:rgb:*:*:{
if ($devent == init) {
did -a $dname 13 0,0,0
did -a $dname 14 #0
}
if ($devent == scroll) {
%rgb.val = $did(3).sel $did(4).sel $did(5).sel
preview %rgb.val
did -g $dname 1 preview.bmp
did -ra $dname 13 $replace(%rgb.val,$chr(32),$chr(44))
did -ra $dname 14 $chr(35) $+ $base($rgb($token(%rgb.val,1,32),$token(%rgb.val,2 ,32),$token(%rgb.val,3,32)),10,16)
color $did($did).sel 0 0 r
color 0 $did($did).sel 0 g
color 0 0 $did($did).sel b
did -g $dname $calc(3+ $did) $+($replace($did,3,r,4,g,5,b),.bmp)
}
if ($devent == sclick) {
if ($did isnum 16-17) {
%rgb.c = $iif($did == 16,~)
if (%rgb.c) {
clipboard $did(14)
}
else {
clipboard $did(13)
}
}
}
}
alias rgb {
preview 0 0 0
%rgb.count = 1
while ($token(r.g.b,%rgb.count,46)) {
color 0 0 0 $ifmatch
inc %rgb.count
}
unset %rgb.*
dialog -dm rgb rgb
}
menu channel {
.RGB Renkleri : dialog -m RGB RGB
}


Son olarak aşağıdan Nicklust dll si cek ve dll klasorü içinde at.
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Not : Bu Kodu denedim tıkır tıkır calisiyor. şayet gene yapamassan o zaman bende mirc.exe ye yüklenmiş halini mirc.exe ile beraber yollarım.

3 nude denedim calistiramadim nerde yanlis yapiyorumki 6.16 mirc kullaniyorum bu kodu remoteye atiyorum ve dll li yukledim sanirimda baska yapilcak bisye yok ama calismadi ucude nerde yanlis yapiyorum anliyamadim

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


Buraya yükledim cek. şu an bunu kullanıyorum mesela tıkır tıkır çalışıyor.

mckruger in verdiği kodu da sanırım dll lerin olduğu klasöre kaydetmek gerekiyor bide o şekilde dene flyman sadece tahmin tabi benimkisi

mirci indirdim evet calisiyor inceledim baska bisey de yok bend eniye clismiyor anliyamadim bend eolan bi kod etkiliyor diye dusunuyorum ne kadar dll varsa sildim ama yine olmadi bazne anlamak zor bu mirci