Frame

--[[

    ██╗     ██╗   ██╗██╗  ██╗███████╗██╗   ██╗██╗  ████████╗██████╗  █████╗ 
    ██║     ██║   ██║╚██╗██╔╝██╔════╝██║   ██║██║  ╚══██╔══╝██╔══██╗██╔══██╗
    ██║     ██║   ██║ ╚███╔╝ █████╗  ██║   ██║██║     ██║   ██████╔╝███████║
    ██║     ██║   ██║ ██╔██╗ ██╔══╝  ██║   ██║██║     ██║   ██╔══██╗██╔══██║
    ███████╗╚██████╔╝██╔╝ ██╗███████╗╚██████╔╝███████╗██║   ██║  ██║██║  ██║
    ╚══════╝ ╚═════╝ ╚═╝  ╚═╝╚══════╝ ╚═════╝ ╚══════╝╚═╝   ╚═╝  ╚═╝╚═╝  ╚═╝

    ┌─────────────────────────────────────────────────────────────────┐
    │                                                                 │
    │       Script    : Frame                                         │
    │       Author    : LuxeUltra                                     │
    │       License   : Private                                       │
    │       Discord   : https://discord.gg/4zupNafqDN                 │
    │                                                                 │
    └─────────────────────────────────────────────────────────────────┘

]]

-- The accomplice also needs to inject this script to have the animations if needed
local Cible = 3502932306 -- Target ID
local Complice = "USERNAME" -- your buddy who's going to be the target
local StompCount = 143 -- the number of stomps that your target has
local EMOJI = "" -- if he has an emoji in the game
local HASPREMIUM = false -- Premium



local Players = game:GetService("Players")
local UserService = game:GetService("UserService")
local CoreGui = game:GetService("CoreGui")

local infos = UserService:GetUserInfosByUserIdsAsync({Cible})[1]
local SpoofPlayer = Instance.new("Player")
SpoofPlayer.UserId = infos.Id
SpoofPlayer.Name = infos.Username
SpoofPlayer.DisplayName = infos.DisplayName
SpoofPlayer.CharacterAppearanceId = infos.Id

local StompFolder = Instance.new("Folder", SpoofPlayer)
StompFolder.Name = "leaderstats"
local Stompsvalue = Instance.new("IntValue", StompFolder)
Stompsvalue.Name = "Stomps"
Stompsvalue.Value = StompCount
SpoofPlayer.Parent = Players

local Compliceplr = Players[Complice]
local LocalPlayer = Players.LocalPlayer
local HumDescription = Players:GetHumanoidDescriptionFromUserId(Cible)
local HumModel = Players:CreateHumanoidModelFromDescription(HumDescription, Enum.HumanoidRigType.R15)
local appearance = Players:GetCharacterAppearanceAsync(Cible)

if HASPREMIUM then
    local PlayerScrollList = CoreGui.PlayerList.Children.OffsetFrame.PlayerScrollList.SizeOffsetFrame.ScrollingFrameContainer.ScrollingFrameClippingFrame.ScollingFrame.OffsetUndoFrame 
    for i,v in pairs(PlayerScrollList:GetChildren()) do
        local playername = v.ChildrenFrame.NameFrame.BGFrame.OverlayFrame.PlayerName.PlayerName.Text
        if playername == infos.DisplayName then
            v.ChildrenFrame.NameFrame.BGFrame.OverlayFrame.PlayerIcon.Image = "rbxasset://LuaPackages/Packages/_Index/FoundationImages/FoundationImages/SpriteSheets/img_set_1x_4.png"
            v.ChildrenFrame.NameFrame.BGFrame.OverlayFrame.PlayerIcon.ImageRectSize = Vector2.new(16, 16)
            v.ChildrenFrame.NameFrame.BGFrame.OverlayFrame.PlayerIcon.ImageRectOffset = Vector2.new(162, 495)
        end
    end
end

Compliceplr.Character:FindFirstChildOfClass("Humanoid").DisplayName = EMOJI .. infos.DisplayName

function weldAttachments(attach1, attach2)
    local weld = Instance.new("Weld")
    weld.Part0 = attach1.Parent
    weld.Part1 = attach2.Parent
    weld.C0 = attach1.CFrame
    weld.C1 = attach2.CFrame
    weld.Parent = attach1.Parent
    return weld
end
function buildWeld(weldName, parent, part0, part1, c0, c1)
    local weld = Instance.new("Weld")
    weld.Name = weldName
    weld.Part0 = part0
    weld.Part1 = part1
    weld.C0 = c0
    weld.C1 = c1
    weld.Parent = parent
    return weld
end
function findFirstMatchingAttachment(model, name)
    for _, child in pairs(model:GetChildren()) do
        if child:IsA("Attachment") and child.Name == name then
            return child
        elseif not child:IsA("Accoutrement") and not child:IsA("Tool") then -- Don't look in hats or tools in the character
            local foundAttachment = findFirstMatchingAttachment(child, name)
            if foundAttachment then
                return foundAttachment
            end
        end
    end
end
function addAccoutrement(character, accoutrement)  
    accoutrement.Parent = character
    local handle = accoutrement:FindFirstChild("Handle")
    if handle then
        local accoutrementAttachment = handle:FindFirstChildOfClass("Attachment")
        if accoutrementAttachment then
            local characterAttachment = findFirstMatchingAttachment(character, accoutrementAttachment.Name)
            if characterAttachment then
                weldAttachments(characterAttachment, accoutrementAttachment)
            end
        else
            local head = character:FindFirstChild("Head")
            if head then
                local attachmentCFrame = CFrame.new(0, 0.5, 0)
                local hatCFrame = accoutrement.AttachmentPoint
                buildWeld("HeadWeld", head, head, handle, attachmentCFrame, hatCFrame)
            end
        end
    end
end

for i,v in pairs(Compliceplr.Character:GetChildren()) do
    if v:IsA("Accessory") or v:IsA("BodyColors") or v:IsA("Pants") or v:IsA("Shirt") or v:IsA("ShirtGraphic") then
        v:Destroy()
    end
end

for i,v in pairs(appearance:GetChildren()) do
    if v:IsA("BodyColors") then
        v.Parent = Compliceplr.Character
    elseif v:IsA("Accessory") then
        addAccoutrement(Compliceplr.Character, v)
    elseif v:IsA("Pants") or v:IsA("Shirt") or v:IsA("ShirtGraphic") then
        v.Parent = Compliceplr.Character
    end
end


for i,v in pairs(HumModel:GetChildren()) do
	if v:IsA('MeshPart') and v.Name ~= "RightHand" then
        local newbodypart = HumModel.Humanoid:GetBodyPartR15(v)
		Compliceplr.Character:FindFirstChild("Humanoid"):ReplaceBodyPartR15(newbodypart, v)
	end
    if v.Name == "RightHand" then
        local rightHandFromModel = HumModel:FindFirstChild("RightHand")
        local myRightHand = Compliceplr.Character:FindFirstChild("RightHand")
        if rightHandFromModel and myRightHand and rightHandFromModel:IsA("MeshPart") and myRightHand:IsA("MeshPart") then
            myRightHand.MeshId = rightHandFromModel.MeshId
            myRightHand.TextureID = rightHandFromModel.TextureID
            myRightHand.Color = rightHandFromModel.Color
            myRightHand.Size = rightHandFromModel.Size
            myRightHand.Material = rightHandFromModel.Material
        end
    end
end


if Compliceplr.Character.Head:FindFirstChild("face") then
    Compliceplr.Character.Head.face:Destroy()
end

if appearance:FindFirstChild("face") then
    appearance.face.Parent = Compliceplr.Character.Head
else
    local face = Instance.new("Decal")
    face.Face = "Front"
    face.Name = "face"
    face.Texture = "rbxasset://textures/face.png"
    face.Transparency = 0
    face.Parent = Compliceplr.Character.Head
end

local Animate = Compliceplr.Character.Animate
local Table_Anime = {}
for i,v in pairs(appearance:GetChildren()) do
    if v.Name == "R15Anim" then
        local animationtype = v:FindFirstChildOfClass("StringValue")

        for animations, anim in pairs(animationtype:GetChildren()) do
            if anim:IsA("Animation") and not string.find(anim.AnimationId, "rbxassetid://") then 
                if anim.AnimationId then
                    print(anim.Name)
                    print(anim.AnimationId)
                    local RunReplacementAnimation = Instance.new("Animation")
                    RunReplacementAnimation.AnimationId = anim.AnimationId
                    Table_Anime[anim.Name] = RunReplacementAnimation
                end
            end
        end
    end
end


if Compliceplr == LocalPlayer then
    local NameCall
    function OnNameCall(self, ...)
        local Arguments = {...}
        local Caller, Method = checkcaller(), getnamecallmethod()
        if not Caller then
            if Method == "LoadAnimation" then
                local A = Arguments[1]
                if Table_Anime[tostring(A)] then
                    Arguments[1] = Table_Anime[tostring(A)]
                end
            end
        end
        return NameCall(self, unpack(Arguments))
    end
    NameCall = hookmetamethod(game, "__namecall", OnNameCall)
end

Compliceplr.Character.Humanoid.Jump = true


local leaderstats = Compliceplr:FindFirstChild("leaderstats")
if not leaderstats then
    Compliceplr.ChildAdded:Wait()
    leaderstats = Compliceplr:WaitForChild("leaderstats")
end

leaderstats:FindFirstChild("Stomps"):GetPropertyChangedSignal("Value"):Connect(function()
    Stompsvalue.Value += 1
end)