keycard lock

env = {}
env.side = "right"
env.time = 3
env.disk = "top"
pass = "meme"
while true do
  evnt = {os.pullEvent("disk")}
  if fs.exists("disk/password") then
    file = fs.open("disk/password","r")
    cont = file.readAll()
    file.close()
    if cont == pass then
      disk.eject(env.disk)
      rs.setOutput(env.side, true)
      sleep(env.time)
      rs.setOutput(env.side, false)
    end
  end
end