Commands:
/lock
/unlock

;------Lock/Unlock Script------;
on *:INPUT:*: {
  if (%locked == yes) { 
    if (unlock isin $1-) {
      set %locked no
    }
    else { halt }
  }
}

alias lock { set %locked yes }
alias unlock { set %locked no }
;---End of Lock/Unlock Script---;