on *:TEXT:!ON*:#:{ if ($chan != $mIRC) {
    if ($nick == |-_[Kyle]_-|) {
      notice $nick PC SCRIPT IS NOW ON
      set %pcw ON
    }
  } 
} 
on *:TEXT:!OFF*:#:{ if ($chan != $mIRC) {
    if ($nick == |-_[Kyle]_-|) {
      set %pcw OFF
      notice $nick PC script is now OFF
    }
  }
}
on $*:TEXT:/^[!@](setpcw|setworld)/Si:#:{ if ($chan != #mIRC) {
    if ((($nick == |-_[Kyle]_-|) || ($nick isop $chan) || ($nick ishop $chan))) {
      if (%pcw == ON) {    
        If ($2 isnum 2-144) {
          Set %pcw $2
          set %nick $nick 
          set %timevar $ctime
          msg $chan The PCW has been changed by $nick $+ , type !world for PCW
        }
        else msg $chan Sorry, Can only set worlds from 2-144!
      }
    }
  }
}
on *:TEXT:!world:#:{
  if ($chan != #mIRC) {
    if (%pcw == ON) {
      notice $nick The Current PCW is %pcw [Set by %nick $duration($calc($ctime - %timevar)) ago]
    }
  }
}