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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Operator Toolbar Menü (https://www.ircforumlari.net/mirc-scripting-sorunlari/126471-operator-toolbar-menu.html)

Cevap: Operator Toolbar Menü

med cezir çok güzel olmuş ellerine sağlık ama şuradaki durumu nasıl düzeltebiliriz

resmi upload ettim bakabilirsin.

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

Cevap: Operator Toolbar Menü

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Wiew de Tollbar Var Onu Kapatırsan Düzelir Sanırım

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Emeğine Sağlık Çok Güzel Olmuş Fakat Benim Yapmak İstediğim 2. Resimdeki Gibi Birşey Bir Türlü Yapamadım Halada uğraşıyorum :S

Cevap: Operator Toolbar Menü

DenperaS Görünüm(View) den Toolbar Secenegini Secili Olmakdan Cıkarırsan Sorunun Hal Olucaktır.

Spectral Senin istediginde Sanırım İconsuz Olması Bunun İçin

Kod:

did -i $dname 2 1 setimage icon large 0, $+ icon\help.ico

İcon lar için belirtmiş oldugumuz yolu silmemiz gerekiyor.

Kod:

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 -a $dname 2 +W 175 1    Op Ver

  did -i $dname 3 1 bmpsize 24 24

  did -a $dname 3 +W 175 1    Deop Et

  did -i $dname 4 1 bmpsize 24 24

  did -a $dname 4 +W 175 1    Voice Ver

  did -i $dname 5 1 bmpsize 24 24

  did -a $dname 5 +W 175 1    Devoice Et

  did -i $dname 6 1 bmpsize 24 24

  did -a $dname 6 +W 175 1    Ban+Kick

  did -i $dname 7 1 bmpsize 24 24

  did -a $dname 7 +W 175 1    Sebebli Kick

  did -i $dname 8 1 bmpsize 24 24

  did -a $dname 8 +W 175 1    Kanal Unban

  did -i $dname 9 1 bmpsize 24 24

  did -a $dname 9 +W 175 1    Temizle Kanalı

  did -i $dname 11 1 bmpsize 24 24

  did -a $dname 11 +W 175 1    Aop Ekle

  did -i $dname 12 1 bmpsize 24 24

  did -a $dname 12 +W 175 1    Aop Sil 

  did -i $dname 13 1 bmpsize 24 24

  did -a $dname 13 +W 175 1    Uop Ekle

  did -i $dname 14 1 bmpsize 24 24

  did -a $dname 14 +W 175 1    Uop Sil

  did -i $dname 15 1 bmpsize 24 24

  did -a $dname 15 +W 175 1    Akick Ekle

  did -i $dname 16 1 bmpsize 24 24

  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 }

Oluşan Görüntü.

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

Cevap: Operator Toolbar Menü

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

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Benim İstediğim
Mause İle Üstüne Gelince Küçük Alan Kaplayacak Alt Alta Olarak Ve Mircin Sol Bölümünü Alacak İçine

Cevap: Operator Toolbar Menü

Üstüne gelince cıkacak alanı ben kücülttüm sen dahada kücültmek istersen.

Kod:

did -i $dname 2 1 bmpsize 24 24

Kod:

did -i $dname 2 1 bmpsize 16 16

Bu Kısmı ben 24 den 16 ya indirdim istegine göre dahada kücülterek örnegin 12 yapabilirsin. ( Kodda kırmızı ile belirttigim kısımlar)
Anladıgım kadarı ilede Group Box ı sol alt köşeye kadar indirip butonları biraz daha yaklaştırdım.

Bundan sonrası artık sana kalıyor, diger örneklerede bakarak degişiklikler yapabilirsin. Biz sana yöntemleri gösterdik.

