Mag Card Reader

--Код написан человеком с ником kalan4ik
local co = require("component")
local ev = require("event")
local te = require("term")
local com = co.computer
local sides = require("sides")
local red = co.redstone
--Ввод переменных
local sid = 0
local wl = {}
local d = {}
local st = true
local uuid = {}
local stsi = true
local ghost = {}
local q = true
local nn = true
local zzx = true
--Гребанный код...
os.sleep(1)
te.clear()
print("Первоначальная загрузка...")
print("Вы хотите записать карту?(к компьютеру должен быть подключен Card Writer!)(y/n)")
while nn do
  local pp, _, _, oo = ev.pull()
  if oo == 21 then
    local ran = math.random(500000*os.time()).."-"..math.random(500000*os.time()).."-"..math.random(500000*os.time())
    co.OSCardWriter.write(ran, "Card", true)
    nn = false
  elseif oo == 49 then
    nn = false
  end
end
print("Вбитие карты(ударьте картой по блоку Mag Card Reader)")
print("Предварительно записанной на Card Writer")
while st do
  local naa, _, nab, nac, nad = ev.pull()
  if naa == "magData" then
    d = nac
    wl = nab
    uuid = nad
    print("Данные по карте вбиты")
    te.write("Ник владельца карты:  ")
    print(wl)
    te.write("Дата карты:  ")
    print(d)
    te.write("UUID карты:  ")
    print(uuid)
    st = false
  end
end
print("Настройка стороны вывода красного сигнала")
print("Введите сторону, вводить цифрой")
print("Низ - 0,   Верх - 1")
print("Тыл - 2,   Перед - 3")
print("Право - 4, Лево - 5")
while stsi do
  local xzc, _, _, sts, _ = ev.pull()
  if xzc == "key_down" then
    if sts == 11 then
      sid = 0
      stsi = false
    elseif sts == 2 then
      sid = 1
      stsi = false
    elseif sts == 3 then
      sid = 2
      stsi = false
    elseif sts == 4 then
      sid = 3
      stsi = false
    elseif sts == 5 then
      sid = 4
      stsi = false
    elseif sts == 6 then
      sid = 5
      stsi = false
    else
      print("Неверное название стороны, попробуйте ещё раз")
      com.beep(2000, 3)
    end
  end
end
print("Настройка прошла успешно, хорошего пользования")
print("Чтобы выйти с программы, нажмите q")
os.sleep(2)
while q do
  for l = 1, #ghost do
    print(ghost[l])
  end
  local gh = true
  local evn, _, name, dat, uui = ev.pull()
  if evn == "magData" then
    if name == wl then
      if dat == d then
        if uui == uuid then
          red.setOutput(sid, 15)
          os.sleep(3)
          red.setOutput(sid, 0)
        else
          print("Неправильный UUID")
          com.beep(2000, 3)
        end
      else
        print("Неверная 'date'")
        com.beep(2000, 3)
      end
    else
      print("Неверное имя игрока")
      com.beep(2000, 3)
    end
    for k = 1, #ghost do
      if ghost[k] == name then
        gh = false
      end
    end
    if gh == true then
      table.insert(ghost, name)
      print(name)
    end
  end
  if evn == "key_down" then
    if  dat == 16 then
      q = false
      print("Программа завершена")
    end
  end
  te.clear()
end