#pestcworld on
on $*:TEXT:!setworld*:#novus:{
if (($nick = `n1k) || ($nick isop $chan)) || ($nick ishop $chan)) {
set %world $+($2,$chr(160),$nick,$chr(160),$ctime)
msg $chan 14 The Pest Control world has been updated by 3 $nick 14 The Pest Control world is now 3 $2
}
else notice $nick 14You do not have permission to change the current world.
}
on $*:TEXT:!world*:#novus: {
if ($nick !isreg $chan) notice $nick $nick $+ , 14 The current Pest Control world is: 3 $gettok(%world,1,160) 14 set by $gettok(%world,2,160) $+ , 3 $duration($calc($ctime - $gettok(%world,3,160))) 14 ago.
}
#end