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

>
+
Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 09 Aralık 2008, 16:35   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Operator Toolbar Menü




Med-Cezir bişi sorcam ben bunu hem sağda hem solda yapamazmıyım ?

Alıntı:
on *:start: { dialog -m toolbarr toolbarr }
on *:connect: {
update.toolbarr
}
on *:disconnect: {
update.toolbarr
}
on *:close:*: {
update.toolbarr
}
alias update.toolbarr {
if (!$dialog(toolbarr)) { halt }
}
dialog toolbarr {
title "By uMuT"
size 5 5 70 285
option dbu
box "Op İşlem", 1, 3 3 67 150
list 2, 7 12 60 14, size
list 3, 7 29 60 14, size
list 4, 7 46 60 14, size
list 5, 7 63 60 14, size
list 6, 7 81 60 14, size
list 7, 7 98 60 14, size
list 8, 7 115 60 14, size
list 9, 7 133 60 14, size
box "Ekle\Sil", 10, 3 155 67 120
list 11, 7 163 60 14, size
list 12, 7 181 60 14, size
list 13, 7 200 60 14, size
list 14, 7 218 60 14, size
list 15, 7 237 60 14, size
list 16, 8 256 60 14, size
}
on *:dialog:toolbarr:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetFont $dname 1 12 700 Verdana
rebar Dock $dialog(toolbarr).hwnd > left
mdx SetControlMDX $dname 1 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1 ToolBarr flat wrap arrows nodivider > $bars
mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Toolbarr flat wrap arrows nodivider list > $bars
mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Progressbar smooth > $ctl
mdx SetBorderStyle $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16
mdx SetFont 1,2,3,4,5,6,7,8,9,11,12,13,14,15,16 -11 700 Tahoma
mdx SetDialog [ $dname ] bgcolor $rgb(255,255,255)
mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16 background $rgb(255,255,255)
did -i $dname 2 1 bmpsize 24 24
did -i $dname 2 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 2 +W 175 1 Op Ver
did -i $dname 3 1 bmpsize 24 24
did -i $dname 3 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 3 +W 175 1 Deop Et
did -i $dname 4 1 bmpsize 24 24
did -i $dname 4 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 4 +W 175 1 Voice Ver
did -i $dname 5 1 bmpsize 24 24
did -i $dname 5 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 5 +W 175 1 Devoice Et
did -i $dname 6 1 bmpsize 24 24
did -i $dname 6 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 6 +W 175 1 Ban+Kick
did -i $dname 7 1 bmpsize 24 24
did -i $dname 7 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 7 +W 175 1 Sebebli Kick
did -i $dname 8 1 bmpsize 24 24
did -i $dname 8 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 8 +W 175 1 Kanal Unban
did -i $dname 9 1 bmpsize 24 24
did -i $dname 9 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 9 +W 175 1 Temizle Kanalı
did -i $dname 11 1 bmpsize 24 24
did -i $dname 11 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 11 +W 175 1 Aop Ekle
did -i $dname 12 1 bmpsize 24 24
did -i $dname 12 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 12 +W 175 1 Aop Sil
did -i $dname 13 1 bmpsize 24 24
did -i $dname 13 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 13 +W 175 1 Uop Ekle
did -i $dname 14 1 bmpsize 24 24
did -i $dname 14 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 14 +W 175 1 Uop Sil
did -i $dname 15 1 bmpsize 24 24
did -i $dname 15 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 15 +W 175 1 Akick Ekle
did -i $dname 16 1 bmpsize 24 24
did -i $dname 16 1 setimage icon large 0, $+ System\icon\op.ico
did -a $dname 16 +W 175 1 Akick Sil
}
on *:dialog:toolbarr:sclick:*: {
if $did == 2 { mode $active +o $snick($active,1) }
if $did == 3 { mode $active -o $snick($active,1) }
if $did == 4 { mode $active +v $snick($active,1) }
if $did == 5 { mode $active -v $snick($active,1) }
if $did == 6 { ban $snick($active,1) | /kick # $snick($active,1) 1Hadi gülüm yandan yandann yandannnnnn....
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
2 $time %logo }
if $did == 7 { kick $active $snick($active,1) 0,5 $$?="Sebeb?" }
if $did == 8 { banac $active }
if $did == 9 { timer 0 40 /msg $active - }
if $did == 11 { cs aop $active add $snick($active,1) }
if $did == 12 { cs aop $active del $snick($active,1) }
if $did == 13 { cs uop $active add $snick($active,1) }
if $did == 14 { cs uop $active del $snick($active,1) }
if $did == 15 { cs akick $active add $$?"nick!*@* veya *!*@Ip.* Şeklinde Yazın" }
if $did == 16 { cs akick $active del $$? }
}

