ghost

--By Rufus14
--owner = game.Players:FindFirstChild(script.Parent.Name)
NLS([[
localplr = game:GetService("Players").LocalPlayer
gui = localplr:findFirstChildOfClass("PlayerGui")
print("waiting for gui and remote")
local ghostgui = gui:WaitForChild("Ghost_Gui")
local viewport = ghostgui:WaitForChild("Ghost")
local remote = ghostgui:WaitForChild("GhostRemote")
localplr.Character.Archivable = true
local clone = localplr.Character:Clone()
clone.Name = "(Your last position.)"
for i,v in pairs(clone:GetChildren()) do
    if v.ClassName == "Script" or v.ClassName == "LocalScript" then
        v.Disabled = true
    end
    if v:findFirstChildOfClass("Sound") then
        v:findFirstChildOfClass("Sound"):destroy()
    end
    if v.ClassName == "Sound" then
        v:destroy()
    end
    if v.ClassName == "MeshPart" or v.ClassName == "Part" then
        v.Anchored = true
    end
    if v:findFirstChildOfClass("Decal") then
        v:findFirstChildOfClass("Decal").Transparency = 0
    end
    if v.ClassName == "Part" or v.ClassName == "MeshPart" and v.Name ~= "HumanoidRootPart" then
        v.Transparency = 0
    end
    if v.Name == "HumanoidRootPart" then
        v.Transparency = 1
    end
    if v.ClassName == "Accessory" then
        if v:findFirstChild("Handle") then
            if v:findFirstChild("Handle").ClassName == "Part" then
                v:findFirstChild("Handle").Transparency = 0
            end
        end
    end
end
clone.Parent = viewport
viewport.CurrentCamera = workspace.CurrentCamera
localplr.Character.Parent = workspace
print("ghosted")
print("showed last position")
function uncollide()
    if localplr.Character.Torso.Transparency >= 0.8 then
        for i,v in pairs(localplr.Character:GetChildren()) do
            if v.Name == "Head" or v.Name == "Torso" then
                v.CanCollide = false
            end
        end
    end
end
game:GetService("RunService").Stepped:connect(uncollide)
function ded()
    ghostgui:destroy()
    remote:FireServer("a", "a", "respawn")
end
localplr.Character:findFirstChildOfClass("Humanoid").Died:connect(ded)
function checkwhatadded(wat)
    if wat.Name == "EnterTheShadowRealm" then
        wat:destroy()
        localplr.Character.Parent = workspace
        if viewport:findFirstChild("(Your last position.)") then
            viewport:findFirstChild("(Your last position.)"):destroy()
        end
        localplr.Character.Archivable = true
        local clone = localplr.Character:Clone()
        clone.Name = "(Your last position.)"
        for i,v in pairs(clone:GetChildren()) do
            if v.ClassName == "Script" or v.ClassName == "LocalScript" then
                v.Disabled = true
            end
            if v:findFirstChildOfClass("Sound") then
                v:findFirstChildOfClass("Sound"):destroy()
            end
            if v.ClassName == "Sound" then
                v:destroy()
            end
            if v.ClassName == "MeshPart" or v.ClassName == "Part" then
                v.Anchored = true
            end
            if v:findFirstChildOfClass("Decal") then
                v:findFirstChildOfClass("Decal").Transparency = 0
            end
            if v.ClassName == "Part" or v.ClassName == "MeshPart" and v.Name ~= "HumanoidRootPart" then
                v.Transparency = 0
            end
            if v.Name == "HumanoidRootPart" then
                v.Transparency = 1
            end
            if v.ClassName == "Accessory" then
                if v:findFirstChild("Handle") then
                    if v:findFirstChild("Handle").ClassName == "Part" then
                        v:findFirstChild("Handle").Transparency = 0
                    end
                end
            end
        end
        clone.Parent = viewport
    end
end
localplr.Character.DescendantAdded:connect(checkwhatadded)
while game:GetService("RunService").RenderStepped:wait() do
    for i,v in pairs(localplr.Character:GetChildren()) do
        if v.ClassName == "Part" or v.ClassName == "MeshPart" then
            remote:FireServer(v, v.CFrame, "position")
        end
    end
end
]], owner.Character)
print("making gui")
local screengui = Instance.new("ScreenGui", owner:findFirstChildOfClass("PlayerGui"))
local remote = Instance.new("RemoteEvent", screengui)
remote.Name = "GhostRemote"
local viewport = Instance.new("ViewportFrame", screengui)
viewport.BackgroundTransparency = 1
viewport.ImageTransparency = 0.7
viewport.Name = "Ghost"
viewport.Size = UDim2.new(1,0,1,36)
viewport.Position = viewport.Position + UDim2.new(0,0,0,-36)
screengui.ResetOnSpawn = true
-- Farewell Infortality.
-- Version: 2.82
-- Instances:
local ghostbutton = Instance.new("TextButton")
local visible = Instance.new("TextButton")
local human = Instance.new("TextButton")
local whattodo = Instance.new("TextLabel")
local credits = Instance.new("TextLabel")
--Properties:

