rendered paste body######################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),.))
}
}