Miscellany

on *:rawmode:$regex($1-,/(^|\s) $replace(%gtrchan,$chr(32),$chr(124)) .?/x):{
  if (-m+N isin $1-) && (%add) {
    timeradd 1 1 msg # !add
    timeradd 1 3 msg # !add
    timeradd 1 5 msg # !add
    timeradd 1 7 unset %add
  }
}
on *:text:*Sub is needed*:$regex($1-,/(^|\s) $replace(%gtrchan,$chr(32),$chr(124)) .?/x):{
  timersub 1 1 msg # !sub
  timersub 1 3 unset %sub
}
menu * {
  Auto Add
  .Add On { set %add 1 }
  .Add Off { unset %add }
  .Sub On { set %sub 1 }
  .Sub Off { unset %sub }
  .Add Gather Channel { set %gtrchan %gtrchan $$?"Enter Channel" }
}