Deaths on the map example

local CollectionService = game:GetService("CollectionService")
local Players = game:GetService("Players")
local ServerScriptService = game:GetService("ServerScriptService")
local ServerStorage = game:GetService("ServerStorage")

local RoStructure = require(ServerScriptService.RoStructure)
local secrets = require(ServerStorage.RoStructureSecrets)

local analytics = RoStructure.init({
	projectId = "my_game",
	ingestionKey = secrets.ingestionKey,
	buildId = "v" .. game.PlaceVersion,
	endpoint = "https://api.rostructure.com",
	-- We record deaths ourselves below, so each one can carry a cause.
	autoTrack = { deaths = false },
})

local currentStage: { [Player]: string } = {}
local reachedCheckpoints: { [Player]: { [Instance]: boolean } } = {}

local function playerFromHit(hit: BasePart): (Player?, Model?)
	local model = hit:FindFirstAncestorOfClass("Model")
	local player = model and Players:GetPlayerFromCharacter(model)
	return player, model
end

-- Parts tagged "StageStart" (attribute StageId) mark where a stage begins.
local function bindStageStart(part: Instance)
	local stageId = part:GetAttribute("StageId")
	if not part:IsA("BasePart") or type(stageId) ~= "string" then
		return
	end
	part.Touched:Connect(function(hit)
		local player = playerFromHit(hit)
		if not player or currentStage[player] == stageId then
			return
		end
		currentStage[player] = stageId
		analytics:setStage(player, stageId)
		analytics:track(player, "stage_started", { stageId = stageId, position = true })
	end)
end

-- Parts tagged "Checkpoint" (attribute StageId) are recorded once per player.
local function bindCheckpoint(part: Instance)
	local stageId = part:GetAttribute("StageId")
	if not part:IsA("BasePart") or type(stageId) ~= "string" then
		return
	end
	part.Touched:Connect(function(hit)
		local player = playerFromHit(hit)
		local reached = player and reachedCheckpoints[player]
		if not player or not reached or reached[part] then
			return
		end
		reached[part] = true
		analytics:track(player, "checkpoint_reached", { stageId = stageId, position = true })
	end)
end

-- Parts tagged "KillPart" (attribute Cause, for example "Lava") kill on touch.
local function bindKillPart(part: Instance)
	if not part:IsA("BasePart") then
		return
	end
	local cause = part:GetAttribute("Cause")
	part.Touched:Connect(function(hit)
		local _, model = playerFromHit(hit)
		local humanoid = model and model:FindFirstChildOfClass("Humanoid")
		if humanoid and humanoid.Health > 0 and model then
			model:SetAttribute("LastCause", if type(cause) == "string" then cause else part.Name)
			humanoid.Health = 0
		end
	end)
end

local function bindTagged(tag: string, bind: (Instance) -> ())
	for _, instance in CollectionService:GetTagged(tag) do
		bind(instance)
	end
	CollectionService:GetInstanceAddedSignal(tag):Connect(bind)
end

bindTagged("StageStart", bindStageStart)
bindTagged("Checkpoint", bindCheckpoint)
bindTagged("KillPart", bindKillPart)

-- One death event per life, with the position and the cause.
local function onCharacter(player: Player, character: Model)
	local humanoid = character:WaitForChild("Humanoid", 10)
	if not humanoid or not humanoid:IsA("Humanoid") then
		return
	end
	humanoid.Died:Once(function()
		local cause = character:GetAttribute("LastCause")
		analytics:track(player, "player_died", {
			position = true,
			metadata = { cause = if type(cause) == "string" then cause else "Unknown" },
		})
	end)
end

local function onPlayerAdded(player: Player)
	reachedCheckpoints[player] = {}
	player.CharacterAdded:Connect(function(character)
		onCharacter(player, character)
	end)
	if player.Character then
		task.spawn(onCharacter, player, player.Character)
	end
end

Players.PlayerAdded:Connect(onPlayerAdded)
for _, player in Players:GetPlayers() do
	onPlayerAdded(player)
end

Players.PlayerRemoving:Connect(function(player)
	currentStage[player] = nil
	reachedCheckpoints[player] = nil
end)