on *:text:!change:?: {
  var %s = 1
  while (%s <= $chan(0)) {
    if ($nick isop $chan(%s)) {
      set %world $2
      /amsg 3  $nick  4has changed the Pest Control world, type 12!world 4to see it!
      break
    }
    inc %s
    continue
  }
}