⚠️ Güvenlik nedeniyle tüm kullanıcı şifreleri sıfırlanmıştır. Lütfen buraya tıklayarak yeni şifre talep ediniz.
IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet odaları

>
+
Etiketlenen Kullanıcılar

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




Arkadaslar sımdı benım mircin normal toolbar ı var ama ben bu nıck listesının yanına LaureLL ın yaptıgı gıbı bır operator kıckban voıce kıck gıbı bır toolbar menu eklemek ıstıyorum Laurell ın toolbarını ekledım operator toolbar ama mirci acınca otomatık kapanıyor bu sefer nasıl yapabılırım bu asagıdakı benım normal toolbarım
Alıntı:
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,18,21)
option dbu
list 1, 0 4 274 17, size
list 10, 280 8 270 12, size
box "Servisler Op Control", 14, 275 -1 185 33,default
text "", 2, 464 6 45 16, center
text "", 3, 467 10 39 11, center
}
on *:dialog:toolbar:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetFont $dname 1,14 Turkish 14 800 Cyrillic
mdx SetColor $dname 3 text $rgb(0,0,0)
mdx SetFont $dname 3 +a 20 600 arial
.timersaat 0 1 saat 3
rebar HideToolbar
rebar Dock $dialog(toolbar).hwnd > top
mdx SetControlMDX $dname 1,3,4 Progressbar smooth > $ctl
mdx SetControlMDX $dname 1,10,4 ToolBar flat wrap arrows nodivider > $bars
mdx SetBorderStyle 1,10
did -i $dname 10 1 bmpsize 25 25
did -i $dname 10 1 setimage icon large icon\cpanel.ico
did -i $dname 10 1 setimage icon large icon\cpanel.ico
did -i $dname 10 1 setimage icon large icon\cpanel.ico
did -i $dname 10 1 setimage icon large icon\cpanel.ico
did -i $dname 10 1 setimage icon large icon\cpanel.ico
did -a $dname 10 +a -
did -a $dname 10 +a 1 $chr(32) Admin $chr(9) $+ Admin Servisleri
did -a $dname 10 +a -
did -a $dname 10 +a 2 $chr(32) OperServ $chr(9) $+ Oper Servisleri
did -a $dname 10 +a -
did -a $dname 10 +a 3 $chr(32) ChanServ $chr(9) $+ Chanserv Servıslerı
did -a $dname 10 +a -
did -a $dname 10 +a 4 $chr(32) NickServ $chr(9) $+ NickServ Servıslerı
did -a $dname 10 +a -
did -a $dname 10 +a 5 $chr(32) MemoServ $chr(9) $+ MemoServ Servıslerı
did -a $dname 10 +a -

did -i $dname 1 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 1 1 bmpsize 32 32
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\mp3.ico
did -i $dname 1 1 setimage icon large icon\kontrolpanel.ico
did -i $dname 1 1 setimage icon large icon\8.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) Away $chr(9) $+ aWay
did -a $dname 1 +a -
did -a $dname 1 +a 6 $chr(32) Flood Panel $chr(9) $+ Scriptinizle İlgili Tüm Ayarları Açar.
did -a $dname 1 +a -
did -a $dname 1 +a 7 $chr(32) Log $chr(9) $+ ßad Nick
did -a $dname 1 +a -
}
on *:dialog:toolbar:*:*: {
if $devent == sclick {
if $did == 10 {
if ($did($dname,10).sel = 3) {
/dialog -m serverinfo serverinfo
}
if ($did($dname,10).sel = 5) {
/dialog -m operserv operserv
}
if ($did($dname,10).sel = 7) {
dialog -m chanserv chanserv
}
if ($did($dname,10).sel = 9) {
/dialog -ma nickserv nickserv
}
if ($did($dname,10).sel = 11) {
/dialog -ma memoserv memoserv
}
}
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) {
sendkey ALT O
}
if ($did($dname,1).sel = 7) {
_k
}
if ($did($dname,1).sel = 9) {
/awaysys
}
if ($did($dname,1).sel = 11) {
/fp
}
if ($did($dname,1).sel = 13) {
.kayitgosterici
}
}
}
}


 
Alıntı ile Cevapla

Alt 31 Temmuz 2008, 20:30   #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ü




rebar.dll den kaynaklaniyordur mircin eski sürümlerini kullan 6.02 olabilir mesela

 
Alıntı ile Cevapla

Alt 31 Temmuz 2008, 22:56   #3
Ç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ü




Mirc V.6.31 kullanıyorum anlamadım neden kaynaklanıyor bu kendı kendıne kapanıyor mirc

 
Alıntı ile Cevapla

Alt 31 Temmuz 2008, 23:02   #4
Ç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ü




mircde kullandığın dll dosyalarının uzantıları okunamıyor. Bu nedenle otomatik kapanıyor. Bu durum oluştuğunda mirc eski versiyonlarında uyarı verirken yeni sürümlerde mirc otomatik kapatılır.

 
Alıntı ile Cevapla

Alt 01 Ağustos 2008, 11:58   #5
Ç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ü




ya yanlıs hatırlamıyorsam bır arkadasın ıconlu operator menusu vardı onu search kısmından arıyorum bulamıyorum LaureLL ın var onu buldumda dıgerını bulamıyorum

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


bu var ama ben bunu ıkonlu ya cevırmek ıstıyorum yardım edebılırmısınız acaba kod da bu

