Dadido3
/
Sulfito_PointSaving
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Cleanup and change of gamemode detection

Browse Source
master
David Vogel 6 years ago
parent f305d28544
commit 8dc476fa69
2 changed files with 205 additions and 221 deletions
Show Stats Download Patch File Download Diff File

87
lua/autorun/server/mapcalc.lua
Unescape Escape View File

@ -1,14 +1,12 @@
if engine.ActiveGamemode() == "zombiesurvival" then
if engine.ActiveGamemode() ~= "zombiesurvival" then return end
-- this code grabs the data from the file about the map. if none exists it makes a default.
timer.Simple(25,function()
mapwins = 0
maploss = 0
if not file.Exists( "zsmapinfo", "DATA") then
file.CreateDir( "zsmapinfo" )
timer.Simple(25, function()
mapwins = 0
maploss = 0
if not file.Exists("zsmapinfo", "DATA") then
file.CreateDir("zsmapinfo")
end
local mapname = string.lower(game.GetMap())
if file.Exists("zsmapinfo/"..mapname..".txt", "DATA") then
@ -26,46 +24,42 @@ maploss = 0
file.Write( "zsmapinfo/"..mapname..".txt", util.TableToJSON( main ) )
print("map win file not found. created one.")
end
zombpercentcountmap = 0
totpercentcountmap = 1
zombpercentcountmap = 0
totpercentcountmap = 1
end)
-- this hook checks to make sure there are zombies on the server. later it should check to see if any are afk.
roundtime = 0
prereqcount = false
hook.Add( "WaveStateChanged", "zombpercentcalc", function()
roundtime = CurTime()
hook.Add("WaveStateChanged", "zombpercentcalc", function()
roundtime = CurTime()
if !timer.Exists( "zombiepercentcalc" ) then
timer.Create( "zombiepercentcalc", 10, 0, function()
if !timer.Exists("zombiepercentcalc") then
timer.Create("zombiepercentcalc", 10, 0, function()
if #(team.GetPlayers(TEAM_UNDEAD)) >0 then
zombpercentcountmap =zombpercentcountmap +1
zombpercentcountmap =zombpercentcountmap + 1
end
totpercentcountmap = totpercentcountmap +1
totpercentcountmap = totpercentcountmap + 1
end)
end
end
end)
hook.Add("EndRound","givedapoints",function(winner)
timer.Destroy("zombiepercentcalc" )
hook.Add("EndRound", "givedapoints", function(winner)
timer.Destroy("zombiepercentcalc")
timer.Simple(0,function()
print("point bonus hook")
local mapname = string.lower(game.GetMap())
local zombiepercentcalcmap = (zombpercentcountmap/totpercentcountmap) or .01
local mapplaytotal = mapwins + maploss
local pointstogive = 10
zombiepercentcalcmap = zombiepercentcalcmap or .01
-- we need to make sure that zombies were on the server for more than half the game.
if zombiepercentcalcmap <=.5 then
PrintMessage(HUD_PRINTTALK,"No end of game points because zombies were not even playing half the time!")
elseif mapplaytotal <= 5 then
--print(mapplaytotal)
timer.Simple(0,function()
print("point bonus hook")
local mapname = string.lower(game.GetMap())
local zombiepercentcalcmap = (zombpercentcountmap/totpercentcountmap) or .01
local mapplaytotal = mapwins + maploss
local pointstogive = 10
zombiepercentcalcmap = zombiepercentcalcmap or .01
-- we need to make sure that zombies were on the server for more than half the game.
if zombiepercentcalcmap <=.5 then
PrintMessage(HUD_PRINTTALK,"No end of game points because zombies were not even playing half the time!")
elseif mapplaytotal <= 5 then
--print(mapplaytotal)
PrintMessage(HUD_PRINTTALK,"sorry but this map needs to be played at least "..(5-mapplaytotal).." more times before you can get points for winning.")
if winner == TEAM_UNDEAD then
maploss = maploss + 1
@ -85,12 +79,7 @@ elseif mapplaytotal <= 5 then
main["mapboost"] = mapboost
main["mapjackpot"] = mapjackpot
file.Write( "zsmapinfo/"..mapname..".txt", util.TableToJSON( main ) )
else
else
if winner == TEAM_UNDEAD then
if mapjackpot <= 2500 then
mapjackpot = math.Round(mapjackpot*1.1)
@ -124,6 +113,7 @@ else
else
print("wow you fucked up!")
end
local main = {}
main["mapwins"] = mapwins
main["maploss"] = maploss
@ -147,7 +137,7 @@ else
PrintMessage(HUD_PRINTTALK,"<c=204,204,0>Map jackpot is now "..(mapjackpot)..".</c>")
--regular points ZS points
--[[if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
--[[if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
for k,v in pairs(team.GetPlayers(TEAM_HUMAN)) do
v:SetMoney((v:GetDTInt(1) + pointstogive) )
--WriteData(v:SteamID64(), v:GetPoints())
@ -162,11 +152,10 @@ else
v:SaveMoneyTXT()
v:PrintMessage(HUD_PRINTTALK,"<c=255,0,0>You gained "..(math.Round(pointstogive/2)).." points this round for playing to the end!</c>")
end
end]]
end]]
end
if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
end
if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
if winner == TEAM_HUMAN then
for k,ply in pairs(player.GetAll()) do
if ply:Team() == TEAM_HUMAN then
@ -181,7 +170,6 @@ if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_rebor
ply:SaveMoneyTXT()
ply:PrintMessage(HUD_PRINTTALK,"<c=255,0,0>You gained "..(pointstogive).." this round for playing to the end!</c>")
end
else
if ply:GetPoints()- ply:GetMoney()> 0 then
ply:SetMoney(ply:GetPoints()+((ply:GetPoints()- ply:GetMoney())*.15)+(pointstogive/2))
@ -205,7 +193,6 @@ if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_rebor
end
end
end
end
end)
end
end)
end)
end

51
lua/autorun/server/sv_pointsaving.lua
Unescape Escape View File

@ -27,37 +27,36 @@ his email is jaxschellhorn@gmail.com
-------------------------------------------------------------------
if engine.ActiveGamemode() ~= "zombiesurvival" then return end
hook.Add("PlayerInitialSpawnRound", "ps_set", function(ply)
if gmod.GetGamemode().Name == "Zombie Survival" then
local cash = ply:GetPData("money") --Get the saved money amount
if cash == nil then --If it doesn't exist supply the player with the starting money amount
ply:SetPData("money", 100) --Save it
ply:SetMoney( 100 ) --Set it to the networked ints that can be called from the client too
--ply:SetDTInt(1,ply:GetMoney())
if gmod.GetGamemode().Name == "Zombie Survival" then
local cash = ply:GetPData("money") --Get the saved money amount
if cash == nil then -- If it doesn't exist supply the player with the starting money amount
ply:SetPData("money", 100) -- Save it
ply:SetMoney( 100 ) -- Set it to the networked ints that can be called from the client too
-- ply:SetDTInt(1,ply:GetMoney())
else
ply:SetMoney( cash )
end
end
end
end)
hook.Add("PlayerDeath", "ps_catch", function(ply)
if (ply:Team() == TEAM_HUMAN and game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
if (ply:Team() == TEAM_HUMAN and game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") then
ply:SetMoney(ply:GetPoints())
--WriteData(ply:SteamID64(), ply:GetPoints())
--PrintMessage(HUD_PRINTTALK,ply:GetDTInt(1))
--PrintMessage(HUD_PRINTTALK,ply:GetMoney())
-- WriteData(ply:SteamID64(), ply:GetPoints())
-- PrintMessage(HUD_PRINTTALK,ply:GetDTInt(1))
-- PrintMessage(HUD_PRINTTALK,ply:GetMoney())
ply:SaveMoney()
ply:SaveMoneyTXT()
end
end)
--[[hook.Add("EndRound", "ps_save", function(winner)
print("end round hook")
if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
print("end round hook")
if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") then
if winner == TEAM_HUMAN then
for k,ply in pairs(player.GetAll()) do
if ply:Team() == TEAM_HUMAN then
@ -80,12 +79,12 @@ if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_rebor
end
end
end
end
end)]]
hook.Add("PlayerDisconnected", "ps_disc", function(ply)
if (ply:Team() == TEAM_HUMAN and game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
--WriteData(ply:SteamID64(), ply:GetPoints())
if (ply:Team() == TEAM_HUMAN and game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") then
-- WriteData(ply:SteamID64(), ply:GetPoints())
ply:SetMoney(ply:GetPoints())
ply:SaveMoney()
ply:SaveMoneyTXT()
@ -94,9 +93,9 @@ hook.Add("PlayerDisconnected", "ps_disc", function(ply)
end)
hook.Add("PlayerRedeemed", "ps_redeem", function(ply)
--ply:SetPoints(ReadData(ply:SteamID64()))
--ply:SetMoney(ply:GetMoney())
if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
-- ply:SetPoints(ReadData(ply:SteamID64()))
-- ply:SetMoney(ply:GetMoney())
if (game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") then
ply:SetPoints(ply:GetMoney())
end
end)
@ -116,14 +115,12 @@ end)
end
end)]]
--ZSPS_Opt = CreateConVar("ZSPS_nosend", "0", FCVAR_ARCHIVE, "Opt out of the ZSPS server list"):GetBool()
-- ZSPS_Opt = CreateConVar("ZSPS_nosend", "0", FCVAR_ARCHIVE, "Opt out of the ZSPS server list"):GetBool()
hook.Add("PlayerSpawn" , "spawnplayerpoints" ,function(pl)
if (pl:Team() == TEAM_HUMAN and game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") and gmod.GetGamemode().Name == "Zombie Survival" then
if (pl:Team() == TEAM_HUMAN and game.GetMap() ~= "zs_obj_gauntlet_v3" and game.GetMap() ~="zs_gauntlet_reborn_b6") then
pl:SetPoints(pl:GetMoney())
--pl:SetBegPoints(pl:GetDTInt(1))
-- pl:SetBegPoints(pl:GetDTInt(1))
end
end)
--/////////////////////////////////////////////////////////////////////
@ -149,7 +146,7 @@ function meta:SaveMoneyTXT()
end
function meta:TakeMoney(amount)
--Add money function here
-- Add money function here
self:AddMoney(-amount)
end

Write Preview
Loading…
Cancel
Save