Anal Scan

os.loadAPI("ocs/apis/sensor")
prox = sensor.wrap("top")

ch = peripheral.wrap("chat_box_2")
ch.setDistance(5)
ch.setName("Red Queen")


function welcomeMessage()
 ch.say("Welcome")
 ch.say("This facility handles DNA Mutations")
 ch.say("We require an ANAL SCAN to grant access")
end




-- TO MAKE SURE ONLY 1 PLAYER IS ON
while true do
 term.clear()
 term.setCursorPos(1,1)

 p = {}
 local signal = false

 local tar = prox.getTargets()

 for name, basicInfo in pairs(tar) do

    if  (basicInfo.Name == "Player") then
        --ch.say("X:"..basicInfo.Position.X)
        --ch.say("Y:"..basicInfo.Position.Y)
        --ch.say("Z:"..basicInfo.Position.Z)

        if (basicInfo.Position.X >= 0 and basicInfo.Position.X <= 3) and
           (basicInfo.Position.Y >= 3 and basicInfo.Position.Y <= 5) and
           (basicInfo.Position.Z >= -3 and basicInfo.Position.Z <= -1) then
            isOn = false
            for k, v in pairs(p) do
            if v == basicInfo.Name then
                --print("Player is in List")
                isOn = true
                break
            end
        end
        if not isOn then
            --print("Insert New Player")
            table.insert(p, basicInfo.Username)
            welcomeMessage()
        end
    end
 end

end

 if #p > 1 then
  ch.say("ONLY ONE PLAYER ALLOWED IN SCAN AREA")
  print("Players in Scan Area: "..#p)
 elseif #p == 1 then
  ch.say("Identified player: "..p[1])
  print("Players in Scan Area: "..#p)
 end

 print(textutils.serialize(p))
 sleep(1)
end