Kod

alias IrcOper2 { dialog -m IrcOper2 IrcOper2 }
alias K-Line_User { dialog -m K-Line_User K-Line_User }
alias UnK-Line_User { dialog -m UnK-Line_User UnK-Line_User }
alias Z-Line_User { dialog -m Z-Line_User Z-Line_User }
alias UnZ-Line_User { dialog -m UnZ-Line_User UnZ-Line_User }
alias Wallops2 { dialog -m Wallops2 Wallops2 }
alias Locops2 { dialog -m Locops2 Locops2 }
alias Globops2 { dialog -m Globops2 Globops2 }
alias Chatops2 { dialog -m Chatops2 Chatops2 }
alias Global_Mesaj { dialog -m Global_Mesaj Global_Mesaj }
alias Kick2 { dialog -m Kick2 Kick2 }
alias Akill2 { dialog -m Akill2 Akill2 }

dialog IrcOper2 {
title "Irc Servisleri - OperServ"
size -1 -1 110 152
option dbu
button "K-Line User", 2, 8 86 40 10
button "UnK-Line User", 3, 8 97 40 10
button "Z-Line", 4, 8 108 40 10
box "User İşlemleri", 5, 4 67 49 67
button "UnZ-Line", 6, 8 119 40 10
button "Wallops", 7, 61 29 40 10
button "Locops", 8, 61 40 40 10
button "Globops", 9, 61 51 40 10
button "Chatops", 10, 61 62 40 10
box "Mesaj İşlemleri", 11, 57 21 49 56
button "Server'ı Başlat", 12, 8 30 40 10
button "Yeniden Başlat", 13, 8 41 40 10
box "Server İşlemleri", 14, 4 21 49 45
button "Global Mesaj", 15, 61 86 40 10
button "Kick User", 16, 61 97 40 10
button "Akill", 17, 61 108 40 10
box "OperServ", 18, 57 78 49 45
button "Tamam", 19, 31 137 37 12, flat ok
button "Kapat", 20, 70 137 37 12, flat cancel
button "Server'ı Kapat", 27, 8 52 40 10
text "kelebek special", 28, 58 125 47 8, disable
icon 21, 4 3 15 16, backkelebekspecial.ico, 0
text "OperServ", 22, 22 8 25 8
}


on *:dialog:IrcOper2:sclick:2: { /K-Line_User }
on *:dialog:IrcOper2:sclick:3: { /UnK-Line_User }
on *:dialog:IrcOper2:sclick:4: { /Z-Line_User }
on *:dialog:IrcOper2:sclick:6: { /UnZ-Line_User }
on *:dialog:IrcOper2:sclick:7: { /Wallops2 }
on *:dialog:IrcOper2:sclick:8: { /Locops2 }
on *:dialog:IrcOper2:sclick:9: { /Globops2 }
on *:dialog:IrcOper2:sclick:10: { /Chatops2 }
on *:dialog:IrcOper2:sclick:15: { /Global_Mesaj }
on *:dialog:IrcOper2:sclick:16: { /Kick2 }
on *:dialog:IrcOper2:sclick:17: { /Akill2 }
on *:dialog:IrcOper2:sclick:12: { /connect }
on *:dialog:IrcOper2:sclick:13: { /restart }
on *:dialog:IrcOper2:sclick:27: { /die }

dialog K-Line_User {
title "IrcOper - K-Line User"
size -1 -1 88 50
option dbu
text "Nick", 1, 8 11 20 8
text "Sebep", 2, 8 21 20 8
edit "", 3, 29 10 50 10, autohs
edit "", 4, 29 20 50 10, autohs
box "User İşlemleri", 5, 4 2 80 32
button "Tamam", 6, 13 26 37 12, flat ok
button "Kapat", 7, 51 26 37 12, flat cancel
}
on *:dialog:K-Line_User:sclick:6: { /kline $did(3) $did(4) }

dialog UnK-Line_User {
title "UnK-Line User"
size -1 -1 88 40
option dbu
text "Nick", 1, 8 11 20 8
edit "", 3, 29 10 50 10, autohs
box "User İşlemleri", 5, 4 2 80 22
button "Tamam", 6, 13 26 37 12, flat ok
button "Kapat", 7, 51 26 37 12, flat cancel
}
on *:dialog:UnK-Line_User:sclick:6: { /unkline $did(3) }

