little help its repeating and i dont want it to

local modem = peripheral.wrap("right")
local answer = ""
local inputting
local checking
local secretphrase = ""
local portNum = ""
--This function listens for the correct phrase on the determined port
--and will open the door if the phrase and port are matching the other program
function door(phrase,portNum)
    port = tonumber(portNum)
    if not (modem.isOpen(port)) then
        modem.open(port)
    end
    local event, modemSide, senderChannel,replyChannel,message,senderDistance = os.pullEvent("modem_message")
    if (message == phrase) then
        rs.setOutput("front",false)
	    sleep(20)
	    rs.setOutput("front",true)
    else
        rs.setOutput("back",false)
	    sleep(20)
	    rs.setOutput("back",true)
    end
    message = nil
end
--This functions checks if there is a file named "proxInfo"
--If there is, it will tell the program to just read from that
--if there is no file it will tell the program we need to make one
function fileCheck(name)
local f = fs.open(name, "r")
    if f~=nil then
    local line = f.readLine()
    --This will read through the file line by line until it comes across "END"
        repeat
            line = f.readLine()
            if tostring(line) == "END" then
                f.close()
                sleep(1)
                return true
            end
        until line == nil
        sleep(1)
        f.close()
        return false
    else
        return false
    end
end
--The main loop of the program on startup
while true do
    modem.closeAll()
    if fileCheck("proxInfo") then
        inputting = false
        answer = "y"
        checking = false
    else
        inputting = true
        checking = true
    end
    --This starts the user prompt
    while inputting == true do
        term.clear()
        term.setCursorPos(1,1)
        term.clear()
        term.setCursorPos(1,1)
        write("Enter the secret phrase\n")
        write("that you entered on the other\n")
        write("computer: ")
        secretPhrase = read()
-----------------------------------
        term.clear()
        term.setCursorPos(1,1)
        write("Enter the port number \n(can't be greater than 65535): ")
        portNum = read()
        --If the port number is higher than it should be, we keep asking
        while (tonumber(portNum) > 65535) do
            term.clear()
            term.setCursorPos(1,1)
            write("Please enter a vaild port number \n(can't be greater than 65535): ")
            portNum = read()
        end
------------------------------------
        term.clear()
        term.setCursorPos(1,1)
        print("Your secret phrase is: "..secretPhrase)
        print("Your port number is: "..portNum)
        sleep(1)
        print("Is this the correct information (y/n)? ")
        answer = read()
        if answer == "y" then
            h = fs.open("proxInfo", "w")
            h.writeLine(secretPhrase)
            h.writeLine(portNum)
            h.writeLine("END")
            h.close()
            checking = false
            inputting = false
        else
            inputting = true
            checking = true
        end
    end
---------------------------------------
    --We keep looping through this once we have a file
    while (checking == false) and (answer == "y") do
        print("Starting the program...")
        h = fs.open("proxInfo", "r")
        secretPhrase = h.readLine()
        portNum = h.readLine()
        h.close()
        sleep(3)
        term.clear()
        term.setCursorPos(1,1)
        print("If you want to change any settings place")
        print("a lever on top of this computer and pull it.")
        print("You will be prompted if you wish to edit")
        print("the settings. Don't forget to remove")
        print("the lever or toggle it again when you are done!")
        while true do
        door(secretPhrase,portNum)
        if rs.getInput("top") == true then
            term.clear()
            term.setCursorPos(1,1)
            print("Would you like to edit the settings (y/n)? ")
            sleep(1)
            local editCheck = read()
            if editCheck == "y" then
                sleep(1)
                fs.delete("proxInfo")
                os.reboot()
            else
                sleep(1)
                term.clear()
                term.setCursorPos(1,1)
                print("If you want to change any settings place")
                print("a lever on top of this computer and pull it.")
                print("You will be prompted if you wish to edit")
                print("the settings. Don't forget to remove")
                print("the lever or toggle it again when you are done!")
                end
            end
            sleep(2)
        end
    end
end
--Code created by ThatGamingGnome
--Check out my youtube channel @ http://www.youtube.com/user/ThatGamingGnome

os.unloadAPI("ocs/apis/sensor")
os.loadAPI("ocs/apis/sensor")
local prox = sensor.wrap("top")
local modem = peripheral.wrap("right")
local playerName = ""
local playerNames = {}
local secretPhrase = ""
local portNum = ""
local answer = ""
local inputting
local checking
local heldItemCheck
local item
local heldItem
local b = 0
--This function checks what item the player is holding
function itemCheck(name)
local targets = prox.getTargets()
--Read data from sensor
	for k, v in pairs(targets) do
		if ((v.Name) == "Player") then
			targetsDetail = prox.getTargetDetails(k)
			if not(targetsDetail == nil) then
				if name == targetsDetail.Username then
					heldItem = targetsDetail.HeldItem.Name
					return heldItem
				end
			end
		end
	end
end
--This functions checks our array "playerNames" which contains the players
--we allowed access to this door
--If the for loops finds a match, it will open the door
function arrayCheck(playerNames,playerName,secretPhrase,portNum,item,heldItem)
local port = tonumber(portNum)
	for key, value in pairs(playerNames) do
		if value == playerName and item == nil then
			modem.transmit(port,524,secretPhrase)
		elseif value == playerName and item == heldItem then
			modem.transmit(port,524,secretPhrase)
		end	
	end
	modem.transmit(port,524,"not_player")
end
--This checks the names of the players near the sensor
--and then sends this daya to the "arrayCheck" function
function nameCheck(secretPhrase,playerNames,portNum,item)
local targets = prox.getTargets()
--Read data from sensor
	for k, v in pairs(targets) do
		if ((v.Name) == "Player") then
			targetsDetail = prox.getTargetDetails(k)
			if not(targetsDetail == nil) then
				playerName = targetsDetail.Username
				heldItem = targetsDetail.HeldItem.Name
			end
		end
	end
	arrayCheck(playerNames,playerName,secretPhrase,portNum,item,heldItem)
	targets = nil
	targetsDetail = nil
	playerName = nil
end
--This functions checks if there is a file named "proxInfo"
--If there is, it will tell the program to just read from that
--if there is no file it will tell the program we need to make one
function fileCheck(name)
local f = fs.open(name, "r")
	if f~=nil then
		repeat
			local line = f.readLine()
			if tostring(line) == "END" then
				f.close()
				sleep(1)
				return true
			end
		until line == nil
		f.close()
		sleep(1)
		return false
	else
		return false
	end
end
--The main loop of the program on startup
while true do
	modem.closeAll()
	if fileCheck("proxInfo") then
		inputting = false
		answer = "y"
		checking = false
	else
		inputting = true
		checking = true
	end
	while inputting == true do
		term.clear()
		term.setCursorPos(1,1)
		write("Enter a secret phrase: ")
		secretPhrase = read()
-----------------------------------
		term.clear()
		term.setCursorPos(1,1)
		write("Enter port number \n(can't be greater than 65535): ")
		portNum = read()
		while (tonumber(portNum) > 65535) do
			term.clear()
			term.setCursorPos(1,1)
			write("Please enter a vaild port number \n(can't be greater than 65535): ")
			portNum = read()
		end
-----------------------------------
		term.clear()
		term.setCursorPos(1,1)
		write("Do you want to have the\ndoor open when holding a\nspecific item like a key (y/n)?: ")
		heldItemCheck = read()
		if heldItemCheck == "y" then
			term.clear()
			term.setCursorPos(1,1)
			write("Please enter your name so the\nsensor knows who to look for: ")
			local myName = read()
			term.clear()
			term.setCursorPos(1,1)
			write("Please hold the item you wish\nto be a 'key' for the door\nand then push enter...")
			sleep(1)
			local dummy = read()
			item = itemCheck(myName)
		end
-----------------------------------
		term.clear()
		term.setCursorPos(1,1)
		print("Enter the names seperated by a space\nof the players you want to open this door")
		write("Player Names: ")
		local userInput = read()
		for i in string.gmatch(userInput, "%S+") do
			table.insert(playerNames, i)
		end
		sleep(1)
		term.clear()
		term.setCursorPos(1,1)
		print("Your secret phrase is: "..secretPhrase)
		print("Your port number is: "..portNum)
		if heldItemCheck == "y" then
			print("Your key is: "..item)
		end
		print("The player(s) allowed is/are:")
		for d=1,# playerNames do
			print(playerNames[d])
		end  
		sleep(1)
		print("Is this the correct information (y/n)? ")
		answer = read()
		if answer == "y" then
			h = fs.open("proxInfo", "w")
			h.writeLine(secretPhrase)
			h.writeLine(portNum)
			if heldItemCheck == "y" then
				h.writeLine("ITEM")
				h.writeLine(item)
			else
				h.writeLine("")
			end
			for a=1,# playerNames do
				h.writeLine(playerNames[a])
			end
			h.writeLine("END")
			h.close()
			checking = false
			inputting = false
		else
			for d=1,# playerNames do
				table.remove(playerNames,d)
			end
			inputting = true
			checking = true
		end
	end
-----------------------------------
	--We keep looping through this once we have a file
	while answer == "y" and checking == false do
		print("Starting the program...")
		h = fs.open("proxInfo", "r")
		secretPhrase = h.readLine()
		portNum = h.readLine()
		if h.readLine() == "ITEM" then
			item = h.readLine()
		else
			item = nil
		end
		local x = 0
		repeat
			x = x + 1
			ln = h.readLine()
			playerNames[x] = ln
		until ln == "END"
-----------------------------------
		--print(secretPhrase)
		--print(portNum)
		--print(item)
		--for i=1,# playerNames do
		--	print(playerNames[i])
		--end
