Loads code from the internet. It downloads more code when it runs (loadstring + HttpGet), which can change after it was posted. From: rawscripts.net, www.roblox.com.
[[local PlayerPage = CreatePage()
local AnimationPage = CreatePage()
local GamesPage = CreatePage()
local PlayersPage = CreatePage()
local CreditsPage = CreatePage()]]
[[
--====================================================
-- MODDED ANIMATIONS
-- ONLY EMOTES / TOOLS / COMBAT / INTERACTIONS
--====================================================
local Animations = {
{"Wave", "128777973", false},
{"Point", "128853357", false},
{"Laugh", "129423131", false},
{"Cheer", "129423030", false},
{"Dance", "182435998", true},
{"Dance 2", "182436842", true},
{"Dance 3", "182436935", true},
{"Dance Variant 1", "182491037", true},
{"Dance Variant 2", "182491065", true},
{"Dance Variant 3", "182491248", true},
{"Dance Variant 4", "182491277", true},
{"Dance Variant 5", "182491368", true},
{"Dance Variant 6", "182491423", true},
{"Tool Idle", "182393478", true},
{"Tool Slash", "129967390", false},
{"Tool Lunge", "129967478", false},
}
local function CanLoadAnimation(ID)
local Character = LocalPlayer.Character
if not Character then
return false
end
local Humanoid =
Character:FindFirstChildOfClass("Humanoid")
if not Humanoid then
return false
end
local Animator =
Humanoid:FindFirstChildOfClass("Animator")
if not Animator then
Animator = Instance.new("Animator")
Animator.Parent = Humanoid
end
local Animation =
Instance.new("Animation")
Animation.AnimationId =
"rbxassetid://" .. tostring(ID)
local Success, Track = pcall(function()
return Animator:LoadAnimation(Animation)
end)
if Track then
pcall(function()
Track:Stop()
Track:Destroy()
end)
end
Animation:Destroy()
return Success and Track ~= nil
end
local function PlayAnimation(Name, ID, Button, Looped)
local Character = LocalPlayer.Character
local Humanoid =
Character and
Character:FindFirstChildOfClass("Humanoid")
if not Humanoid then
return false
end
StopCurrentAnimation()
local Animator =
Humanoid:FindFirstChildOfClass("Animator")
if not Animator then
Animator = Instance.new("Animator")
Animator.Parent = Humanoid
end
local Animation =
Instance.new("Animation")
Animation.AnimationId =
"rbxassetid://" .. tostring(ID)
local Success, Track = pcall(function()
return Animator:LoadAnimation(Animation)
end)
Animation:Destroy()
if not Success or not Track then
return false
end
CurrentTrack = Track
Track.Priority =
Enum.AnimationPriority.Action
Track.Looped = Looped == true
local Played = pcall(function()
Track:Play(0.15)
end)
if not Played then
pcall(function()
Track:Destroy()
end)
CurrentTrack = nil
return false
end
Button.Text =
"▶ " .. Name
if not Track.Looped then
Track.Stopped:Connect(function()
if CurrentTrack == Track then
CurrentTrack = nil
end
if Button.Parent then
Button.Text = Name
end
end)
else
task.delay(0.8, function()
if Button.Parent then
Button.Text = Name
end
end)
end
return true
end
local CategoryLabels = {
["Wave"] = "EMOTES",
["Point"] = "EMOTES",
["Laugh"] = "EMOTES",
["Cheer"] = "EMOTES",
["Dance"] = "EMOTES",
["Dance 2"] = "EMOTES",
["Dance 3"] = "EMOTES",
["Dance Variant 1"] = "EMOTES",
["Dance Variant 2"] = "EMOTES",
["Dance Variant 3"] = "EMOTES",
["Dance Variant 4"] = "EMOTES",
["Dance Variant 5"] = "EMOTES",
["Dance Variant 6"] = "EMOTES",
["Tool Idle"] = "TOOLS",
["Tool Slash"] = "COMBAT / TOOLS",
["Tool Lunge"] = "COMBAT / TOOLS"
}
local CurrentCategory
local function CreateAnimationCategory(Name)
local Label =
Instance.new("TextLabel")
Label.Size =
UDim2.new(1, -5, 0, 30)
Label.BackgroundTransparency = 1
Label.Text =
"── " .. Name .. " ──"
Label.TextColor3 =
Color3.fromRGB(100, 170, 255)
Label.TextSize = 14
Label.Font =
Enum.Font.GothamBold
Label.ZIndex = 15
Label.Parent = AnimationScroll
end
for _, Data in ipairs(Animations) do
task.spawn(function()
local Name = Data[1]
local ID = Data[2]
local Looped = Data[3]
-- Don't create the button if the animation
-- cannot currently be loaded.
if not CanLoadAnimation(ID) then
return
end
local Category =
CategoryLabels[Name] or "INTERACTIONS"
if CurrentCategory ~= Category then
CurrentCategory = Category
CreateAnimationCategory(Category)
end
local Button =
Instance.new("TextButton")
Button.Size =
UDim2.new(1, -5, 0, 42)
Button.BackgroundColor3 =
Color3.fromRGB(42, 43, 52)
Button.BorderSizePixel = 0
Button.Text = Name
Button.TextColor3 =
Color3.new(1, 1, 1)
Button.TextSize = 13
Button.Font =
Enum.Font.GothamBold
Button.ZIndex = 15
Button.Parent = AnimationScroll
Instance.new(
"UICorner",
Button
).CornerRadius =
UDim.new(0, 8)
Button.MouseButton1Click:Connect(function()
if not PlayAnimation(
Name,
ID,
Button,
Looped
) then
Button:Destroy()
end
end)
end)
end
]]
-- Replace the original animation section
-- from the database through the button-generation loop.
local
'local Animations = {.-\nend\n\nfor _, Data in ipairs%(Animations%) do.-\nend'