IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2
 
LinkBack Seçenekler Stil
Alt 22 Nisan 2009, 09:31   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Toolbarda Cpu Ram



Arkadaslar Toolbarımda Cpu Lag bu gıbı kısımları calıstırmak ıstıyorum addon dıyalogumda hazırladım ama beceremedım yardım edebılırmısınız
Alıntı:
dialog x {
title "Toolbarz"
size -1 -1 514 47
option dbu
box "Menüler", 5, 218 4 204 41
icon 6, 227 13 25 16, x.ico, 0
text "Bağlan", 7, 225 34 30 8
text "Kanallar", 9, 264 34 26 8
text "Radio", 11, 307 34 23 8
text "Meşgul", 13, 345 34 25 8
text "Korumalar", 15, 380 34 29 8
box "Bilgiler", 16, 428 4 68 41
icon 4, 266 13 25 16, x.ico, 0
icon 8, 308 13 25 16, x.ico, 0
icon 10, 347 13 25 16, x.ico, 0
icon 12, 384 13 25 16, xico, 0
text "Saat ", 14, 437 15 49 8
text "Tarih ", 19, 436 28 55 8
text "Cpu", 1, 5 5 38 8
text "Ram", 2, 5 15 25 8
}

Alıntı:
alias xLagmt if ($dialog(toolbar)) { .timerlagsx 0 3 mtb Toolbar Progressbar Position 2 $round($calc($$1 * 10),0) | .timerlags 0 3 mtb Toolbar Progressbar Position 1 $round($calc($$1 * 10),0) }
alias xLag { .notice $me LAG $ticks }
on ^*:notice:LAG*:*: {
haltdef
if ($2 !isnum) { return }
if ($calc($ticks - $2) > 0) {
.xLagmt $calc(($ticks - $2) / 1000)
}
}


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 22 Nisan 2009, 11:48   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



Öncelikle bazı dosyalara ihtiyacınız olacaktır.

mDX.DLL
Ctl_gen.mdx
ProfInfo.DLL

Bu DLL dosyalarının mIRC.exe'nin bulunduğu klasörde olması gerekmektedir.

Dialog'da birkaç değişiklik yaptım.2 adet text kontrolü daha koydum.Bu text kontrollerini

mDX.DLL aracılığıyla Progressbar kontrolüne çevireceğiz.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog x {
  title "Toolbarz"
  size -1 -1 514 47
  option dbu
  box "Menüler", 5, 218 4 204 41
  icon 6, 227 13 25 16,  x.ico, 0
  text "Bağlan", 7, 225 34 30 8
  text "Kanallar", 9, 264 34 26 8
  text "Radio", 11, 307 34 23 8
  text "Meşgul", 13, 345 34 25 8
  text "Korumalar", 15, 380 34 29 8
  box "Bilgiler", 16, 428 4 68 41
  icon 4, 266 13 25 16,  x.ico, 0
  icon 8, 308 13 25 16,  x.ico, 0
  icon 10, 347 13 25 16,  x.ico, 0
  icon 12, 384 13 25 16,  x.ico, 0
  text "Saat ", 14, 437 15 49 8
  text "Tarih ", 19, 436 28 55 8
  text "Cpu", 1, 5 5 14 8
  text "Lag:", 2, 5 15 14 8
  text "", 3, 21 5 78 8
  text "", 17, 21 15 78 8
}
alias ramuse {
  var %f = ProcInfo.dll
  var %a = $dll(%f,GetRam,memory)
  var %u = %a - $dll(%f,GetRam,memoryavail)
  return $round($calc(%u / %a * 100),0) $+ $iif($1,% ( $+ $kbs(%u) / $kbs(%a) $+ ))
}
alias lg dialog -m x x
on *:dialog:x:init:*: {
  dll mdx.dll MarkDialog $dname
  dll mdx.dll SetControlMDX $dname 3,17 Progressbar smooth > ctl_gen.mdx
  .timerram 0 3 did -a x 3 $remove($gettok($ramuse(1),1,32),%)
}
alias xLagmt { .timerlagsx 0 3 did -a x 17 $round($calc($$1 * 10),0) | .timerlags 0 3 mtb Toolbar Progressbar Position 1 $round($calc($$1 * 10),0) }
alias xLag { .notice $me LAG $ticks }
on ^*:notice:LAG*:*: {
  haltdef
  if ($2 !isnum) { return }
  if ($calc($ticks - $2) > 0) {
    .xLagmt $calc(($ticks - $2) / 1000)
  }
}

 
Alıntı ile Cevapla

Alt 22 Nisan 2009, 16:13   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



