| TurkServ | 30 Mart 2015 19:48 |
toolbar hatası
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 0 550 $iif($temabul,14,17)
option dbu
list 4, 0 -2 600 17, size
list 1, 0 4 600 17, size
text "", 2, 518 6 45 16, center
text "", 3, 521 10 39 11, 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\1.ico
did -a $dname 2 +b 1 $chr(32) $+ $chr(9) $+ OP / DEOP
did -i $dname 2 1 setimage +nhd 0 icon small icon\7.ico
did -a $dname 2 +b 2 $chr(32) $+ $chr(9) $+ VOICE / DEVOICE
did -i $dname 2 1 setimage +nhd 0 icon small icon\3.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\4.ico
did -a $dname 7 +b 1 $chr(32) $+ $chr(9) $+ Kick
did -i $dname 7 1 setimage +nhd 0 icon small icon\5.ico
did -a $dname 7 +b 2 $chr(32) $+ $chr(9) $+ Whois Çek
did -i $dname 7 1 setimage +nhd 0 icon small icon\7.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\1.ico
did -i $dname 1 1 setimage icon large icon\9.ico
did -i $dname 1 1 setimage icon large icon\3.ico
did -i $dname 1 1 setimage icon large icon\4.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\5.ico
did -i $dname 1 1 setimage icon large icon\7.ico
did -i $dname 1 1 setimage icon large icon\1.ico
did -i $dname 1 1 setimage icon large icon\9.ico
did -i $dname 1 1 setimage icon large icon\3.ico
did -i $dname 1 1 setimage icon large icon\4.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) Nickim $chr(9) $+ Nick Değitirme Ve Şifreleme Panelini 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) Medya $chr(9) $+ Mırc Media Panelini açar
did -a $dname 1 +a -
did -a $dname 1 +a 8 $chr(32) Özeller $chr(9) $+ Mırc Özel Kabul Sistemini Açar
did -a $dname 1 +a -
did -a $dname 1 +a 9 $chr(32) Teşekkür $chr(9) $+ Teşekkür Dialog Panelini Açar
did -a $dname 1 +a -
did -a $dname 1 +a 10 $chr(32) Programlar $chr(9) $+ Bilgisayarınızda Yüklü Olan Programları Açar
did -a $dname 1 +a -
did -a $dname 1 +a 11 $chr(32) Komutlar $chr(9) $+ Mırc Komutlar Panelini Açar
did -a $dname 1 +a -
did -a $dname 1 +a 12 $chr(32) Admin $chr(9) $+ Adminler İçin Kısayol Komut Panelini 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) {
.serverayar
}
if ($did($dname,1).sel = 7) {
.sifre
}
if ($did($dname,1).sel = 9) {
.prots
}
if ($did($dname,1).sel = 11) {
.pok
}
if ($did($dname,1).sel = 13) {
.mmc
}
if ($did($dname,1).sel = 15) {
.away1
}
if ($did($dname,1).sel = 17) {
.dialog -m opvotes opvotes
}
if ($did($dname,1).sel = 19) {
.program
}
if ($did($dname,1).sel = 21) {
.run help.htm
}
if ($did($dname,1).sel = 23) {
.mastercontrol
}
}
}
}
buradakı hata nedır çözemedim. /dialog: 'toolbar' Geçersiz Tablo, in 'size' hatası verıyor |
