View difference between Paste ID: MuYLBvtc and jq2cVdTw

-local component = require("component")
+local component = require("component")
-local event = require("event")
+local event = require("event")
-local serialization= require("serialization")
+local serialization= require("serialization")
-local computer= require("computer")
+local computer= require("computer")
-local modem = component.modem
+local modem = component.modem
-radar = component.radar
+radar = component.radar
-
+
-modem.open(2412)
+modem.open(2412)
-modem.broadcast(2412,"Qr= component.proxy(component.list('radar')())")
+modem.broadcast(2412,"Qr= component.proxy(component.list('radar')())")
-modem.broadcast(2412,"Qn= component.proxy(component.list('navigation')())")
+modem.broadcast(2412,"Qn= component.proxy(component.list('navigation')())")
-modem.broadcast(2412,"Qd= component.proxy(component.list('drone')())")
+modem.broadcast(2412,"Qd= component.proxy(component.list('drone')())")
-modem.broadcast(2412,"function sleep(timeout) checkArg(1, timeout, 'number', 'nil') local deadline = computer.uptime() + (timeout or 0) repeat computer.pullSignal(deadline - computer.uptime()) until computer.uptime() >= deadline end")
+modem.broadcast(2412,"function sleep(timeout) checkArg(1, timeout, 'number', 'nil') local deadline = computer.uptime() + (timeout or 0) repeat computer.pullSignal(deadline - computer.uptime()) until computer.uptime() >= deadline end")
-modem.broadcast(2412,"e_coords={0,0,0} ")
+modem.broadcast(2412,"e_coords={0,0,0} ")
-
+
-modem.broadcast(2412,"local function getEntityCoord(e_name) for k,v in ipairs(Qr.getEntities()) do if v.name == e_name then return 1 end end return 0 end")
+modem.broadcast(2412,"local function getEntityCoord(e_name) for k,v in ipairs(Qr.getEntities()) do if v.name == e_name then return 1 end end return 0 end")
-
+
-modem.open(2013)
+modem.open(2013)
-modem.broadcast(2013,"Sr= component.proxy(component.list('radar')())")
+modem.broadcast(2013,"Sr= component.proxy(component.list('radar')())")
-modem.broadcast(2013,"Sn= component.proxy(component.list('navigation')())")
+modem.broadcast(2013,"Sn= component.proxy(component.list('navigation')())")
-modem.broadcast(2013,"Sd= component.proxy(component.list('drone')())")
+modem.broadcast(2013,"Sd= component.proxy(component.list('drone')())")
-modem.broadcast(2013,"function sleep(timeout) checkArg(1, timeout, 'number', 'nil') local deadline = computer.uptime() + (timeout or 0) repeat computer.pullSignal(deadline - computer.uptime()) until computer.uptime() >= deadline end")
+modem.broadcast(2013,"function sleep(timeout) checkArg(1, timeout, 'number', 'nil') local deadline = computer.uptime() + (timeout or 0) repeat computer.pullSignal(deadline - computer.uptime()) until computer.uptime() >= deadline end")
-
+
-local function sleep(timeout) checkArg(1, timeout, "number", "nil")
+local function sleep(timeout) checkArg(1, timeout, "number", "nil")
-  local deadline = computer.uptime() + (timeout or 0)
+  local deadline = computer.uptime() + (timeout or 0)
-  repeat
+  repeat
-    computer.pullSignal(deadline - computer.uptime())
+    computer.pullSignal(deadline - computer.uptime())
-  until computer.uptime() >= deadline
+  until computer.uptime() >= deadline
 end
