| Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| 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 }
|
|