Unnamed

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:#:{
  if (%timer == on) { notice $nick You cannot use this command while the worlds being repeated! | HALT }
  if (%timer == off) {
    set %pestcontrol. $calc((%pestcontrol.)+1)
    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
    msg $chan Pest control world repeater started!
    .timerstart 0 15 /msg $chan 10»15]|[12The 4current 12pestcontrol 4world 12for4 $chan is12: 4 %pcw.world. [ $+ [ $chan ] ] $+ . 15]|[10«
  }
  else { halt }
}

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«
  }
  else { halt }
}