on *:TEXT:!change*:#pcplace: {
  if ($nick isop $chan || $nick ishop $chan) || ($nick isvoice $chan) || ($nick == Snipezy) && ($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 For12 $chan 14Has Been Updated15]|[14Changed By12 $nick 14To12 $2 $+ 15]|[10«
  } 
  else { 
    notice $nick 10»15]|[ 12Access denied. 15]|[10«
  } 
} 
on $*:text:/^[!@]pcw/Si:#pcplace: {
  if (%pcw. [ $+ [ $chan ] ] != off) {
    $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14World:12 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14By:12 %pcw.nick. [ $+ [ $chan ] ] $+  14]|[ 12 $+ $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 14ago 15]|[ 14Count:12 %pestcontrol. $+  15]|[10«
    inc %pestcontrol.  
  } 
} 
on $*:text:/^[!@]world/Si:#pcplace: {
  if (%pcw. [ $+ [ $chan ] ] != off) {
    $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14World:12 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14By:12 %pcw.nick. [ $+ [ $chan ] ] $+  14]|[ 12 $+ $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 14ago 15]|[ 14Count:12 %pestcontrol. $+  15]|[10«
    inc %pestcontrol.  
  } 
} 
on *:text:!pestcontrol on*:#pcplace:{ 
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) || ($nick == Snipezy) { 
    set %pcw. $+ $chan on 
    msg $chan 10»15]|[ 14The pestcontrol commands for12 $chan 14are now 12ON 15]|[10«
  } 
} 
on *:text:!pestcontrol off*:#pcplace:{ 
  if ($nick isop $chan) || ($nick == Snipezy) { 
    set %pcw. $+ $chan off 
    msg $chan 10»15]|[ 14The pestcontrol commands for12 $chan 14are now 12OFF 15]|[10«
  } 
}