bu dll leri nereden temin edeceğiz serdar406

 
Alıntı ile Cevapla

Alt 23 Nisan 2009, 02:14   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



RapStar Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bu dll leri nereden temin edeceğiz serdar406

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

 
Alıntı ile Cevapla

Alt 23 Nisan 2009, 09:49   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



Dedıgınız gıbı yaptım bu sefer toolbar ortada gorunuyor ve did hatası verıyor anlamadım bende neden boyle yapıyor
Alıntı:
alias rebar { dll rebar.dll $$1- }
alias bars { return bars.mdx }
alias mdx { return $dll(mdx.dll,$1,$2-) }
alias saat {
if $dialog(x) {
did -ra x 14 $chr(32) $chr(32) Saat $time
}
}
alias tarih {
if $dialog(x) {
did -ra x 19 $chr(32) $chr(32) Tarih $date
}
}
dialog x {
title "Toolbarz"
size -1 -1 514 47
option dbu
box "Menüler", 5, 218 4 204 41
icon 6, 227 13 25 16, x.ico, 0
text "Bağlan", 7, 225 34 30 8
text "Kanallar", 9, 264 34 26 8
text "Radio", 11, 307 34 23 8
text "Meşgul", 13, 345 34 25 8
text "Korumalar", 15, 380 34 29 8
box "Bilgiler", 16, 428 4 68 41
icon 4, 266 13 25 16, x.ico, 0
icon 8, 308 13 25 16, x.ico, 0
icon 10, 347 13 25 16, x.ico, 0
icon 12, 384 13 25 16, x.ico, 0
text "Saat ", 14, 437 15 49 8
text "Tarih ", 19, 436 28 55 8
text "Cpu", 1, 5 5 14 8
text "Lag:", 2, 5 15 14 8
text "", 3, 21 5 78 8
text "", 17, 21 15 78 8
}
alias ramuse {
var %f = ProcInfo.dll
var %a = $dll(%f,GetRam,memory)
var %u = %a - $dll(%f,GetRam,memoryavail)
return $round($calc(%u / %a * 100),0) $+ $iif($1,% ( $+ $kbs(%u) / $kbs(%a) $+ ))
}
alias lg dialog -m x x
on *:dialog:x:init:*: {
dll mdx.dll MarkDialog $dname
dll mdx.dll SetControlMDX $dname 3,17 Progressbar smooth > ctl_gen.mdx
.timerram 0 3 did -a x 3 $remove($gettok($ramuse(1),1,32),%)
}
alias xLagmt { .timerlagsx 0 3 did -a x 17 $round($calc($$1 * 10),0) | .timerlags 0 3 mtb Toolbar Progressbar Position 1 $round($calc($$1 * 10),0) }
alias xLag { .notice $me LAG $ticks }
on ^*:notice:LAG*:*: {
haltdef
if ($2 !isnum) { return }
if ($calc($ticks - $2) > 0) {
.xLagmt $calc(($ticks - $2) / 1000)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ialog:x:sclick:*: {
if ($did == 6) {
if $$me !== $null {
if $did(7) == Bağlan {
did -ra $dname 7 B. Kopar
.server irc.sunucu.com
}
else {
did -ra $dname 7 Bağlan
scid $activecid disconnect
}
}
}
if ($did == 4) kanal
if ($did == 8) radio
if ($did == 10) meskul
if ($did == 12) koruma
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ialog:x:init:*: {
.timer 0 1 saat
.timer 0 1 tarih
rebar HideToolbar .
rebar Dock $dialog(x).hwnd > top
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetColor $dname 2,7,8,11,15,13,9,14,19,20 text $rgb(213,143,0)
mdx SetFont $dname 1,5,16,2,7,8,11,15,13,9,19,14,17,18,3,20,22,23 13 700 Tahoma
}


 
Alıntı ile Cevapla

Alt 23 Nisan 2009, 22:47   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



Bu Şekil Toolbar Ortada Cıkıyor. Saat Tarih Kısımlarıda Cıkmıyor


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 25 Nisan 2009, 00:18   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog x {
  title "Toolbarz"
  size -1 -1 419 44
  option dbu
  box "Menüler", 5, 79 1 204 41
  box "Bilgiler", 16, 285 1 133 41
  text "Saat ", 14, 289 11 49 8
  text "Tarih ", 19, 289 22 55 8
  text "Cpu", 1, 5 5 14 8
  text "Lag:", 2, 5 15 14 8
  text "", 3, 21 5 53 8
  text "", 17, 21 15 53 8
  icon 18, 4 27 15 15,  tb\jpg\nxt.bmp, 0
  text "Kontrol Menü", 20, 23 34 37 8
  list 4, 82 10 197 26, size
}
alias saat {
  if $dialog(x) {
    did -ra x 14 Saat: $time
    did -ra x 19 Tarih: $date
  }
}

on *:dialog:x:init:*:{
  dll rebar.dll HideToolbar
  dll rebar.dll Dock $dialog($dname).hwnd > top
  dll mdx.dll SetMircVersion $version
  dll mdx.dll MarkDialog $dname
  dll mdx.dll SetBorderStyle $dname 4
  dll mdx.dll SetControlMDX $dname 3,17 Progressbar smooth > ctl_gen.mdx
  dll mdx.dll SetControlMDX $dname 4 Toolbar nodivider flat > bars.mdx
  did -i $dname 4 1 bmpsize 32 32
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Bağlan
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Kanallar
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Radio
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Meşgul
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Korumalar
  .timerram 0 3 ramuse
  .timersaatarih 0 0 saat
}

alias ramuse {
  var %f = ProcInfo.dll
  var %a = $dll(%f,GetRam,memory)
  var %u = %a - $dll(%f,GetRam,memoryavail)
  if ($dialog(x)) did -a x 3 $round($calc(%u / %a * 100),0) $+ $iif($1,% ( $+ $kbs(%u) / $kbs(%a) $+ ))
}
alias lg dialog -m x x
alias xLagmt { .timerlagsx 0 3 did -a x 17 $round($calc($$1 * 10),0) | .timerlags 0 3 mtb Toolbar Progressbar Position 1 $round($calc($$1 * 10),0) }
alias xLag { .notice $me LAG $ticks }
on ^*:notice:LAG*:*: {
  haltdef
  if ($2 !isnum) { return }
  if ($calc($ticks - $2) > 0) {
    .xLagmt $calc(($ticks - $2) / 1000)
  }
}

on *:dialog:x:sclick:*: {
  if $did == 4  {
    var %s $did(4).sel
    if (%s == 2) echo -a Birinci button
    if (%s == 4) echo -a İkinci Button
    if (%s == 6) echo -a Üçüncü button
    if (%s == 8) echo -a Dördüncü button
    if (%s == 10) echo -a Beşinci button
  }
}

Bazı eksik noktaları var.Ben sadece kaba taslak olarak veriyorum.mIRC Scripting Dersleri

bölümünde genişce anlatılmıştır konu.Toolbar'ı Windows temasına göre

ayarlama,tuşlarına basınca kendi komutlarını atama işlemlerini kendine göre düzenlersin.

Ayrıca Rebar.dll'de bir sorun var sanırım.mIRC 6.35'de mIRC'in Toolbar'ını

gizlemiyor.Rebar ile aynı işlemi yapan Ultradock kullanmayı tercih edeyim dedim fakat bu

seferde mIRC'in ara sıra donduğunu(kilitlendiğini farkettim).Bilginize...


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 25 Nisan 2009, 10:58   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



Tşk elıne saglık cok guzel olmus yanlız 2 seyde sıkıntım var 1. sıkıntım id numarası. id numarasını yazıp kopart baglan seklınde yapıcamda bunda id numarasıyla yapamadım baglan kopart seklınde 2. sıkıntımda dıyalogdakı yazıları mdx ıle +b tahoma yazı seklınde kalınlastırmak ıstedım ama sadece lag yazısı oldu sımdıden tşk ederım.

 
Alıntı ile Cevapla

Alt 25 Nisan 2009, 11:52   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



1.soru için;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias -l update.tb {
  if ($dialog(x)) {
    if ($server) did -o x 1 2 +a 1 Kopart
    else did -o x 1 2 +a 1 Bağlan
  }
}
on *:connect: .timer 1 0 update.tb
on *:disconnect: .timer 1 0 update.tb

Bu kodları eklersen bağlanıldığında yada bağlantı kesildiğinde Bağlan tuşunun yazısı değişecektir.

Ayrıca sana verdiğim kodlarda;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if (%s == 2) echo -a Birinci button

olan bölümün yerine

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if (%s == 2) update.tb

yazacaksın.


2.Soru için;

mDX.DLL ile Dialog Kontrollerinin Yazı tiplerini değiştirmek:

dll mdx.dll SetFont <dialog adı> <ID(ler)> <Yazı Tipi Boyu> <Yazı Tipi Stili(400(Normal) yada 700(kalın)) <Yazı Tipi Adı>

Örnekler:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dll mdx.dll SetFont x 1,2,3,8,4,6 13 700 Tahoma

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dll mdx.dll SetFont x 1,2,5 11 400 Arial
 
Alıntı ile Cevapla

Alt 27 Nisan 2009, 11:33   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Toolbarda Cpu Ram



Birinci soru kısmında ID'leri senin dialog'undan farklı girmişim.Düzeltiyorum.

Bütün kodları birlikte veriyorum.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog x {
  title "Toolbarz"
  size -1 -1 419 44
  option dbu
  box "Menüler", 5, 79 1 204 41
  box "Bilgiler", 16, 285 1 133 41
  text "Saat ", 14, 289 11 49 8
  text "Tarih ", 19, 289 22 55 8
  text "Cpu", 1, 5 5 14 8
  text "Lag:", 2, 5 15 14 8
  text "", 3, 21 5 53 8
  text "", 17, 21 15 53 8
  icon 18, 4 27 15 15,  tb\jpg\nxt.bmp, 0
  text "Kontrol Menü", 20, 23 34 37 8
  list 4, 82 10 197 26, size
}
alias saat {
  if $dialog(x) {
    did -ra x 14 Saat: $time
    did -ra x 19 Tarih: $date
  }
}

on *:dialog:x:init:*:{
  dll rebar.dll HideToolbar
  dll rebar.dll Dock $dialog($dname).hwnd > top
  dll mdx.dll SetMircVersion $version
  dll mdx.dll MarkDialog $dname
  dll mdx.dll SetFont x 5,16,14,19,1,2,3,17,18,20,4 13 700 Tahoma
  dll mdx.dll SetBorderStyle $dname 4
  dll mdx.dll SetControlMDX $dname 3,17 Progressbar smooth > ctl_gen.mdx
  dll mdx.dll SetControlMDX $dname 4 Toolbar nodivider flat > bars.mdx
  did -i $dname 4 1 bmpsize 32 32
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Bağlan
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Kanallar
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Radio
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Meşgul
  did -a $dname 4 1 -
  did -i $dname 4 1 setimage icon large 0, $+ x.ico
  did -a $dname 4 1 Korumalar
  .timerram 0 3 ramuse
  .timersaatarih 0 0 saat
}

alias ramuse {
  var %f = ProcInfo.dll
  var %a = $dll(%f,GetRam,memory)
  var %u = %a - $dll(%f,GetRam,memoryavail)
  if ($dialog(x)) did -a x 3 $round($calc(%u / %a * 100),0) $+ $iif($1,% ( $+ $kbs(%u) / $kbs(%a) $+ ))
}
alias lg dialog -m x x
alias xLagmt { .timerlagsx 0 3 did -a x 17 $round($calc($$1 * 10),0) | .timerlags 0 3 mtb Toolbar Progressbar Position 1 $round($calc($$1 * 10),0) }
alias xLag { .notice $me LAG $ticks }
on ^*:notice:LAG*:*: {
  haltdef
  if ($2 !isnum) { return }
  if ($calc($ticks - $2) > 0) {
    .xLagmt $calc(($ticks - $2) / 1000)
  }
}

on *:dialog:x:sclick:*: {
  if $did == 4  {
    var %s $did(4).sel
    if (%s == 2) update.tb
    if (%s == 4) echo -a İkinci Button
    if (%s == 6) echo -a Üçüncü button
    if (%s == 8) echo -a Dördüncü button
    if (%s == 10) echo -a Beşinci button
  }
}
alias -l update.tb {
  if ($dialog(x)) {
    if ($server) { did -o x 4 2 1 Kopart | disconnect }
    else { did -o x 4 2 1 Bağlan | server }
  }
}
on *:connect: $iif($dialog(x),did -o x 4 2 1 Kopart)
on *:disconnect: $iif($dialog(x),did -o x 4 2 1 Bağlan)
 
Alıntı ile Cevapla

Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2

Etiketler
cpu, mirc, mirc download, mirc indir, ram, toolbarda

« önceki Konu | sonraki Konu »

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık

Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
toolbarda swf uzantısı Dangerous123 mIRC Scripting Sorunları 7 04 Aralık 2014 18:40
Toolbarda Kayma KiLLed mIRC Scripting Sorunları 6 03 Aralık 2012 10:28
toolbarda hata var Goemon mIRC Scripting Sorunları 2 02 Ekim 2012 20:48
Toolbarda degisiklik Kimimben mIRC Scripting Sorunları 9 02 Ağustos 2012 11:31
Toolbarda bi sorunum var. wKatli4mci mIRC Scripting Sorunları 6 30 Haziran 2008 10:33




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet instagram takipçi sohbet teması yetişkin sohbet
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

mimarsinanokullari.com mjsanaokulu.com eburke.org