PolskiWisnia

VaultOS

May 13th, 2020
253
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.18 KB | None | 0 0
  1. local function s(...) return sleep(...) end
  2. local function aw(...) return write(...) end
  3. local function p(...) return print(...) end
  4. local function tw(...) return term.write(...) end
  5. local function scp(...) return term.setCursorPos(...) end
  6. local function sbc(...) return term.setBackgroundColor(...) end
  7. local function stc(...) return term.setTextColor(...) end
  8. local function tc(...) return term.clear(...) end
  9. local function tcl(...) return term.clearLine(...) end
  10. local function r(...) return shell.run(...) end
  11. local function sp(...) return textutils.slowPrint(...) end
  12. local function sw(...) return textutils.slowWrite(...) end
  13. local function fse(...) return fs.exists(...) end
  14. local function pul(...) return paintutils.loadImage(...) end
  15. local function pud(...) return paintutils.drawImage(...) end
  16. local function pfb(...) return paintutils.drawFilledBox(...) end
  17. local function su(...) return os.shutdown(...) end
  18. local function re(...) return os.reboot(...) end
  19. local function pdp(...) return paintutils.drawPixel(...) end
  20. local w, h = term.getSize()
  21. while true do
  22. local czas = textutils.formatTime( os.time(), true )
  23. cz = os.time()
  24. sbc(colors.black)
  25. tc()
  26. sbc(colors.black)
  27. szer = w/2
  28. szer1 = szer-6
  29. wys = h/2
  30. wys1 = wys-8
  31. local image = paintutils.loadImage(".vault")
  32. paintutils.drawImage(image, szer1, wys1)
  33. scp(1,1)
  34. stc(colors.white)
  35. p("Microcraft VaultOS Alpha")
  36. scp(1,2)
  37. p("Aktualna godzina: ", czas)
  38. if cz>22.000 or cz<6.000 then scp(1,3) p("Krypta zamknieta")
  39. elseif cz<22.000 or cz>6.000 then scp(1,3) p("Krypta otwarta")
  40. end
  41. s(1)
  42. end
Add Comment
Please, Sign In to add comment