######################ALIASES##################################3

/c1 /return $+(01,$1-,01)
/c2 /return $+(02,$1-,01)
/c3 /return $+(03,$1-,01)
/c4 /return $+(04,$1-,01)
/c5 /return $+(05,$1-,01)
/c6 /return $+(06,$1-,01)
/c7 /return $+(07,$1-,01)
/c8 /return $+(08,$1-,01)
/c9 /return $+(09,$1-,01)
/c10 /return $+(10,$1-,01)
/c11 /return $+(11,$1-,01)
/c12 /return $+(12,$1-,01)
/c13 /return $+(13,$1-,01)
/c14 /return $+(14,$1-,01)
/c15 /return $+(15,$1-,01)
/c /return $+(%c,$1-,)
/u /return $+(,$1-,)
/b /return $+(,$1-,)

/public /return $c14(World:) $c4($+($readini(PestControl.ini, n, World, $1),.)) $c14(Last updated) $c12($+($duration($calc($ctime - $readini(PestControl.ini, n, time, $1))),.))

########################REMOTES##############################

on *:TEXT:*:#: {
  if ($chan == #PCPlace) {
    inc %z
    if (%z >= 8) { 
      msg $chan $public($chan)
      unset %z
    }
  }
}

on $*:TEXT:/^[@!.](world|pcw|w|pw)/Si:#PCPlace: {
  if ($me != %botnick) { halt }
  writeini -n PestControl.ini Counter $chan $calc($readini(PestControl.ini, n, Counter, $chan) + 1)
  $iif(@* iswm $1 && $nick !isreg $chan,msg $chan,.notice $nick) $c14(Pest Control world is) $c12($+($readini(PestControl.ini, n, World, $chan),.)) $c14(Previous world:) $c12($+($readini(PestControl.ini, n, OldWorld, $chan),.)) $c14(Counter:) $c12($+($readini(PestControl.ini, n, counter, $chan),.)) $c14(Last updated) $c12($duration($calc($ctime - $readini(PestControl.ini, n, time, $chan)))) $c14(ago by) $c12($+($readini(PestControl.ini, n, nickname, $chan),.))
}


on $*:TEXT:/^[@!.]change|set(world|pcw)/Si:%bot: {
  if ($nick !isreg $chan && $me == %botnick) {
    if ($2 !isnum 2-144 || $2 == $readini(PestControl.ini, n, World, $chan)) { notice $nick $c1(You cannot set that world) | halt }
    if ($readini(PestControl.ini, n, OldWorld, $chan) == $null) { writeini -n PestControl.ini Oldworld $chan Unknown }
    writeini -n PestControl.ini Time $chan $ctime
    writeini -n PestControl.ini Nickname $chan $nick
    writeini -n PestControl.ini Oldworld $chan $readini(PestControl.ini, n, World, $chan)   
    writeini -n PestControl.ini Sets $nick $calc($readini(PestControl.ini, n, Sets, $nick) + 1)
    writeini -n PestControl.ini TotalSets $chan $calc($readini(PestControl.ini, n, TotalSets, $chan) + 1)
    writeini -n PestControl.ini World $chan $2
    msg $chan $c14(Pest Control World:) $c12($+($readini(PestControl.ini, n, World, $chan),.)) $c14(Previous world:) $c12($+($readini(PestControl.ini, n, OldWorld, $chan),.)) $c14(Counter:) $c12($+($readini(PestControl.ini, n, counter, $chan),.))
  } 
}