arkadaşlar mckruger arkadaşın çok önce paylaştığı oparator toolbar menüsü yapmam icin gereklı dll yı bulamadım elınde olan veya bılen varsa yardımcı olurmusunuz. teşekkürler
Not: Toolbardaki menüleri sen dolduruyorsun. Burada sadece menü isimleri, iconları gibi şeyler ayarlanmış gerisi artık insanlar ne yapmak isterse onu yapmak üzere bırakılmıştır.
Fakat Op kontrollerinin kodları girilmiştir. Çalışır vaziyettedir. Dll dosyalarının indirilmesi: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Icon dosyalarının indirilmesi: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kodlar:
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 $date $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) Kes $chr(9) $+ Bağlantıyı Kes
}
else {
did -o toolbar 1 3 +a 1 $chr(32) Bağlan $chr(9) $+ Servere Bağlan
}
}
}
dialog toolbar {
title "x"
size 0 2 396 $iif($temabul,29,31)
option dbu
list 13, 0 0 396 19
list 1, 0 11 396 17, size
list 2, 403 13 150 8, size
list 7, 403 25 150 13, size
list 9, 403 -3 150 1
box "Hızlı İşlemler", 8, 397 5 44 34,default
text "", 11, 463 17 45 26, center
text "", 12, 466 21 39 22, center
}
on *:dialog:toolbar:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetFont $dname 12 17 550 Courier New
.timersaat 0 1 saat 12
rebar HideToolbar
rebar Dock $dialog(toolbar).hwnd > top
mdx SetControlMDX $dname 1,2,7,9,13 ToolBar flat wrap arrows nodivider > $bars
mdx SetBorderStyle 1,2,7,9,13
did -i $dname 2 1 bmpsize 16 16
did -i $dname 2 1 setimage +nhd 0 icon small icon\operator.ico
did -a $dname 2 +b 1 $chr(32) $+ $chr(9) $+ OP / DEOP
did -i $dname 2 1 setimage +nhd 0 icon small icon\voice.ico
did -a $dname 2 +b 2 $chr(32) $+ $chr(9) $+ VOICE / DEVOICE
did -i $dname 2 1 setimage +nhd 0 icon small icon\ikaz.ico
did -a $dname 2 +b 3 $chr(32) $+ $chr(9) $+ KICK BAN
did -i $dname 7 1 bmpsize 16 16
did -i $dname 7 1 setimage +nhd 0 icon small icon\kick.ico
did -a $dname 7 +b 1 $chr(32) $+ $chr(9) $+ Kick
did -i $dname 7 1 setimage +nhd 0 icon small icon\Whois.ico
did -a $dname 7 +b 2 $chr(32) $+ $chr(9) $+ Whois Çek
did -i $dname 7 1 setimage +nhd 0 icon small icon\Query.ico
did -a $dname 7 +b 3 $chr(32) $+ $chr(9) $+ Özel Aç
did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 1 1 bmpsize 26 26
did -i $dname 1 1 setimage icon large icon\connect.ico
did -i $dname 1 1 setimage icon large icon\disconnect.ico
did -i $dname 1 1 setimage icon large icon\Ayarlar1.ico
did -i $dname 1 1 setimage icon large icon\kanallar.ico
did -i $dname 1 1 setimage icon large icon\korumalar2.ico
did -i $dname 1 1 setimage icon large icon\mp3.ico
did -i $dname 1 1 setimage icon large icon\dost.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\panel2.ico
did -i $dname 1 1 setimage icon large icon\help2.ico
did -i $dname 1 1 setimage icon large icon\info.ico
did -a $dname 1 +a -
did -a $dname 1 +a 1 Bağlan $chr(9) $+ Servere Bağlan
did -a $dname 1 +a -
did -a $dname 1 +a 3 $chr(32) Ayarlar $chr(9) $+ Bağlantı ve Scriptle İlgili Diğer Ayarları Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 4 $chr(32) Kanallar $chr(9) $+ Kanala Giriş Diyalogunu Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 5 $chr(32) Korumalar $chr(9) $+ Kanal, Kişisel ve Flood Korumalarını Gösterir.
did -a $dname 1 +a -
did -a $dname 1 +a 6 $chr(32) Mp3 Çalar $chr(9) $+ Mp3 Çaları Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Notify $chr(9) $+ Gelişmiş Notify Listesi ve Adres Defterini Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 8 $chr(32) Oyunlar $chr(9) $+ Script Oyunlarını Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 9 $chr(32) Adresler $chr(9) $+ Internet Adreslerini içeren dialogu Açar..
did -a $dname 1 +a -
did -a $dname 1 +a 10 $chr(32) Panel $chr(9) $+ Tüm Ayarların gösterildiği kontrol panelini açar.
did -a $dname 1 +a -
did -a $dname 1 +a 11 $chr(32) Yardım $chr(9) $+ Yardım Menüsünü Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 12 $chr(32) Hakkında $chr(9) $+ Script Hakkındaki Bilgileri Açar.
did -a $dname 1 +a -
}
on *:dialog:toolbar:sclick:*:{
if $did == 2 {
if $did(2).sel == 2 {
if $sline($active,1) isop $active {
mode $active -o $sline($active,1)
}
else {
mode $active +o $sline($active,1)
}
}
if $did(2).sel == 3 {
if $sline($active,1) isvoice $active {
mode $active -v $sline($active,1)
}
else {
mode $active +v $sline($active,1)
}
}
if $did(2).sel == 4 {
mode $active +b $sline($active,1) $+ !*@*
kick $active $sline($active,1) 4Bu kanaldan atıldınız. Güle güle derim sana...
}
}
if $did == 7 {
if $did(7).sel == 2 {
kick $active $sline($active,1) 4Bu kanaldan atıldınız. Güle güle derim sana...
}
}
if $did == 7 {
if $did(7).sel == 3 {
whois $nick $sline($active,1)
}
}
if $did == 7 {
if $did(7).sel == 4 {
query $nick $sline($active,1)
}
}
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) {
.kanalkorumalari
}
if ($did($dname,1).sel = 11) {
.mp3c
}
if ($did($dname,1).sel = 13) {
.Notifylist
}
if ($did($dname,1).sel = 15) {
.oyunlar
}
if ($did($dname,1).sel = 17) {
.internet
}
if ($did($dname,1).sel = 19) {
.cpanel
}
if ($did($dname,1).sel = 21) {
.run help.chm
}
if ($did($dname,1).sel = 23) {
.hakkinda
}
}
}
}