Unnamed

on $*:TEXT:/^[!.]pc|/i:#: {
  if (!$regex($chan,/^#nucs(.staff)?/i)) { halt }
  elseif ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 == off) {
      timerpcnotice halt
      notice $nick The PC-World voice noticer has been halted
    }
    else {
      timerpcnotice 0 $iif($2 isnum,$2,30) aliaspcnotice
      notice $nick The PC-World voice noticer has been started $chr(40) $+ noticing every $iif($2 isnum,$2,30) seconds $+ $chr(41)
    }
  }
}
alias aliaspcnotice {
  var %i = 1
  while (%i <= $nick(#nucs,0)) {
    if ($nick(#nucs,%i) isvoice #nucs) { notice $nick(#nucs,%i) [«]§[ Current World: <WORLD> ]§[ }
    inc %i
  }
}