⚠️ 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

 
 
LinkBack Seçenekler Stil
Prev önceki Mesaj   sonraki Mesaj Next
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

 

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