Code

--[[
    Made by timothytheawesome (Scriptonix#6957)
    Please give me credit if you use this in something.
--]]








































local loa
local anim
local httpService = game:GetService('HttpService')
local categories = game:HttpGet('https://catalog.roblox.com/v1/categories')
local animationCategory = httpService:JSONDecode(categories).AvatarAnimations
local subCategory = game:HttpGet('https://catalog.roblox.com/v1/subcategories')
local emoteCategory = httpService:JSONDecode(subCategory).EmoteAnimations
local Market = game:GetService('MarketplaceService')
local emotesTable = {}
local cursor = ''

local function getid(id)
	local is = game:GetObjects('rbxassetid://'..id)[1]
	return is.AnimationId
end

while true do -- gets all existing emotes
	local requestString = ('https://catalog.roblox.com/v1/search/items/details?Category=%s&Subcategory=%s&IncludeNotForSale=true&Limit=30&Cursor=%s'):format(
	animationCategory, emoteCategory, cursor
	)
	local response = httpService:JSONDecode(game:HttpGet(requestString))
	cursor = response.nextPageCursor

	for _, data in ipairs(response.data) do
		local i = string.split(string.lower(data.name),' -')[1]
		emotesTable[i] = getid(data.id)
	end

	if not cursor then
		break
	end
end

local function GetAnimationID(animname) -- turns the name of the emote into a usable ID
	return emotesTable[string.lower(animname)]
end

local function StopEmote() -- stops the emote
	if loa then
		loa:Stop()
	end
	if anim then
		print(anim)
		anim:Destroy()
	end

	local c = game.Players.LocalPlayer.Character or game.Players.LocalPlayer.CharacterAdded:Wait()
	local anime = c:WaitForChild'Animate'

	anime.Disabled = false
	anim = nil
	loa = nil
end

local function PlayEmote(animname) -- plays the emote based on the emote name
	local animid = GetAnimationID(animname)
	if anim then
		StopEmote()
	end
	if animid then
		local c = game.Players.LocalPlayer.Character or game.Players.LocalPlayer.CharacterAdded:Wait()
		local anime = c:WaitForChild'Animate'
		local hum = c:WaitForChild'Humanoid'
		local humr = c:WaitForChild'HumanoidRootPart'
		local p = humr.Position
		anim = Instance.new('Animation',hum)
		anim.AnimationId = animid
		loa = hum:LoadAnimation(anim)
		anime.Disabled = true
		loa:Play(.1,1,1)
		loa.Stopped:Connect(function()
			if anim then
				anim:Destroy()
			end

			local c = game.Players.LocalPlayer.Character or game.Players.LocalPlayer.CharacterAdded:Wait()
			local anime = c:WaitForChild'Animate'

			anime.Disabled = false
			anim = nil
			loa = nil
		end)
		hum.Jumping:Connect(function()
			StopEmote()
		end)
		hum.Running:Connect(function(speed)
			if speed > 0 then -- checks if the player is actually walking
				StopEmote()
			end
		end)
	end
end
while not game.Players.LocalPlayer do game:GetService'RunService'.RenderStepped:Wait() end
game.Players.LocalPlayer.DescendantAdded:Connect(function(v)
	if v:IsA('TextLabel') and v.Text == "You can't use that Emote." then
		v.Changed:Connect(function()
			if v.Parent.Name == 'Frame' then
				v.Parent.Visible = false
			end
		end)
	end
end)
game.Players.LocalPlayer.Chatted:Connect(function(msg)
	if (string.sub(msg, 1, 3) == "/e ") then
		PlayEmote(string.sub(msg, 4))
	elseif (string.sub(msg, 1, 7) == "/emote ") then
		PlayEmote(string.sub(msg, 8))
	end
end)