on *:TEXT:!change*:#:{
  if ($nick !isreg $chan) {
    if (%pcw == $2) { notice $nick 14That world (4  $2  14) is already set! | HALT }
    if ($2 isnum 1-140) {
      if (%pcon == ON) {
        set %settime $ctime 
        set %pcnick $nick
        set %pcw $2
        msg $chan 14 The Pcw for4 $chan 14has been changed to4 $2 14by4 %pcnick $+ 14!
      }
    }
  }
}
on *:TEXT:!pcw*:#:{
  if (%pcon == ON) {
    inc %pcount
    notice $nick 14The Current PCW is4 %pcw 14last set by4 %pcnick $+ 14, set4 $duration($calc($ctime - %settime)) 14ago! Suggested world:4 %sug 14 Count:4 %pcount
  }
}
on *:TEXT:!world*:#:{
  if (%pcon == ON) {
    inc %pcount
    notice $nick 14The Current PCW is4 %pcw 14last set by4 %pcnick $+ 14, set4 $duration($calc($ctime - %settime)) 14 ago! Suggested world:4 %sug 14 Count:4 %pcount
  }
}
on *:TEXT:@pcw*:#:{
  if ($nick !isreg $chan) {
    if (%pcon == ON) {
      inc %pcount
      msg $chan 14The Current PCW is4 %pcw 14last set by4 %pcnick $+ 14, set4 $duration($calc($ctime - %settime)) 14 ago! Suggested world:4 %sug 14 Count:4 %pcount
    }
  }
}
on *:TEXT:@world*:#:{
  if ($nick !isreg $chan) {
    if (%pcon == ON) {
      inc %pcount
      msg $chan 14The Current PCW is4 %pcw 14last set by4 %pcnick $+ 14, set4 $duration($calc($ctime - %settime)) 14 ago! Suggested world:4 %sug 14 Count:4 %pcount
    }
  }
}
on *:TEXT:!pest off*:#:{
  if ($nick !isreg $chan) {
    if (%pcon == ON) { msg $chan 14Pest-Control settings now 4OFF14!
      set %pcon OFF
    }
    elseif (%pcon == OFF) { msg $chan 14Pest-control settings already 4OFF14!
    }
  }
}
on *:TEXT:!pest on*:#:{
  if ($nick !isreg $chan) {
    if (%pcon == OFF) { msg $chan 14Pest-Control settings now 4ON14!
      set %pcon ON
    }
    elseif (%pcon == ON) { msg $chan 14Pest-control settings already 4ON14!
    }
  }
}
on *:TEXT:!suggest*:#:{ if ($2 isnum 1-144) { set %sug $2 } }