Untitled

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) {    
        elseif (%pcw == OFF) { HALT }  
        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) {
      elseif (%pcw == OFF) { HALT }
    notice $nick The Current PCW is %pcw [Set by %nick $duration($calc($ctime - %timevar)) ago ] }
  }
}