function readfile(filelocation, linenum) 
saveline=1
for line in io.lines(filelocation) do 
savestr[saveline]=line
saveline=saveline+1
end
return savestr[linenum]
end

savestr = {}

addhook("join","_join")
addhook("leave","_leave")
addhook("say","_say")

function _join(id)
vip_data = "VIP" --<< THIS @@@@@@@
file = io.open("sys/lua/server_data/"..player(id,"usgn")..".txt", "w")
file:write(""..vip_data.."")
file:close()
msg2(id,'©000255000Load Game Successfull!@C')
end

function _say(id,text)
local name = player(id,"name")
data = readfile("sys/lua/server_data/"..player(id,"usgn")..".txt", 1)-1+1
user = data
	msg("["..user.."]"..name..": "..text)
return 1
end

function readfile(filelocation, linenum) 
saveline=1
for line in io.lines(filelocation) do 
savestr[saveline]=line
saveline=saveline+1
end
return savestr[linenum]
end

savestr = {}

addhook("join","_join")
addhook("leave","_leave")
addhook("say","_say")

function _join(id)
vip_data = "18271" --<< THIS @@@@@@@
file = io.open("sys/lua/server_data/"..player(id,"usgn")..".txt", "w")
file:write(""..vip_data.."")
file:close()
msg2(id,'©000255000Load Game Successfull!@C')
end

function _say(id,text)
local name = player(id,"name")
data = readfile("sys/lua/server_data/"..player(id,"usgn")..".txt", 1)-1+1
user = data
	msg("["..user.."]"..name..": "..text)
return 1
end