owned

on *:TEXT:!setpcw*:#: { 
  if ($nick isop $chan || $nick ishop $chan) || ($nick isvoice $chan) || ($nick == LowMotion) && ($2 isnum 2-138) { 
    if ($2 == %pcw.world.#pcelites) { notice $nick sorry worlds been set already.. | halt }
    set %pcw.nick. [ $+ [ $chan ] ] $nick 
    inc %changed $+ $nick 
    set %pcw.world. [ $+ [ $chan ] ] $2 
    set %pcw.time. [ $+ [ $chan ] ] $ctime 
    msg $chan 10»15]|[12Pc world for4 $chan 15]|[12 changed by4 $nick 15]|[12 In4 $chan 15]|[10«
    /bs say #pcelites !start
  } 
  else { 
    notice $nick 10»15]|[12Access denied. 15]|[10«
  } 
} 

on *:TEXT:!pcw:#:{ 
  inc %pestcontrol.
  if (%pcw. [ $+ [ $chan ] ] == off) { HALT } 
  if (%pcw. [ $+ [ $chan ] ] == on) { 
    notice $nick 10»15]|[12 World:4 %pcw.world. [ $+ [ $chan ] ] $+ 15]|[12 By:4 %pcw.nick. [ $+ [ $chan ] ] 15]|[4 $duration($calc( $ctime - %pcw.time. [ $+ [ $chan ] ] )) 15]|[12 Count:4 %pestcontrol. 15]|[10«
  } 
} 

on *:text:!start*:#: {
  if ($nick isop $chan ||$nick ishop $chan || $nick isvoice $chan) {
    set %timer on
    .timerstart 0 15 /msg $chan 10»15]|[12The 4current 12pestcontrol 4world 12for4 $chan is12: 4 %world. 15]|[10«
  }
}

on *:text:!stop:#: { 
  if ($nick isop $chan ||$nick ishop $chan || $nick isvoice $chan) { 
    .timerstart off 
    set %timer off
    msg $chan 10»15]|[4PestControl 12repeater 4has 12been 4Stopped12!15]|[10«
  } 
}