[Hack] Emotes Unlocker

Script source Luau

Copy Script

-- [[ BloxScripts Risk Notice ]]
-- This script has not been verified by BloxScripts.fun. Deal with caution.
--
-- Stay safe:
--   • Never log in on unofficial Roblox sites or lookalike domains.
--   • Real Roblox links use roblox.com (check the .com ending).
--   • Treat fake Roblox login / "claim reward" pages as phishing.
-- [[ End BloxScripts Risk Notice ]]

local P = game:GetService("Players").LocalPlayer
local RS = game:GetService("ReplicatedStorage")
local CS = game:GetService("CollectionService")

local Stats = require(RS.Modules.Stats)
local Emotes = require(RS.Assets.Data.Emotes)
local Radial = require(P.PlayerGui.EmoteWheel.Radial)
local ItemList = P.PlayerGui.UI.Menu.Menu.Frame.Tabs.Emotes.ItemList

for _, v in next, Emotes do
    if v.Gamepass then P:SetAttribute(v.Gamepass, true) end
end

for _, c in ipairs(ItemList:GetChildren()) do
    local p = c:FindFirstChild("Purchase")
    if p then
        p.Visible = false
        p.BackgroundTransparency = 1
        for _, ch in ipairs(p:GetDescendants()) do
            if ch:IsA("GuiObject") then ch.Visible = false end
        end
    end
end

local function H()
    for _, s in ipairs(CS:GetTagged("EmoteSlot")) do
        if not s:GetAttribute("H") then
            s:SetAttribute("H", true)
            s.Button.MouseButton1Click:Connect(function()
                Radial:StartBinding(s.Name)
            end)
        end
    end
end
H()
CS:GetInstanceAddedSignal("EmoteSlot"):Connect(H)

local W = P.PlayerGui.EmoteWheel.Wheel
function Radial:StartBinding(n)
    self.BindingElement = n
    self.Binding = true
    W.Unbind.Visible = true
    W.CustomEmoteToggle.Visible = false
    P.PlayerGui.UI.Enabled = false
    self.CurrentRadial.DeadZoneOut = 1
    self.CurrentRadial.DeadZoneIn = 0.5
    self:SetEnabled(true)

    local C
    C = self.CurrentRadial.Clicked:Connect(function(i)
        C:Disconnect()
        if not self.Binding then return end

        local items = table.clone(Stats.Emotes.Items or {})
        for k, v in next, items do if v == i then items[k] = nil end end
        items[n] = i
        Stats.Emotes.Items = items

        self:StopBinding()
        self:Rebuild()
    end)
end

Review the source before using it. Executions count successful copies, capped at 10 per user and network per script in 24 hours.