ghostbutton.Name = "ghostbutton"
ghostbutton.Parent = screengui
ghostbutton.BackgroundColor3 = Color3.new(1, 1, 1)
ghostbutton.Position = UDim2.new(0.618315041, 0, 0.0375169665, 0)
ghostbutton.Size = UDim2.new(0, 235, 0, 32)
ghostbutton.Font = Enum.Font.GothamSemibold
ghostbutton.Text = "Ghost: On"
ghostbutton.TextColor3 = Color3.new(0, 0, 0)
ghostbutton.TextSize = 30
ghostbutton.TextWrapped = true

visible.Name = "visible"
visible.Parent = screengui
visible.BackgroundColor3 = Color3.new(1, 1, 1)
visible.Position = UDim2.new(0.446153849, 0, 0.0375169665, 0)
visible.Size = UDim2.new(0, 235, 0, 32)
visible.Font = Enum.Font.GothamSemibold
visible.Text = "Visible: On"
visible.TextColor3 = Color3.new(0, 0, 0)
visible.TextSize = 30
visible.TextWrapped = true

human.Name = "humanbutton"
human.Parent = screengui
human.BackgroundColor3 = Color3.new(1, 1, 1)
human.Position = UDim2.new(0.447, 0, 0, 64)
human.Size = UDim2.new(0, 470, 0, 32)
human.Font = Enum.Font.GothamSemibold
human.Text = "Body Type: Ghost"
human.TextColor3 = Color3.new(0, 0, 0)
human.TextSize = 30
human.TextWrapped = true

whattodo.Name = "whattodo"
whattodo.Parent = screengui
whattodo.BackgroundTransparency = 1
whattodo.TextTransparency = 1
whattodo.Position = UDim2.new(0.447, 0, 0, 92)
whattodo.Size = UDim2.new(0, 470, 0, 32)
whattodo.Font = Enum.Font.GothamSemibold
whattodo.Text = "If you are getting pushed, ghost yourself again."
whattodo.TextColor3 = Color3.new(0, 0, 0)
whattodo.TextScaled = true
whattodo.TextWrapped = true

credits.Name = "credits"
credits.Parent = screengui
credits.BackgroundTransparency = 1
credits.Position = UDim2.new(0.447, 0, 0, 125)
credits.Size = UDim2.new(0, 470, 0, 32)
credits.Font = Enum.Font.GothamSemibold
credits.TextColor3 = Color3.new(0, 0, 0)
credits.TextScaled = true
credits.TextWrapped = true
credits.Text = "By Rufus14"

owner.Character.Parent = viewport
screengui.Name = "Ghost_Gui"
isghost = true
isvisible = true
humanbody = false
for i,v in pairs(owner.Character:GetChildren()) do
    if v:findFirstChildOfClass("Decal") then
        v:findFirstChildOfClass("Decal").Transparency = 1
    end
    if v.ClassName == "Part" or v.ClassName == "MeshPart" and v.Name ~= "HumanoidRootPart" then
        v.Transparency = 0.9
    end
    if v.Name == "HumanoidRootPart" then
        v.Transparency = 1
    end
    if v.ClassName == "Accessory" then
        if v:findFirstChild("Handle") then
            if v:findFirstChild("Handle").ClassName == "Part" then
                v:findFirstChild("Handle").Transparency = 1
            end
        end
    end
