Something

on *:TEXT:!change*:#: { 
  if ($nick isop $chan || $nick ishop $chan) || ($nick isvoice $chan) && ($2 isnum 2-145) { 
    if (%pcw. [ $+ [ $chan ] ] == off) { HALT }    
    set %pcw.nick. [ $+ [ $chan ] ] $nick 
    inc %changed $+ $nick 
    set %pcw.world. [ $+ [ $chan ] ] $2 
    set %pcw.time. [ $+ [ $chan ] ] $ctime 
    msg $chan 10»15]|[14Pc World For4 $chan 14Has Been Updated15]|[14Changed By4 $nick 14To4 $2 $+ 15]|[10«
  } 
  else { 
    notice $nick 10»15]|[12Access deon *:TEXT:!change*:#: { 
      if ($nick isop $chan || $nick ishop $chan) || ($nick isvoice $chan) && ($2 isnum 2-145) { 
        if (%pcw. [ $+ [ $chan ] ] == off) { HALT }    
        set %pcw.nick. [ $+ [ $chan ] ] $nick 
        inc %changed $+ $nick 
        set %pcw.world. [ $+ [ $chan ] ] $2 
        set %pcw.time. [ $+ [ $chan ] ] $ctime 
        msg $chan 10»15]|[14Pc World For4 $chan 14Has Been Updated15]|[14Changed By4 $nick 14To4 $2 $+ 15]|[10«
        if ($timer(pc. $+ $chan)) {
          timerpc. $+ $chan off
          timerpc. $+ $chan 0 $2 msg $chan 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14Set By:4 %pcw.nick. [ $+ [ $chan ] ] $+  15]|[10«
        }
      } 
      else { 
        notice $nick 10»15]|[12Access denied. 15]|[10«
      } 
    } 
    on $*:text:/^[!@]pcw/Si:#: {
      if (%pcw. [ $+ [ $chan ] ] != off) {
        $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14By:4 %pcw.nick. [ $+ [ $chan ] ] $+  14]|[ 04 $+ $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 14ago 15]|[ 14Count:4 %pestcontrol. $+  15]|[10«
        inc %pestcontrol.  
      } 
    } 
    on $*:text:/^[!@]world/Si:#: {
      if (%pcw. [ $+ [ $chan ] ] != off) {
        $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14By:4 %pcw.nick. [ $+ [ $chan ] ] $+  14]|[ 04 $+ $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 14ago 15]|[ 14Count:4 %pestcontrol. $+  15]|[10«
        inc %pestcontrol.  
      } 
    } 
    on *:text:!pestcontrol on*:#:{ 
      if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) || ($nick == Snipezy) { 
        set %pcw. $+ $chan on 
        msg $chan 10»15]|[ 14The pestcontrol commands for4 $chan 14are now 4ON 15]|[10«
      } 
    } 
    on *:text:!pestcontrol off*:#:{ 
      if ($nick isop $chan) || ($nick == Snipezy) { 
        set %pcw. $+ $chan off 
        msg $chan 10»15]|[ 14The pestcontrol commands for4 $chan 14are now 4OFF 15]|[10«
      } 
    }

    on *:text:!StartPc*:#:{
      if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) {
        msg $chan 10»15]|[ 14PCW Cycle Is Now4 ON14 For4 $chan 14At4 $2 14Seconds 15]|[10«
        timerpc. $+ $chan 0 $2 msg $chan 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14Set By:4 %pcw.nick. [ $+ [ $chan ] ] $+  15]|[10«
      }
    }
    on *:text:!StopPc*:#: { 
      msg $chan 10»15]|[ 14PCW Cycle Is Now4 OFF14 For4 $chan 15]|[10«
      if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) || ($nick == Snipezy) {
        timerpc. $+ $chan off 
      }
    }
    nied. 15]|[10«
  } 
} 
on $*:text:/^[!@]pcw/Si:#: {
  if (%pcw. [ $+ [ $chan ] ] != off) {
    $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14By:4 %pcw.nick. [ $+ [ $chan ] ] $+  14]|[ 04 $+ $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 14ago 15]|[ 14Count:4 %pestcontrol. $+  15]|[10«
    inc %pestcontrol.  
  } 
} 
on $*:text:/^[!@]world/Si:#: {
  if (%pcw. [ $+ [ $chan ] ] != off) {
    $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14By:4 %pcw.nick. [ $+ [ $chan ] ] $+  14]|[ 04 $+ $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 14ago 15]|[ 14Count:4 %pestcontrol. $+  15]|[10«
    inc %pestcontrol.  
  } 
} 
on *:text:!pestcontrol on*:#:{ 
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) || ($nick == Snipezy) { 
    set %pcw. $+ $chan on 
    msg $chan 10»15]|[ 14The pestcontrol commands for4 $chan 14are now 4ON 15]|[10«
  } 
} 
on *:text:!pestcontrol off*:#:{ 
  if ($nick isop $chan) || ($nick == Snipezy) { 
    set %pcw. $+ $chan off 
    msg $chan 10»15]|[ 14The pestcontrol commands for4 $chan 14are now 4OFF 15]|[10«
  } 
}