local LP = game:GetService("Players").LocalPlayer
local RS = game:GetService("ReplicatedStorage")
local out = {}
local function add(s) table.insert(out, s) end

add("players:")
for _, p in ipairs(game:GetService("Players"):GetPlayers()) do
  local c = p.Character
  local t = c and c:FindFirstChildWhichIsA("Tool")
  add("  " .. p.Name .. (p == LP and " (me)" or "") .. " tool=" .. tostring(t and (t.Name .. "/" .. tostring(t:GetAttribute("WeaponId")))))
end

add("Lobby.Range children:")
local range = workspace.Lobby:FindFirstChild("Range")
for _, c in ipairs(range:GetChildren()) do
  add("  " .. c.ClassName .. " " .. c.Name .. "  #desc=" .. #c:GetDescendants())
end

add("range descendant names (first 80):")
local n = 0
for _, d in ipairs(range:GetDescendants()) do
  n = n + 1
  if n <= 80 then add("  " .. d.ClassName .. " " .. d:GetFullName()) end
end
add("total range descendants=" .. n)

add("workspace top-level:")
for _, c in ipairs(workspace:GetChildren()) do add("  " .. c.ClassName .. " " .. c.Name) end

add("ReplicatedStorage.Assets children:")
local assets = RS:FindFirstChild("Assets")
if assets then for _, c in ipairs(assets:GetChildren()) do add("  " .. c.ClassName .. " " .. c.Name) end end

add("Shared children:")
for _, c in ipairs(RS.Shared:GetChildren()) do add("  " .. c.ClassName .. " " .. c.Name) end
print(table.concat(out, "\n"))