Working VR Script Fe Universal Script
Working VR Script Fe Universal Script
__ __ _ _ _
__ __ _____
\ \ / / | | (_) ( )
\ \ / / | __ \
\ \ /\ / / | |__ ___ ___ __ _ _ __ __ ___ ___ |/ ___
\ \ / / | |__) |
\ \/ \/ / | '_ \ / _ \ / _ \ / _` | | | \ \ / / / _ \ / __| / __|
\ \/ / | _ /
\ /\ / | | | | | (_) | | (_) | | (_| | | | \ V / | __/ \__ \ \__ \
\ / | | \ \
\/ \/ |_| |_| \___/ \___/ \__, | |_| \_/ \___| |___/ |___/
\/ |_| \_\ FIXED 22/07/01.
__/ |
|___/
With MW Reanimate!
Inspired By Skeds VR
--]]
local options = {}
-- OPTIONS:
[Link] = true -- Set this
to true if you want to chat in VR (Button to open is B on your VR controller)
[Link] = 0.4 --
Transparency for your VR hands, Dont worry this is client sided (0.4 is
recommended)
[Link] = true -- Set this to
true if you want your hats to not get in the way, This is client sided
--
if true then --makes the local variables from the reanimate script private
local netboost = 1000 --velocity
--netboost usage:
--set to false to disable
--vector3 if you dont want the velocity to change
--number to change the velocity in real time with magnitude equal to the
number
local simradius = "shp" --simulation radius method
--"shp" - sethiddenproperty
--"ssr" - setsimulationradius
--false - disable
local newanimate = true --disable the animate script and enable after
reanimation
local R15toR6 = true --tries to convert your character to r6 if its r15
local addtools = true --puts all tools from backpack to character and lets
you hold them after reanimation
local loadtime = game:GetService("Players").RespawnTime + 0.5 --anti respawn
delay
local method = 3 --reanimation method
--methods:
--0 - breakJoints (takes [loadtime] seconds to laod)
--1 - limbs
--2 - limbs + anti respawn
--3 - limbs + breakJoints after [loadtime] seconds
--4 - remove humanoid + breakJoints
--5 - remove humanoid + limbs
local alignmode = 2 --AlingPosition mode
--modes:
--1 - AlignPosition rigidity enabled true
--2 - 2 AlignPositions rigidity enabled both true and false
--3 - AlignPosition rigidity enabled false
local hedafterneck = false --disable aligns for head and enable after neck is
removed
local lp = game:GetService("Players").LocalPlayer
local rs = game:GetService("RunService")
local stepped = [Link]
local heartbeat = [Link]
local renderstepped = [Link]
local sg = game:GetService("StarterGui")
local ws = game:GetService("Workspace")
local c = [Link]
[Link] = Part1
[Link] = "att1_" .. [Link]
[Link] = Part0
[Link] = "att0_" .. [Link]
if antirespawn then
respawnrequest()
end
if method == 0 then
wait(loadtime)
if not (c and [Link]) then
return
end
end
if newanimate then
local animate = gp(c, "Animate", "LocalScript")
if animate and (not [Link]) then
[Link] = true
else
newanimate = false
end
end
if addtools then
for i, v in pairs(addtools:GetChildren()) do
if v and [Link] and v:IsA("Tool") then
[Link] = c
end
end
end
pcall(function()
settings().[Link] = false
settings().[Link] =
[Link]
end)
local OLDscripts = {}
for i, v in pairs(c:GetDescendants()) do
if [Link] == "Script" then
[Link](OLDscripts, v)
end
end
local scriptNames = {}
for i, v in pairs(c:GetDescendants()) do
if v and [Link] and v:IsA("BasePart") then
local newName = tostring(i)
local exists = true
while exists do
exists = false
for i, v in pairs(OLDscripts) do
if [Link] == newName then
exists = true
end
end
if exists then
newName = newName .. "_"
end
end
[Link](scriptNames, newName)
[Link]("Script", v).Name = newName
end
end
[Link] = true
local cl = c:Clone()
for i, v in pairs(cl:GetDescendants()) do
pcall(function()
[Link] = 1
[Link] = false
end)
end
for i, v in pairs(c:GetChildren()) do
if v and [Link] and (v ~= model) then
if destroyhum and v:IsA("Humanoid") then
v:Destroy()
else
if addtools and v:IsA("Tool") then
for i1, v1 in pairs(v:GetDescendants()) do
if v1 and [Link] and v1:IsA("BasePart") then
local bv = [Link]("BodyVelocity",
v1)
[Link] = [Link](0, 0, 0)
[Link] = [Link](1000, 1000,
1000)
bv.P = 1250
[Link] = "bv_" .. [Link]
end
end
end
[Link] = model
end
end
end
local head = gp(model, "Head", "BasePart")
local torso = gp(model, "Torso", "BasePart") or gp(model, "UpperTorso",
"BasePart")
if breakjoints then
model:BreakJoints()
else
if head and torso then
for i, v in pairs(model:GetDescendants()) do
if v and [Link] and v:IsA("Weld") or v:IsA("Snap") or
v:IsA("Glue") or v:IsA("Motor") or v:IsA("Motor6D") then
local save = false
if (v.Part0 == torso) and (v.Part1 == head) then
save = true
end
if (v.Part0 == head) and (v.Part1 == torso) then
save = true
end
if save then
if hedafterneck then
hedafterneck = v
end
else
v:Destroy()
end
end
end
end
if method == 3 then
spawn(function()
wait(loadtime)
if model and [Link] then
model:BreakJoints()
end
end)
end
end
[Link] = c
for i, v in pairs(cl:GetChildren()) do
if v and [Link] then
[Link] = c
end
end
cl:Destroy()
for i, v in pairs(c:GetDescendants()) do
if v and [Link] then
if [Link] == "Script" then
if [Link](scriptNames, [Link]) then
v:Destroy()
end
else
if not v:IsDescendantOf(model) then
if v:IsA("Decal") then
[Link] = 1
end
if v:IsA("ForceField") then
[Link] = false
end
if v:IsA("Sound") then
[Link] = false
end
if v:IsA("BillboardGui") or v:IsA("SurfaceGui") or
v:IsA("ParticleEmitter") or v:IsA("Fire") or v:IsA("Smoke") or v:IsA("Sparkles")
then
[Link] = false
end
end
end
end
end
if newanimate then
local animate = gp(c, "Animate", "LocalScript")
if animate then
[Link] = false
end
end
if addtools then
for i, v in pairs(c:GetChildren()) do
if v and [Link] and v:IsA("Tool") then
[Link] = addtools
end
end
end
local rb = [Link]("BindableEvent", c)
[Link]:Connect(function()
rb:Destroy()
sg:SetCore("ResetButtonCallback", true)
if destroyhum then
c:BreakJoints()
return
end
if antirespawn then
if hum0 and [Link] and ([Link] > 0) then
model:BreakJoints()
[Link] = 0
end
respawnrequest()
else
if hum0 and [Link] and ([Link] > 0) then
model:BreakJoints()
[Link] = 0
end
end
end)
sg:SetCore("ResetButtonCallback", rb)
spawn(function()
while c and [Link] do
if hum0 and [Link] and hum1 and [Link] then
[Link] = [Link]
end
wait()
end
sg:SetCore("ResetButtonCallback", true)
end)
[Link]:Wait()
--
local Root = character:FindFirstChild("HumanoidRootPart")
repeat wait()
a = pcall(function()
game:WaitForChild("Players").LocalPlayer:WaitForChild("PlayerScripts").ChildAdded:C
onnect(function(c)
if [Link] == "PlayerScriptsLoader"then
[Link] = true
end
end)
end)
if a == true then break end
until true == false
game:WaitForChild("Players").LocalPlayer:WaitForChild("PlayerScripts").ChildAdded:C
onnect(function(c)
if [Link] == "PlayerScriptsLoader"then
[Link] = true
end
end)
[Link] = [Link]
[Link] = [Link]
-- Chat Part:
if [Link] == true then
local VRchat = [Link]("ScreenGui")
local Page1 = [Link]("Frame")
local Hello = [Link]("TextButton")
local Ok = [Link]("TextButton")
local No = [Link]("TextButton")
local Yes = [Link]("TextButton")
local Hm = [Link]("TextButton")
local Lol = [Link]("TextButton")
local Come = [Link]("TextButton")
local WhoosVR = [Link]("TextButton")
local WaitAMin = [Link]("TextButton")
local What = [Link]("TextButton")
local NextPage = [Link]("TextButton")
local Page2 = [Link]("Frame")
local Stop = [Link]("TextButton")
local Start = [Link]("TextButton")
local TextButton = [Link]("TextButton")
local Hey = [Link]("TextButton")
local Cool = [Link]("TextButton")
local Bruh = [Link]("TextButton")
local SUS = [Link]("TextButton")
local Hacker = [Link]("TextButton")
local Me = [Link]("TextButton")
local BackPage = [Link]("TextButton")
[Link] = "VR chat"
[Link] = [Link]:WaitForChild("PlayerGui")
[Link] = [Link]
[Link] = "Page1"
[Link] = VRchat
Page1.BackgroundColor3 = [Link](109, 109, 109)
[Link] = 0.300
[Link] = [Link](-0.00080871582, 0, -0.00193678541, 0)
[Link] = [Link](1, 0, 1, 0)
[Link] = false
[Link] = "Hello"
[Link] = Page1
Hello.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.0549020506, 0, 0.0764637515, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Hello!"
Hello.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Ok"
[Link] = Page1
Ok.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.355535269, 0, 0.0764637515, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Ok"
Ok.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "No"
[Link] = Page1
No.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.354956299, 0, 0.32854709, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "No"
No.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Yes"
[Link] = Page1
Yes.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.0549020506, 0, 0.330081195, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Yes"
Yes.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Hm"
[Link] = Page1
Hm.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.677410305, 0, 0.330081195, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "?"
Hm.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Lol"
[Link] = Page1
Lol.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.676831245, 0, 0.0759145617, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Lol"
Lol.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Come"
[Link] = Page1
Come.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.0549020506, 0, 0.574909747, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Come"
Come.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "WhoosVR"
[Link] = Page1
WhoosVR.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.325847805, 0, 0.839991808, 0)
[Link] = [Link](0.347911447, 0, 0.108808197, 0)
[Link] = [Link]
[Link] = "Whoogives's VR"
WhoosVR.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "WaitAMin"
[Link] = Page1
WaitAMin.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.356518745, 0, 0.574909747, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Wait a min"
WaitAMin.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "What"
[Link] = Page1
What.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.675847769, 0, 0.573831201, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "What?"
What.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "NextPage"
[Link] = Page1
NextPage.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.733790994, 0, 0.854575157, 0)
[Link] = [Link](0.152555302, 0, 0.081699349, 0)
[Link] = [Link]
[Link] = "Next"
NextPage.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 14.000
[Link] = true
[Link] = "Page2"
[Link] = VRchat
Page2.BackgroundColor3 = [Link](109, 109, 109)
[Link] = 0.300
[Link] = [Link](-0.00080871582, 0, -0.00193678541, 0)
[Link] = [Link](1, 0, 1, 0)
[Link] = false
[Link] = "Stop"
[Link] = Page2
Stop.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.0549020506, 0, 0.0764637515, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Stop"
Stop.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Start"
[Link] = Page2
Start.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.355535269, 0, 0.0764637515, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Start"
Start.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "!"
[Link] = Page2
TextButton.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.354956299, 0, 0.32854709, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "!"
TextButton.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Hey"
[Link] = Page2
Hey.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.0549020506, 0, 0.330081195, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Hey"
Hey.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Cool"
[Link] = Page2
Cool.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.677410305, 0, 0.330081195, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Cool"
Cool.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Bruh"
[Link] = Page2
Bruh.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.676831245, 0, 0.0759145617, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Bruh"
Bruh.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "SUS"
[Link] = Page2
SUS.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.0549020506, 0, 0.574909747, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "sus"
SUS.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Hacker"
[Link] = Page2
Hacker.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.356518745, 0, 0.574909747, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Hacker"
Hacker.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "Me"
[Link] = Page2
Me.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.675847769, 0, 0.573831201, 0)
[Link] = [Link](0.265625, 0, 0.21041666, 0)
[Link] = [Link]
[Link] = "Me"
Me.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 25.000
[Link] = true
[Link] = "BackPage"
[Link] = Page2
BackPage.BackgroundColor3 = [Link](255, 255, 255)
[Link] = [Link](0.11035347, 0, 0.854575157, 0)
[Link] = [Link](0.152555302, 0, 0.081699349, 0)
[Link] = [Link]
[Link] = "Back"
BackPage.TextColor3 = [Link](0, 0, 0)
[Link] = true
[Link] = 14.000
[Link] = true
[Link] = false
[Link] = false
game:GetService("UserInputService").InputBegan:connect(function(inputObject,
gameProcessedEvent)
if [Link] == [Link] then
if [Link] == false then
[Link] = true
wait(.2)
else
[Link] = false
wait(.2)
end
end
end)
[Link]:Connect(function()
[Link] = true
[Link] = false
end)
[Link]:Connect(function()
[Link] = false
[Link] = true
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Hello!", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Ok", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("?", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Yes", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Come", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Lol", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("No", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Wait a min", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Whoogives's VR", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("What", "All")
[Link] = false
end)
-- Page2:
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Sus", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Cool", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Hey", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Stop", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("!", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Start", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Hacker", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Me", "All")
[Link] = false
end)
[Link]:Connect(function()
game:GetService("ReplicatedStorage").[Link]:
FireServer("Bruh", "All")
[Link] = false
end)
--
end
--
[Link] = "Scriptable"
[Link] = [Link]
[Link] = nil
[Link] = [Link]
game:GetService("StarterGui"):SetCore("VRLaserPointerMode", 0)
game:GetService("StarterGui"):SetCore("VREnableControllerModels", false)
print("Whoogive's VR by Whoogivesashit#2751")
[Link] =
[Link]([Link])
game:GetService("RunService").RenderStepped:connect(function()
if R1down then
[Link] = [Link]:Lerp([Link] + (character["Right
Arm"].CFrame*[Link](-[Link]([Link].X),-
[Link]([Link].Y),[Link](180-
[Link].X))).LookVector * [Link]/2, 0.5)
end
end)
local function bubble(plr,msg)
game:GetService("Chat"):Chat([Link],msg,[Link])
end
if [Link] == true then
[Link]:connect(function(plr)
[Link]:connect(function(msg)
game:GetService("Chat"):Chat([Link],msg,[Link])
end)
end)
game:GetService("Chat"):Chat([Link],msg,[Link])
end)
end
end
[Link]:connect(function(key)
if [Link] == [Link].ButtonR1 then
if [Link].Z > 0.9 then
R1down = true
else
R1down = false
end
end
end)
[Link]:connect(function(key)
if [Link] == [Link].ButtonR1 then
R1down = true
end
end)
[Link]:connect(function(key)
if [Link] == [Link].ButtonR1 then
R1down = false
end
end)
[Link] = 1
character:FindFirstChildOfClass("Humanoid").BreakJointsOnDeath = false
character:FindFirstChildOfClass("Humanoid").RequiresNeck = false
[Link]:Destroy()
character["Left Leg"]:Destroy()
character["Right Leg"]:Destroy()
for i, v in pairs(character:GetChildren()) do
pcall(function()
[Link] = true
[Link] = [Link]
end)
end
[Link]:connect(function(part,move)
if part == [Link] then
--move(head,[Link]*move)
[Link] = [Link]*([Link](move.p*([Link]-
1))*move - [Link](0,0,0))
[Link] = [Link]
elseif part == [Link] then
--move(handL,[Link]*move)
character["Left Arm"].CFrame =
[Link]*([Link](move.p*([Link]-
1))*move*[Link]([Link]([Link].X),[Link]([Link]
thandrotoffset.Y),[Link]([Link].Z)))
elseif part == [Link] then
--move(handR,[Link]*move)
character["Right Arm"].CFrame =
[Link]*([Link](move.p*([Link]-
1))*move*[Link]([Link]([Link].X),[Link]([Link]
thandrotoffset.Y),[Link]([Link].Z)))
end
end)