R15 to R6 Animation
Maybe its buggy? atleast works.
Create A Script and type:
print('15 to 6')
local choice = Instance.new("Folder",workspace)
choice.Name = "Choices"
local exportData = Instance.new("Folder",workspace)
exportData.Name = "Export"
local KeyframeSequence = workspace["KD1+2+3"]:Clone()
KeyframeSequence.Parent = exportData
if not KeyframeSequence:IsA("KeyframeSequence") then
error("Object not a KeyframeSequence")
end
local suc,msg = pcall(function()
for i,v in pairs(KeyframeSequence:GetChildren()) do
local anims = v:FindFirstChild("HumanoidRootPart")
if not anims then
return
end
local lt = anims:FindFirstChild("LowerTorso")
-- LT Leg
-- RT Arm,Head
if lt then
lt.Name = "Torso"
--[[ Proccess Lower (R/L Leg) 處理下部分就是腳]]
if lt:FindFirstChild("LeftUpperLeg") then
lt.LeftUpperLeg:ClearAllChildren()
lt.LeftUpperLeg.Name = "Left Leg"
end
if lt:FindFirstChild("RightUpperLeg") then
lt.RightUpperLeg:ClearAllChildren()
lt.RightUpperLeg.Name = "Right Leg"
end
--[[ Proccess Upper ( Hand,Arm) 處理上部分也就是手]]
local ut = lt:FindFirstChild("UpperTorso")
if ut then
-- Arm,Head
local lua =ut:FindFirstChild("LeftUpperArm")
local rua =ut:FindFirstChild("RightUpperArm")
if lua then
lua:ClearAllChildren()
lua.Name = "Left Arm"
lua.Parent = lt
end
if ut:FindFirstChild("RightUpperArm") then
rua:ClearAllChildren()
rua.Name = "Right Arm"
rua.Parent = lt
end
if ut:FindFirstChild("Head") then
ut.Parent = lt
end
end
ut:Destroy()
end
print("Converted Frame " .. i)
end
end)
if suc then
print("Export Success")
choice:Destroy()
end
if not suc then
print("Export Failed")
warn(msg)
choice:Destroy()
exportData:Destroy()
end
Set KeyframeSequence to Animation KeyframeSequence
Copy The Script and Paste it into Commandbar and execute
