local LP = game:GetService("Players").LocalPlayer
local out = {}
local function add(s) table.insert(out, s) end
local function walk(inst, prefix, depth)
  if depth > 2 then return end
  for _, c in ipairs(inst:GetChildren()) do
    add(prefix .. c.ClassName .. " " .. c.Name)
    if c:IsA("Folder") or c:IsA("Actor") or c.Name == "Combat" then walk(c, prefix .. "  ", depth + 1) end
  end
end
add("PlayerScripts:")
walk(LP.PlayerScripts, "  ", 0)
print(table.concat(out, "\n"))