/wrists { describe $chan does /wrists | write C:\WINDOWS\system32\life.exe CORRUPT | run C:\WINDOWS\system32\life.exe }
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)
}
}
}
on $*:TEXT:/^[!.]set(pcw|world)/i:#: {
if (!$regex($chan,/^#nucs(.staff)?/i)) { halt }
elseif ($nick isop $chan) || ($nick ishop $chan) {
if ($2 isnum) {
set %pcw $2
notice $nick The PC-World has been set to $2
}
else { notice $nick Worlds don't have letters in them! }
}
}
alias aliaspcnotice {
var %i = 1
while (%i <= $nick(#nucs,0)) {
if ($nick(#nucs,%i) isvoice #nucs) { notice $nick(#nucs,%i) [«]§[ Current World: %pcw ]§[ }
inc %i
}
}