Miscellany

on !*:text:*:%shchan:{
  if ($1 == @) && ($nick isop %shchan || $nick isvoice %shchan) && (TP][* iswm $nick) {
    if (%shtru) { msg %shchan Someone is already running }
    else { topic %shchan $nick is running next gather | set %shtru 1 | set %gtrnick $nick }
  }
  if ($1- == @off) && ($nick isin %gtrnick) { unset %shtru | unset %gtrnick | topic %shchan No one running atm }
}
on *:part:#:{
  if ($nick isin %gtrnick) { unset %shtru | unset %gtrnick | topic %shchan No one running atm }
}
on *:quit:{
  if ($nick isin %gtrnick) { unset %shtru | unset %gtrnick | topic %shchan No one running atm }
}
on !*:text:*:%gtrchan:{
if (Team-a isin $1-) && ($nick == TP][Gathers) { unset %shtru | unset %gtrnick | topic %shchan No one running atm } }

menu * {
  Gather Save
  .Gather Channel { set %gtrchan $$?"Enter your Gather Channel" }
  .Save Channel { set %shchan $$?"Enter Your Privte Gather channel" }
}