end
function clickedghost()
    if isghost then
        isghost = false
        ghostbutton.Text = "Ghost: Off"
        for i,v in pairs(owner.Character:GetChildren()) do
            if v:findFirstChildOfClass("Decal") then
                v:findFirstChildOfClass("Decal").Transparency = 0
            end
            if v.ClassName == "Part" or v.ClassName == "MeshPart" and v.Name ~= "HumanoidRootPart" then
                v.Transparency = 0
            end
            if v.Name == "HumanoidRootPart" then
                v.Transparency = 1
            end
            if v.ClassName == "Accessory" then
                if v:findFirstChild("Handle") then
                    if v:findFirstChild("Handle").ClassName == "Part" then
                        v:findFirstChild("Handle").Transparency = 0
                    end
                end
            end
        end
        owner.Character.Parent = workspace
        for i,v in pairs(owner.Character:GetChildren()) do
            if v.ClassName == "Accessory" then
                local hingee = v.Handle:findFirstChildOfClass("HingeConstraint")
                if hingee then
                    hingee:destroy()
                end
            end
        end
        for i,v in pairs(owner.Character:GetChildren()) do
            if v.ClassName == "Accessory" then
                v.Handle.CanCollide = false
                local attachment1 = v.Handle:findFirstChildOfClass("Attachment")
                if attachment1 then
                    for q,w in pairs(owner.Character:GetChildren()) do
                        if w.ClassName == "Part" or w.ClassName == "MeshPart" then
                            local attachment2 = w:findFirstChild(attachment1.Name)
                            if attachment2 then
                                local hinge = Instance.new("HingeConstraint", v.Handle)
                                hinge.Attachment0 = attachment1
                                hinge.Attachment1 = attachment2
                                hinge.LimitsEnabled = true
                                hinge.LowerAngle = 0
                                hinge.UpperAngle = 0
                                hinge.Name = "hatholder"
                            end
                        end
                    end
                end
            end
        end
    else
        isghost = true
        ghostbutton.Text = "Ghost: On"
        owner.Character.Parent = viewport
        local bool = Instance.new("BoolValue", owner.Character)
        bool.Name = "EnterTheShadowRealm"
        game.Debris:AddItem(bool, 0.1)
        for i,v in pairs(owner.Character:GetChildren()) do
            if v:findFirstChildOfClass("Decal") then
                v:findFirstChildOfClass("Decal").Transparency = 1
            end
            if v.ClassName == "Part" or v.ClassName == "MeshPart" and v.Name ~= "HumanoidRootPart" then
                v.Transparency = 0.9
            end
            if v.Name == "HumanoidRootPart" then
                v.Transparency = 1
            end
            if v.ClassName == "Accessory" then
                if v:findFirstChild("Handle") then
                    if v:findFirstChild("Handle").ClassName == "Part" then
                        v:findFirstChild("Handle").Transparency = 1
                    end
                end
            end
        end
    end
end
function clickedhuman()
    if humanbody then
        humanbody = false
        human.Text = "Body Type: Ghost"
        whattodo.TextTransparency = 1
        if isghost then
            human.Active = false
            isghost = false
            wait(0.5)
            local faaaace = owner.Character.Head:findFirstChildOfClass("Decal")
            if faaaace then
                faaaace.Transparency = 1
            end
            human.Active = true
            isghost = true
        end
    else
        humanbody = true
        human.Text = "Body Type: Human"
        whattodo.TextTransparency = 0
        if isghost then
            human.Active = false
            isghost = false
            wait(0.5)
            local faaaace = owner.Character.Head:findFirstChildOfClass("Decal")
            if faaaace then
                faaaace.Transparency = 1
            end
            human.Active = true
            isghost = true
        end
    end
end
function clickedvisible()
    if isvisible then
        isvisible = false
        visible.Text = "Visible: Off"
    else
        isvisible = true
        visible.Text = "Visible: On"
    end