Kod:

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 350

  list 2, 7 10 60 2, size

  list 3, 7 24 60 2, size

  list 4, 7 38 60 2, size

  list 5, 7 52 60 2, size

  list 6, 7 66 60 14, size

  list 7, 7 80 60 14, size

  list 8, 7 94 60 14, size

  list 9, 7 108 60 14, size

  list 11, 7 122 60 14, size

  list 12, 7 136 60 14, size

  list 13, 7 150 60 14, size

  list 14, 7 164 60 14, size

  list 15, 7 178 60 14, size

  list 16, 8 192 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,11,12,13,14,15,16 background $rgb(255,255,255)

  did -i $dname 2 1 bmpsize 16 16

  did -a $dname 2 +W 175 1    Op Ver

  did -i $dname 3 1 bmpsize 16 16

  did -a $dname 3 +W 175 1    Deop Et

  did -i $dname 4 1 bmpsize 16 16

  did -a $dname 4 +W 175 1    Voice Ver

  did -i $dname 5 1 bmpsize 16 16

  did -a $dname 5 +W 175 1    Devoice Et

  did -i $dname 6 1 bmpsize 16 16

  did -a $dname 6 +W 175 1    Ban+Kick

  did -i $dname 7 1 bmpsize 16 16

  did -a $dname 7 +W 175 1    Sebebli Kick

  did -i $dname 8 1 bmpsize 16 16

  did -a $dname 8 +W 175 1    Kanal Unban

  did -i $dname 9 1 bmpsize 16 16

  did -a $dname 9 +W 175 1    Temizle Kanalı

  did -i $dname 11 1 bmpsize 16 16

  did -a $dname 11 +W 175 1    Aop Ekle

  did -i $dname 12 1 bmpsize 16 16

  did -a $dname 12 +W 175 1    Aop Sil 

  did -i $dname 13 1 bmpsize 16 16

  did -a $dname 13 +W 175 1    Uop Ekle

  did -i $dname 14 1 bmpsize 16 16

  did -a $dname 14 +W 175 1    Uop Sil

  did -i $dname 15 1 bmpsize 16 16

  did -a $dname 15 +W 175 1    Akick Ekle

  did -i $dname 16 1 bmpsize 16 16

  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 }

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

Cevap: Operator Toolbar Menü

Teşekkürler Çok Güzel Olmuş Tam İstediğim Gibi UFak Bi Eklenti Yapabilirmiyiz Peki Buna ? Panel Olarak Ekleyecez Fakat İçinden

Kontrol Panelleri YAzacak Gösterdiğim Yerde
Tıklayınca Bi List Çıkacak
Remote
Mirc Options
Vs
vs
Gibi

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

Ben O Boşluğu Yapabildim de . Olarak Olmuyor

Birde Bende Hata Var Sanırım Ekleyemiyorum Bu Şekilde

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

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

Tamam ToolBarı Kapatınca Süper Oluyor Gördüğün Gibi Toolbarı Açınca Sorun Çıkartıyor Bunu Sadece Kanalda Göstersin özelde Veya Statusde Göstermesin ? Mümkünmüdür AcabA

Cevap: Operator Toolbar Menü

Birde Bende Hata Var Sanırım Ekleyemiyorum Bu Şekilde

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

Bu Kısmı Yapdım Da Diğerlerinde Başarılı Olamadım

Cevap: Operator Toolbar Menü

Hocam ÇaLı$maLariniz Gerçekten Takdire $ayan. Sormak İstediqim ßu ßarı NickListen Herhanqi ßir Nickin Uzerine TıkLandığında Aktif oLmasını SağLaya BiLirmisiniz ? ßu YapıLabiLirse Muthi$ ßir $ey OLur $imdiden Te$ekkürLer ..

Cevap: Operator Toolbar Menü

Selam Arkadaslar Bır Operator Toolbar Var Fakat Bır Yerde Bır Hata Mesajı Verıyor Onu Cözemedım Yardımcı Olabılırmısınız Acaba

Hata Mesajı : * /did: invalid parameters (line 176, YanMenü)

Alıntı:

dialog tyl {
size -1 -1 1 1
option pixels
}
on *:dialog:tyl:*:*: {
if ($devent == init) {
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetDialog $dname style tool
mdx SetBorderStyle $dname 1 staticedge
mdx SetBorderStyle 1
rebar HideToolbar .
rebar Dock $dialog(tyl).hwnd > left
}
if ($devent == sclick) {
}
if ($devent == dclick) {
}
}
dialog tyr {
size -1 -1 25 300
option dbu
list 2, 2 1 23 300, size
;size 760 85 190 600
;list 1, 50 2 135 500, size
;list 2, 2 2 45 500, size
;icon 3, 5 505 185 95, icon/bar.jpg
;option pixels
}
on *:dialog:tyr:*:*: {
if ($devent == init) {
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetBorderStyle $dname 2 staticedge
mdx SetBorderStyle 2
rebar Dock $dialog(tyr).hwnd > right
mdx SetControlMDX $dname 2 toolbar flat wrap arrows nodivider > $bars
mdx SetFont $dname 2 12 700 verdana
mdx SetDialog [ $dname ] bgcolor $rgb(237,237,237)
mdx SetDialog 2,4 bgcolor $rgb(237,237,237)
mdx SetBorderStyle
mdx SetColor 2 background [ $rgb(237,237,237) ]
}
if ($devent == sclick) {
if ($did == 1) {
}
if ($did == 2) {
if (@* iswm $active) {
if $did($dname,2).sel == 2 { window -c $active }
}
elseif ($active == Status Window) {
if $did($dname,2).sel == 2 { $iif($status == connected,oper,hops) }
if $did($dname,2).sel == 3 { $iif($status == connected,helpers,hops) }
if $did($dname,2).sel == 4 { $iif($status == connected,lusers,hops) }
if $did($dname,2).sel == 5 { $iif($status == connected,motd,hops) }
if $did($dname,2).sel == 6 { clear $active }
}
elseif (#* iswm $active && $me isop $active) {
if $did($dname,2).sel == 2 { if ($snick($active)) { whois $snick($active) } }
if $did($dname,2).sel == 3 { if ($snick($active)) { ns info $snick($active) all } }
if $did($dname,2).sel == 4 { if ($snick($active)) { query $snick($active) } }
if $did($dname,2).sel == 5 {
var %a.q! = 1
while $snick($active,%a.q!) {
if $nick($active,$snick($active,%a.q!),o) { samode $active -o $snick($active,%a.q!) }
else { mode $active +o $snick($active,%a.q!) }
inc %a.q!
}
}
if $did($dname,2).sel == 6 {
var %a.q! = 1
while $snick($active,%a.q!) {
if $nick($active,$snick($active,%a.q!),h) { samode $active -h $snick($active,%a.q!) }
else { mode $active +h $snick($active,%a.q!) }
inc %a.q!
}
}
if $did($dname,2).sel == 7 {
var %a.q! = 1
while $snick($active,%a.q!) {
if $nick($active,$snick($active,%a.q!),v) { samode $active -v $snick($active,%a.q!) }
else { mode $active +v $snick($active,%a.q!) }
inc %a.q!
}
}
if $did($dname,2).sel == 8 { if ($snick($active)) { samode $active +b $snick($active) | kick $active $snick($active) $active 14Kanal Kurallarına Uymadığınız Tespit Edilmiştir. %logo } }
if $did($dname,2).sel == 9 { if ($snick($active)) { kick $active $snick($active) $active 14Kurallara Uymadığınız İçin Kanaldan Uzaklaştırıldınız 12 Hızlı Kick. %logo } }
if $did($dname,2).sel == 10 { if ($snick($active)) { ping $snick($active) } }
if $did($dname,2).sel == 11 { if ($snick($active)) { silence $snick($active) | echo -a 12 $snick($active) 14 İgnore Listesine Eklendi %logo | notice $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 14[1 $me 14] 5Bana Ulaşmayacak.! %logo } }
if $did($dname,2).sel == 12 { clear $active }
}
elseif (#* iswm $active) {
if $did($dname,2).sel == 2 { if ($snick($active)) { .whois $snick($active) } }
if $did($dname,2).sel == 3 { if ($snick($active)) { ns info $snick($active) all } }
if $did($dname,2).sel == 4 { if ($snick($active)) { query $snick($active) } }
if $did($dname,2).sel == 5 { if ($snick($active)) { ping $snick($active) } }
if $did($dname,2).sel == 6 { if ($snick($active)) { .ignore $snick($active) | echo -a 12 $snick($active) 14 İgnore Listesine Eklendi %logo | notice $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 14[1 $me 14] 5Bana Ulaşmayacak.! %logo } }
if $did($dname,2).sel == 7 { clear $active }
if $did($dname,2).sel == 8 { goz $active }
}
else {
if $did($dname,2).sel == 2 { .whois $active }
if $did($dname,2).sel == 3 { .msg nickserv info $active all }
if $did($dname,2).sel == 4 { ignore -p $active | timer 1 2 close -m $active | notice $active 12 $snick($active) 14 İgnore Listesine Eklendi %logo | notice $snick($active) 4Ignore edildiniz.5Sizin Yazdiklariniz Artik 14[1 $me 14] 5Bana Ulaşmayacak.! %logo }
if $did($dname,2).sel == 5 { log on $active }
if $did($dname,2).sel == 6 { close -m $active }
if $did($dname,2).sel == 7 { close -m }
if $did($dname,2).sel == 8 { clear $active }
}
}
if ($devent == dclick) {
}
}
}
on *:active:*:{
if $active == Status Window { amenu Status }
elseif #* iswm $active && $me !isop $active { amenu Kullanıcı }
elseif #* iswm $active && $me isop $active || $me ishop $active { amenu Operator }
else { amenu Ozel }
}
alias amenu {
if $1 == Operator {
mdx SetMircVersion $version
mdx MarkDialog $dname
did -r tyr 2
did -i tyr 2 1 bmpsize 22 22
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\whois.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\info.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ozel.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\op.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\hop.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\vop.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kick.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kick.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ping.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\engelle.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico
did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker
did -a tyr 2 +a 2 Bilgi $chr(9) $+ Seçili Nick'e İnfo Çeker
did -a tyr 2 +a 3 Özel $chr(9) $+ Seçili Nick'i Özel görüşmeye Alır
did -a tyr 2 +a 4 Op $chr(9) $+ Seçili Nick'e Op Verir Veya Alır
did -a tyr 2 +a 5 Hop $chr(9) $+ Seçili Nick'e Halfop Verir Veya Alır
did -a tyr 2 +a 6 Vop $chr(9) $+ Seçili Nick'e Vop Verir veya Alır
did -a tyr 2 +a 7 Ban $chr(9) $+ Seçili Nick'i Kanaldan Atar
did -a tyr 2 +a 8 Kick $chr(9) $+ Seçili Nick'i Kickler
did -a tyr 2 +a 9 Ping $chr(9) $+ Seçili Nick'i Pingler
did -a tyr 2 +a 10 İgnore $chr(9) $+ Seçili Nick'i İgnore Eder
did -a tyr 2 +a 11 Clear $chr(9) $+ Aktif Pencereyi Temizler
}
elseif $1 == Kullanıcı {
mdx SetMircVersion $version
mdx MarkDialog $dname
did -r tyr 2
did -i tyr 2 1 bmpsize 22 22
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\whois.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\info.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ozel.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\ping.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\engelle.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico
did -a tyr 2 +a 1 Whois $chr(9) $+ Seçili Nick'e Whois Çeker
did -a tyr 2 +a 2 Bilgi $chr(9) $+ Seçili Nick'e İnfo Çeker
did -a tyr 2 +a 3 Özel $chr(9) $+ Seçili Nick'i Özel Görüşmeye Alır
did -a tyr 2 +a 4 Ping $chr(9) $+ Seçili Nick'i Pingler
did -a tyr 2 +a 5 İgnore $chr(9) $+ Seçili Nick'i İgnore Eder
did -a tyr 2 +a 6 Clear $chr(9) $+ Aktif Pencereyi Temizler
}
elseif $1 == Status {
mdx SetMircVersion $version
mdx MarkDialog $dname
did -r tyr 2
did -i tyr 2 1 bmpsize 22 22
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\oper.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\user.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\motd.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\helper.ico
did -a tyr 2 +a 1 Opers $chr(9) $+ Şuan Online Olan İRcOplar
did -a tyr 2 +a 5 Helps $chr(9) $+ Şuan Online Olan Helperler
did -a tyr 2 +a 2 Users $chr(9) $+ Şuan Online Olan Userler
did -a tyr 2 +a 3 Motd $chr(9) $+ Sunucu Giriş Mesajı
did -a tyr 2 +a 4 Clear $chr(9) $+ Ekranı Temizler
}
elseif $1 == Ozel {
mdx SetMircVersion $version
mdx MarkDialog $dname
did -r tyr 2
did -i tyr 2 1 bmpsize 25 25
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\whois.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\info.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\engelle.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\loglar.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kapat.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\kapat.ico
did -i tyr 2 1 setimage icon normal Görünüm\KöşeMenü\temizle.ico
did -a tyr 2 +a 1 Whois $chr(9) $+ $active Whois Çeker
did -a tyr 2 +a 2 Bilgi $chr(9) $+ $active Nick İnfo Çeker
did -a tyr 2 +a 3 İgnore $chr(9) $+ $active Nickinin Size Yazmasını Engeller
did -a tyr 2 +a 4 Log'la $chr(9) $+ $active İle Yazışmalırınızı Kayıt Eder
did -a tyr 2 +a 5 Kapat $chr(9) $+ $active İle Pencerenizi Kapatır
did -a tyr 2 +a 6 Tüm $chr(9) $+ Tüm Özel Pencereleri Kapatır
did -a tyr 2 +a 7 Clear $chr(9) $+ Ekranı Temizler
}
}