Why would that be it? The maximum is 32767, so 32767 is still a valid value.

The minimum value is -32768, btw.

Maybe the directory of the save file is read-only? Looks like it...

Use a timer instead of sleep and handle the "timer" event in the main loop. Something like this:

local clockTimer = os.startTimer(1) -- start a timer for 1 second

-- Main loop
while true do
  local evt, p1, p2, p3, p4, p5 = os.pullEvent()
  if evt == "timer" then
	if p1 == clockTimer then
	  displayTime() -- redraw the clock
	  clockTimer = os.startTimer(1) -- restart the timer
	end
  elseif evt == "some other event" then
	-- handle the event
  end
end

coroutines aren't functions.

displayTime displays the time, sleeps, and exits. Once it exits, it's coroutine is dead, and it will not run anymore, no matter how many times you try to resume() it.

Coroutines, just like programs, need to contain a loop if they're going to keep running indefinitely.

You have to make a loop in the displayTime function too I guess

If you use GPS, then you don't need precise position saving. Then it's just a matter of tracking your program's general progress.

Yeah...you perform a bunch of functions in between saves. That means that, depending on which function was last performed, your position saves end up inaccurate in different ways.

To get the best saving, you need to save right before and right after every move. And even then you'll still have some problems that can't really be solved until full programming persistence is implemented in CC (they really are working on that).

I also find it useful to note that file.close() returns nil, allowing us to summarise the above into

function load(fileName)
		file = fs.open("security/door/"..fileName,"r")
	   return (file.readLine() or "none"),file.close()
end
password = load("password")

I know it looks random and not even very useful but I find that many coders use file handles often and this helps keep your coded short

Why insert into a table, what you could do is return what's in the file

function load(fileName)
	file = fs.open("security/door/"..fileName,"r")
	local line = file.readLine()
	file.close()
	return line or "none" -- will return none if the file is empty
end
--Call it like
password = load("password")

But I do see what you're trying to do... but the above should suffice?

Finally found it!

I didn't have time to test it after taking it out of an old file of mine, but try it:

x, y = term.getSize()