-
+
-local Qcommand = "while true do local _,_,_port,_,brk =event.pull('modem_message') if port==2412 and brk == 'stop' then Qd.setLightColor(0xFF0000) break end Qd.setLightColor(0x00FF00) end"
+local Qcommand = "while true do local _,_,_port,_,brk =event.pull('modem_message') if port==2412 and brk == 'stop' then Qd.setLightColor(0xFF0000) break end Qd.setLightColor(0x00FF00) end"
-
+
-local command = "while true do local evt,_,_,port,_brk =computer.pullSignal() if evt=='modem_message' and port==2413 and brk =='stop' then Qd.setLightColor(0xFF0000) break end Qd.setLightColor(0x00FF00) sleep(1) end"
+local command = "while true do local evt,_,_,port,_brk =computer.pullSignal() if evt=='modem_message' and port==2413 and brk =='stop' then Qd.setLightColor(0xFF0000) break end Qd.setLightColor(0x00FF00) sleep(1) end"
-
+
-local c = "local cmd  local g=1 repeat cmd = select(6,computer.pullSignal(0.5)) Qd.setLightColor(0xFFFF00) Qd.setStatusText(\"Bingus \"..g) g=g+1  until cmd==\"stop\"  Qd.setLightColor(0xFF0000) Qd.setStatusText(cmd)"
+local c = "local cmd  local g=1 repeat cmd = select(6,computer.pullSignal(0.5)) Qd.setLightColor(0xFFFF00) Qd.setStatusText(\"Bingus \"..g) g=g+1  until cmd==\"stop\"  Qd.setLightColor(0xFF0000) Qd.setStatusText(cmd)"
-
+
-local rad = "for k,v in ipairs(Qr.getEntities()) do if v.name == \"ph0\" then Qd.setLightColor(0x0000FF) Qd.setStatusText(v.name) end end"
+local rad = "for k,v in ipairs(Qr.getEntities()) do if v.name == \"ph0\" then Qd.setLightColor(0x0000FF) Qd.setStatusText(v.name) end end"
-
+
-local rad2 ="getE(\"ph0\") Qd.setStatusText(tostring(e_coords[1]))"
+local rad2 ="getE(\"ph0\") Qd.setStatusText(tostring(e_coords[1]))"
-modem.broadcast(2412,"function getE(e_name) checkArg(1,e_name,'string','nil') for k,v in ipairs(Qr.getEntities()) do if v.name == e_name then e_coords[1]=v.x e_coords[2]=v.y e_coords[3]=v.z Qd.setLightColor(0x0000FF) Qd.setStatusText(v.name) break end end end")
+modem.broadcast(2412,"function getE(e_name) checkArg(1,e_name,'string','nil') for k,v in ipairs(Qr.getEntities()) do if v.name == e_name then e_coords[1]=v.x e_coords[2]=v.y e_coords[3]=v.z Qd.setLightColor(0x0000FF) Qd.setStatusText(v.name) break end end end")
-
+
-print("Bingus3")
+print("Bingus3")
-
+
-e_coords = {}
+e_coords = {}
-
+
-function e_coords:deleteMe()
+function e_coords:deleteMe()
-  e_coords = nil
+  e_coords = nil
 end
-
+
-local function getPlayerCoords(p_name)
+local function getPlayerCoords(p_name)
-  for k,v in ipairs(require("component").radar.getEntities()) do
+  for k,v in ipairs(require("component").radar.getEntities()) do
-    if v.name == p_name then
+    if v.name == p_name then
-      e_coords[1] = v.x
+      e_coords[1] = v.x
-      e_coords[2] = v.y
+      e_coords[2] = v.y
-      e_coords[3] = v.z
+      e_coords[3] = v.z
-      return 1
+      return 1
-    end
+    end
-    print(k,v.name,v.x,v.y,v.z)
+    print(k,v.name,v.x,v.y,v.z)
-  end
+  end
-   return 0
+   return 0
 end
-
+
-if getPlayerCoords("ph0")==1 then
+if getPlayerCoords("ph0")==1 then
-  for e in pairs(e_coords) do
+  for e in pairs(e_coords) do
-    print(e)
+    print(e)
-  end
+  end
-else
+else
-  print("Entity Not Found")
+  print("Entity Not Found")
 end
-e_coords:deleteMe()
+e_coords:deleteMe()
-
+
-
+
-
+
-while true do
+while true do
-  local cmd=io.read()
+  local cmd=io.read()
-  if not cmd then return end
+  if not cmd then return end
-  modem.broadcast(2412,cmd)
+  modem.broadcast(2412,cmd)
-  if(cmd == "A") then
+  if(cmd == "A") then
-    modem.broadcast(2412,rad2)
+    modem.broadcast(2412,rad2)
-    sleep(0.5)
+    sleep(0.5)
-  elseif(cmd == "S") then
+  elseif(cmd == "S") then
-    modem.broadcast(2412,"stop")
+    modem.broadcast(2412,"stop")
-    sleep(0.5)
+    sleep(0.5)
-  else
+  else
-    modem.broadcast(2412,cmd)
+    modem.broadcast(2412,cmd)
-  end
+  end
 end