end
human.MouseButton1Click:connect(clickedhuman)
visible.MouseButton1Click:connect(clickedvisible)
ghostbutton.MouseButton1Click:connect(clickedghost)
local physics = game:GetService("PhysicsService")
collisiongroup = "ghost"
function event(plr, limb, cframe, what)
    if plr == owner then
        if what == "position" then
            if humanbody then
                physics:RemoveCollisionGroup(collisiongroup)
                local collisiongroup = "ghost"
                physics:CreateCollisionGroup(collisiongroup)
                physics:CollisionGroupSetCollidable(collisiongroup, collisiongroup, false)
            end
            if not isvisible or not isghost then
                if workspace:findFirstChild(owner.Name.." (Ghost)") then
                    workspace:findFirstChild(owner.Name.." (Ghost)"):destroy()
                end
                return
            end
            if not workspace:findFirstChild(owner.Name.." (Ghost)") then
                Instance.new("Model", workspace).Name = owner.Name.." (Ghost)"
            end
            if humanbody then
                if not workspace:findFirstChild(owner.Name.." (Ghost)"):findFirstChildOfClass("Humanoid") then
                    Instance.new("Humanoid", workspace:findFirstChild(owner.Name.." (Ghost)")).Name = "Ghost"
                end
            end
            if not workspace[owner.Name.." (Ghost)"]:findFirstChild(limb.Name) then
                local part = Instance.new("Part", workspace[owner.Name.." (Ghost)"])
                part.Size = limb.Size
                if humanbody then
                    part.Material = limb.Material
                    part.Transparency = 0
                    part.BrickColor = limb.BrickColor
                else
                    if owner.Name == "Rufus14" then
                        part.BrickColor = limb.BrickColor
                    else
                        part.BrickColor = BrickColor.new("Institutional white")
                    end
                    part.Material = "ForceField"
                    part.Transparency = 0.6
                end
                part.Anchored = true
                part.Name = limb.Name
                part.CanCollide = false
                part.CFrame = cframe
                if part.Name == "HumanoidRootPart" then
                    part.Transparency = 1
                end
                if part.Name == "Head" then
                    if humanbody then
                        local meeeesh = owner.Character.Head:findFirstChildOfClass("SpecialMesh")
                        local faaaace = owner.Character.Head:findFirstChildOfClass("Decal")
                        if faaaace then
                            faaaace.Archivable = true
                            faaaace.Transparency = 0
                            local cloneme = faaaace:Clone()
                            cloneme.Parent = part
                        end
                        if meeeesh then
                            meeeesh.Archivable = true
                            local cloneme = meeeesh:Clone()
                            cloneme.Parent = part
                        end
                    end
                    if not part:findFirstChild("Text") and not humanbody then
                        -- Farewell Infortality.
                        -- Version: 2.82
                        -- Instances:
                        local Text = Instance.new("BillboardGui")
                        local Name = Instance.new("TextLabel")
                        --Properties:
                        Text.Name = "Text"
                        Text.Parent = part
                        Text.Size = UDim2.new(2, 0, 2, 0)
                        Text.StudsOffset = Vector3.new(-4, 2, 0)

                        Name.Name = "Name"
                        Name.Parent = Text
                        Name.BackgroundTransparency = 1
                        Name.Size = UDim2.new(5, 0, 1, 0)
                        Name.Font = Enum.Font.GothamSemibold
                        Name.Text = owner.Name.." (Ghost)"
                        Name.TextColor3 = Color3.new(1, 1, 1)
                        Name.TextScaled = true
                        Name.TextSize = 3
                        Name.TextWrapped = true
                    end
                end
            else
                workspace[owner.Name.." (Ghost)"]:findFirstChild(limb.Name).CFrame = cframe
                workspace[owner.Name.." (Ghost)"]:findFirstChild(limb.Name).Anchored = true
            end
            if humanbody then
                for i,v in pairs(owner.Character:GetChildren()) do
                    if v.ClassName == "Part" or v.ClassName == "MeshPart" then
                        physics:SetPartCollisionGroup(v, collisiongroup)
                    end
                end
                for i,v in pairs(workspace[owner.Name.." (Ghost)"]:GetChildren()) do
                    if v.ClassName == "Part" or v.ClassName == "MeshPart" then
                        physics:SetPartCollisionGroup(v, collisiongroup)
                    end
                end
            end
            if humanbody then
                for i,v in pairs(owner.Character:GetChildren()) do
                    if v.ClassName == "Shirt" or v.ClassName == "Pants" or v.ClassName == "ShirtGraphic" and not workspace[owner.Name.." (Ghost)"]:findFirstChild(v.Name) then
                        v.Archivable = true
                        local cloneme = v:Clone()
                        cloneme.Parent = workspace[owner.Name.." (Ghost)"]
                    end
                    if v.ClassName == "Accessory" and v:findFirstChild("Handle") then
                        if not workspace[owner.Name.." (Ghost)"]:findFirstChild(v.Name) then
                            v.Archivable = true
                            local cloneme = v:Clone()
                            if cloneme.Handle:findFirstChildOfClass("HingeConstraint") then
                                cloneme.Handle:findFirstChildOfClass("HingeConstraint"):destroy()
                            end
                            if cloneme.Handle:findFirstChildOfClass("Weld") then
                                cloneme.Handle:findFirstChildOfClass("Weld"):destroy()
                            end
                            cloneme.Handle.Transparency = 0
                            cloneme.Parent = workspace[owner.Name.." (Ghost)"]
                            if workspace[owner.Name.." (Ghost)"]:findFirstChild("Head") then
                                for q,w in pairs(workspace[owner.Name.." (Ghost)"]:findFirstChild("Head"):GetChildren()) do
                                    if w.ClassName == "Weld" then
                                        w:destroy()
                                    end
                                end
                                local weeeld = Instance.new("Weld", cloneme.Handle)
                                weeeld.C0 = workspace[owner.Name.." (Ghost)"]:findFirstChild("Head").CFrame:toObjectSpace(cloneme.Handle.CFrame)
                                weeeld.Part0 = workspace[owner.Name.." (Ghost)"]:findFirstChild("Head")
                                weeeld.Part1 = cloneme.Handle
                            end
                        end
                    end
                end
            end
        elseif what == "respawn" then
            owner:LoadCharacter()
        end
    end
end
remote.OnServerEvent:connect(event)