function limitRead(nLimit, replaceChar)
	term.setCursorBlink(true)
	local cX, cY = term.getCursorPos()
	local rString = ""
	if replaceChar == "" then replaceChar = nil end
	while true do
		local xPos, yPos = term.getCursorPos()
		local event, p1 = os.pullEvent()
		if event == "char" then
			-- Character event
			if #rString + 1 <= nLimit then
				rString = rString .. p1
				if not replaceChar then
					if not nLimit then
						write(p1)
					else
						if #rString >= nLimit then
							term.setCursorPos(cX, cY)
							write(string.sub(rString, #rString - nLimit + 1))
						elseif #rString < nLimit then
							write(p1)
						end
					end
				else
					if not nLimit then
						write(replaceChar)
					else
						if #rString >= nLimit then
							term.setCursorPos(cX, cY)
							write(string.rep(replaceChar, nLimit))
						elseif #rString < nLimit then
							write(replaceChar)
						end
					end
				end
			end
		elseif event == "key" and p1 == keys.backspace then
			-- Backspace
			rString = string.sub(rString, 1, #rString-1)
			term.setCursorPos(cX, cY)
			term.clearLine()
			if replaceChar then
				for i = 1, #rString do write(replaceChar) end
			else
				write(rString)
			end
		elseif event == "key" and p1 == keys.enter then
			-- Enter
			break
		end
	end
	term.setCursorBlink(false)
	print() -- Skip to the next line after clicking enter.
	return rString
end

-- And you call it like this
input = limitRead(10)

-- If you want to replace it with a char, like read() then
password = limitRead(10, "*")

I wrote something quickly myself, no moving with left and right arrow like the original read because I'm fealing lazy (could hardly bother anyone with 10 characters anyway). I think this might be quite the same as the previous snippets, but I focused on making it as understandable as possible.

local function readN(len, replaceChar)
  len = len or 10
  local input=""
  local key = 0
  term.setCursorBlink(true)
  repeat
	local e,p1 = os.pullEvent()
	if e=="char" then
	  if #input < len then
		input = input .. p1
		term.write(replaceChar or p1)
	  end
	elseif e=="key" and p1==keys.backspace and #input > 0 then
	  input = input:sub(1,#input-1)
	  local x,y = term.getCursorPos()
	  term.setCursorPos(x-1,y)
	  term.write(" ")
	  term.setCursorPos(x-1,y)
	end
  until p1==keys.enter
  term.setCursorBlink(false)
  return input
end

Edit: it's not the same as the previous ones except for remiX's. The main difference is that he writes the entire string on each iteration, while I handle each position seperately. Also, for unlimited length, you could just use math.huge or term.getSize() instead of adding seperate conditions. For replaceChar a simple 'or' is sufficient.

All you do is make your own function with os.pullEvent and keep adding the inputted char to a line and if the line is over 10, it doesn't add any more.

I have one somewhere on my pc, i'll try find it now, else I'll make a quick one

you have to write custom read function that will not allow you to write if string length is more than specified value

here you have original read function

function read( _sReplaceChar, _tHistory )
term.setCursorBlink( true )
	local sLine = ""
local nHistoryPos = nil
local nPos = 0
	if _sReplaceChar then
  _sReplaceChar = string.sub( _sReplaceChar, 1, 1 )
end

local w, h = term.getSize()
local sx, sy = term.getCursorPos()

local function redraw( _sCustomReplaceChar )
  local nScroll = 0
  if sx + nPos >= w then
   nScroll = (sx + nPos) - w
  end
  
  term.setCursorPos( sx, sy )
  local sReplace = _sCustomReplaceChar or _sReplaceChar
  if sReplace then
   term.write( string.rep(sReplace, string.len(sLine) - nScroll) )
  else
   term.write( string.sub( sLine, nScroll + 1 ) )
  end
  term.setCursorPos( sx + nPos - nScroll, sy )
end

while true do
  local sEvent, param = os.pullEvent()
  if sEvent == "char" then
   sLine = string.sub( sLine, 1, nPos ) .. param .. string.sub( sLine, nPos + 1 )
   nPos = nPos + 1
   redraw()
  
  elseif sEvent == "key" then
	  if param == keys.enter then
	-- Enter
	break
  
   elseif param == keys.left then
	-- Left
	if nPos > 0 then
	 nPos = nPos - 1
	 redraw()
	end
  
   elseif param == keys.right then
	-- Right  
	if nPos < string.len(sLine) then
	 nPos = nPos + 1
	 redraw()
	end
  
   elseif param == keys.up or param == keys.down then
				-- Up or down
	if _tHistory then
	 redraw(" ");
	 if param == keys.up then
	  -- Up
	  if nHistoryPos == nil then
	   if #_tHistory > 0 then
		nHistoryPos = #_tHistory
	   end
	  elseif nHistoryPos > 1 then
	   nHistoryPos = nHistoryPos - 1
	  end
	 else
	  -- Down
	  if nHistoryPos == #_tHistory then
	   nHistoryPos = nil
	  elseif nHistoryPos ~= nil then
	   nHistoryPos = nHistoryPos + 1
	  end	
	 end
	
	 if nHistoryPos then
					 sLine = _tHistory[nHistoryPos]
					 nPos = string.len( sLine )
					else
	  sLine = ""
	  nPos = 0
	 end
	 redraw()
				end
   elseif param == keys.backspace then
	-- Backspace
	if nPos > 0 then
	 redraw(" ");
	 sLine = string.sub( sLine, 1, nPos - 1 ) .. string.sub( sLine, nPos + 1 )
	 nPos = nPos - 1	
	 redraw()
	end
   elseif param == keys.home then
	-- Home
	nPos = 0
	redraw()
   elseif param == keys.delete then
	if nPos < string.len(sLine) then
	 redraw(" ");
	 sLine = string.sub( sLine, 1, nPos ) .. string.sub( sLine, nPos + 2 )  
	 redraw()
	end
   elseif param == keys["end"] then
	-- End
	nPos = string.len(sLine)
	redraw()
   end
  end
end

term.setCursorBlink( false )
term.setCursorPos( w + 1, sy )
print()

return sLine
end

read() doesn't support a max length, best you can do is check the length after, ex

function readLen(prompt, minLen,maxLen,isPassword)
  while true do
	write(prompt)
	--//read the line; if isPassword is true, pass "*" as the char to display, otherwise nil so it displays what's typed
	local sInput=read(isPassword and "*" or nil)
	--//if the length is less than min or greater than max...
	if #sInput<minLen or #sInput>maxLen then
	  --//...complain
	  print("Must be between "..minLen.." and "..maxLen.." characters long!")
	else --//not too long or short, return it
	  return sInput
	end
  end
end

--//just call it instead of read, passing the prompt, min and max lengths, and optionally "true" if you're reading a password
local username=readLen("Enter username : ",1,16)
--//declare a var for the password before the loop
local password
--//quick loop
while true do
  password=readLen("Enter password   : ",4,16,true)
  --//local declared inside loop, will go away when the loop ends
  local pw2=readLen("Confirm password : ",4,16,true)

  --//see if they match
  if pw2==password then
	break --//pws match, end the while loop
  end
  print("Passwords don't match! Try again")
end

:edit: or, you could modify the original read function grabie posted, if checking after and forcing re-entry bothers you.