Kod: Kodu kopyalamak için üzerine çift tıklayın!
dialog oper {
title "Menü"
size -1 -1 138 177
option dbu
button "Kill", 1, 4 32 56 10
button "Oper Aç", 2, 77 32 56 10
button "Uhmask", 3, 77 104 56 10
button "Kendini Deopla -o", 4, 77 92 56 10
button "Kline", 5, 4 44 56 10
button "Unkline", 6, 4 56 56 10
button "Devoice (-v)", 7, 77 68 56 10
button "qline", 8, 4 128 56 10
button "Unshun", 9, 4 116 56 10
button "unqline", 10, 4 140 56 10
button "Sajoin (gir)", 11, 77 128 56 10
button "Oper Listesi", 12, 77 116 56 10
button "Akill", 13, 4 68 56 10
button "Voice (+v)", 14, 77 56 56 10
button "Operden Çık", 15, 77 44 56 10
button "Rehash", 16, 4 80 56 10
button "Samode", 17, 77 140 56 10
button "Rakill", 18, 4 92 56 10
button "Shun", 19, 4 104 56 10
button "Kendini Opla +o", 20, 77 80 56 10
button "TAMAM", 21, 32 159 77 15,ok
box "IRCop Operator Menüsü", 22, 1 25 135 128
icon 23, 0 0 138 26 , images\aS.jpg
box "", 24, 2 64 134 16
box "", 25, 2 53 134 15
box "", 26, 2 136 134 15
box "", 27, 2 42 134 15
box "", 28, 2 28 134 16
box "", 29, 2 76 134 15
box "", 30, 2 124 134 14
box "", 31, 2 112 134 16
box "", 32, 2 100 134 15
box "", 33, 2 88 134 16
box "", 34, 30 154 81 22
}
on *:dialog:oper:init:*: {
mdx SetDialog $dname bgcolor $rgb(225,225,225)
mdx SetColor $dname 11,12,17,26 textbg $rgb(225,225,225)
mdx SetColor $dname 11,12,17,26 background $rgb(225,225,225)
mdx SetFont 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83 12 700 tahoma
mdx SetBorderStyle 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34 staticedge
mdxinit
mdx SetDialog $dname bgcolor $rgb(220,190,150)
mdx SetColor $dname 26,27 textbg $rgb(220,190,150)
mdx SetColor $dname 28,29,30 background $rgb(220,190,150)
mdx SetColor 45,46 text $rgb(225,225,225)
mdx SetFont 25,26,27 13 800 verdana
mdx SetColor 3,5 text $rgb(200,22,134)
mdx SetColor $dname 3,5 textbg $rgb(155,207,135)
mdx SetColor $dname 3,5 background $rgb(155,207,135)
mdx SetBorderStyle 1,9 staticedge
dll dll/mdx.dll SetFont 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39, 12 700 Tahoma
dll dll/mdx.dll SetFont +b 3,26,27 700 Tahoma
}
on *:dialog:oper:sclick:1:{ kill $$?="Killlenececek Nick?" %kural }
on *:dialog:oper:sclick:2:{ oper $$?="Nickiniz?" $$?="Şifreniz?" }
on *:dialog:oper:sclick:3:{ ns list -uhmask $$?="İp'i Giriniz ( Örnek : *@81.215.100.1 )" }
on *:dialog:oper:sclick:4:{ samode $$?="Kanal Adı?" -o $me }
on *:dialog:oper:sclick:5:{ /kline $$?="Host Mask" }
on *:dialog:oper:sclick:6:{ unkline $$?="K-line Açılacak İp'i Girin ( Örnek; *@123.456.789 )" }
on *:dialog:oper:sclick:7:{ samode $$?="Voice vereceginiz Kanal?" -v $nick }
on *:dialog:oper:sclick:8:{ qline $$?="Yasaklanacak Nick?" %yasak }
on *:dialog:oper:sclick:9:{ unshun $$?="Nick Girin?" }
on *:dialog:oper:sclick:10:{ unqline $$?="Yasağı Kalkacak Nick?" }
on *:dialog:oper:sclick:11:{ sj $$?="Hangi Kanal Gireceksiniz?" }
on *:dialog:oper:sclick:12:{ stats o }
on *:dialog:oper:sclick:13:{ akill $$?="Host Mask? (AKill)" }
on *:dialog:oper:sclick:14:{ samode $$?="Voice vereceginiz Kanal?" +v $nick }
on *:dialog:oper:sclick:15:{ mode $me -oAafy }
on *:dialog:oper:sclick:16:{ rehash }
on *:dialog:oper:sclick:17:{ samode $$?="Kanal Adı?" $$?="Mode?" }
on *:dialog:oper:sclick:18:{ unakill $$?="Akill'i Açılacak İp'i Girin ( Örnek; *@123.456.789 )" }
on *:dialog:oper:sclick:19:{ shun $$?="Kimi Susturacaksın?" %sustur }
on *:dialog:oper:sclick:20:{ samode $$?="Kanal Adı?" +o $me }