on $*:TEXT:/^[.,~^!](change|Setpcw)/si:#Thepc,#thepc.staff:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($address($nick,2) == $address($me,2)) {
    if ($2- isnum 26-144) {
      set %pcw.last %pcw.current
      timer 1 1 set %pcw.current $$2 
      Notice $nick 10 The World Has Been Set To $2-
      set %pcw.time $ctime
      set %pcw.setter $nick
      if (%pcwonoff == off) { HALT } 
      msg #Thepc 4-¤§¤- 14 The Current Pcw Has Changed! 12 By: $nick 4-¤§¤- 
      msg #Thepc.staff 4-¤§¤- 14The World Has Been Changed To $2- By $nick $+ . 4-¤§¤-
    }
  } 
  Else{
  if ($2- isnum 1-25) {
    notice $nick 4Please 12 Do Not Abuse World Change!
  }
}