on *:TEXT:!setworld *:#: { 
  if ($nick isop $chan || $nick ishop $chan || $nick == Exacuter_411) && ($$2 isnum && %world [ $+ [ $chan ] ] != $$2) {
    set %world [ $+ [ $chan ] ] $$2
    set %nick [ $+ [ $chan ] ] $nick
    set %time [ $+ [ $chan ] ] $ctime
    msg $chan ¤ 7New Pest Control World Set By $nick ¤
    notice $chan 1¤ 7New Pest Control World Set By $nick 1¤
  }
}

on *:TEXT:!world:#: { 
  if ($nick isvoice $chan || $nick isop $chan || $nick ishop $chan) {
    if (%world [ $+ [ $chan ] ] == $null && %nick [ $+ [ $chan ] ] == $null && %time [ $+ [ $chan ] ] == $null) { 
    halt }
    else {
      notice $nick 1¤ 7Current World: %world [ $+ [ $chan ] ] 1¤ 7Set By: %nick [ $+ [ $chan ] ] 1¤ 7Last Updated: $duration($calc($ctime - %time [ $+ [ $chan ] ] )) 1¤
    }
  }
}