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 # 3¤ 4New Pest Control World Set By $nick 3¤
    notice + $+ $chan 3¤ 4New Pest Control World Set By $nick 3¤
  }
}
on *:TEXT:!world:#: { 
  if ($nick isvoice $chan || $nick isop $chan || $nick ishop $chan) {
    if (%world. [ $+ [ $chan ] ] == $null && %time. [ $+ [ $chan ] ] == $null && %nick. [ $+ [ $chan ] ] == $null) { halt }
    else { notice $nick 3¤ 4Current World: %world. [ $+ [ $chan ] ] 3¤ 4Set By: %nick. [ $+ [ $chan ] ] 3¤ 4Last Updated: $duration($calc($ctime - %time. [ $+ [ $chan ] ] )) 3¤
    }
  }
}