Stuff

on *:TEXT:!change*:#: { 
  if (%pcw. [ $+ [ $chan ] ] == off) {
    /HALT 
  }
  elseif ($nick isop $chan || $nick ishop $chan) || ($nick isvoice $chan) && ($2 isnum 2-145) {     
    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«
    timers off
    timer 0 %pctimer. [ $+ [ $chan ] ] 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.  
  } 
  if (%pcw.world. [ $+ [ $chan ] ] == $null) {
    $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14There is no world set, please set one with !change 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.  
  } 
  if (%pcw.world. [ $+ [ $chan ] ] == $null) {
    $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 10»15]|[ 14There is no world set, please set one with !change 15]|[ 14Count:4 %pestcontrol. $+  15]|[10«
    inc %pestcontrol.  
  } 
} 
on *:text:!pestcontrol on*:#:{ 
  if ($nick isop $chan) || ($nick ishop $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 ishop $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«
    timer 0 $2 msg $chan 10»15]|[ 14World:4 %pcw.world. [ $+ [ $chan ] ] $+  15]|[ 14Set By:4 %pcw.nick. [ $+ [ $chan ] ] $+  15]|[10«
    set %pctimer. [ $+ [ $chan ] ] $2
  }
}
on *:text:!StopPc*:#: { 
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan) || ($nick == Snipezy) {
    msg $chan 10»15]|[ 14PCW Cycle Is Now4 OFF14 For4 $chan 15]|[10«
    timers off 
  }
}