dir = "/sys/lua/data/"
defclr = 012255012
on = {}
USGN = {}
ranking = {}
saycolor = {}

function loaduser(id)
	local file = io.open (dir..USGN[id]..".txt")
	if file then
		local ranking_f,saycolor_f = file:read ("*n","*n")
		ranking[id] = ranking_f or 1
		saycolor[id] = saycolor_f or 255255000
		file:close()
	else
		ranking[id] = 1
		saycolor[id] = 255255000
		local ranking_f = ranking[id]
		local saycolor_f = saycolor[id]
		file:write(ranking_f.."\n"..saycolor_f)
		file:close()
	end
end

function welcomemsg(id, md)
	if md == 1 then
		msg2 (id, "\169"..defclr.."Welcome to"..game("sv_name")"!")
	end
end

function saveuser(id)
	local file = io.open (dir..USGN[id]..".txt")
	local ranking_f = ranking[id]
	local saycolor_f = saycolor[id]
	file:write(ranking_f.."\n"..saycolor_f)
	file:close()
end	

addhook("join", "on.join")
function on.join(id)
	USGN[id] = player(id, "usgn")
	if USGN[id] > 0 then 
		loaduser(id)
	else
		welcomemsg(id, 1)
	end
end

addhook("leave", "on.leave")
function on.leave(id)
	if USGN[id] > 0 then
		saveuser(id)
	end
end

LUA ERROR: sys/lua/autorun/new  1.lua:20: attempt to index local 'file' (a nil value)

local file = io.open (dir..USGN[id]..".txt","w")

function _save(id)
     local usgn = player(id,"usgn")
     if usgn > 0 then
          local file = io.open("sys/lua/<yourfilelocation>/"..usgn..".txt","w")
          local value1, value2 = playervalue1, playervalue2
          file:write(value1.."\n"..value2)
          print("©000255000Saved.")
          file:close()
     end
end

function _load(id)
     local usgn = player(id,"usgn")
     if usgn > 0 then
          local file = io.open("sys/lua/<yourfilelocation>/"..usgn..".txt","r")
          if file then
               -- Save file found, read .txt file and set player values
               local value1, value2 = file:read("*n","*n")
               playervalue1 = value1
               playervalue2 = value2
               file:close()
          else
               -- Set player values to 0, save file not found
               <playervalue> = 0
               <playervalue> = 0
          end
     else
          -- No USGN ID found, set player values to 0
          Player[id].money = 0
          Player[id].registration = 0
     end
     -- You may put a function here to generate hudtxt for example
end