View difference between Paste ID: MxYGfbss and GVfZpWe1

-modem = peripheral.wrap("top")
+if (os.getComputerLabel() == nil) then
-radar = peripheral.wrap("back")
+        os.setComputerLabel("LapController")
-modem.open(12)
+
-modem.open(13)
+function startChecker(num, name)
-term.clear()
+    if (num > 5) then
-term.setCursorPos(1,1)
+        local p = radar.getPlayers()
-settings.load("/.settings")
+        for _, k in ipairs(p) do
-if (settings.get("player") == nil) then
+            if (k["name"] == name) then
-    print("Need to set the player to watch. Run 'set player <username>'")
+                return true
-    return
+            end
         end
-if (settings.get("channel") == nil) then
+    else
-    print("Need to set the computer Channel! Run 'set channel <number>'")
+        local p = rs[num].getPlayers()
-    return
+        for _, k in ipairs(p) do
             if (k["name"] == name) then
-if (tonumber(settings.get("channel")) == nil) then
+                return true
-    print("The setting 'channel' with value '" .. settings.get("channel") .."' is not a numebr. Please make it a number!")
+            end
-    return
+
     end
-modem.open(tonumber(settings.get("channel")))
+    return false
-print("Working...")
+
-t = 1
+stat, err = pcall( function ()
-function timer()
+    radar = peripheral.wrap("bottom")
-    sleep(3)
+    rs = {}
-    return
+    rs[1] = peripheral.wrap("radar_3")
     rs[2] = peripheral.wrap("radar_2")
-function mess()
+    rs[3] = peripheral.wrap("radar_0")
     rs[4] = peripheral.wrap("radar_1")
-        e, s, c, r, m, d = os.pullEvent("modem_message")
+    rs[5] = peripheral.wrap("radar_4")
-        if (c == tonumber(settings.get("channel"))) and (m == "gg") then
+    modem = peripheral.wrap("top")
-            return
+    modem.open(13)
     term.clear()
     term.setCursorPos(1,1)
     print("Working...")
-function red()
+
-    os.pullEvent("redstone")
+        if skip then
             print("Working...")
-function dead()
+
         skip = false
-        e2, s2, c2, r2, m2, d2 = os.pullEvent("modem_message")
+        redstone.setOutput("right", false)
-        if (c2 == 12) and (m2 == "f") then
+        event, side, chan, reply, message, dist = os.pullEvent("modem_message")
-            return
+        if (message["m"] == "s") then
             redstone.setOutput("right", true)
             print("Starting...")
             racers = {}
-while true do
+            for i, n in ipairs(message["names"]) do
-   event, side, chan, reply, message, dist = os.pullEvent("modem_message")
+                racers[n] = {}
-   if (message["m"] == "s") and (chan == 13) and (message["name"] == settings.get("player")) then
+                racers[n]["lap"] = 0
-       print("Start good!")
+                racers[n]["f"] = true
-       laps = message["laps"]
+                racers[n]["start"] = true
-       num = 0
+            end
-       stop = false
+            sleep(message["pt"])
-       me = false
+            winner = nil
-       print("Waiting for start...")
+            while (winner == nil) do
-       sleep(message["pt"] + 19)
+                temp = {}
-       print("Racing...")
+                st = false
-       while (num < laps) and not stop do
+                for i, n in ipairs(message["names"]) do
-           print("Laps: " .. num .."/"..laps)
+                    if (racers[n]["start"] == true) then
-           f = parallel.waitForAny(red, dead)
+                        status = {}
-           if (f == 2) then
+                        for z=1,6,1 do
-               stop = true
+                            status[z] = startChecker(z, n)
-           else
+                        end
-               y = 4
+                        for _, s in ipairs(status) do
-               while y > 0 do
+                            if s then
-                   players = radar.getPlayers()
+                                st = true
-                   for i, p in ipairs(players) do
+                            end
-                       if (p["name"] == settings.get("player")) then
+                        end
-                           print("Found player!")
+                        if not st then
-                           sleep(2.5)
+                            racers[n]["start"] = false
-                           num = num + 1
+                        end
-                           exec("scoreboard players add ".. settings.get("player") .. " lap 1")
+                    end
-                           y = 0
+                end
-                           break
+                players = radar.getPlayers()
-                       end
+                for i, p in ipairs(players) do
-                   end
+                    --exec("say 1st for p name is: " .. p["name"])
-                   y = y - 1
+                    if not (racers[p["name"]] == nil) then
-               end
+                        --exec("say Found the racer var")
-           end
+                        temp[p["name"]] = true
-       end
+                        if not (racers[p["name"]]["f"]) and not (racers[p["name"]]["start"]) then
-       if not stop then
+                            --exec("say Found racer " .. p["name"] .. " unfronzen")
-           sleep(3)
+                            racers[p["name"]]["lap"] = racers[p["name"]]["lap"] + 1
-           modem.transmit(12, settings.get("channel"), "f")
+                            racers[p["name"]]["f"] = true
-           func = parallel.waitForAny(timer, mess)
+                            exec("scoreboard players add ".. p["name"] .. " lap 1")
-           if (func == 2) then
+                        -- else
-               print("Race Over: My player won!")
+                        --     exec("say Found racer " .. p["name"] .. " fronzen")
-               exec("say Good win ".. settings.get("player") .. "! Everyone back to the pits!")
+                        end
-               modem.transmit(11, 0, "gg")
+                        if (racers[p["name"]]["lap"] >= message["laps"]) then
-               rep = 0
+                            winner = p["name"]
-               while rep < 5 do
+                            break
-                   modem.transmit(13, 0, "f")
+                        end
-                   sleep(1)
+                    end
-                   rep = rep + 1
+                end
-               end
+                if (next(players) == nil) then
-           else
+                    for i, n in ipairs(message["names"]) do
-               print("Race Over: Someone else won.")
+                        --exec("say Unfrezing " .. n)
-           end
+                        racers[n]["f"] = false
-       else
+                    end
-           print("Race Over: Someone else won.")
+                else
-       end
+                    for i, p in ipairs(players) do
-   end
+                        --exec("say 2nd for p name is: " .. p["name"])
                         if not (racers[p["name"]] == nil) then
                             --exec("say Found racer " .. p["name"] .. "in 2nd for. Checking frozen prop")
                             if (temp[p["name"]] == nil) then
                                 --exec("say Unfroze " .. p["name"])
                                 racers[p["name"]]["f"] = false
                             end
                         end
                     end
                 end
                 sleep(.5)
                 if (redstone.getInput("left") == true) then
                     print("Killed by Redstone!")
                     sleep(10)
                     skip = true
                     break
                 end
             end
             --After winner declared
             if not skip then
                 exec("say Good win ".. winner .. "! Everyone back to the pits!")
                 modem.transmit(12, 0, "f")
                 modem.transmit(11, 0, "gg")
                 print("Race Over. " .. winner .. " won!")
             end
         end
     end
 end)
 if not stat then
     exec("say " .. err)
 else
     exec("say I died!")
 end