dialog Z-Line_User {
title "Z-Line User"
size -1 -1 92 40
option dbu
text "IP Adresi", 1, 8 11 22 8
edit "", 3, 34 10 50 10, autohs
box "User İşlemleri", 5, 4 2 84 22
button "Tamam", 6, 13 26 37 12, flat ok
button "Kapat", 7, 51 26 37 12, flat cancel
}
on *:dialog:Z-Line_User:sclick:6: { /zline $did(3) }

dialog UnZ-Line_User {
title "UnZ-Line User"
size -1 -1 92 40
option dbu
text "IP Adresi", 1, 8 11 22 8
edit "", 3, 34 10 50 10, autohs
box "User İşlemleri", 5, 4 2 84 22
button "Tamam", 6, 13 26 37 12, flat ok
button "Kapat", 7, 51 26 37 12, flat cancel
}
on *:dialog:UnZ-Line_User:sclick:6: { /unzline $did(3) }

dialog Wallops2 {
title "IrcOper - Wallops"
size -1 -1 90 42
option dbu
text "Mesajınız", 1, 7 11 25 8
edit "", 2, 33 10 50 10, autohs
box "Mesaj İşlemleri", 3, 4 2 82 23
button "Tamam", 4, 11 27 37 12, flat ok
button "Kapat", 5, 49 27 37 12, flat cancel
}
on *:dialog:Wallops2:sclick:4: { /wallops $did(2) }

dialog Locops2 {
title "IrcOper - Locops"
size -1 -1 90 42
option dbu
text "Mesajınız", 1, 7 11 25 8
edit "", 2, 33 10 50 10, autohs
box "Mesaj İşlemleri", 3, 4 2 82 23
button "Tamam", 4, 11 27 37 12, flat ok
button "Kapat", 5, 49 27 37 12, flat cancel
}
on *:dialog:Locops2:sclick:4: { /locops $did(2) }

dialog Globops2 {
title "IrcOper - Globops"
size -1 -1 90 42
option dbu
text "Mesajınız", 1, 7 11 25 8
edit "", 2, 33 10 50 10, autohs
box "Mesaj İşlemleri", 3, 4 2 82 23
button "Tamam", 4, 11 27 37 12, flat ok
button "Kapat", 5, 49 27 37 12, flat cancel
}
on *:dialog:Globops2:sclick:4: { /globops $did(2) }

dialog Chatops2 {
title "IrcOper - Chatops"
size -1 -1 90 42
option dbu
text "Mesajınız", 1, 7 11 25 8
edit "", 2, 33 10 50 10, autohs
box "Mesaj İşlemleri", 3, 4 2 82 23
button "Tamam", 4, 11 27 37 12, flat ok
button "Kapat", 5, 49 27 37 12, flat cancel
}
on *:dialog:Chatops2:sclick:4: { /globops $did(2) }

dialog Global_Mesaj {
title "IrcOper - Global Mesaj"
size -1 -1 90 40
option dbu
box "OperServ İşlemleri", 1, 4 2 82 22
button "Tamam", 3, 11 26 37 12, flat ok
button "Kapat", 4, 49 26 37 12, flat cancel
text "Mesajınız", 2, 7 11 25 8
edit "", 5, 32 10 50 10, autohs
}
on *:dialog:Global_Mesaj:sclick:3: { /msg operserv global $did(5) }

dialog Kick2 {
title "IrcOper - Kick User"
size -1 -1 88 50
option dbu
text "Nick", 1, 8 11 20 8
text "Sebep", 2, 8 21 20 8
edit "", 3, 29 10 50 10, autohs
edit "", 4, 29 20 50 10, autohs
box "OperServ İşlemleri", 5, 4 2 80 32
button "Tamam", 6, 9 36 37 12, flat ok
button "Kapat", 7, 47 36 37 12, flat cancel
}

dialog Akill2 {
title "IrcOper - Akill"
size -1 -1 95 50
option dbu
text "ident@host", 1, 7 11 28 8
text "Sebep", 2, 7 21 28 8
edit "", 3, 37 10 50 10, autohs
edit "", 4, 37 20 50 10, autohs
box "OperServ İşlemleri", 5, 4 2 87 32
button "Tamam", 6, 16 36 37 12, flat ok
button "Kapat", 7, 54 36 37 12, flat cancel
}
on *:dialog:Akill2:sclick:6: { /akill $did(3) $did(4) }