Advertisement
RLPGhost

Lua Monitor Reactor

Mar 20th, 2015
227
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 5.24 KB | None | 0 0
  1. local mon = peripheral.wrap("right")
  2. local wifi = peripheral.wrap("back")
  3.  
  4. wifi.closeAll()
  5.  
  6. wifi.open(2)
  7.  
  8.  
  9. mon.clear()
  10. mon.setTextColor(colors.white)
  11. mon.setCursorPos(1,1)
  12. mon.write("Information:")
  13.  
  14. function getColor(var)
  15. if var then
  16.  return colors.green
  17.  else
  18.  return colors.red
  19. end
  20. end
  21.  
  22.  
  23.  
  24. while true do
  25.  
  26.   local event, modemSide, senderChannel, replyChannel, message, senderDistance = os.pullEvent("modem_message")
  27.  
  28.   -- local tableau = {reacteur = reactor.getActive(), barreLevel = reactor.getControlRodLevel(1),conso = reactor.getFuelConsumedLastTick() ,
  29.   --                  steam = amount , capacity = cap , percent = percentfull, turbine = turbine.getActive() , rpm = rpmTurbine , electroAimant = turbine.getInductorEngaged() ,
  30.   --                  energy = capacitorEnergy, energyMax = capacitorEnergyMax , celpercent = percentcelule , energyProduct = turbine.getEnergyProducedLastTick()}
  31.   --}
  32.  
  33.   if senderChannel == 2 then
  34.   local tableau = textutils.unserialize(message)
  35.    
  36.     y = 3
  37.     mon.setTextColor(8)
  38.     mon.setCursorPos(1,y)
  39.     mon.write("Reacteur Info:")
  40.     y = y+1
  41.    
  42.      if tableau.key == reacteur then
  43.         mon.setTextColor(colors.white)
  44.         mon.setCursorPos(1,y)
  45.         mon.write("                                ")
  46.         mon.setCursorPos(1,y)
  47.         mon.write("Reacteur: ")
  48.         mon.setTextColor(getColor(tableau["reacteur"]))
  49.         mon.write(tostring(tableau["reacteur"]))
  50.     end
  51.    
  52.     y = y+1
  53.    
  54.     if tableau.key == barreLevel then
  55.         mon.setTextColor(colors.white)
  56.         mon.setCursorPos(1,y)
  57.         mon.write("                                         ")
  58.         mon.setCursorPos(1,y)
  59.         mon.write("Niveau des Barres: ")
  60.         mon.setTextColor(colors.red)
  61.         mon.write(tostring(tableau["barreLevel"]))
  62.         mon.setTextColor(colors.white)
  63.         mon.write(" %")
  64.     end
  65.    
  66.     y = y+1
  67.    
  68.     if tableau.key == conso then
  69.         mon.setTextColor(colors.white)
  70.         mon.setCursorPos(1,y)
  71.         mon.write("                                         ")
  72.         mon.setCursorPos(1,y)
  73.         mon.write("Conso. Yellowrium: ")
  74.         mon.setTextColor(colors.red)
  75.         mon.write(string.sub (tostring(tableau["conso"]),1,5))
  76.         mon.setTextColor(colors.white)
  77.         mon.write(" mB/t")
  78.     end
  79.    
  80.     y = y+2
  81.    
  82.     mon.setTextColor(8)
  83.     mon.setCursorPos(1,y)
  84.     mon.write("Reservoir Info:")
  85.     y = y+1
  86.    
  87.     if tableau.key == steam then
  88.         mon.setTextColor(colors.white)
  89.         mon.setCursorPos(1,y)
  90.         mon.write("                                                 ")
  91.         mon.setCursorPos(1,y)
  92.         mon.write("Vapeur: ")
  93.         mon.setTextColor(colors.red)
  94.         mon.write(tostring(tableau["steam"]))
  95.         mon.setTextColor(colors.white)
  96.         mon.write(" / ")
  97.         mon.setTextColor(colors.red)
  98.         mon.write(tostring(tableau["capacity"]))
  99.         mon.setTextColor(colors.white)
  100.         mon.write(" mB")
  101.     end
  102.    
  103.     y = y+1
  104.    
  105.     if tableau.key == percent then
  106.         mon.setTextColor(colors.white)
  107.         mon.setCursorPos(1,y)
  108.         mon.write("                                         ")
  109.         mon.setCursorPos(1,y)
  110.         mon.write("Niveau de Remplissage: ")
  111.         mon.setTextColor(colors.red)
  112.         mon.write(tostring(tableau["percent"]))
  113.         mon.setTextColor(colors.white)
  114.         mon.write(" %")
  115.     end
  116.    
  117.     y = y+2
  118.    
  119.     mon.setTextColor(8)
  120.     mon.setCursorPos(1,y)
  121.     mon.write("Turbine Info:")
  122.     y = y+1
  123.    
  124.     if tableau.key == turbine then
  125.         mon.setTextColor(colors.white)
  126.         mon.setCursorPos(1,y)
  127.         mon.write("                                ")
  128.         mon.setCursorPos(1,y)
  129.         mon.write("Turbine: ")
  130.         mon.setTextColor(getColor(tableau["turbine"]))
  131.         mon.write(tostring(tableau["turbine"]))
  132.     end
  133.    
  134.     y = y+1
  135.    
  136.     if tableau.key == rpm then
  137.         mon.setTextColor(colors.white)
  138.         mon.setCursorPos(1,y)
  139.         mon.write("                                         ")
  140.         mon.setCursorPos(1,y)
  141.         mon.write("Vitesse: ")
  142.         mon.setTextColor(colors.red)
  143.         mon.write(tostring(tableau["rpm"]))
  144.         mon.setTextColor(colors.white)
  145.         mon.write(" tr/min")
  146.     end
  147.    
  148.     y = y+1
  149.    
  150.     if tableau.key == electroAimant then
  151.         mon.setTextColor(colors.white)
  152.         mon.setCursorPos(1,y)
  153.         mon.write("                                ")
  154.         mon.setCursorPos(1,y)
  155.         mon.write("Electro Aimant: ")
  156.         mon.setTextColor(getColor(tableau["electroAimant"]))
  157.         mon.write(tostring(tableau["electroAimant"]))
  158.     end
  159.    
  160.     y = y+1
  161.    
  162.     if tableau.key == energyProduct then
  163.         mon.setTextColor(colors.white)
  164.         mon.setCursorPos(1,y)
  165.         mon.write("                                         ")
  166.         mon.setCursorPos(1,y)
  167.         mon.write("Production: ")
  168.         mon.setTextColor(colors.red)
  169.         mon.write(tostring(tableau["energyProduct"]))
  170.         mon.setTextColor(colors.white)
  171.         mon.write(" RF/t")
  172.     end
  173.    
  174.     y = y+2
  175.    
  176.     mon.setTextColor(8)
  177.     mon.setCursorPos(1,y)
  178.     mon.write("Celule info: ")
  179.     mon.setTextColor(colors.white)
  180.     mon.write("( ")
  181.     mon.setTextColor(colors.red)
  182.     mon.write(tostring(tableau["celpercent"]))
  183.     mon.setTextColor(colors.white)
  184.     mon.write(" %)")
  185.    
  186.    
  187.     y = y+1
  188.    
  189.     if tableau.key == energy then
  190.         mon.setTextColor(colors.white)
  191.         mon.setCursorPos(1,y)
  192.         mon.write("                                                 ")
  193.         mon.setCursorPos(1,y)
  194.         mon.write("Energy: ")
  195.         mon.setTextColor(colors.red)
  196.         mon.write(tostring(math.floor(tableau["energy"]/1000)))
  197.         mon.setTextColor(colors.white)
  198.         mon.write(" / ")
  199.         mon.setTextColor(colors.red)
  200.         mon.write(tostring(tableau["energyMax"]/1000))
  201.         mon.setTextColor(colors.white)
  202.         mon.write(" kRF")
  203.        
  204.        
  205.     end
  206.  
  207.   end
  208.   sleep(2)
  209. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement