Someone

on $*:text: /^[!@.>~](pcw|world) */Si:#rspc: {
  if  (!%pcw) { /notice $nick 4There 12Is 8No 3Currently 2Set 7World }
  else {
  inc %world.time | $iif($left($1,1) == @ && ($nick !isreg $chan),msg $chan,.notice %pcnick $nick) 4The Current #RSPC PC World is:7 %pcw set by %pcwnick $+ , 4The World Command Has been Used12 $bytes(%world.time,b) 3Times. }
}
on $*:text:/^[!@.>~]Setpcw */Si:#rspc: {
  if ($nick !isreg $chan) {
    /set %pcwnick $nick | set %pcw $$2 | /msg $chan 10#RSPC has just updated world to 4 $2 10by 4 %pcwnick $+ .
  }
else notice $nick 2You do not 4have the access 6level required 8to use 10that 13command. }
}