View difference between Paste ID: Jqp4KJDQ and g9gfxwsb

-local monitor = peripheral.find "monitor"
+local config = dofile "config.lua"
 
-local function set_color(c)
+
-	monitor.setBackgroundColor(c)
+
-	monitor.clear()
+
 	local ws
 
-set_color(colors.lime)
+
-local sensor = peripheral.find "plethora:sensor"
+		ws.send(textutils.serialiseJSON(msg))
-local label = os.getComputerLabel()
+
-local switch_config = dofile "config.lua"
+
 	local function send(data)
 		send_packet { type = "send", channel = "comm:arr", data = data }
 	end
 
 	local function connect()
 		if ws then ws.close() end
 		ws, err = http.websocket "wss://spudnet.osmarks.net/v4?enc=json"
-		local ok, err = pcall(ws.send, textutils.serialiseJSON(msg))
+
-		if not ok then printError(err) try_connect_loop() end
+
 
 		send_packet { type = "identify", implementation = "ARR control unit", key = settings.get "spudnet_key" }
 		send_packet { type = "set_channels", channels = { "comm:arr" } }
 
 		print("websocket connected")
 
 		return true
 	end
 
 	local function try_connect_loop()
 		while not connect() do
 			sleep(0.5)
-		send_packet { type = "identify", implementation = "ARR switching unit", key = settings.get "spudnet_key" }
+
 	end
 
 	try_connect_loop()
 
 	local function recv()
 		while true do
 			local e, u, x = os.pullEvent "websocket_message"
 			if u == ws.url then return textutils.unserialiseJSON(x) end
 		end
 	end
 
 	local ping_timeout_timer = nil
 
 	local function ping_timer()
 		while true do
 			local _, t = os.pullEvent "timer"
 			if t == ping_timeout_timer and ping_timeout_timer then
 				-- 15 seconds since last ping, we probably got disconnected
 				print "SPUDNET timed out, attempting reconnect"
 				try_connect_loop()
 			end
 		end
 	end
 
 	local function main()
 		while true do
 			local packet = recv()
 			if packet.type == "ping" then
 				send_packet { type = "pong", seq = packet.seq }
 				if ping_timeout_timer then os.cancelTimer(ping_timeout_timer) end
 				ping_timeout_timer = os.startTimer(15)
 			elseif packet.type == "error" then
 				print("SPUDNET error", packet["for"], packet.error, packet.detail, textutils.serialise(packet))
 			elseif packet.type == "message" then
 				os.queueEvent("spudnet_message", packet.data)
 			end
 		end
 	end
 
 	return send, function() parallel.waitForAll(ping_timer, main) end
 end
 
 local spudnet_send, spudnet_handler = spudnet()
 
 local switches = {}
 local sweep_timer = os.startTimer(1)
 local function main()
 	while true do
 		local ev = {os.pullEvent()}
 		if ev[1] == "spudnet_message" then
 			local data = ev[2]
 			if data.type == "sw_ping" then
 				data.timer = timer
 				data.last_ping = os.epoch "utc"
 				switches[data.id] = data
-local directions = {
+				print(data.id)
-	["+ "] = "east",
+				spudnet_send { type = "sw_cmd", cmd = "set", lamp = (os.clock() % 16) * 2048 }
-	[" +"] = "south",
+
-	["- "] = "west",
+		elseif ev[1] == "timer" then
-	[" -"] = "north"
+			if ev[2] == sweep_timer then
-}
+				local now = os.epoch "utc"
 				for id, switch in pairs(switches) do
-local function direction_name(vec)
+					if now - switch.last_ping >= 2000 then
-	local function symbol(v)
+						print(switch, "antimemeticized")
-		if math.abs(v) < 0.1 then return " "
+						switches[id] = nil
-		elseif v < 0 then return "-"
+					end
-		else return "+" end
+
 				sweep_timer = os.startTimer(1)
-	return directions[symbol(vec.x) .. symbol(vec.z)]
+
 		end
 	end
 end
 
-		local entities = sensor.sense()
+parallel.waitForAll(spudnet_handler, main)