--New version coming soon... will dump Roblox memory to file, and parse it to create a .rbxlx (you can't get localscript or script source anymore since Roblox only sends bytecode to your client! Also can't get anything in ServerStorage, so works best on script-less places)
--[[ 
How to use...
!!**Stealer's way**!!
You will need to know the terrain/plugin explioit. (Any other explioit can work, try it out!)
Make this script a plugin.
Now go into the game you want to save (With the explioit).
Close any other ROBLOX windows, then close the ROBLOX window with the game you want to save.
Open Roblox Studio (You may have to wait a long time), then press "New", now type this in the Command Bar:
settings()["Place Save Script Data"].Parent = workspace
If it didn't work, try again!
--]]
repeat wait() until settings() ~= nil
if settings():FindFirstChild("Place Save Script Data") then error("This script has launched too many times.") end
repeat wait() until game:FindFirstChild("NetworkCilent")
setting = settings()
mamodel = Instance.new("Model",setting)
wsmodel = Instance.new("Model",mamodel)
plmodel = Instance.new("Model",mamodel)
limodel = Instance.new("Model",mamodel)
sgmodel = Instance.new("Model",mamodel)
spmodel = Instance.new("Model",mamodel)
demodel = Instance.new("Model",mamodel)
ssmodel = Instance.new("Model",mamodel)
--[[ --Work in progress...
maextra = Instance.new("Model",mamodel)
amextra = Instance.new("Color3Value",maextra)
brextra = Instance.new("IntValue",maextra)
cbextra = Instance.new("Color3Value",maextra)
ctextra = Instance.new("Color3Value",maextra)
scextra = Instance.new("Color3Value",maextra)
glextra = Instance.new("StringValue",maextra)
tmextra = Instance.new("StringValue",maextra)
dfextra = Instance.new("IntValue",maextra)
dsextra = Instance.new("IntValue",maextra)
rsextra = Instance.new("IntValue",maextra)
--]]
mamodel.Name = "Place Save Script Data"
wsmodel.Name = "Workspace"
plmodel.Name = "Players"
limodel.Name = "Lighting"
sgmodel.Name = "StarterGui"
spmodel.Name = "StarterPack"
demodel.Name = "Debris"
ssmodel.Name = "SoundService"
--[[
maextra.Name = "Extras"
amextra.Name = "Lighting.Ambient"
brextra.Name = "Lighting.Brightness"
ckextra.Name = "Lighting.ColorShift_Bottom"
ctextra.Name = "Lighting.ColorShift_Top"
scextra.Name = "Lighting.ShadowColor"
glextra.Name = "Lighting.GeographicLatitude"
tmextra.Name = "Lighting.TimeOfDay"
dfextra.Name = "SoundService.DistanceFactor"
dsextra.Name = "SoundService.DopplerScale"
rsextra.Name = "SoundService.RolloffScale"
--]]
wsre = workspace
plre = game:GetService("Players")
lire = game:GetService("Lighting")
sgre = game:GetService("StarterGui")
spre = game:GetService("StarterPack")
dere = game:GetService("Debris")
ssre = game:GetService("SoundService")

wsgc = wsre:GetChildren()
plgc = plre:GetChildren()
ligc = lire:GetChildren()
sggc = sgre:GetChildren()
spgc = spre:GetChildren()
degc = dere:GetChildren()
ssgc = ssre:GetChildren()

for i, v in pairs(wsgc) do
if not (v:IsA("Terrain") or plre:GetPlayerFromCharacter(v)) then
pcall(function() v:Clone().Parent = wsmodel end)
end
end

for i, v in pairs(plgc) do
if not (v:IsA("Player")) then
pcall(function() v:Clone().Parent = plmodel end)
end
end

for i, v in pairs(ligc) do
pcall(function() v:Clone().Parent = limodel end)
end

for i, v in pairs(sggc) do
pcall(function() v:Clone().Parent = sgmodel end)
end

for i, v in pairs(spgc) do
pcall(function() v:Clone().Parent = spmodel end)
end

for i, v in pairs(degc) do
--pcall(function() v:Clone().Parent = demodel end)
end

for i, v in pairs(ssgc) do
if not (v:IsA("StockSound")) then
pcall(function() v:Clone().Parent = ssmodel end)
end
end