on $*:TEXT:/^[!@\.](set(pc)?w|change)/Si:#rspc,#rspc-staff:{
if ($nick !isreg #) {
set %pcw $2
msg #rspc 12The new world has been said - %pcw $+ !! %pcw $+ !!
msg #rspc-staff 12The new world has been said - %pcw $+ !! %pcw $+ !!
set %god $iif($chan == #rspc,$nick,God)
}
}
on $*:TEXT:/[!.]suggest/Si:#: {
if ($3 == $null) { msg #rspc-staff $nick has suggested world $2 }
else { msg #rspc-staff $nick has suggested world $2 $+ . Reason - $3- }
}
on $*:TEXT:/^[!@\.]hamish o(ff|n)$/Si:#rspc,#rspc-staff:{
if ($nick !isreg #) {
if ($2 == on) {
.timer934 0 20 msg #rspc 3The current 04#RSPC 03Pest Control World is 12»»04 $(%pcw,) 12««04 03set by 04[12 God 04]03.
set %pc on
}
else {
.timer934 off
set %pc off
}
}
}