Well, it's a groups manager. Type /groupm to start it. Load in remotes.
P.S. Don't get confused with Scakk's version: http://www.hawkee.com/snippet/5115/ His is a remote groups manager.
;Group Manager v0.1
;Made by Firstmate
alias groupm dialog $iif($dialog(group),-v,-dm) group group
dialog Group {
title "Group Manager"
size -1 -1 120 85
option dbu
list 1, 4 13 39 70, size
text "Groups", 2, 5 1 49 9
box "Status", 3, 50 15 58 24
radio "On", 4, 54 24 21 10
radio "Off", 5, 80 24 24 10
box "Path", 6, 50 43 58 28
edit "", 7, 54 54 50 10, read autohs
text "Made by Firstmate", 8, 59 75 50 8
}
on *:dialog:group:init:0: {
var %i = 1, %x = $group(0)
while (%i <= %x) { did -a group 1 $group(%i) | inc %i }
}
on *:dialog:group:sclick:1: {
var %group = $did(group,1,$did(group,1).sel)
did -u group 4 | did -u group 5
did -c group $iif($group(%group).status == on,4,5)
did -ra group 7 $group(%group).fname
}
on *:dialog:group:sclick:4: {
var %group = $did(group,1,$did(group,1).sel)
.enable %group
did -u group 5 | did -c group 4
}
on *:dialog:group:sclick:5: {
var %group = $did(group,1,$did(group,1).sel)
.disable %group
did -u group 4 | did -c group 5
}