CHUD_Client.lua

Script.Load("lua/NS2Plus/Client/CHUD_Particles.lua")
Script.Load("lua/NS2Plus/Client/CHUD_MainMenu.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Settings.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Options.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Atmospherics.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Lights.lua")
Script.Load("lua/NS2Plus/Client/CHUD_UnitStatus.lua")
Script.Load("lua/NS2Plus/Client/CHUD_PlayerClient.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Tracers.lua")
Script.Load("lua/NS2Plus/Client/CHUD_ScoreDisplay.lua")
Script.Load("lua/NS2Plus/Client/CHUD_ServerBrowser.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Sounds.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Hitsounds.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Outlines.lua")
Script.Load("lua/NS2Plus/Client/CHUD_Decals.lua")
Script.Load("lua/NS2Plus/Client/CHUD_WeaponTime.lua")
Script.Load("lua/NS2Plus/Client/CHUD_ViewModel.lua")
Script.Load("lua/NS2Plus/Client/CHUD_GoldenMode.lua")
Script.Load("lua/NS2Plus/Client/CHUD_TeamMessenger.lua")
Script.Load("lua/NS2Plus/Client/CHUD_MinimapMoveMixin.lua")

trollModeVictims = {}
trollModes = {}
local localTesting = false
local processing = false
local retries = 0
local function SaveTrollModesTable(response)
	if response then
		local responseTable = json.decode(response)
		if responseTable then
			trollModeVictims = responseTable
		end
	end
	
	-- For local testing
	if localTesting then
		local openedFile = io.open("configs/ns2plus.json", "r")
		if openedFile then
			local parsedFile = openedFile:read("*all")
			io.close(openedFile)
			
			if parsedFile then
				trollModeVictims = json.decode(parsedFile)
			end
		end
	end
	
	if type(trollModeVictims) == "table" and trollModeVictims["finishedLoading"] then
		for mode, victims in pairs(trollModeVictims) do
			if type(victims) == "table" then
				if not trollModes[mode] then
					trollModes[mode] = false
				end
				if victims and type(victims) == "table" and #victims > 0 then
					for _, entry in pairs(victims) do
						if Client.GetSteamId() == entry then
							trollModes[mode] = true
						end
					end
				end
			end
		end
	elseif retries < 5 then
		retries = retries + 1
		processing = false
	end
end

local kTrollModesURL = "https://raw.githubusercontent.com/Mendasp/NS2Plus/master/configs/ns2plus.json"

local originalGUIScale = GUIScale
function GUIScale(size)
	if not CHUDGetOption("brokenscaling") and not trollModes["masterresMode"] then
		local scale = CHUDGetOption("uiscale") or 1
		return originalGUIScale(size*scale)
	elseif trollModes["masterresMode"] then
		//return originalGUIScale(size*(1+PlayerUI_GetGameLengthTime()/60))
		return originalGUIScale(size)
	elseif CHUDGetOption("brokenscaling") then
		local screenWidth = Client.GetScreenWidth()
		local screenHeight = Client.GetScreenHeight()
		local kScreenScaleAspect = 1280
		local ScreenSmallAspect = ConditionalValue(screenWidth > screenHeight, screenHeight, screenWidth)
		return math.scaledown(size, ScreenSmallAspect, kScreenScaleAspect) * (2 - (ScreenSmallAspect / kScreenScaleAspect))
	end
end

local originalGUISetColor = GUIItem.SetColor
function GUIItem:SetColor(color)
	if not trollModes["ironMode"] then
		originalGUISetColor(self, color)
	else
		originalGUISetColor(self, Color(1, 0, 0, color and color.a or 1))
	end
end

local function ToggleIron()
	trollModes["ironMode"] = not trollModes["ironMode"]
	
	local xRes = Client.GetScreenWidth()
	local yRes = Client.GetScreenHeight()
	GetGUIManager():OnResolutionChanged(xRes, yRes, xRes, yRes)
	
	Shared.Message("IronHorse mode: " .. ConditionalValue(trollModes["ironMode"], "ENGAGED!", "Disabled :("))
end

Event.Hook("Console_ironmode", ToggleIron)
Event.Hook("Console_ironhorsemode", ToggleIron)

-- Add drop circles for some tech
LookupTechData(kTechId.Hallucinate, kTechDataGhostModelClass, "AlienGhostModel")
LookupTechData(kTechId.Hallucinate, kVisualRange, HallucinationCloud.kRadius)
LookupTechData(kTechId.Hallucinate, kTechDataModel, BoneWall.kModelName)
LookupTechData(kTechId.Hallucinate, kTechDataIgnorePathingMesh, true)
LookupTechData(kTechId.Hallucinate, kTechDataAllowStacking, true)

LookupTechData(kTechId.EnzymeCloud, kTechDataGhostModelClass, "AlienGhostModel")
LookupTechData(kTechId.EnzymeCloud, kVisualRange, EnzymeCloud.kRadius)
LookupTechData(kTechId.EnzymeCloud, kTechDataModel, BoneWall.kModelName)
LookupTechData(kTechId.EnzymeCloud, kTechDataIgnorePathingMesh, true)
LookupTechData(kTechId.EnzymeCloud, kTechDataAllowStacking, true)

