MagReader security

local event = require("event")
local component = require("component")
local term = require("term")
pass = "password"
local off = true
local master = "MasterKey"
local wait = 2000
local i = 0
local j = 0
local k = 8
local PWL = 2
screen_main = "b67d7322-50b6-4b93-8459-4e03192ce966"

 whiteList= {
 "AlexApProd",
 "Orange_Apple"
 }

 doors = {
 "9ef75fe3-20c8-4bd3-8fb0-42b6002762f0",
 "aca1f68a-2527-4d29-be5f-d873ab247fa5",
 "3ac6844a-babd-4461-a0bc-d4c6bb80dc44",
 "4b821dd1-b956-4252-b0da-6ee8c3f91403",
 "52be3fbe-5c22-40d7-8827-6fa5f0e5d29b",
 "308bb094-36de-4b6a-9580-bfcf1fd996e1",
 "0e61f90e-8882-4530-8c19-6031d6eb347e",
 "f89d08d6-6ad6-4b8e-86b7-f8fbf5bb2695"
}

 reader = {
 "00b4d264-a022-4cb6-b51f-d75baa693ef3",
 "6549e4c7-8491-4d5a-aa12-360f9e4904c8",
 "0e7634ec-9420-4e45-8be9-8841ea54a5fa",
 "dcbec41e-7855-46e3-a433-40e40179469d",
 "242224b3-f525-44f4-b175-959d214c092e",
 "3c66955c-d647-465f-81e6-4c04f929a638",
 "cad08827-cd3f-48a3-8ae9-9c56b1efbee6",
 "32e8c885-33ab-4102-96dd-31351de96761"
}

 name = {
 "Applied Energetics серверная ",
 "Энергохранилище",
 "Переработка руд",
 "Open Computers серверная",
 "Главный вход",
 "Трансформаторная",
 "Комната Thermal Expansion",
 "Крафтильня"
 }

 screen = {
 "f5021187-7b71-4460-af86-0cf9ed6391c4",
 "caef9da9-a38b-4ffb-9411-ec46f9c002ab",
 "1de72f20-e4a8-4b8e-a63e-3a2d3232fcb5",
 "0846cd1b-4e71-4c3d-af92-2aef90be2935",
 "fc7bdb3a-63a4-4175-9533-b8b14b964a09",
 "ce24c293-ed7e-472e-92ca-f8c7568de498",
 "26ac90a6-435d-4190-a1c0-d25519c612b8",
 "acda089c-c74f-4660-861b-9d1fb0f35fb2"
}

function sleep(ms)
 local z = os.clock() * 1000
 while os.clock() * 1000 - z < ms do end
end

for i=1,k do
 component.invoke(doors[i],"setPassword","",pass)
 component.invoke(doors[i],"close",pass)
end

 term.clear()

while off do
 _,adress,pName,data = event.pull("magData")

 if data == master then
  off = false
  for i=1,k do
   component.invoke(doors[i],"open",pass)
  end
  print("Система безопастности отключена: " ..pName)
 end
 for j=1,PWL do
  if pName == whiteList[j] then
  j=PWL+1
  for i=0, k do
   if reader[i] == adress then
    if data ~= "3"  and i<3 then
     component.setPrimary("screen",screen[i])
     print("Недостаточный уровень доступа")
     component.setPrimary("screen",screen_main)
     print(pName.." открыл " .. name[i])
    else
     component.invoke(doors[i],"open",pass)
     component.setPrimary("screen",screen[i])
     print("Доступ разрешен")
     component.setPrimary("screen",screen_main)
     print(pName.." открыл " .. name[i])
     sleep(wait)
     component.invoke(doors[i],"close",pass)
    end
   end
  end
  end
  end
 if j==PWL then
   for i=0, k do
   if reader[i] == adress then
    component.setPrimary("screen",screen[i])
     print("Вы отсутствуете в WhiteList")
     component.setPrimary("screen",screen_main)
     print(pName.." открыл " .. name[i])
   end
  end
  end
 j=0
 i=0
end