Alıntı:
on *:connect: { dialog -m opsop opsop }
alias _opsop {
if $dialog(opsop) {
dialog -c opsop opsop
}
else {
dialog -m opsop opsop
}
}
dialog opsop {
title "LauReLL"
option dbu
size -1 -1 35 51400
button "+o", 1, 2 0 30 25
button "-o", 7, 2 26 30 25
button "+v", 2, 2 52 30 25
button "-v", 8, 2 78 30 26
button "kick", 3, 2 104 30 25
button "ban", 4, 2 131 30 25
button "K-B", 10, 2 156 30 25
button "whois", 5, 2 182 30 25
button "ping", 6, 2 209 30 25
button "+MRc", 11, 2 236 30 25
button "+m", 12, 2 262 30 25
button "-m", 13, 2 289 30 25
button "+c", 14, 2 315 30 25
button "-c", 15, 2 342 30 25
button "+R", 16, 2 369 30 25
button "-R", 17, 2 396 30 25
;button "+m", 18, 2 423 30 25
;button "-m", 19, 2 450 30 25
}
on *:dialog:opsop:init:0: {
mdx MarkDialog $dname
mdx SetDialog $dname style
mdxdll SetDialog [ $dname ] bgcolor [ $rgb(191,216,156) ]
rebar Dock $dialog(opsop).hwnd > left
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:17:{
if ($me isop $active) {
mode $active -R
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:16:{
if ($me isop $active) {
mode $active +R
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:15:{
if ($me isop $active) {
mode $active -c
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:14:{
if ($me isop $active) {
mode $active +c
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:13:{
if ($me isop $active) {
mode $active -m
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:12:{
if ($me isop $active) {
mode $active +m
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:11:{
if ($me isop $active) {
mode $active +MRc
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:10:{
if ($me isop $active) {
ban $active $snick($active,1)10 | kick $active $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:1:{
if ($me isop $active) {
mode $active +o $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:7:{
if ($me isop $active) {
mode $active -o $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:2:{
if ($me isop $active) {
mode $active +v $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:8:{
if ($me isop $active) {
mode $active -v $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:3:{
if ($me isop $active) {
kick $active $snick($active,1)
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:4:{
if ($me isop $active) {
ban $active $snick($active,1) 10
}
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:5:{
whois $snick($active,1)
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:opsop:sclick:6:{
ctcp $snick($active,1) ping
}
alias mdx { dll dll\mdx.dll $1- }
alias rebar { dll $shortfn(dll\rebar.dll) $$1- }
alias mdxdll { return $dll(DLL\mdx.dll,$1,$2-) }


 
Alıntı ile Cevapla

Alt 02 Ağustos 2008, 08:17   #6
Ç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ü




Daha Önceden Yapmış Oldugum Bir Op Menusu Vardı Biraz Üstünde Oyniyarak Senin İçin Yanbar Haline Getirdim. Eger üzerinde oynama yapmak istersen yada ufak hatalar varsa burdan yada siteden bildirirsen yardımcı olurum, sabah sabah gözümden kacmış yerleri olabilir.

Gerekli Dll Dosyaları: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Kullanacagın İconlarıda Kendin Ayarlarsın..

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start: { dialog -m toolbar toolbar } on *:connect: { update.toolbar } on *:disconnect: { update.toolbar } on *:close:*: { update.toolbar } alias update.toolbar { if (!$dialog(toolbar)) { halt } } dialog toolbar { 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:toolbar:init:0: { mdx MarkDialog $dname mdx SetDialog $dname style mdx SetFont $dname 1 12 700 Verdana rebar HideToolbar . rebar Dock $dialog(toolbar).hwnd > left mdx SetControlMDX $dname 1 Progressbar smooth > $ctl mdx SetControlMDX $dname 1 ToolBar 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:toolbar: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 $$? } } alias mdx { return $dll(DLL\mdx.dll,$1,$2-) } alias mdxdll { return $dll(DLL\mdx.dll,$1,$2-) } alias rebar { dll DLL\rebar.dll $$1- } alias bars { return DLL\bars.mdx }


 
Alıntı ile Cevapla

Alt 09 Aralık 2008, 16:35   #7
Ç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   #8
Ç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

Alt 04 Nisan 2009, 17:05   #9
Ç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ü




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

Uğraşa Uğraşa Bu Hale Getirdim

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

Ben Bu Şekiled Olmasını İstiyorum Yani 1 Tane Düz Uzun Op İşlem Olacak
Resim Olmayacak KAreler Küçük Küçük Fazla Olacak Anlatabilmişimdir inşallah bu code ile uğraştım ve bunu çıkardı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
list 10, 7 143 60 14, size
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 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 -a $dname 2 +W 1500 15000 Op Ver
did -a $dname 3 +W 175 1 Deop Et
did -a $dname 4 +W 175 1 Voice Ver
did -a $dname 5 +W 175 1 Devoice Et
did -a $dname 6 +W 175 1 Ban+Kick
did -a $dname 7 +W 175 1 Sebebli Kick
did -a $dname 8 +W 175 1 Kanal Unban
did -a $dname 9 +W 175 1 Temizle Kanalı
did -a $dname 11 +W 175 1 Aop Ekle
did -a $dname 12 +W 175 1 Aop Sil
did -a $dname 13 +W 175 1 Uop Ekle
did -a $dname 14 +W 175 1 Uop Sil
did -a $dname 15 +W 175 1 Akick Ekle
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 $$? }
}
alias mdx { return $dll(DLL\mdx.dll,$1,$2-) }
alias mdxdll { return $dll(DLL\mdx.dll,$1,$2-) }
alias rebar { dll DLL\rebar.dll $$1- }
alias bars { return DLL\bars.mdx }


 
Alıntı ile Cevapla

Alt 05 Nisan 2009, 02:51   #10
Ç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ü




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:   Kodu kopyalamak için üzerine çift tıklayın!
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 } } } }


Görüntü


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

 
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)
 

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