-----------------------------------
		h.close()
		sleep(3)
		term.clear()
		term.setCursorPos(1,1)
		print("If you want to change any settings place")
		print("a lever in front of this computer and pull it.")
		print("You will be prompted if you wish to edit")
		print("the settings. Don't forget to remove")
		print("the lever or toggle it again when you are done!")
		while true do
			nameCheck(secretPhrase,playerNames,portNum,item)
			if rs.getInput("front") == true then
				term.clear()
				term.setCursorPos(1,1)
				print("Would you like to edit the settings (y/n)? ")
				sleep(1)
				local editCheck = read()
				if editCheck == "y" then
					sleep(1)
					fs.delete("proxInfo")
					os.reboot()
				else
					sleep(1)
					term.clear()
					term.setCursorPos(1,1)
					print("If you want to change any settings place")
					print("a lever in front of this computer and pull it.")
					print("You will be prompted if you wish to edit")
					print("the settings. Don't forget to remove")
					print("the lever or toggle it again when you are done!")
				end
			end
			sleep(2)
		end
	end
end
--Code created by ThatGamingGnome
--Check out my youtube channel @ http://www.youtube.com/user/ThatGamingGnome

local playerNames = {"Stekeblad", "Karaktar"}
local playersThisScan = {}
local playersLastScan = {}

local function getPlayersInRange()
  local playersFound = {}
  local targets = prox.getTargets()
  for k, v in pairs(targets) do
	if((v.Name) == "Player") then
	  targetsDetail = prox.getTargetsDetail()
	  if not(targetsDetail == nil) then
		playerName = targetsDetail.Username
		playersFound[playerName] = true
	  end
	end
  end
  return playersFound
end

local function filterOnWhitelistedPlayers(whitelist, tableToFilter)
  for k, v in pairs(tableToFilter) do
	if not whitelist[v] then
	  tableToFilter[k] = nil --remove player that is not allowed
	end
  end
  return tableToFilter
end

local function shouldDoorOpen()
  for k, v in pairs(playersThisScan) do
	if not (playersLastScan[k] then -- if player( that is whitelisted) is in range of the scanner and was not in range last scan
	  return true
	end
  end
  return false
end

while true do
  -- save last scan
  playersLastScan = {}
  for k, v in pairs(playersThisScan)
	playersLastScan[k] = v
  end

  playersThisScan = getPlayersInRange()
  playersThisScan = filterOnWhitelistedPlayers(playerNames, playersThisScan)
  if (shouldDoorOpen())
   -- tell the door to open, redstone, modem message, whatever
  end
  sleep(20)
end

os.unloadAPI("/ocs/apis/sensor") -- taken from original code, probably a reson to try and remove the api and add it again
os.loadAPI("/ocs/apis/sensor") -- makes it possible to use the sensor api in the program

local prox = sensor.wrap("top") -- make something on the top of the computer usable under the name prox
local whitelist = {"Stekeblad", "Karaktar"} -- names of all the player we want to allow
local playersThisScan = {}
local playersLastScan = {}

local function getPlayersInRange() -- returns a table containing the names of all players in range
  local playersFound = {}
  local targets = prox.getTargets() -- scan for stuff
  for k, v in pairs(targets) do -- check everything found one at the time
	if((v.Name) == "Player") then -- make sure it is a player, can the sensor find items?
	  targetsDetail = prox.getTargetsDetail() -- get more info about the player
	  if not(targetsDetail == nil) then
		playerName = targetsDetail.Username -- get the players name
		playersFound[playerName] = true
	  end
	end
  end
  return playersFound
end

local function filterOnWhitelistedPlayers(whitelist, tableToFilter) -- takes two tables with names, returns all names that is in both tables (everyone that is whitelisted)
  local filteredTable = {}
  for k, v in pairs(tableToFilter) do -- for all found players
	if whitelist[k] then
	  filteredTable[k] = v -- save all players that is in in the whitelist
	end
  end
  return filteredTable
end

local function shouldDoorOpen() -- do the check if the door should open here
  for k, v in pairs(playersThisScan) do
	if not (playersLastScan[k]) then -- if player( that is whitelisted) is in range of the scanner and was not in range last scan
	  return true -- allow the door to be opened
	end
  end
  return false -- do not open the door
end

while true do
  playersLastScan = playersThisScan -- remember all whitelisted players that was in range
  playersThisScan = getPlayersInRange() -- scan for players
  playersThisScan = filterOnWhitelistedPlayers(whitelist, playersThisScan) -- filter on whitelist
  if (shouldDoorOpen()) -- door check
   -- tell the door to open, redstone, modem message, whatever
	rs.setOutput("back", true)
	sleep(20) -- seconds to give the door to open and the player to pass before starting to close
	rs.setOutput("back", false")
  end
  sleep(20) -- seconds to wait before checking for players again
end