Böyle bişi yaptm fakat iconlar gözükmedi


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


miRC Versionum 6.21
Yardım edebilirsen sevinirim. TeşekkürLer ...

 
Alıntı ile Cevapla

Alt 14 Aralık 2008, 16:23   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Operator Toolbar Menü




Burada Ufak Bir Hatan Var O Nedenle İconlar Görünmüyor.

Bu Satırın Yerine
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Toolbarr flat wrap arrows nodivider list > $bars

Bu Satırı Yazarsan Olacaktır.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Toolbar flat wrap arrows nodivider list > $bars

Yukarıda Vermiş Oldugum Kod Soldaki İcindi Sagdaki İcin de Düzenli Bir Şekilde Verecek Olursak.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start: { dialog -m toolbarr toolbarr } on *:connect: { update.toolbarr } on *:disconnect: { update.toolbarr } on *:close:*: { update.toolbarr } alias update.toolbarr { if (!$dialog(toolbarr)) { halt } } dialog toolbarr { title "By uMuT" size 5 5 70 285 option dbu box "Op İşlem", 1, 3 3 67 150 list 2, 7 12 60 14, size list 3, 7 29 60 14, size list 4, 7 46 60 14, size list 5, 7 63 60 14, size list 6, 7 81 60 14, size list 7, 7 98 60 14, size list 8, 7 115 60 14, size list 9, 7 133 60 14, size box "Ekle\Sil", 10, 3 155 67 120 list 11, 7 163 60 14, size list 12, 7 181 60 14, size list 13, 7 200 60 14, size list 14, 7 218 60 14, size list 15, 7 237 60 14, size list 16, 8 256 60 14, size } on *:dialog:toolbarr:init:0: { mdx MarkDialog $dname mdx SetDialog $dname style mdx SetFont $dname 1 12 700 Verdana rebar Dock $dialog(toolbarr).hwnd > right mdx SetControlMDX $dname 1 Progressbar smooth > $ctl mdx SetControlMDX $dname 1 ToolBarr flat wrap arrows nodivider > $bars mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Toolbar flat wrap arrows nodivider list > $bars mdx SetControlMDX $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 Progressbar smooth > $ctl mdx SetBorderStyle $dname 2,3,4,5,6,7,8,9,11,12,13,14,15,16 mdx SetFont 1,2,3,4,5,6,7,8,9,11,12,13,14,15,16 -11 700 Tahoma mdx SetDialog [ $dname ] bgcolor $rgb(255,255,255) mdx SetColor $dname 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16 background $rgb(255,255,255) did -i $dname 2 1 bmpsize 24 24 did -i $dname 2 1 setimage icon large 0, $+ icon\help.ico did -a $dname 2 +W 175 1 Op Ver did -i $dname 3 1 bmpsize 24 24 did -i $dname 3 1 setimage icon large 0, $+ icon\help.ico did -a $dname 3 +W 175 1 Deop Et did -i $dname 4 1 bmpsize 24 24 did -i $dname 4 1 setimage icon large 0, $+ icon\help.ico did -a $dname 4 +W 175 1 Voice Ver did -i $dname 5 1 bmpsize 24 24 did -i $dname 5 1 setimage icon large 0, $+ icon\help.ico did -a $dname 5 +W 175 1 Devoice Et did -i $dname 6 1 bmpsize 24 24 did -i $dname 6 1 setimage icon large 0, $+ icon\help.ico did -a $dname 6 +W 175 1 Ban+Kick did -i $dname 7 1 bmpsize 24 24 did -i $dname 7 1 setimage icon large 0, $+ icon\help.ico did -a $dname 7 +W 175 1 Sebebli Kick did -i $dname 8 1 bmpsize 24 24 did -i $dname 8 1 setimage icon large 0, $+ icon\help.ico did -a $dname 8 +W 175 1 Kanal Unban did -i $dname 9 1 bmpsize 24 24 did -i $dname 9 1 setimage icon large 0, $+ icon\help.ico did -a $dname 9 +W 175 1 Temizle Kanalı did -i $dname 11 1 bmpsize 24 24 did -i $dname 11 1 setimage icon large 0, $+ icon\favori.ico did -a $dname 11 +W 175 1 Aop Ekle did -i $dname 12 1 bmpsize 24 24 did -i $dname 12 1 setimage icon large 0, $+ icon\favori.ico did -a $dname 12 +W 175 1 Aop Sil did -i $dname 13 1 bmpsize 24 24 did -i $dname 13 1 setimage icon large 0, $+ icon\favori.ico did -a $dname 13 +W 175 1 Uop Ekle did -i $dname 14 1 bmpsize 24 24 did -i $dname 14 1 setimage icon large 0, $+ icon\favori.ico did -a $dname 14 +W 175 1 Uop Sil did -i $dname 15 1 bmpsize 24 24 did -i $dname 15 1 setimage icon large 0, $+ icon\favori.ico did -a $dname 15 +W 175 1 Akick Ekle did -i $dname 16 1 bmpsize 24 24 did -i $dname 16 1 setimage icon large 0, $+ icon\favori.ico did -a $dname 16 +W 175 1 Akick Sil } on *:dialog:toolbarr:sclick:*: { if $did == 2 { mode $active +o $snick($active,1) } if $did == 3 { mode $active -o $snick($active,1) } if $did == 4 { mode $active +v $snick($active,1) } if $did == 5 { mode $active -v $snick($active,1) } if $did == 6 { ban $snick($active,1) | /kick # $snick($active,1) 1Hadi gülüm yandan yandann yandannnnnn.... 2 $time %logo } if $did == 7 { kick $active $snick($active,1) 0,5 $$?="Sebeb?" } if $did == 8 { banac $active } if $did == 9 { timer 0 40 /msg $active - } if $did == 11 { cs aop $active add $snick($active,1) } if $did == 12 { cs aop $active del $snick($active,1) } if $did == 13 { cs uop $active add $snick($active,1) } if $did == 14 { cs uop $active del $snick($active,1) } if $did == 15 { cs akick $active add $$?"nick!*@* veya *!*@Ip.* Şeklinde Yazın" } if $did == 16 { cs akick $active del $$? } }

Oluşan Görüntü.

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

 
Alıntı ile Cevapla

Cevapla

Etiketler
menü, mirc, mirc download, mirc indir, operator, toolbar


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler Arama
Stil

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
Geveze.ORG Global Operator/Super Operator Eğitimi Simülasyon Logu Unknown Eğitim Dünyası 1 24 Ağustos 2022 12:45
NOT OPERATOR vioLeta Bilgisayar Sözlüğü 0 28 Ocak 2020 11:28
Operator PySSyCaT Bilgisayar Sözlüğü 0 27 Ocak 2016 19:51
mIRc Operator Bar Toolbar gibi... LauReLL mIRC Scripting Hazır Kodlar 24 24 Ekim 2014 22:50
Operator v2 Rohit mIRC Scripting Tanıtımları 7 05 Eylül 2012 01:35