| 7610 | 24 Haziran 2007 18:57 |
KanaL dialogunda bi kaç eksik
Bi arkadaşımız oppanel'i gibi bir kod yazmış onu görmüştüm bende değişik bi görünümü yaptım.yalnız Kanal ve nickler tabloda gözükmüyorum bunu uğraştım ama yapmadım sonrada sildim yazdıklarımı.tabloyu aşşagıya yapıştırıyorum yardımcı olucak arkadaş olursa hem bana hemde başkalarının da işine yarıycak diye düşünüyorum. Kod:
alias yetki dialog -m yetki yetki
dialog yetki {
title "KanaL işlemleri"
size 350 250 290 290
tab "Menü 1", 100, 10 1 270 280
tab "Menü 2", 101
tab "Menü 3", 102
button "Op", 1, 12 30 55 25, tab 100
button "Deop", 2, 68 30 55 25, tab 100
button "Voice", 3, 12 55 55 25, tab 100
button "Devoice", 4, 68 55 55 25, tab 100
button "Halfop", 5, 12 80 55 25, tab 100
button "Dehalfop", 6, 68 80 55 25, tab 100
button "Protect", 7, 12 105 55 25, tab 100
button "Deprotect", 8, 68 105 55 25, tab 100
button "Kick", 9, 12 140 55 25, tab 100
button "Ban", 10, 68 140 55 25, tab 100
button "Kick+Ban", 11, 12 165 55 25, tab 100
button "Sebepli ?", 12, 68 165 55 25, tab 100
button "İp ban?", 13, 12 190 55 25, tab 100
button "Süreli Ban", 14, 68 190 55 25, tab 100
button "Access", 15, 12 30 55 25, tab 101
button "Sil", 16, 68 30 55 25, tab 101
button "Akick", 17, 12 55 55 25, tab 101
button "Sil", 18, 68 55 55 25, tab 101
button "Successor",19, 12 80 55 25, tab 101
button "Sil", 20, 68 80 55 25, tab 101
button "CoFounder", 21, 12 105 55 25, tab 101
button "SiL", 22, 68 105 55 25, tab 101
button "İnfo", 23, 12 140 55 25, tab 101
button "Whois", 24, 68 140 55 25, tab 101
button "Özel aç", 25, 12 165 55 25, tab 101
button "Ping", 26, 68 165 55 25, tab 101
button "Notify ek.", 27, 12 190 55 25, tab 101
button "Notify sil", 28, 68 190 55 25, tab 101
button "AutoOp", 31, 25 60 55 25, tab 102
button "AutoPro.", 32, 90 60 55 25, tab 102
button "AutoHalf.",33, 25 90 55 25, tab 102
button "AutoVoice", 34, 90 90 55 25, tab 102
button "Op-Deop", 35, 25 120 55 25, tab 102
button "Ban", 36, 90 120 55 25, tab 102
button "Unban", 37, 25 150 55 25, tab 102
button "invite", 38, 90 150 55 25, tab 102
button "Acc-list", 39, 25 180 55 25, tab 102
button "Set", 40, 90 180 55 25, tab 102
button "Akick", 41, 25 210 55 25, tab 102
button "Clear", 42, 90 210 55 25, tab 102
button "Topic", 43, 25 240 55 25, tab 102
button "Level", 44, 90 240 55 25, tab 102
button "Cycle all", 45, 180 70 75 25, tab 102
button "Nick Şifre", 46, 180 100 75 25, tab 102
button "Kanal Şifre", 47, 180 130 75 25, tab 102
button "List", 48, 180 160 75 25, tab 102
button "Clear", 49, 180 190 75 25, tab 102
box "Level Ayarları", 50, 20 40 130 230, tab 102
box "", 51, 175 50 87 180, tab 102
text "KanaL", 200, 15 245 55 20, tab 100
text "KanaL", 201, 15 245 55 20, tab 101
combo 202, 45 243 90 100, size drop, tab 100
combo 203, 45 243 90 100, size drop, tab 101
button "Yenile", 204, 160 243 45 25, tab 100
button "Yenile", 205, 160 243 45 25, tab 101
list 206, 135 30 130 210, size vsbar, tab 100
list 207, 135 30 130 210, size vsbar, tab 101
button "Kapat", 208, 215 243 45 25, ok
}
on 1:dialog:yetki:sclick:*:{
if ($did == 1 ) { mode $panelchan +o $paneluser }
if ($did == 2 ) { mode $panelchan -o $paneluser }
if ($did == 3 ) { mode $panelchan +v $paneluser }
if ($did == 4 ) { mode $panelchan -v $paneluser }
if ($did == 5 ) { mode $panelchan +h $paneluser }
if ($did == 6 ) { mode $panelchan -h $paneluser }
if ($did == 7 ) { cs protect $panelchan $paneluser }
if ($did == 8 ) { cs deprotect $panelchan $paneluser }
if ($did == 9 ) { kick $panelchan $paneluser Kicked.! }
if ($did == 10 ) { ban $panelchan $paneluser 2You are banned.! 7 $me }
if ($did == 11 ) { ban $panelchan $paneluser 2 | kick $panelchan $paneluser 2Kick+BaN! 7 $me }
if ($did == 12 ) { ban $panelchan $paneluser $?="Sebep?") }
if ($did == 13 ) { ban $panelchan $paneluser $?="Ban Şekli?") }
if ($did == 14 ) { ban $+(-u,$calc($input(Kaç dakika? ban?,qe,Süreli Ban) * 60)) $panelchan $paneluser 2 }
if ($did == 15 ) { chanserv access $panelchan $paneluser $$?=''Seviye?'' }
if ($did == 16 ) { cs access $panelchan del $paneluser }
if ($did == 17 ) { cs akick $panelchan add $paneluser }
if ($did == 18 ) { cs akick $panelchan del $paneluser }
if ($did == 19 ) { cs successor $panelchan add $paneluser }
if ($did == 20 ) { cs successor $panelchan del $paneluser }
if ($did == 21 ) { cs access $panelchan add $paneluser 999 }
if ($did == 22 ) { cs access $panelchan del $paneluser }
if ($did == 23 ) { ns info $paneluser }
if ($did == 24 ) { w $paneluser }
if ($did == 25 ) { q $paneluser }
if ($did == 26 ) { ping $paneluser }
if ($did == 27 ) { notify $paneluser }
if ($did == 28 ) { notify del $paneluser }
if ($did == 31 ) { cs levels #$$?"Kanal" set AutoOp $$?"Seviye?" }
if ($did == 32 ) { cs levels #$$?"Kanal" set Autoprotect $$?"Seviye?" }
if ($did == 33 ) { cs levels #$$?"Kanal" set Autohalfop $$?"Seviye?" }
if ($did == 34 ) { cs levels #$$?"Kanal" set Autovoice $$?"Seviye?" }
if ($did == 35 ) { cs levels #$$?"Kanal" set op-deop $$?"Seviye?" }
if ($did == 36 ) { cs levels #$$?"Kanal" set ban $$?"Seviye?" }
if ($did == 37 ) { cs levels #$$?"Kanal" set unban $$?"Seviye?" }
if ($did == 38 ) { cs levels #$$?"Kanal" set invite $$?"Seviye?" }
if ($did == 39 ) { cs levels #$$?"Kanal" set acc-list $$?"Seviye?" }
if ($did == 40 ) { cs levels #$$?"Kanal" set set $$?"Seviye?" }
if ($did == 41 ) { cs levels #$$?"Kanal" set akick $$?"Seviye?" }
if ($did == 42 ) { cs levels #$$?"Kanal" set clear $$?"Seviye?" }
if ($did == 43 ) { cs levels #$$?"Kanal" set topic $$?"Seviye?" }
if ($did == 44 ) { cs levels #$$?"Kanal" list }
if ($did == 45 ) { cycleall }
if ($did == 46 ) { Ns identify $$?=''Şifreniz?'' }
if ($did == 47 ) { cs identify #$$?"Kanal" $$?"Sifreniz?" }
if ($did == 48 ) { List }
if ($did == 49 ) { clear }
if ($did == 204 ) { dialog -x yetki yetki | yetki }
if ($did == 205 ) { dialog -x yetki yetki | yetki }
}
on 1:load:/echo -a 9,5[|15*** KanaL işlemleri Addonu Yüklendi 9|]
|
