This dialog is for ircops to add, del, set nobot chans and set botserv bots to private so they can only assigned by an oper. Private bots are also not shown in "/msg botserv botlist" to normal users.
To add just simple copy and paste in a new remotes (alt+r)
To use this you must be an ircop. Right click in a chan, niclist, pm or status and you will see the menu Botserv.
Have Fun
Gemster
P.S - I know i could add a command so the menu wont show unless u are an ircop but people who are not an ircop wont use this script.
alias Tdialog { dialog -m Tdialog Tdialog }
dialog Tdialog {
title "[ Botserv ]"
size -1 -1 192 191
option dbu
tab "Add/Del", 15, 8 5 176 180
button "Add Bot", 6, 76 96 37 10, tab 15
edit "<Bot Host.aka.vhost.goes.here>", 4, 24 80 145 10, tab 15 autohs center
edit "<Bot RealName>", 3, 52 64 87 10, tab 15 autohs center
box "Bot Add", 5, 16 21 161 92, tab 15
edit "<Bot Nick>", 1, 52 32 87 10, tab 15 autohs center
edit "<Bot UserName>", 2, 52 48 87 10, tab 15 autohs center
box "Bot Delete", 7, 16 117 161 44, tab 15
edit "<Bot Nick>", 8, 52 128 87 10, tab 15 autohs center
button "Del Bot", 9, 76 144 37 10, tab 15
tab "Extras", 16
box "No Bot", 10, 16 21 161 76, tab 16
edit "<#channel>", 11, 52 32 87 10, tab 16 autohs center
button "On", 12, 73 48 17 10, tab 16
button "Off", 13, 97 48 17 10, tab 16
text "This option makes a channel be unassignable(No bot can be assigned to this channel). If a bot is already assigned to the channel, it is unassigned automatically when you enable the option", 14, 24 63 145 27, tab 16 center
box "Private Bot", 17, 16 101 161 68, tab 16
edit "<Bot Nick>", 18, 52 112 87 10, tab 16 autohs center
text "This option prevents a bot from being assigned to a channel by users that aren't IRC operators.", 21, 24 144 145 17, tab 16 center
button "On", 20, 73 128 17 10, tab 16
button "Off", 19, 97 128 17 10, tab 16
button "Done", 22, 76 171 37 12, ok
}
on *:dialog:Tdialog:sclick:6:{ msg botserv bot add $did(1) $did(2) $did(4) $did(3) }
on *:dialog:Tdialog:sclick:9:{ msg botserv bot del $did(8) }
on *:dialog:Tdialog:sclick:12:{ msg botserv set $did(11) nobot on }
on *:dialog:Tdialog:sclick:13:{ msg botserv set $did(11) nobot off }
on *:dialog:Tdialog:sclick:19:{ msg botserv set $did(18) private off }
on *:dialog:Tdialog:sclick:20:{ msg botserv set $did(18) private on }
menu channel,menubar,query,status {
Botserv:/Tdialog }