View difference between Paste ID: DTMupzhT and QwfhDHmE

 local component, computer = component, computer
 if require then component = require "component" computer = require "computer" end
-local wlan = component.proxy(component.list "modem"())
+local netcards = {}
-local computer_peripheral = component.proxy(component.list "computer"())
+for addr in component.list "modem" do table.insert(netcards, component.proxy(addr)) end
-local reactor = component.proxy(component.list "nc_fusion_reactor"())
+local tunnels = {}
-local gpu = component.proxy(component.list "gpu"())
+for addr in component.list "tunnel" do table.insert(tunnels, component.proxy(addr)) end
-local screen = component.list "screen"()
+local computer_id = component.list "computer"()
-gpu.bind(screen)
+local computer_peripheral = component.proxy(computer_id)
-wlan.setWakeMessage("poweron", true)
+local computer_sid = computer_id:sub(1, 8)
 local eeprom = component.proxy(component.list "eeprom"())
-local function display(txt)
+
-	local w, h = gpu.getResolution()
+computer_peripheral.beep(600)
-	gpu.set(1, 1, txt .. (" "):rep(w - #txt))
+
 local recents = {}
 
-local function sleep(timeout)
+local PORT = 4096
-	local deadline = computer.uptime() + (timeout or 0)
+local DBG_PORT = 4097
-	repeat
+
-		computer.pullSignal(deadline - computer.uptime())
+for _, card in pairs(netcards) do
-	until computer.uptime() >= deadline
+	card.open(PORT)
 	card.open(DBG_PORT)
 	card.setWakeMessage("poweron", true)
 	if card.setStrength then card.setStrength(math.huge) end
-display "Initialized"
+	computer_peripheral.beep(1500)
 end
-local NC_HEAT_CONSTANT = 1218.76
+for _, tun in pairs(tunnels) do tun.setWakeMessage("poweron", true) computer_peripheral.beep(1200) end
 
-local last = nil
+
 
 while true do
-	local target_temp = reactor.getFusionComboHeatVariable() * NC_HEAT_CONSTANT * 1000
+	local ev, _, _, port, distance, mtxt, mid = computer.pullSignal(5)
-	local temp = reactor.getTemperature()
+	if ev == "modem_message" and type(mid) == "string" and mtxt ~= nil and (port == PORT or port == 0) and not recents[mid] then
-	display(("%f %f"):format(temp / target_temp, reactor.getEfficiency()))
+		recents[mid] = computer.uptime() + 120
-	local too_high = temp > target_temp
+		for _, card in pairs(netcards) do
-	if too_high then
+			pcall(card.broadcast, PORT, mtxt, mid, computer_sid)
-		if too_high ~= last then computer_peripheral.beep(800) end
+		end
-		reactor.deactivate()
+		for _, tun in pairs(tunnels) do
-	else
+			pcall(tun.send, mtxt, mid, computer_sid)
-		if too_high ~= last then computer_peripheral.beep(500) end
+		end
-		reactor.activate()
+
 	if ev == "modem_message" and type(mtxt) == "string" and port == DBG_PORT and distance < 8 then
-	last = too_high
+		if mtxt == "ping" then
-	wlan.broadcast(1111, "poweron")
+			computer_peripheral.beep(1000)
-	sleep(0.5)
+			card.broadcast(DBG_PORT, computer_sid)
 		elseif mtxt == "flash" and type(mid) == "string" then
 			computer_peripheral.beep(800)
 			eeprom.set(mid)
 		end
 	end
 	local uptime = computer.uptime()
 	for mid, deadline in pairs(recents) do
 		if uptime > deadline then
 			recents[mid] = nil
 		end
 	end
 end