IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

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/)
-   -   Toolbar'a eklenti (https://www.ircforumlari.net/mirc-scripting-sorunlari/469989-toolbara-eklenti.html)

TİGeR 05 Nisan 2012 07:56
Toolbar'a eklenti
 
Merhabalar, Konuyu doğru yeremi acıorm bilmiorm ama Kullandığım Türkçe mIRC'e aşşağıdaki gibi bi bar ekleyebilirmiyim? orjinal toolbarın hemen bitimine resimdeki gibi olucak

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

Cok uğrastım ama beceremedim ;s1

StanteaR 06 Nisan 2012 15:31
Cevap: Toolbar'a eklenti
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Böyle Birşey Sanırım Ama Sendeki Kodları Verirsen Arkadaslar Yardımcı OLur Ama Dıyorsankı Bendekıne Eklentı Toolbara Eklentı Yapmak Istıyorum Oda Ugrastırır Bence...

TİGeR 07 Nisan 2012 00:01
Cevap: Toolbar'a eklenti
 
Bende kod yokki yukardaki gibi lag bar ram bar Google arama motoru Saat tarih koymak isitiorm toolbar'a yani

StanteaR 07 Nisan 2012 14:12
Cevap: Toolbar'a eklenti
 
bilmiyorum zevkler ve renkler tartisilmaz ama ben arama motoruna sicak bakmiyorum sevmiyorum yani eve gidince bir bakayim dostum.

TİGeR 09 Nisan 2012 18:44
Toolbarda hata
 
Selamlar .. elimdeki web-Toolbar'ın içinden ayıklama yaparak sadece google arama motoru kısmını alayım dedim toolbarı'ın üst kısmını kaldırdım diyalogları istediğim oldu derken bu kezde tolbarın hata verdini gördüm adresi yazıp tıkladığımda swich barda yani yan tarafta bir sürü web sayfası acılıor ;s2 acaba nerde düzeltme yapmam gerekior bi baksanız?
Kod:
on *:start: { dialog -m toolbar toolbar }
alias Temadene { echo -a Temam: $iif($temabul,XP Teması,Klasik Windows Teması)  }
alias Temabul { .comreg dll/Tema.dll | .comopen toolbar Tema.buL | var %komut = $com(toolbar,TemaBul,1) | var %komut = $com(toolbar).result  | .comclose toolbar | .comreg -u dll/Tema.dll | return %komut }
alias mdx { return $dll(DLL\mdx.dll,$1,$2-) }
alias rebar { dll DLL\rebar.dll $$1- }
alias bars { return DLL\bars.mdx }
on *:connect: {
  update.toolbar
}
on *:disconnect: {
  update.toolbar
}
on *:close:*: {
  update.toolbar
}

alias update.toolbar {
}

dialog toolbar {
  title "x"
  size 0 0 550 $iif($temabul,34,36)
  option dbu
  list 4, 0 -2 550 17, size
  list 1, 0 4 550 17, size
  text "", 2, 464 6 45 16, center
  text "", 3, 467 10 39 11, center
  list 100, 0 33 180 19, size
  combo 101, 170 33 148 70, size edit drop
  text "Adres:", 102, 145 35 18 11
  list  103, 323 33 45 11

}
on *:dialog:toolbar:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style
  mdx SetFont $dname 1,102,103 Turkish 14 800 Cyrillic
  mdx SetFont $dname 100 Turkish 14 600 Cyrillic
  mdx SetFont $dname 3 +a 20 600 arial

  mdx SetColor $dname 102 text $rgb(0,0,0)
  did -a $dname 101
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
did -c $dname 101 1

  rebar HideToolbar .
  rebar Dock $dialog(toolbar).hwnd > top
  mdx SetControlMDX $dname 1,3,4 Progressbar smooth > $ctl
  mdx SetControlMDX $dname 1,4 ToolBar flat wrap arrows nodivider > $bars
  mdx SetControlMDX $dname 100,103 ToolBar list flat wrap arrows nodivider > $bars
  mdx SetBorderStyle 1,100,103
 
  did -i $dname 103 1 bmpsize 16 16
  did -i $dname 103 1 setimage +nh icon small icon\git.ico
  did -a $dname 103 +b 1 Adrese Git! 
  did -i $dname 100 1 bmpsize 16 16
  did -i $dname 100 1 setimage icon large icon\geri.ico
  did -i $dname 100 1 setimage icon large icon\ileri.ico
  did -i $dname 100 1 setimage icon large icon\dur.ico
  did -i $dname 100 1 setimage icon large icon\yenile2.ico
  did -a $dname 100 +a -
  did -a $dname 100 +a 1 $chr(32) Geri $chr(9) $+ Bir önceki sayfaya gelinir...
  did -a $dname 100 +a -
  did -a $dname 100 +a 2 $chr(32) İleri $chr(9) $+ Bir sonraki sayfaya  gidilir...
  did -a $dname 100 +a -
  did -a $dname 100 +a 3 $chr(32) Dur $chr(9) $+ Sayfa görüntülenmesi durdurulur...
  did -a $dname 100 +a -
  did -a $dname 100 +a 4 $chr(32) Yenile $chr(9) $+ Sayfa görüntülenmesini yeniler...
 
  if ($window($active) != @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) && (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) {
    window -peng1k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
    var %hwnd = $dll(dll\nhtml.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd)
    dll dll\nhtml.dll attach %hwnd
    dll dll\nhtml.dll navigate [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
  }
}
on *:dialog:toolbar:*:*: {
  if $devent == sclick {
    if $did == 1 {
      if ($did($dname,1).sel = 3) {
        if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect }
        else {
          scid $activecid server
        }
        update.toolbar
        did -f $dname 1
        scid $activecid window -a "status window"
      }
    }
  }
  if $did == 100 {
    if $did(100).sel == 3 {
      var %hwnd = $dll(dll/nhtml.dll,find,findme)
      dll dll/nHTML.dll attach %hwnd
      dll dll/nhtml.dll back 0
      /echo -a 0,2 Bir önceki sayfaya geliniyor...
    }
  }
  if $did == 100 {
    if $did(100).sel == 5 {
      var %hwnd = $dll(dll/nhtml.dll,find,findme)
      dll dll/nHTML.dll attach %hwnd
      dll dll/nHTML.dll forward 0
      /echo -a 0,2 Bir sonraki sayfaya gidiliyor...
    }
  }
  if $did == 100 {
    if $did(100).sel == 7 {
      var %hwnd = $dll(dll/nhtml.dll,find,findme)
      dll dll/nHTML.dll attach %hwnd
      dll dll/nHTML.dll stop 0
      /echo -a 0,1 Sayfa görüntülenmesi durduruluyor...
    }
  }
  if $did == 100 {
    if $did(100).sel == 9 {
      var %hwnd = $dll(dll/nhtml.dll,find,findme)
      dll dll/nHTML.dll attach %hwnd
      dll dll/nhtml.dll refresh 0
      /echo -a 0,1 Sayfa görüntülenmesi yenileniyor...
    }
  }
  if $did == 103 {
    var %z = $did(103).sel
    if (%z == 2) { git $did(101) }
  }
}
Alias -l html { dll $+(",$mircdirdll/nhtml.dll,") $1- }
Alias -l nhtml { return $+(",$mircdirdll/nhtml.dll,") }
Alias -l
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
window -peng1Bk0 $1
  html attach $window($1).hwnd
  html navigate $2-
}
Alias git {
  if (!$1) {
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color=red>[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
  if ($1) {
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if ($dialog(toolbar)) { did -a toolbar 101 $1- }
}
Alias yenipencere {
  var %w = 1,%wins = 1
  while ($window(%w)) {
    if (Web isin $ifmatch) { inc %wins }
    inc %w
  }
  :winname
  var %window = $+(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],%wins)
  if ($window(%window)) { inc %wins | goto winname }
  return %window
}

Buda toolbarın orjinal hali

Kod:
on *:start: { dialog -m toolbar toolbar }
alias Temadene { echo -a Temam: $iif($temabul,XP Teması,Klasik Windows Teması)  }
alias Temabul { .comreg dll/Tema.dll | .comopen toolbar Tema.buL | var %komut = $com(toolbar,TemaBul,1) | var %komut = $com(toolbar).result  | .comclose toolbar | .comreg -u dll/Tema.dll | return %komut }
alias mdx { return $dll(DLL\mdx.dll,$1,$2-) }
alias rebar { dll DLL\rebar.dll $$1- }
alias bars { return DLL\bars.mdx }
on *:connect: {
  update.toolbar
}
on *:disconnect: {
  update.toolbar
}
on *:close:*: {
  update.toolbar
}
alias saat { if ($dialog(toolbar)) { did -a toolbar $1 $time } }

alias update.toolbar {
  if (!$dialog(toolbar)) { halt }
  else {
    scid $activecid
    if ( $scid($activecid).status = connecting || $scid($activecid).status = connected ) {
      did -o toolbar 1 3 +a 2 $chr(32) Bağlantıyı Kes $chr(9) $+ IRC Serverle Bağlantınızı Koparır.
    }
    else {
      did -o toolbar 1 3 +a 1 $chr(32) Servere Bağlan $chr(9) $+ IRC Servere Bağlantı Kurar.
    }
  }
}

dialog toolbar {
  title "x"
  size 0 0 550 $iif($temabul,34,36)
  option dbu
  list 4, 0 -2 550 17, size
  list 1, 0 4 550 17, size
  text "", 2, 464 6 45 16, center
  text "", 3, 467 10 39 11, center
  list 100, 0 33 180 19, size
  combo 101, 170 33 148 70, size edit drop
  text "Adres:", 102, 145 35 18 11
  list  103, 323 33 45 11

}
on *:dialog:toolbar:init:0: {
  mdx MarkDialog $dname
  mdx SetDialog $dname style
  mdx SetFont $dname 1,102,103 Turkish 14 800 Cyrillic
  mdx SetFont $dname 100 Turkish 14 600 Cyrillic
  mdx SetFont $dname 3 +a 20 600 arial
  .timersaat 0 1 saat 3
  mdx SetColor $dname 102 text $rgb(0,0,0)
  did -a $dname 101
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
did -c $dname 101 1

  rebar HideToolbar .
  rebar Dock $dialog(toolbar).hwnd > top
  mdx SetControlMDX $dname 1,3,4 Progressbar smooth > $ctl
  mdx SetControlMDX $dname 1,4 ToolBar flat wrap arrows nodivider > $bars
  mdx SetControlMDX $dname 100,103 ToolBar list flat wrap arrows nodivider > $bars
  mdx SetBorderStyle 1,100,103
 
  did -i $dname 103 1 bmpsize 16 16
  did -i $dname 103 1 setimage +nh icon small icon\git.ico
  did -a $dname 103 +b 1 Adrese Git! 
  did -i $dname 100 1 bmpsize 16 16
  did -i $dname 100 1 setimage icon large icon\geri.ico
  did -i $dname 100 1 setimage icon large icon\ileri.ico
  did -i $dname 100 1 setimage icon large icon\dur.ico
  did -i $dname 100 1 setimage icon large icon\yenile2.ico
  did -a $dname 100 +a -
  did -a $dname 100 +a 1 $chr(32) Geri $chr(9) $+ Bir önceki sayfaya gelinir...
  did -a $dname 100 +a -
  did -a $dname 100 +a 2 $chr(32) İleri $chr(9) $+ Bir sonraki sayfaya  gidilir...
  did -a $dname 100 +a -
  did -a $dname 100 +a 3 $chr(32) Dur $chr(9) $+ Sayfa görüntülenmesi durdurulur...
  did -a $dname 100 +a -
  did -a $dname 100 +a 4 $chr(32) Yenile $chr(9) $+ Sayfa görüntülenmesini yeniler...

  did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
  did -i $dname 1 1 bmpsize 27 27
  did -i $dname 1 1 setimage icon large icon\baglan.ico
  did -i $dname 1 1 setimage icon large icon\kes.ico
  did -i $dname 1 1 setimage icon large icon\Ayarlar.ico
  did -i $dname 1 1 setimage icon large icon\kanal.ico
  did -i $dname 1 1 setimage icon large icon\korumalar.ico
  did -i $dname 1 1 setimage icon large icon\kontrolpanel.ico
  did -i $dname 1 1 setimage icon large icon\gorunum.ico
  did -i $dname 1 1 setimage icon large icon\liste.ico
  did -i $dname 1 1 setimage icon large icon\oyunlar.ico
  did -i $dname 1 1 setimage icon large icon\internet.ico
  did -i $dname 1 1 setimage icon large icon\yardım.ico
  did -a $dname 1 +a -
  did -a $dname 1 +a 1  $chr(32) Server Bağlan $chr(9) $+ IRC Servere Bağlantı Kurar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 3  $chr(32) Bağlantı $chr(9) $+ Bağlantı Ayarlarını Yapar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 4  $chr(32) Kanallar $chr(9) $+ Kanallara Giriş Penceresini Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 5 $chr(32) Korumalar $chr(9) $+ Kanal ve Kişisel Korumaları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 6 $chr(32) Kontrol Panel $chr(9) $+ Scriptinizle İlgili Tüm Ayarları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 7 $chr(32) Görünümler $chr(9) $+ Scriptinizin Görünümüyle İlgili Ayarları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 8 $chr(32) Listeler $chr(9) $+ Scriptinizdeki Notify, Düşman Listesi Gibi Ayarları Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 9 $chr(32) Oyunlar $chr(9) $+ Scriptinizin Oyunlarıyla İlgili Diyalogu Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 10 $chr(32) Internet $chr(9) $+ Internet Adreslerinin Olduğu Diyalogu Açar.
  did -a $dname 1 +a -
  did -a $dname 1 +a 11 $chr(32) Yardım $chr(9) $+ Scriptinizin Yardım Dosyasını Açar.
  did -a $dname 1 +a -
  if ($window($active) != @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) && (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) {
    window -peng1k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
    var %hwnd = $dll(dll\nhtml.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd)
    dll dll\nhtml.dll attach %hwnd
    dll dll\nhtml.dll navigate [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
  }
}
on *:dialog:toolbar:*:*: {
  if $devent == sclick {
    if $did == 1 {
      if ($did($dname,1).sel = 3) {
        if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect }
        else {
          scid $activecid server
        }
        update.toolbar
        did -f $dname 1
        scid $activecid window -a "status window"
      }
      if ($did($dname,1).sel = 5) {
        Ayarlar
      }
      if ($did($dname,1).sel = 7) {
        Kanallar
      }
      if ($did($dname,1).sel = 9) {
        Korumalar
      }
      if ($did($dname,1).sel = 11) {
        kontrolpanel
      }
      if ($did($dname,1).sel = 13) {
        gorunumler
      }
      if ($did($dname,1).sel = 15) {
        listeler
      }
      if ($did($dname,1).sel = 17) {
        oyunlar
      }
      if ($did($dname,1).sel = 19) {
        internet
      }
      if ($did($dname,1).sel = 21) {
        yardim
      }
    }
    if $did == 100 {
      if $did(100).sel == 3 {
        var %hwnd = $dll(dll/nhtml.dll,find,findme)
        dll dll/nHTML.dll attach %hwnd
        dll dll/nhtml.dll back 0
        /echo -a 0,1 Bir önceki sayfaya geliniyor...
      }
    }
    if $did == 100 {
      if $did(100).sel == 5 {
        var %hwnd = $dll(dll/nhtml.dll,find,findme)
        dll dll/nHTML.dll attach %hwnd
        dll dll/nHTML.dll forward 0
        /echo -a 0,1 Bir sonraki sayfaya gidiliyor...
      }
    }
    if $did == 100 {
      if $did(100).sel == 7 {
        var %hwnd = $dll(dll/nhtml.dll,find,findme)
        dll dll/nHTML.dll attach %hwnd
        dll dll/nHTML.dll stop 0
        /echo -a 0,1 Sayfa görüntülenmesi durduruluyor...
      }
    }
    if $did == 100 {
      if $did(100).sel == 9 {
        var %hwnd = $dll(dll/nhtml.dll,find,findme)
        dll dll/nHTML.dll attach %hwnd
        dll dll/nhtml.dll refresh 0
        /echo -a 0,1 Sayfa görüntülenmesi yenileniyor...
      }
    }
    if $did == 103 {
      var %z = $did(103).sel
      if (%z == 2) { git $did(101) }
    }
  }
}
Alias -l html { dll $+(",$mircdirdll/nhtml.dll,") $1- }
Alias -l nhtml { return $+(",$mircdirdll/nhtml.dll,") }
Alias -l
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
window -peng1Bk0 $1
  html attach $window($1).hwnd
  html navigate $2-
}
Alias git {
  if (!$1) {
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
color=red>[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
  if ($1) {
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
if ($dialog(toolbar)) { did -a toolbar 101 $1- }
}
Alias yenipencere {
  var %w = 1,%wins = 1
  while ($window(%w)) {
    if (Web isin $ifmatch) { inc %wins }
    inc %w
  }
  :winname
  var %window = $+(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...],%wins)
  if ($window(%window)) { inc %wins | goto winname }
  return %window
}

TİGeR 13 Nisan 2012 19:16
Toolbar düzenleme
 
Aşşagıdaki resimde gösterdiğim bosluğa Saat,Tarih, Aktif süre, Lag ve ram bar ekleyebilcek babayiğit aranıyor ;s1

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

Chelt 18 Nisan 2012 18:30
Cevap: Toolbar'a eklenti
 
son konularınızın içeriği aynı olduğu için birleştirdim. Lütfen Aynı konuda destek için yeni konu açmayın. Mevcut konunuzdan devam edin

Billy 21 Şubat 2022 18:00
Cevap: Toolbar'a eklenti
 
Alıntı:
StanteaR Nickli Üyeden Alıntı (Mesaj 1041083340)
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Böyle Birşey Sanırım Ama Sendeki Kodları Verirsen Arkadaslar Yardımcı OLur Ama Dıyorsankı Bendekıne Eklentı Toolbara Eklentı Yapmak Istıyorum Oda Ugrastırır Bence...
Bu toolbar kimde var acaba

ZenqerDenq 25 Şubat 2022 10:29
Cevap: Toolbar'a eklenti
 
Alıntı:
Billy Nickli Üyeden Alıntı (Mesaj 1042625629)
Bu toolbar kimde var acaba

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

Billy 25 Şubat 2022 18:17
Cevap: Toolbar'a eklenti
 
Alıntı:
ZenqerDenq Nickli Üyeden Alıntı (Mesaj 1042629339)
Bu Scriptde var [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Dostum Bişey daha Sorcam Şimdi Bunu Nasıl Kendi Mircide Toolbar eklicem


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 19:59.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

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