DeriveGamemode("sandbox")
AddCSLuaFile("cl_init.lua")
AddCSLuaFile("shared.lua")
start = {}
start.money = 100
start.job = "unemployed"
start.team = 10
start.wm = "Welcome to Paradox!"
start.weapons = { "weapon_physcannon", "weapon_physgun" }
start.paydaytimer = 15
function FirstSpawn( ply )
local steamid = ply:SteamID()
ply:SetNWInt("money", start.money)
ply:SetNWString("job", start.job)
ply:SetTeam(start.team)
ply:PrintMessage(HUD_PRINTCENTER, start.wm);
timer.Simple(start.paydaytimer,Payday,ply)
if file.Exists( "Paradox/"..steamid..".txt" ) then
local savedcontents = file.Read( "Paradox/"..steamid..".txt" )
savedtable = string.Explode("\n", savedcontents)
ply:SetNWInt("money",savedtable[1])
ply:SetNWString("job",savedtable[2])
end
end
hook.Add( "PlayerInitialSpawn", "playerInitialSpawn", FirstSpawn);
function playerRespawn( ply )
PrintTable(start.weapons)
for key,value in pairs(start.weapons) do
print(key)--this will print 1 and 2
print(value)-- this will print weapon_physcannon then weapon_physgun
ply:Give(value)
end
end
hook.Add( "PlayerSpawn", "playerRespawnTest", playerRespawn );
function playerchat( ply, text, teamsay )
local chatbl = string.Explode(" ",text)
if string.find(text,"$job") then
ply:SetNWString("job",chatbl[2])
end
end
hook.Add( "PlayerSay", "playerchat", playerchat );
function Payday(ply)
timer.Simple(start.paydaytimer,Payday,ply)
local money = ply:GetNWInt("money")
ply:SetNWInt("money",money+50)
end
function savestuff(ply)
local steamid = ply:SteamID()
local name = ply:Nick()
local money = ply:GetNWInt("money")
local job = ply:GetNWString("job")
file.Write("Paradox/"..steamid..".txt", money.."\n"..job)
end
GM:PlayerDisconnected( ply )
savestuff(ply)
end