Advertisement
pepeknamornik

Pepdroll 6 Boot disk

Sep 14th, 2014
352
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.46 KB | None | 0 0
  1. function kontrola ()
  2. term.setBackgroundColor(colors.white)
  3. term.setTextColor(colors.black)
  4. term.clear()
  5. term.setCursorPos(14, 7)
  6. print "Instalace systemu"
  7. term.setCursorPos(14, 4)
  8. print "Pepdroll 6 CZ  - 1"
  9. term.setCursorPos(14, 5)
  10. print "Pepdroll 6 EN  - 2"
  11. term.setCursorPos(18, 8)
  12. print " support   /help "
  13. term.setBackgroundColor(colors.lightBlue)
  14. term.setCursorPos(23, 10)
  15. print "       "
  16. term.setCursorPos(24, 10)
  17. opak = io.read ()
  18.  
  19. if opak == "1" then
  20. disk.eject("left")
  21. disk.eject("right")
  22. disk.eject("top")
  23. disk.eject("bottom")
  24. shell.run ("pastebin run CZe9TfuV")
  25. elseif opak == "/help" then
  26. term.setBackgroundColor(colors.white)
  27. term.setTextColor(colors.black)
  28. term.clear()
  29. term.setCursorPos(5, 7)
  30. term.setBackgroundColor(colors.yellow)
  31. term.setTextColor(colors.white)
  32. print "                         "
  33. term.setCursorPos(5, 8)
  34. print " 1 -> Pepdroll CZ        "
  35. term.setCursorPos(5, 9)
  36. print " 2 -> Pepdroll EN        "
  37. term.setCursorPos(5, 10)
  38. print " /help -> napoveda       "
  39. term.setCursorPos(5, 11)
  40. print " Enter -> konec napovedy "
  41. term.setCursorPos(5, 12)
  42. print "                         "
  43. term.setCursorPos(5, 13)
  44. a = io.read ()
  45.  
  46. if a == " " then
  47. kontrola ()
  48. else
  49. kontrola ()
  50. end
  51. elseif opak == "2" then
  52. disk.eject("left")
  53. disk.eject("right")
  54. disk.eject("top")
  55. disk.eject("bottom")
  56. shell.run ("pastebin run A60xZUtg")
  57. else
  58. term.setBackgroundColor(colors.red)
  59. os.shutdown ()
  60. sleep(1)
  61. kontrola ()
  62. end
  63. end
  64. kontrola ()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement