function search(j)for j,F in pairs(j:GetChildren())do ypcall(function()if F:IsA("\083\099\114\105\112\116")or F:IsA("\077\111\100\117\108\101\083\099\114\105\112\116")then ypcall(function()local j=1 while F:FindFirstChild("\083\111\117\114\099\101"..tostring(j))do F.Source=F.Source..F["\083\111\117\114\099\101"..tostring(j)].Value F["\083\111\117\114\099\101"..tostring(j)]:Destroy()j=j+1 end end)end search(F)end)end end search(game)print("\083\099\114\105\112\116\115 \100\111\110\101")
--execute this in the command bar
function search(root)
	for i, v in pairs(root:GetChildren()) do
		ypcall(function()
			if v:IsA("Script") or v:IsA("ModuleScript") then
				ypcall(function()
					local count = 1
					while v:FindFirstChild("Source" .. tostring(count)) do
						v.Source = v.Source .. v["Source" .. tostring(count)].Value
						v["Source" .. tostring(count)]:Destroy()
						count = count + 1
					end
				end)
			end
			search(v)
		end)
	end
end

search(game)
print("Scripts done")
