Untitled

####################
########Alias#######
####################

pcoff { /set %pc off | /msg $chan Pc commands are now disabled }

pcon { /set %pc on | /msg $chan Pc commands are now enabled }

setpcw { set %pcw $1
  set %pcnick God
  msg #rspc The world has been updated to %pcw by %pcnick $+ .
  msg #rspc-staff The world has been updated to %pcw by %pcnick $+ .
  timers off
  .timerrspc 0 20 msg #rspc 3The current 4#RSPC 3Pest Control World is 2»» %pcw $+ 42««3 set by %pcnick $+ .
}

##########################
#########Remote###########
##########################

on $*:TEXT:/^[!@\.](set(pc)?w|change)/Si:#rspc,#rspc-staff:{
  if ($nick !isreg #) {
    set %pcw $2
      if (%msger == on) {
        msg #rspc The new world has been said!! %pcw !! %pcw !!
        set %god $iif($chan == #rspc,$nick,God)
      }
    }
  }
}
on $*:TEXT:/^[!@\.]hamish o(ff|n)$/Si:#rspc,#rspc-staff:{
  if ($2 == on) .timer934 0 20 msg #rspc The current #RSPC Pest Control World is »» $(%pcw,) «« set by  $(%God,) .
  else .timer934 off
}
on $*:TEXT:/^[!@\.]o(ff|n)$:#rspc,#rspc-staff:{
  if (($nick isop $chan) || ($nick ishop $chan)) {
    if ($regex($1,/^[!@\.]off)) {
      set %pc off
      msg $chan pc scripts are now disabled
    }
    else {
      set %pc on
      msg $chan pc scripts are now enabled
    }
  }
}