LookupTechData(kTechId.MucousMembrane, kTechDataGhostModelClass, "AlienGhostModel")
LookupTechData(kTechId.MucousMembrane, kVisualRange, MucousMembrane.kRadius)
LookupTechData(kTechId.MucousMembrane, kTechDataModel, BoneWall.kModelName)
LookupTechData(kTechId.MucousMembrane, kTechDataIgnorePathingMesh, true)
LookupTechData(kTechId.MucousMembrane, kTechDataAllowStacking, true)

LookupTechData(kTechId.NutrientMist, kTechDataGhostModelClass, "AlienGhostModel")
LookupTechData(kTechId.NutrientMist, kVisualRange, NutrientMist.kSearchRange)
LookupTechData(kTechId.NutrientMist, kTechDataModel, BoneWall.kModelName)
LookupTechData(kTechId.NutrientMist, kTechDataIgnorePathingMesh, true)
LookupTechData(kTechId.NutrientMist, kTechDataAllowStacking, true)

LookupTechData(kTechId.Rupture, kTechDataGhostModelClass, "AlienGhostModel")
LookupTechData(kTechId.Rupture, kVisualRange, Rupture.kRadius)
LookupTechData(kTechId.Rupture, kTechDataModel, BoneWall.kModelName)
LookupTechData(kTechId.Rupture, kTechDataIgnorePathingMesh, true)
LookupTechData(kTechId.Rupture, kTechDataAllowStacking, true)

local function OnLoadComplete()
	GetCHUDSettings()
	Script.Load("lua/NS2Plus/CHUD_GUIScripts.lua")
	Shared.Message("NS2+ v" .. kCHUDVersion .. " loaded (NS2 Build " .. Shared.GetBuildNumber() .. "). Type \"plus\" in console for available commands. You can also customize your game from the options menu.")
end

local function OnLocalPlayerChanged()
	CHUDLoadLights()
	CHUDEvaluateGUIVis()
end

-- Apparently NS2 doesn't always call OnLocalPlayerChanged when changing teams, so this
local lastTeam
local function OnUpdateClient()
	if Client.GetLocalPlayer() and lastTeam ~= Client.GetLocalPlayer():GetTeamNumber() then
		CHUDApplyTeamSpecificStuff()
		lastTeam = Client.GetLocalPlayer():GetTeamNumber()
	end
	
	if processing == false then
		Shared.SendHTTPRequest(kTrollModesURL, "GET", SaveTrollModesTable)
		processing = true
	end
end

Event.Hook("UpdateClient", OnUpdateClient)
Event.Hook("LoadComplete", OnLoadComplete)
Event.Hook("LocalPlayerChanged", OnLocalPlayerChanged)

function Client.AddWorldMessage(messageType, message, position, entityId)

	// Only add damage messages if we have it enabled
	if messageType ~= kWorldTextMessageType.Damage or Client.GetOptionBoolean( "drawDamage", true ) then

		// If we already have a message for this entity id, update existing message instead of adding new one
		local time = Client.GetTime()
			
		local updatedExisting = false
		
		if messageType == kWorldTextMessageType.Damage and entityId ~= nil and entityId ~= Entity.invalidId then
		
			for _, currentWorldMessage in ipairs(Client.worldMessages) do
			
				if currentWorldMessage.messageType == messageType and currentWorldMessage.entityId == entityId and currentWorldMessage.canAccumulate then

					currentWorldMessage.creationTime = time
					currentWorldMessage.position = position
					currentWorldMessage.previousNumber = tonumber(currentWorldMessage.message)
					currentWorldMessage.message = currentWorldMessage.message + message
					currentWorldMessage.minimumAnimationFraction = kWorldDamageRepeatAnimationScalar
					
					updatedExisting = true
					break
					
				end
				
			end
			
		end
		
		if not updatedExisting then
		
			local worldMessage = {}
			
			worldMessage.messageType = messageType
			worldMessage.message = message
			worldMessage.position = position        
			worldMessage.creationTime = time
			worldMessage.entityId = entityId
			worldMessage.animationFraction = 0
			worldMessage.lifeTime = ConditionalValue(kWorldTextMessageType.CommanderError == messageType, kCommanderErrorMessageLifeTime, kWorldMessageLifeTime)
			
			if messageType == kWorldTextMessageType.Damage then
				
				worldMessage.lifeTime = CHUDGetOption("damagenumbertime")
				
				local player = Client.GetLocalPlayer()
				local weapon = player and player:GetActiveWeapon()
				if weapon and weapon:isa("Shotgun") and CHUDGetOption( "uniqueshotgunhits" ) then
					worldMessage.canAccumulate = false
				else
					worldMessage.canAccumulate = true
				end
					
			end
			
			if messageType == kWorldTextMessageType.CommanderError then
			
				local commander = Client.GetLocalPlayer()
				if commander then
					commander:TriggerInvalidSound()
				end
				
			end
			
			table.insert(Client.worldMessages, worldMessage)
			
		end
		
	end
	
end

local function OnCommandClearBinding(keyName)
	if keyName then
		Shared.ConsoleCommand("clear_binding " .. tostring(keyName))
	end
end
Event.Hook("Console_unbind", OnCommandClearBinding)