on *:TEXT:!setpcw *:#:{
  if ($chan != #rspc) || (!$2) || ($2 !isnum) || ($nick isreg #) halt
  else {
    set %pcw $2
    set %changer $nick
    set %pcw.time $ctime
    msg $chan 02The PC world has been updated, Type 04!pcw02 or 04!world02.
  }
}
on *:TEXT:?pcw:#:{
  if ($left($1,1) !isin !@) { halt }
  var %pcw.target $iif($left($1,1) == @,msg $chan,notice $nick)
  if ($chan != #rspc) { %pcw.target 04 $+ $nick 02- Please join04 #RSPC 02for PC Worlds. | halt }
  else { %pcw.target 02The current Pest Control world is04 %pcw $+ 02, changed by04 %changer 02(Set04 $duration($calc($ctime - %pcw.time)) 02ago) }
}
on *:TEXT:?world:#:{ 
  if ($left($1,1) !isin !@) { halt }
  var %world.target $iif($left($1,1) == @,msg $chan,notice $nick)
  if ($chan != #rspc) { %world.target 04 $+ $nick 02- Please join04 #RSPC 02for PC Worlds. | halt }
  else { %world.target 02The current Pest Control world is04 %pcw $+ 02, changed by04 %changer 02(Set04 $+ $duration($calc($ctime - %pcw.time)) 02ago) }
}