---------------- Pest Control Related Scripts ----------------
13.

14.

15.
Set a PCW:
16.

17.
on $*:text:/^[!@.]set pcw */Si:#: {
  18.
  if ($chan != #revenge-staff) { notice $nick You need to be on the staff channel to set the world! | halt } else {
    19.
    if ($nick isop #revenge-staff) || ($nick ishop #revenge-staff) {
      20.
      set %pcc $ctime
      21.
      set %pc $3-
      22.
      set %pcwnick $nick
      23.
      msg #revenge-pc 1[4PC-World Update1] 12Type 4"!pcw" 1(12 $+ $nick $+ 1)
      24.
      /notice Bladex newpcw $3 %pcwnick %pcc
      25.
} } }
26.
---------------
27.

28.

29.

30.

31.
The "!pcw" Command:
32.

33.
on *:Text:!pcw*:#revenge-pc,#revenge-staff,:{ 
  34.
  inc %pcwcount
  35.
  notice $nick 1- 12The current pc-world is:4 %pc 1- 12Last update:4 $duration($calc($ctime - %pcc)) 12ago 1- 12Last updated by:4 %pcwnick 1-12 The "!pcw" command count:4 %pcwcount 1-
  36.
}
37.
else {
  38.
notice $nick 12You aren't a member of 4#revenge-pc! 12Go here to register>4 Nothing yet }