marko_rus

sentry control

Dec 21st, 2018
480
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 3.52 KB | None | 0 0
  1. local com =require("component")
  2. local mval = 1
  3. local val = 1
  4. local adr = {}
  5. local lvl = {}
  6. local t = {}
  7. local uptimem = 0
  8. local uptimes = 0
  9. local gpu =com.gpu
  10. local x, y =gpu.maxResolution()
  11. local i = 0
  12. local event =require("event")
  13. local oldenergy = {}
  14. local term =require("term")
  15. local math =require("math")
  16. local buffer
  17. local btn
  18.  
  19. for k,v in com.list("tier") do
  20. table.insert(adr, k)
  21. table.insert(lvl, v)
  22. mval =mval+1
  23. end
  24. tlvl = {}
  25.  
  26. term.clear()
  27. function onTimer()
  28.  
  29. uptimes =uptimes+1
  30. if uptimes == 60 then
  31. uptimem =uptimem+1
  32. uptimes =0
  33. end
  34.  
  35. term.setCursor(1,1)
  36. gpu.setBackground(0x0000FF)
  37. gpu.setForeground(0xFFFFFF)
  38. gpu.fill(1, 1, x, 1, " ")
  39. print("системы безопасности MJ12.  аптайм: " .. uptimem .. " минут и " .. uptimes .. " секунд")
  40.  
  41. gpu.setBackground(0xffd7a3)
  42. gpu.setForeground(0x000000)
  43. end
  44.  
  45. function flags(b)
  46. local text = ""
  47. if (t[b].isAttacksMobs()) then
  48. text = "атакует мобов: да    "
  49. else text = "атакует мобов: нет    "
  50. end
  51.  
  52. if (t[b].isAttacksNeutrals()) then
  53. text =text .. "атакует неутральные цели: да    "
  54. else text =text .. "атакует неутральные цели: нет    "
  55. end
  56.  
  57. if (t[b].isAttacksPlayers()) then
  58. text =text .. "атакует игроков: да"
  59. else text =text .. "атакует игроков: нет"
  60. end
  61. return text
  62. end
  63.  
  64. event.timer(1, onTimer, math.huge)
  65. gpu.setBackground(0x0000FF)
  66. print("системы безопасности MJ12.  аптайм: " .. uptimem .. " минут и " .. uptimes .. " секунд")
  67. gpu.setBackground(0xffd7a3)
  68.  
  69. function dspl(a)
  70. print("--------------------------------------------------------------------------------")
  71. print("турель " .. a)
  72.  
  73. print("адрес: " .. adr[a])
  74. print("Макс. энергии: " .. t[a].getMaxEnergyStorage() .. "RF")
  75. print("Текущее к-во энергии: " .. t[a].getCurrentEnergyStorage() .. "RF(" .. t[a].getCurrentEnergyStorage()/((t[a].getMaxEnergyStorage())/100) .. "%)")
  76. print (flags(a))
  77.  
  78. gpu.setBackground(0xffd7a3)
  79. print("--------------------------------------------------------------------------------")
  80. end
  81.  
  82.  function idk()
  83. dspl(val)
  84.  
  85. val =val+1
  86.  
  87. end
  88.  
  89.  
  90. while val < mval do
  91. t[val] = com.proxy(adr[val])
  92.  
  93. val = val+1
  94. end
  95. val = 1
  96.  
  97. gpu.setForeground(0x000000)
  98. gpu.fill(1, 2, x, y-1, " ")
  99. while val ~= mval do
  100. idk()
  101.  
  102.  
  103. end
  104.  
  105. term.setCursor((x/2-13), y-2)
  106. gpu.setBackground(0x0000FF)
  107. gpu.setForeground(0xFFFFFF)
  108. print("страница 1 из 1")
  109. print("О программе(a)  Помощь(F1)  Настройки целей(s)  Список доверенных игроков(p)")
  110. term.setCursor(2, 1)
  111. gpu.setBackground(0xffd7a3)
  112. gpu.setForeground(0x000000)
  113. while true do
  114.  
  115. while val ~= mval do
  116. idk()
  117.  
  118. end
  119.  
  120. val = 1
  121. _, _, btn, _, _ = event.pull(1, "key_down")
  122. while val ~=mval do
  123.  
  124. if (val == 1) then
  125. term.setCursor(1, 6*val)
  126. else term.setCursor(1,6+7*(val-1))
  127. end
  128. if  t[val].getCurrentEnergyStorage()/((t[val].getMaxEnergyStorage())/100) > 10 then
  129. --_, buffer =term.getCursor()
  130. gpu.setBackground(0xFFFF00)
  131. --gpu.fill(1, buffer, x, 1, " ")
  132.  
  133. else gpu.setBackground(0xFF0000) end
  134.  
  135. if t[val].getCurrentEnergyStorage()/((t[val].getMaxEnergyStorage())/100) > 30 then
  136.  gpu.setBackground(0x00FF00)
  137. end
  138. _, buffer =term.getCursor()
  139. gpu.fill(1, buffer, x, 1, " ")
  140. print("Текущее к-во энергии: " .. t[val].getCurrentEnergyStorage() .. "RF(" .. t[val].getCurrentEnergyStorage()/((t
  141. [val].getMaxEnergyStorage())/100) .. "%)" .. mval)
  142. gpu.setBackground(0xffd7a3)
  143. val =val+1
  144.  
  145. end
  146. end
Add Comment
Please, Sign In to add comment