Advertisement
PolskiWisnia

NextUI 1.8 ALPHA

Jan 27th, 2020
443
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 52.91 KB | None | 0 0
  1. local function s(...) return sleep(...) end
  2. local function w(...) 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.  
  22. function cus()
  23. scp(1,h-10)
  24. fs.delete("/os/.tapus")
  25. r("pastebin get 3KBhKn53 /os/.tapus")
  26. r("paint /os/.pulpit")
  27. system()
  28. end
  29.  
  30.  
  31. function folder()
  32. while true do
  33. if colr == "colors.orange" then pfb(1, 2, 51, 18, colors.orange) elseif colr == "colors.magenta" then pfb(1, 2, 51, 18, colors.magenta) elseif colr == "colors.lightBlue" then pfb(1, 2, 51, 18, colors.lightBlue) elseif colr == "colors.yellow" then pfb(1, 2, 51, 18, colors.yellow) elseif colr == "colors.lime" then pfb(1, 2, 51, 18, colors.lime) elseif colr == "colors.pink" then pfb(1, 2, 51, 18, colors.pink) elseif colr == "colors.gray" then pfb(1, 2, 51, 18, colors.gray) elseif colr == "colors.lightGray" then pfb(1, 2, 51, 18, colors.lightGray) elseif colr == "colors.purple" then pfb(1, 2, 51, 18, colors.purple) elseif colr == "colors.blue" then pfb(1, 2, 51, 18, colors.blue) elseif colr == "colors.brown" then pfb(1, 2, 51, 18, colors.brown) elseif colr == "colors.green" then pfb(1, 2, 51, 18, colors.green) elseif colr == "colors.red" then pfb(1, 2, 51, 18, colors.red) elseif colr == "colors.black" then pfb(1, 2, 51, 18, colors.black) stc(colors.white) elseif colr == "colors.white" then pfb(1, 2, 51, 18, colors.white) stc(colors.black)  end
  34. pfb(1, 2, 51, 2, colors.blue)
  35. stc(colors.white)
  36. scp(1,2)
  37. p("Aplikacje nextStore")
  38. pdp(51,2,colors.red)
  39.  
  40. if fs.exists("/nshop/.dg") then
  41.  pfb(15, 4, 15, 6, colors.gray)
  42.  pfb(16, 4, 16, 6, colors.gray)
  43.  pfb(17, 4, 17, 6, colors.lightGray)
  44.  pdp(16, 5, colors.lightGray)
  45.  pdp(17, 5, colors.gray)
  46.  stc(colors.white)
  47. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black)  end
  48.  scp(15,7)
  49.  p("DGStatistics")
  50. end
  51.  
  52.  
  53. if fs.exists("/nshop/.tm") then
  54.  pfb(28, 4, 30, 6, colors.gray)
  55.  pfb(28, 4, 30, 4, colors.lightGray)
  56.  pdp(29,5, colors.lightGray)
  57.  pdp(29,6, colors.lightGray)
  58.   stc(colors.white)
  59. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black)  end
  60.  scp(28,7)
  61.  p("TimeMachine")
  62. end
  63.  
  64. if fs.exists("/nshop/.calc") then
  65.  pfb(2, 8, 4, 8, colors.blue)
  66.  pfb(2, 9, 4, 10, colors.cyan)
  67.  stc(colors.white)
  68.  if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr ==
  69.  "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then
  70.  sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr ==
  71.  "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then
  72.  sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr
  73.  == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr ==
  74.  "colors.white" then sbc(colors.white) stc(colors.black)  end
  75.  scp(2,11)
  76.  p("Kalkulator")
  77. end
  78.  
  79. if fs.exists("/nshop/.exp") then
  80. pfb(2, 4, 2, 6, colors.orange)
  81. pfb(3, 4, 3, 6, colors.yellow)
  82. pfb(4, 4, 4, 6, colors.red)
  83.  if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr ==
  84.  "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then
  85.  sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr ==
  86.  "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then
  87.  sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr
  88.  == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr ==
  89.  "colors.white" then sbc(colors.white) stc(colors.black)  end
  90. scp(2,7)
  91. p("Eksplorator")
  92. end
  93.  
  94. local event, click, x, y = os.pullEvent("mouse_click")
  95. if x>1 and x<5 and y>3 and y<7 and fs.exists("/nshop/.exp") then r("/nshop/.exp") end
  96. if x>14 and x<18 and y>3 and y<7 and fs.exists("/nshop/.dg") then r("/nshop/.dg") end
  97. if x>27 and x<31 and y>3 and y<7 and fs.exists("/nshop/.tm") then r("/nshop/.tm") end
  98. if x>1 and x<5 and y>7 and y<11 and fs.exists("/nshop/.calc") then r("/nshop/.calc") end
  99. if x>0 and x<6 and y == 19 then start() end
  100. if x == 51 and y == 2 then system() end
  101. end
  102. end
  103.  
  104.  
  105. function tapetaust()
  106. local tapust = fs.open("/os/.tapus", "r")
  107. tapust1 = tapust.readLine()
  108. tapust.close()
  109. if tapust1 == "default" then
  110.  sbc(colors.gray)
  111.  stc(colors.white)
  112.  scp(1,9)
  113.  p("NextUI")
  114.  scp(9,9)
  115.  sbc(colors.lightGray)
  116.  p("Prosta")
  117.  scp(16,9)
  118.  p("Wlasna")
  119.  local event, click, x, y = os.pullEvent("mouse_click")
  120.  if x>8 and x<15 and y == 9 then
  121.   fs.delete("/os/.pulpit")
  122.   fs.delete("/os/.tapus")
  123.   r("pastebin get vwG8AryW /os/.pulpit")
  124.   r("pastebin get uTedutxS /os/.tapus")
  125.   s(1)
  126.   system()
  127.  end
  128.  if x>15 and x<23 and y == 9 then cus() end
  129. end
  130. if tapust1 == "custom" then
  131.  stc(colors.white)
  132.  sbc(colors.lightGray)
  133.  scp(1,9)
  134.  p("NextUI")
  135.  scp(9,9)
  136.  p("Prosta")
  137.  sbc(colors.gray)
  138.  scp(16,9)
  139.  p("Wlasna")
  140.  local event, click, x, y = os.pullEvent("mouse_click")
  141.  if x>8 and x<15 and y == 9 then
  142.   fs.delete("/os/.pulpit")
  143.   fs.delete("/os/.tapus")
  144.   r("pastebin get vwG8AryW /os/.pulpit")
  145.   r("pastebin get uTedutxS /os/.tapus")
  146.   s(1)
  147.   system()
  148.  end
  149.  if x>0 and x<9 and y == 9 then
  150.   fs.delete("/os/.pulpit")
  151.   fs.delete("/os/.tapus")
  152.   r("pastebin get KCNCwuj3 /os/.pulpit")
  153.   r("pastebin get DxMvUVHx /os/.tapus")
  154.   s(1)
  155.   system()
  156.  end
  157. end
  158. if tapust1 == "simple" then
  159.  sbc(colors.lightGray)
  160.  stc(colors.white)
  161.  scp(1,9)
  162.  p("NextUI")
  163.  sbc(colors.gray)
  164.  scp(9,9)
  165.  p("Prosta")
  166.  sbc(colors.lightGray)
  167.  scp(16,9)
  168.  p("Wlasna")
  169.  local event, click, x, y = os.pullEvent("mouse_click")
  170.  if x>0 and x<9 and y == 9 then
  171.   fs.delete("/os/.pulpit")
  172.   fs.delete("/os/.tapus")
  173.   r("pastebin get KCNCwuj3 /os/.pulpit")
  174.   r("pastebin get DxMvUVHx /os/.tapus")
  175.   s(1)
  176.   system()
  177.  end
  178.  if x>15 and x<23 and y == 9 then cus() end
  179. end
  180. end
  181. function cmd()
  182. s(1)
  183. tc()
  184. sbc(colors.black)
  185. tc()
  186. sbc(colors.black)
  187. stc(colors.white)
  188. scp(1,1)
  189. p("MineCore Command Prompt")
  190. p("2018 Microcraft")
  191. p("Wpisz 'help', aby uzyskac pomoc")
  192. while true do
  193. w("./minecore/>")
  194. comm = read()
  195. if comm == "help" then
  196.  p("'ver' - wersja MineCore")
  197.  p("'next' - powrot do NextUI")
  198.  p("'nextver' - wersja NextUI")
  199.  p("'run' - uruchom plik")
  200.  p("'log' - zmiana hasla")
  201.  p("'reboot' - uruchom ponownie")
  202.  p("'shutdown' - wylacz komputer")
  203.  p("'store' - sklep z aplikacjami")
  204.  p("'craft' - powrot do CraftOS")
  205.  p("'update' - aktualizuj NextUI")
  206.  p("'dir' - lista plikow w danym folderze")
  207. end
  208. if comm == "reboot" then re() end
  209. if comm == "shutdown" then su() end
  210. if comm == "update" then r("/os/.update") end
  211. if comm == "dir" then
  212.  w(".Podaj sciezke>")
  213.  dir1 = read()
  214.  r("dir", dir1)
  215. end
  216. if comm == "store" then sklep() end
  217. if comm == "ver" then
  218.  p("Microcraft MineCore 1.65 2020.")
  219.  p("Microcraft MineUI D 1.0 2018.")
  220. end
  221. if comm == "nextver" then
  222.  p("Microcraft NextUI 1.7 2nd UI Update 2020.")
  223. end
  224. if comm == "next" then system() end
  225. if comm == "run" then
  226.  w("Wpisz sciezke pliku: ")
  227.  plik = read()
  228.  if fs.exists(plik) then r(plik) end
  229. end
  230. if comm == "log" then
  231.  w("Wpisz nowe haslo: ")
  232.  passw = read()
  233.  r("rm /os/.log2")
  234.  local pas = fs.open("/os/.log2", "w")
  235.  pass = pas.writeLine(passw)
  236.  pas.close()
  237.  p("Uruchamianie ponownie...")
  238.  s(1)
  239.  re()
  240. end
  241. end
  242. end
  243.  
  244.  
  245. function apps()
  246. while true do
  247. sbc(colors.black)
  248. tc()
  249. sbc(colors.black)
  250. pfb(6, 19, 49, 19, colors.blue)
  251. sbc(colors.green)
  252. stc(colors.white)
  253. scp(1,19)
  254. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black)  end
  255. w("Start")
  256. pfb(1, 1, 51, 1, colors.blue)
  257. pdp(51, 1, colors.red)
  258. pdp(50, 19, colors.red)
  259. pdp(51, 19, colors.orange)
  260. scp(1,1)
  261. sbc(colors.blue)
  262. stc(colors.white)
  263. p("Zarzadzanie aplikacjami")
  264. pfb(3, 3, 5, 3, colors.gray)
  265. pdp(3, 3, colors.lightGray)
  266. scp(6,3)
  267. stc(colors.white)
  268. sbc(colors.black)
  269. miejsce = math.ceil(fs.getFreeSpace("/")/1024)
  270. p("Dysk twardy   Wolne miejsce: ", miejsce, "KB")
  271. scp(1,6)
  272. p("Aplikacje:")
  273. scp(6,8)
  274. stc(colors.white)
  275. sbc(colors.black)
  276. if fs.exists("/nshop/") then rozmiar = math.ceil(getSize("/nshop/")/1024) else
  277. scp(1,7) sbc(colors.black) stc(colors.white) p("Brak zainstalowanych aplikacji") end
  278. scp(1,5)
  279. p("Laczny rozmiar aplikacji na dysku: ", rozmiar, "KB")
  280. if fs.exists("/nshop/.exp") then pfb(3, 8, 5, 8, colors.blue) scp(6,8) stc(colors.white) sbc(colors.black) p("Eksplorator") scp(1,8) stc(colors.white) sbc(colors.red) p("X") end
  281. if fs.exists("/nshop/.dg") then pfb(3, 10, 5, 10, colors.gray) scp(6,10) stc(colors.white) sbc(colors.black) p("DGStatistics") scp(1,10) stc(colors.white) sbc(colors.red) p("X") end
  282. if fs.exists("/nshop/.tm") then pfb(3, 12, 5, 12, colors.green) scp(6,12) stc(colors.white) sbc(colors.black) p("TimeMachine") scp(1,12) stc(colors.white) sbc(colors.red) p("X") end
  283. if fs.exists("/nshop/.calc") then pfb(3, 14, 5, 14, colors.cyan) scp(6,14) stc(colors.white) sbc(colors.black) p("Kalkulator") scp(1, 14) stc(colors.white) sbc(colors.red) p("X") end
  284. local event, click, x, y = os.pullEvent("mouse_click")
  285. if x>0 and x<6 and y == 19 then start() end
  286. if x == 1 and y == 8 then fs.delete("/nshop/.exp") s(1)  end
  287. if x == 1 and y == 10 then fs.delete("/nshop/.dg") s(1)  end
  288. if x == 1 and y == 12 then fs.delete("/nshop/.tm") s(1)  end
  289. if x == 1 and y == 14 then fs.delete("/nshop/.calc") s(1) end
  290. if x == 51 and y == 1 then nust() end
  291. end
  292. end
  293.  
  294.  
  295. function pol()
  296. pfb(50, 13, 50, 18, colors.white)
  297. pfb(51, 13, 51, 18, colors.red)
  298. end
  299.  
  300. function calc()
  301. scp(16,2)
  302. sbc(colors.white)
  303. stc(colors.black)
  304. p("Kalkulator NextUI to prosta")
  305. scp(16,3)
  306. p("aplikacja pozwalajaca na")
  307. scp(16,4)
  308. p("wykonywanie dzialan matematycznych")
  309. scp(16,5)
  310. p("Wyprobuj juz dzis!")
  311. pfb(16, 19, 51, 19, colors.green)
  312. if fs.exists("/nshop/.calc") then
  313.  scp(16,19)
  314.  sbc(colors.green)
  315.  stc(colors.white)
  316.  w("Usun      Uruchom")
  317.  local event, click, x, y = os.pullEvent("mouse_click")
  318.  if x>15 and x<21 and y == 19 then fs.delete("/nshop/.calc") end
  319.  if x>25 and x<34 and y == 19 then r("/nshop/.calc") end
  320. else
  321.  scp(30,19)
  322.  w("Pobierz")
  323.  local event, click, x, y = os.pullEvent("mouse_click")
  324.  if x>29 and x<40 then
  325.   if pass == "" then r("pastebin get dMjjSaKY /nshop/.calc")
  326.   else
  327.   pfb(10, 5, 30, 9, colors.blue)
  328.   scp(10,5) stc(colors.white)
  329.   p("Wymagana autoryzacja.")
  330.   scp(10,6)
  331.   p("Wpisz haslo:")
  332.   scp(10,7)
  333.   w("")
  334.   haslo = read()
  335.   if haslo == pass then r("pastebin get dMjjSaKY /nshop/.calc")
  336.   end  
  337.   end
  338.   end
  339. end
  340. end
  341.  
  342. function ep()
  343. scp(16,2)
  344. sbc(colors.white)
  345. stc(colors.black)
  346. p("Eksplorator dla NextUI to potezne")
  347. scp(16,3)
  348. p("a zarazem proste narzedzie do")
  349. scp(16,4)
  350. p("przegladania zawartosci dysku")
  351. scp(16,5)
  352. p("twardego. Pobierz za darmo dzisiaj!")
  353. pfb(16, 19, 51, 19, colors.green)
  354. if fs.exists("/nshop/.exp") then
  355.  scp(16,19)
  356.  sbc(colors.green)
  357.  stc(colors.white)
  358.  w("Usun      Uruchom")
  359.  local event, click, x, y = os.pullEvent("mouse_click")
  360.  if x>15 and x<21 and y == 19 then fs.delete("/nshop/.exp") end
  361.  if x>25 and x<34 and y == 19 then r("/nshop/.exp") end
  362. else
  363.  scp(30,19)
  364.  w("Pobierz")
  365.  local event, click, x, y = os.pullEvent("mouse_click")
  366.  if x>29 and x<40 then
  367.   if pass == "" then r("pastebin get zbzF7Zu4 /nshop/.exp")
  368.   else
  369.   pfb(10, 5, 30, 9, colors.blue)
  370.   scp(10,5) stc(colors.white)
  371.   p("Wymagana autoryzacja.")
  372.   scp(10,6)
  373.   p("Wpisz haslo:")
  374.   scp(10,7)
  375.   w("")
  376.   haslo = read()
  377.   if haslo == pass then r("pastebin get zbzF7Zu4 /nshop/.exp")
  378.   end  
  379.   end
  380.   end
  381. end
  382. end
  383.  
  384.  
  385. function rc()
  386. scp(16,2)
  387. sbc(colors.white)
  388. stc(colors.black)
  389. p("ReactorControl to aplikacja,")
  390. scp(16,3)
  391. p("stworzona dla latwiejszej")
  392. scp(16,4)
  393. p("kontroli reaktorow z modyfikacji")
  394. scp(16,5)
  395. p("do Minecraft nazwanej BigReactors.")
  396. scp(16,6)
  397. p("Pobierz juz dzis!")
  398. pfb(16, 19, 51, 19, colors.green)
  399. scp(16,19)
  400. w("Aplikacja nie jest jeszcze dostepna")
  401. local event, click, x, y = os.pullEvent("mouse_click")
  402. end
  403.  
  404.  
  405. function tm()
  406. scp(16,2)
  407. sbc(colors.white)
  408. stc(colors.black)
  409. p("TimeMashine to aplikacja")
  410. scp(16,3)
  411. p("uruchamiajaca starsze wersje")
  412. scp(16,4)
  413. p("MineCore oraz Minedows dzieki")
  414. scp(16,5)
  415. p("NextUI API! Poznaj starsze")
  416. scp(16,6)
  417. p("systemy Microcraft bez zbednego")
  418. scp(16,7)
  419. p("zajmowania miejsca na dysku!")
  420. scp(16,8)
  421. p("Aplikacja stworzona na rocznice")
  422. scp(16,9)
  423. p("wydania MineCore 1.0!")
  424. pfb(16, 19, 51, 19, colors.green)
  425. if fs.exists("/nshop/.tm") then
  426.  scp(16,19)
  427.  sbc(colors.green)
  428.  stc(colors.white)
  429.  w("Usun      Uruchom")
  430.  local event, click, x, y = os.pullEvent("mouse_click")
  431.  if x>15 and x<21 and y == 19 then fs.delete("/nshop/.tm") end
  432.  if x>25 and x<34 and y == 19 then r("/nshop/.tm") end
  433. else
  434.  scp(30,19)
  435.  w("Pobierz")
  436.  local event, click, x, y = os.pullEvent("mouse_click")
  437.  if x>29 and x<40 then
  438.   if pass == "" then r("pastebin get kCQLpZQS /nshop/.tm")
  439.   else
  440.   pfb(10, 5, 30, 9, colors.blue)
  441.   scp(10,5) stc(colors.white)
  442.   p("Wymagana autoryzacja.")
  443.   scp(10,6)
  444.   p("Wpisz haslo:")
  445.   scp(10,7)
  446.   w("")
  447.   haslo = read()
  448.   if haslo == pass then r("pastebin get kCQLpZQS /nshop/.tm")
  449.   end  
  450.   end
  451.   end
  452. end
  453. end
  454.  
  455.  
  456. function dg()
  457. scp(16,2)
  458. sbc(colors.white)
  459. stc(colors.black)
  460. p("DGStatistics to aplikacja,")
  461. scp(16,3)
  462. p("stworzona we wspolpracy z ")
  463. scp(16,4)
  464. p("serwerem Darkness Grounds ")
  465. scp(16,5)
  466. p("pokazujaca statystyki broni")
  467. scp(16,6)
  468. p("Z ich autorskiej modyfikacji!")
  469. scp(16,7)
  470. p("Pobierz juz dzis!")
  471. pfb(16, 19, 51, 19, colors.green)
  472. scp(16,19)
  473. if fs.exists("/nshop/.dg") then
  474.  scp(16,19)
  475.  sbc(colors.green)
  476.  stc(colors.white)
  477.  w("Usun      Uruchom")
  478.  local event, click, x, y = os.pullEvent("mouse_click")
  479.  if x>15 and x<21 and y == 19 then fs.delete("/nshop/.dg") end
  480.  if x>25 and x<34 and y == 19 then r("/nshop/.dg") end
  481. else
  482.  scp(30,19)
  483.  w("Pobierz")
  484.  local event, click, x, y = os.pullEvent("mouse_click")
  485.  if x>29 and x<40 then
  486.   if pass == "" then r("pastebin get qRNinxW4 /nshop/.dg")
  487.   else
  488.   pfb(10, 5, 30, 9, colors.blue)
  489.   scp(10,5) stc(colors.white)
  490.   p("Wymagana autoryzacja.")
  491.   scp(10,6)
  492.   p("Wpisz haslo:")
  493.   scp(10,7)
  494.   w("")
  495.   haslo = read()
  496.   if haslo == pass then r("pastebin get qRNinxW4 /nshop/.dg")
  497.   end  
  498.   end
  499.   end
  500. end
  501. end
  502.  
  503.  
  504. function sklep()
  505. while true do
  506. sbc(colors.white)
  507. tc()
  508. sbc(colors.white)
  509. pfb(1, 1, 51, 1, colors.green)
  510. pfb(15, 1, 15, 19, colors.green)
  511. pdp(51, 1, colors.red)
  512. scp(1,1)
  513. sbc(colors.green)
  514. stc(colors.white)
  515. p("nextStore")
  516. sbc(colors.white)
  517. stc(colors.black)
  518. p("Eksplorator")
  519. p("DGStatistics")
  520. p("ReactorControl")
  521. p("TimeMashine")
  522. p("Kalkulator")
  523. scp(1,18)
  524. p("Wolne miejsce:")
  525. miejsce = math.ceil(fs.getFreeSpace("/")/1024)
  526. w(fs.getFreeSpace("/")/1024, "KB")
  527. shell.exit()
  528. local event, click, x, y = os.pullEvent("mouse_click")
  529. if x>0 and x<16 and y == 2 then ep() end
  530. if x>0 and x<16 and y == 3 then dg() end
  531. if x>0 and x<16 and y == 4 then rc() end
  532. if x>0 and x<16 and y == 5 then tm() end
  533. if x>0 and x<16 and y == 6 then calc() end
  534. if x == 51 and y == 1 then system() end
  535. end
  536. end
  537.  
  538.  
  539. function shop()
  540. pfb(41, 17, 51, 18, colors.black)
  541. stc(colors.white)
  542. scp(41,17)
  543. p("Sklep")
  544. scp(41,18)
  545. p("Wyczysc")
  546. local event, click, x, y = os.pullEvent("mouse_click")
  547. if x>40 and x<52 and y == 17 then sklep() end
  548. if x>40 and x<52 and y == 18 then fs.delete("/nshop/") end
  549. end
  550.  
  551.  
  552. function dysk()
  553. while true do
  554. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black)  end
  555. scp(13,4)
  556. p("Kiedy w stacji bedzie ")
  557. scp(13,5)
  558. p("kompatybilna dyskietka")
  559. scp(13,6)
  560. p("nacisnij OK           ")
  561. scp(13,7)
  562. p("[OK]                  ")
  563. local event, click, x, y = os.pullEvent("mouse_click")
  564. if x>12 and x<17 and y == 7 and fs.exists("/disk/.nsetup") then r("/disk/.nsetup")
  565. elseif x>12 and x<17 and y == 7 and not fs.exists("/disk/.nsetup") then scp(13,8) stc(colors.white) sbc(colors.red) p("Blad! Nie znaleziono instalatora") s(2) system()
  566. else s(1) system()
  567. end
  568. end
  569. end
  570.  
  571. function pierwszeu2()
  572. if fs.exists("/os/.log1") and fs.exists("/os/.log2") and fs.exists("/os/.tapus") then logo()
  573. else
  574. while true do
  575. tc()
  576. sbc(colors.white)
  577. tc()
  578. sbc(colors.white)
  579. stc(colors.black)
  580. scp(1,1)
  581. p("Konfiguracja NextUI      Krok 2/2")
  582. p("Witamy w NextUI!")
  583. p("Wybierz tapete Twojego pulpitu NextUI.")
  584. p("NextUI | Prosta")
  585. local event, click, x, y = os.pullEvent("mouse_click")
  586. if x>0 and x<8 and y == 4 then
  587.   fs.delete("/os/.pulpit")
  588.   fs.delete("/os/.tapus")
  589.   r("pastebin get KCNCwuj3 /os/.pulpit")
  590.   r("pastebin get DxMvUVHx /os/.tapus")
  591.   p("Konfiguracja NextUI zostala zakonczona.")
  592.   s(1)
  593.   system()
  594. end
  595. if x>8 and x<16 and y == 5 then
  596.   fs.delete("/os/.pulpit")
  597.   fs.delete("/os/.tapus")
  598.   r("pastebin get vwG8AryW /os/.pulpit")
  599.   r("pastebin get uTedutxS /os/.tapus")
  600.   p("Konfiguracja NextUI zostala zakonczona.")
  601.   s(1)
  602.   system()
  603. end
  604. end
  605. end
  606. end
  607.  
  608.  
  609. function pierwszeu()
  610. if fs.exists("/os/.log1") and fs.exists("/os/.log2") then pierwszeu2()
  611. else
  612. tc()
  613. sbc(colors.white)
  614. tc()
  615. sbc(colors.white)
  616. stc(colors.black)
  617. scp(1,1)
  618. p("Konfiguracja NextUI      Krok 1/2")
  619. p("Witamy w NextUI!")
  620. p("Wpisz nazwe uzytkownika:")
  621. w("")
  622. uzytkownik = read()
  623. p("Wpisz haslo: ")
  624. w("")
  625. haslo = read()
  626. local p = fs.open("/os/.log1", "w")
  627. p.write(uzytkownik)
  628. p.close()
  629. local h = fs.open("/os/.log2", "w")
  630. h.writeLine(haslo)
  631. h.close()
  632. print("Ponowne uruchamianie....")
  633. sleep(1)
  634. os.reboot()
  635. end
  636. end
  637.  
  638.  
  639. function logobraz()
  640. pfb(1, 1, 51, 5, colors.blue)
  641. pfb(1, 6, 51, 14, colors.lightBlue)
  642. pfb(1, 15, 51, 19, colors.blue)
  643. pfb(15, 7, 17, 9, colors.gray)
  644. scp(1,1)
  645. p("Logowanie NextUI")
  646. scp(1,2)
  647. p("Prosze wpisac dwukrotnie haslo.")
  648. end
  649.  
  650.  
  651. function pliki()
  652.  local u = fs.open("/os/.log1", "r")
  653.  user = u.readLine()
  654.  u.close()
  655.  local h = fs.open("/os/.log2", "r")
  656.  pass = h.readLine()
  657.  h.close()
  658. end
  659.  
  660.  
  661. function log()
  662. if pass == "" then system() else
  663. sbc(colors.lightBlue)
  664. stc(colors.white)
  665. scp(18,7)
  666. p(user)
  667. scp(18,8)
  668. w("")
  669. haslo = read()
  670. if haslo == pass then ok = 1 else scp(18,9) stc(colors.red) p("Bledne haslo") s(2) re() end
  671. end
  672. end
  673.  
  674.  
  675. function logo()
  676. logobraz()
  677. pliki()
  678. log()
  679. end
  680.  
  681.  
  682. function kolor()
  683. local col = fs.open("/os/.kol", "r")
  684. colr = col.readLine()
  685. col.close()
  686. end
  687.  
  688.  
  689. function kolorw()
  690. scp(1,5)
  691. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  692. p("Obecny kolor wiodacy: ", colr)
  693. p("Wybierz nowy kolor wiodacy:")
  694. pdp(1, 7, colors.orange)
  695. pdp(2, 7, colors.lightBlue)
  696. pdp(3, 7, colors.yellow)
  697. pdp(4, 7, colors.lime)
  698. pdp(5, 7, colors.pink)
  699. pdp(6, 7, colors.gray)
  700. pdp(7, 7, colors.lightGray)
  701. pdp(8, 7, colors.purple)
  702. pdp(9, 7, colors.blue)
  703. pdp(10, 7, colors.brown)
  704. pdp(11, 7, colors.green)
  705. pdp(12, 7, colors.red)
  706. pdp(13, 7, colors.black)
  707. pdp(14, 7, colors.white)
  708. local event, click, x, y = os.pullEvent("mouse_click")
  709. if x == 1 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.orange") colw.close() end
  710. if x == 2 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.lightBlue") colw.close() end
  711. if x == 3 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.yellow") colw.close() end
  712. if x == 4 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.lime") colw.close() end
  713. if x == 5 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.pink") colw.close() end
  714. if x == 6 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.gray") colw.close() end
  715. if x == 7 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.lightGray") colw.close() end
  716. if x == 8 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.purple") colw.close() end
  717. if x == 9 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.blue") colw.close() end
  718. if x == 10 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.brown") colw.close() end
  719. if x == 11 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.green") colw.close() end
  720. if x == 12 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.red") colw.close() end
  721. if x == 13 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.black") colw.close() end
  722. if x == 14 and y == 7 then r("rm /os/.kol") local colw = fs.open("/os/.kol", "w") colw.writeLine("colors.white") colw.close() end
  723. end
  724.  
  725.  
  726. function getSize(path)
  727.   local size = 0
  728.   for _, file in ipairs(fs.list(path)) do
  729.     if fs.isDir(fs.combine(path, file)) then
  730.       size = size + getSize(fs.combine(path, file))
  731.     else
  732.       size = size + fs.getSize(fs.combine(path, file))
  733.     end
  734.   end
  735.   return size
  736. end
  737.  
  738.  
  739. local wer = fs.open("/os/.ver", "r")
  740. ver = wer.readLine()
  741. wer.close()
  742.  
  743.  
  744. function ust()
  745. while true do
  746. kolor()
  747. tc()
  748. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  749. tc()
  750. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  751. pfb(1, 1, 50, 1, colors.blue)
  752. pdp(51, 1, colors.red)
  753. pol()
  754. sbc(colors.blue)
  755. stc(colors.white)
  756. scp(1,1)
  757. p("Ustawienia")
  758. stc(colors.black)
  759. scp(1,2)
  760. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  761. p("Informacje i ustawienia | Biurko")
  762. local event, click, x, y = os.pullEvent("mouse_click")
  763. if x == 51 and y == 1 then system() end
  764. if x>0 and x<20 and y == 1 then tryb = 4 end
  765. if x>0 and x<25 and y == 2 then tryb = 1 end
  766. if x>24 and x<33 and y == 2 then tryb = 3 end
  767. scp(1,3)
  768. if tryb == 1 then
  769.  scp(1,3)
  770. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  771.  p("MineCore Hybrid OS NextUI")
  772.  p("Wersja systemu: 1.7 2nd UI Update")
  773.  zajete = math.ceil(getSize("/")/1024)
  774.  wolne = math.ceil(fs.getFreeSpace("/")/1024)
  775.  p("Wolne miejsce na dysku:", wolne, "KB")
  776.  print(zajete, "KB uzyte")
  777.  p("[Aktualizacja systemu]")
  778.  p("Jezyk systemu: ", "polski")
  779.  p("Dostepny jezyk: ", "angielski / English")
  780.  p("Zmien jezyk")
  781.  p("Wiersz polecen")
  782.  p("Logowanie wlaczone: ")
  783.  if pass == "" then print("Nie") else print("Tak") end
  784.  p("Obecna nazwa komputera: ", os.getComputerLabel())
  785.  p("Zmien nazwe komptutera")
  786.  local event, click, x, y = os.pullEvent("mouse_click")
  787.  if x>0 and x<20 and y == 7 then r("/os/.update") end
  788.  if x>0 and x<20 and y == 10 then r("pastebin run JQvW06m6") end
  789.  if x>0 and x<20 and y == 11 then cmd() end
  790.  if x>0 and x<20 and y == 15 then
  791.   scp(1,16)
  792.   w("Wpisz nowa nazwe: ")
  793.   nazwa = read()
  794.   os.setComputerLabel(nazwa)
  795.   end
  796. end
  797. if tryb == 3 then
  798. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  799.  scp(1,3)
  800.  p("Styl graficzny: Domyslny NextUI")
  801.  p("Brak dostepnych stylow")
  802.  p("Wybierz kolor wiodacy")
  803.  scp(1,8)
  804.  p("Ustawienia tapety")
  805.  local event, click, x, y = os.pullEvent("mouse_click")
  806.  if x>0 and x<25 and y == 5 then kolorw() end
  807.  if x>0 and x<25 and y == 8 then tapetaust() end
  808. end
  809. if tryb == 4 then
  810.  pfb(1,2,15,3, colors.gray)
  811.  stc(colors.white)
  812.  scp(1,2)
  813.  p("Ustawienia NextUI")
  814.  p("2019 Microcraft")
  815.  local event, click, x, y = os.pullEvent("mouse_click")
  816. end
  817. end
  818. end
  819.  
  820.  
  821. function ikony()
  822. tc()
  823. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.green) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.white) elseif colr == "colors.black" then sbc(colors.black) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  824. tc()
  825. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.green) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.white) elseif colr == "colors.black" then sbc(colors.black) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  826. stc(colors.white)
  827. pfb(1, 1, 51, 1, colors.gray)
  828. pdp(51, 1, colors.red)
  829. sbc(colors.gray)
  830. scp(1,1)
  831. p("Tworzenie ikon NextUI")
  832. scp(1,2)
  833. stc(colors.white)
  834. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  835. p("Witamy w kreatorze ikon. Wybierz miejsce na ikone:")
  836. if fs.exists("/os/iko/.ico1") then iko1 = "Zajete" else iko1 = "Wolne" end
  837. if fs.exists("/os/iko/.ico2") then iko2 = "Zajete" else iko2 = "Wolne" end
  838. if fs.exists("/os/iko/.ico3") then iko3 = "Zajete" else iko3 = "Wolne" end
  839. if fs.exists("/os/iko/.ico4") then iko4 = "Zajete" else iko4 = "Wolne" end
  840. if fs.exists("/os/iko/.ico5") then iko5 = "Zajete" else iko5 = "Wolne" end
  841. if fs.exists("/os/iko/.ico6") then iko6 = "Zajete" else iko6 = "Wolne" end
  842. if fs.exists("/os/iko/.ico7") then iko7 = "Zajete" else iko7 = "Wolne" end
  843. if fs.exists("/os/iko/.ico8") then iko8 = "Zajete" else iko8 = "Wolne" end
  844. if iko1 == "Wolne" then pfb(1, 7, 2, 8, colors.lime) else pfb(1, 7, 2, 8, colors.red) end
  845. if iko2 == "Wolne" then pfb(4, 7, 5, 8, colors.lime) else pfb(4, 7, 5, 8, colors.red) end
  846. if iko3 == "Wolne" then pfb(7, 7, 8, 8, colors.lime) else pfb(7, 7, 8, 8, colors.red) end
  847. if iko4 == "Wolne" then pfb(10, 7, 11, 8, colors.lime) else pfb(10, 7, 11, 8, colors.red) end
  848. if iko5 == "Wolne" then pfb(13, 7, 14, 8, colors.lime) else pfb(13, 7, 14, 8, colors.red) end
  849. if iko6 == "Wolne" then pfb(16, 7, 17, 8, colors.lime) else pfb(16, 7, 17, 8, colors.red) end
  850. if iko7 == "Wolne" then pfb(19, 7, 20, 8, colors.lime) else pfb(19, 7, 20, 8, colors.red) end
  851. if iko8 == "Wolne" then pfb(22, 7, 23, 8, colors.lime) else pfb(22, 7, 23, 8, colors.red) end
  852. local event, click, x, y = os.pullEvent("mouse_click")
  853. if x == 51 and y == 1 then system() end
  854. if x>0 and x<3 and y>6 and y<9 and iko1 == "Zajete" then
  855.  r("rm /os/iko/.ico1")
  856.  ikony()
  857. end
  858. if x>3 and x<6 and y>6 and y<9 and iko2 == "Zajete" then
  859.  r("rm /os/iko/.ico2")
  860.  ikony()
  861. end
  862. if x>6 and x<9 and y>6 and y<9 and iko3 == "Zajete" then
  863.  r("rm /os/iko/.ico3")
  864.  ikony()
  865. end
  866. if x>9 and x<12 and y>6 and y<9 and iko4 == "Zajete" then
  867.  r("rm /os/iko/.ico4")
  868.  ikony()
  869. end
  870. if x>12 and x<15 and y>6 and y<9 and iko5 == "Zajete" then
  871.  r("rm /os/iko/.ico5")
  872.  ikony()
  873. end
  874. if x>15 and x<18 and y>6 and y<9 and iko6 == "Zajete" then
  875.  r("rm /os/iko/.ico6")
  876.  ikony()
  877. end
  878. if x>18 and x<21 and y>6 and y<9 and iko7 == "Zajete" then
  879.  r("rm /os/iko/.ico7")
  880.  ikony()
  881. end
  882. if x>21 and x<24 and y>6 and y<9 and iko8 == "Zajete" then
  883.  r("rm /os/iko/.ico8")
  884.  ikony()
  885. end
  886. scp(1,10)
  887. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  888. w("Wpisz sciezkie do pliku: ")
  889. sciezka = read()
  890. if x>0 and x<3 and y>6 and y<9 and iko1 == "Wolne" then
  891.  local ikon1 = fs.open("/os/iko/.ico1", "w")
  892.  ikon1.writeLine(sciezka)
  893.  ikon1.close()
  894. end
  895. if x>3 and x<6 and y>6 and y<9 and iko2 == "Wolne" then
  896.  local ikon2 = fs.open("/os/iko/.ico2", "w")
  897.  ikon2.writeLine(sciezka)
  898.  ikon2.close()
  899. end
  900. if x>6 and x<8 and y>6 and y<9 and iko3 == "Wolne" then
  901.  local ikon3 = fs.open("/os/iko/.ico3", "w")
  902.  ikon3.writeLine(sciezka)
  903.  ikon3.close()
  904. end
  905. if x>9 and x<12 and y>6 and y<9 and iko4 == "Wolne" then
  906.  local ikon4 = fs.open("/os/iko/.ico4", "w")
  907.  ikon4.writeLine(sciezka)
  908.  ikon4.close()
  909. end
  910. if x>12 and x<15 and y>6 and y<9 and iko5 == "Wolne" then
  911.  local ikon5 = fs.open("/os/iko/.ico5", "w")
  912.  ikon5.writeLine(sciezka)
  913.  ikon5.close()
  914. end
  915. if x>15 and x<18 and y>6 and y<9 and iko6 == "Wolne" then
  916.  local ikon6 = fs.open("/os/iko/.ico6", "w")
  917.  ikon6.writeLine(sciezka)
  918.  ikon6.close()
  919. end
  920. if x>18 and x<21 and y>6 and y<9 and iko7 == "Wolne" then
  921.  local ikon7 = fs.open("/os/iko/.ico7", "w")
  922.  ikon7.writeLine(sciezka)
  923.  ikon7.close()
  924. end
  925. if x>21 and x<24 and y>6 and y<9 and iko8 == "Wolne" then
  926.  local ikon8 = fs.open("/os/iko/.ico8", "w")
  927.  ikon8.writeLine(sciezka)
  928.  ikon8.close()
  929. end
  930. end
  931.  
  932.  
  933. function pulpit()
  934. kolor()
  935. pol()
  936. pfb(1, h, w, h, colors.blue)
  937. pdp(w, h, colors.orange)
  938. scp(1,h)
  939. stc(colors.white)
  940. sbc(colors.black)
  941. w("Start")
  942. stc(colors.black)
  943. scp(1,1)
  944. p("NextUI 1.8 Developers Update. Microcraft")
  945. end
  946.  
  947.  
  948. function start()
  949. pfb(1, h-8, 20, h-1, colors.white)
  950. scp(1,h-9)
  951. stc(colors.white)
  952. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.white) stc(colors.black) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  953. p("NextUI Start        ")
  954. scp(1,11)
  955. if colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.black) stc(colors.white) else sbc(colors.white) stc(colors.black) end
  956. p("Zainstaluj z dysku  ")
  957. p("Paint               ")
  958. p("2048                ")
  959. p("Snake               ")
  960. p("Edytor              ")
  961. p("Powrot do CraftOS   ")
  962. p("Ustawienia          ")
  963. p("Ikony pulpitu       ")
  964. local event, click, x, y = os.pullEvent("mouse_click")
  965. if x>0 and x<21 and y == h-8 then dysk() end
  966. if x>0 and x<21 and y == h-1 then ikony() end
  967. if x>0 and x<21 and y == h-3 then error() end
  968. if x>0 and x<21 and y == h-5 then sbc(colors.black) r("worm") end
  969. if x>0 and x<21 and y == h-7 then r("/os/.paint") end
  970. if x>0 and x<21 and y == h-2 then nust() end
  971. if x>0 and x<21 and y == h-6 then r("/os/.2048") end
  972. if x>0 and x<21 and y == h-4 then r("/os/.luaide") end
  973. end
  974.  
  975. function mysz()
  976. local event, click, x, y = os.pullEvent("mouse_click")
  977. suw = w-1
  978. -- if x>20 and x<38 and y == 19 then apps() end
  979. if x == suw and y == h then su() end
  980. if x == w and y == h then re() end
  981. if x>0 and x<6 and y == h then start() end
  982. end
  983.  
  984. function nust()
  985. while true do
  986. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  987. tc()
  988. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  989. pfb(1, 19, 51, 19, colors.blue)
  990. scp(1,19)
  991. sbc(colors.green)
  992. stc(colors.white)
  993. w("Start")
  994. pdp(50,19, colors.red)
  995. pdp(51,19, colors.orange)
  996. pfb(1, 1, 51, 1, colors.blue)
  997. scp(1,1)
  998. p("Ustawienia NextUI")
  999. pdp(51,1, colors.red)
  1000. pfb(3, 4, 13, 6, colors.orange)
  1001. scp(3,5)
  1002. stc(colors.white)
  1003. p("Informacje")
  1004. pfb(27, 4, 37, 6, colors.cyan)
  1005. scp(27,5)
  1006. stc(colors.white)
  1007. p("Biurko")
  1008. pfb(15, 4, 25, 6, colors.green)
  1009. scp(15,5)
  1010. stc(colors.white)
  1011. p("Ustawienia")
  1012. pfb(39, 4, 49, 6, colors.red)
  1013. scp(39,5)
  1014. stc(colors.white)
  1015. p("Aplikacje")
  1016. local event, click, x, y = os.pullEvent("mouse_click")
  1017. if x == 51 and y == 1 then system() end
  1018. if x>0 and x<6 and y == 19 then start() end
  1019. if x>2 and x<14 and y>3 and y<7 then infust() end
  1020. if x>14 and x<26 and y>3 and y<7 then setust() end
  1021. if x>26 and x<38 and y>3 and y<7 then deskust() end
  1022. if x>38 and x<50 and y>3 and y<7 then apps() end
  1023. end
  1024. end
  1025.  
  1026. function infust()
  1027. while true do
  1028. kolor()
  1029. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1030. tc()
  1031. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1032. pfb(1, 1, 51, 1, colors.blue)
  1033. scp(1,1)
  1034. stc(colors.white)
  1035. p("Ustawienia NextUI")
  1036. pdp(51,1, colors.red)
  1037. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1038. scp(1,2)
  1039. p("Microcraft NextUI")
  1040. p("Wersja systemu: 1.7 2nd UI Update")
  1041. zajete = math.ceil(getSize("/")/1024)
  1042. wolne = math.ceil(fs.getFreeSpace("/")/1024)
  1043. p("Wolne miejsce na dysku:", wolne, "KB")
  1044. p("Obecna nazwa komputera: ", os.getComputerLabel())
  1045. if pass == "" then log = "nie" else log = "tak" end
  1046. p("Logowanie wlaczone: ", log)
  1047. local event, click, x, y = os.pullEvent("mouse_click")
  1048. if x == 51 and y == 1 then nust() end
  1049. end
  1050. end
  1051.  
  1052. function deskust()
  1053. while true do
  1054. kolor()
  1055. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1056. tc()
  1057. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1058. pfb(1, 1, 51, 1, colors.blue)
  1059. scp(1,1)
  1060. stc(colors.white)
  1061. p("Ustawienia NextUI")
  1062. pdp(51,1, colors.red)
  1063. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1064.  scp(1,2)
  1065.  p("Styl graficzny: Domyslny NextUI")
  1066.  p("Brak dostepnych stylow")
  1067.  p("Wybierz kolor wiodacy")
  1068.  scp(1,8)
  1069.  p("Ustawienia tapety")
  1070.  local event, click, x, y = os.pullEvent("mouse_click")
  1071.  if x>0 and x<25 and y == 4 then kolorw() end
  1072.  if x>0 and x<25 and y == 8 then tapetaust() end
  1073.  if x == 51 and y == 1 then nust() end
  1074. end
  1075. end
  1076.  
  1077.  
  1078. -- pastebin run JQvW06m6
  1079.  
  1080. function setust()
  1081. while true do
  1082. kolor()
  1083. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1084. tc()
  1085. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1086. pfb(1, 1, 51, 1, colors.blue)
  1087. scp(1,1)
  1088. stc(colors.white)
  1089. p("Ustawienia NextUI")
  1090. pdp(51,1, colors.red)
  1091. if colr == "colors.orange" then sbc(colors.orange) elseif colr == "colors.magneta" then sbc(colors.magneta) elseif colr == "colors.lightBlue" then sbc(colors.lightBlue) elseif colr == "colors.yellow" then sbc(colors.yellow) elseif colr == "colors.lime" then sbc(colors.lime) elseif colr == "colors.pink" then sbc(colors.pink) elseif colr == "colors.gray" then sbc(colors.gray) elseif colr == "colors.lightGray" then sbc(colors.lightGray) elseif colr == "colors.purple" then sbc(colors.purple) elseif colr == "colors.blue" then sbc(colors.blue) elseif colr == "colors.brown" then sbc(colors.brown) elseif colr == "colors.green" then sbc(colors.green) elseif colr == "colors.red" then sbc(colors.red) elseif colr == "colors.black" then sbc(colors.black) stc(colors.white) elseif colr == "colors.white" then sbc(colors.white) stc(colors.black) end
  1092. p("Zmien nazwe komputera")
  1093. p("Aktualizuj system")
  1094. p("Wiersz polecen")
  1095. p("Zmien jezyk")
  1096. local event, click, x, y = os.pullEvent("mouse_click")
  1097. if x>0 and x<20 and y == 2 then
  1098.  scp(1,2)
  1099.   w("Wpisz nowa nazwe: ")
  1100.   nazwa = read()
  1101.   os.setComputerLabel(nazwa)
  1102.   setust()
  1103. end
  1104. if x>0 and x<20 and y == 3 then r("/os/.update") end
  1105. if x>0 and x<20 and y == 4 then cmd() end
  1106. if x>0 and x<20 and y == 5 then r("pastebin run JQvW06m6") end
  1107. if x == 51 and y == 1 then nust() end
  1108. end
  1109. end
  1110. function system()
  1111. while true do
  1112. kolor()
  1113. pulpit()
  1114. mysz()
  1115. end
  1116. end
  1117.  
  1118.  
  1119. pierwszeu()
  1120.  
  1121. logo()
  1122.  
  1123. system()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement