Check Inventory

local localplr = game.Players.LocalPlayer

local screen = Instance.new("ScreenGui")
screen.Parent = localplr.PlayerGui
screen.Name = "BackPackViewer"
local uip = game:GetService("UserInputService")
local frame = Instance.new("Frame")
frame.Parent = screen
frame.Name = "MainFrame"
frame.BackgroundColor3 = Color3.new(0,0,0)
frame.Size = UDim2.new(0.4,0,0.4,0)
frame.Position = UDim2.new(-1,0,0.5,0)
frame.AnchorPoint = Vector2.new(0.5,0.5)
local exec = Instance.new("TextButton")
exec.Name = "Execute"
exec.Parent = frame
exec.Text = "Execute"
exec.TextColor3 = Color3.new(1,0,0)
exec.Font = Enum.Font.Merriweather
exec.BackgroundTransparency = 1
exec.BorderColor3 = Color3.new(0,0,0)
exec.TextScaled = true
exec.Size = UDim2.new(0.5,0,0.1,0)
exec.Position = UDim2.new(0.5,0,0.9,0)
exec.ZIndex = 5
local db = false
local scrol = Instance.new("ScrollingFrame")
scrol.Parent = frame
scrol.Name = "Tools"
scrol.BackgroundColor3 = Color3.new(0,0,0)
scrol.Size = UDim2.new(1,0,0.9,0)
local ui = Instance.new("UIListLayout")
ui.Parent = scrol
local nm = Instance.new("TextBox")
nm.Font = Enum.Font.Merriweather
nm.PlaceholderText = "Click me to type player name!"
nm.Text = ""
nm.Parent = frame
nm.BackgroundTransparency = 1
nm.BorderColor3 = Color3.new(0,0,0)
nm.ZIndex = 5
nm.TextScaled = true
nm.Size = UDim2.new(0.5,0,0.1,0)
nm.TextEditable = true
nm.Position = UDim2.new(0,0,0.9,0)
nm.TextColor3 = Color3.new(1,1,1)
ui.Name = "del"
ui.SortOrder = "Name"
wait()
scrol.CanvasSize = UDim2.new(0,0,0,ui.AbsoluteContentSize.Y)
scrol.AutomaticCanvasSize = "Y"
frame:TweenPosition(UDim2.new(0.5,0,0.5,0),"InOut","Quint",1,true)

local function createtextbox(txt,pr,name)
    local nmm = Instance.new("TextLabel")
    nmm.Font = Enum.Font.Merriweather
    nmm.Text = txt
    nmm.Parent = pr
    nmm.Name = name
    nmm.BackgroundColor3 = Color3.new(0,0,0)
    nmm.TextColor3 = Color3.new(1,1,1)
    nmm.Size = UDim2.new(0.95,0,0,80)
    nmm.ZIndex = 10
    nmm.TextScaled = true
    nmm.BorderSizePixel = 0
end

spawn(function()
    uip.InputBegan:Connect(function(input)
        if input.KeyCode == Enum.KeyCode.KeypadEight then
            if frame.Position == UDim2.new(0.5,0,0.5,0) then
                frame:TweenPosition(UDim2.new(-1,0,-0.5,0),"InOut","Quint",0.4,true)
            else
                frame:TweenPosition(UDim2.new(0.5,0,0.5,0),"InOut","Quint",0.4,true)
            end
        elseif input.KeyCode == Enum.KeyCode.KeypadSeven then
            screen:Destroy()
        end
    end)
    exec.MouseButton1Click:Connect(function()
        local tl = {}
        if db == false then
            db = true
            for i,v in pairs(scrol:GetChildren()) do
                if v.Name ~= "del" then
                    v:Destroy()
                end
            end
            local plr = nil
            for i,v in pairs(game.Players:GetChildren()) do
                if string.lower(v.Name) == string.lower(nm.Text) then
                    plr = v
                end
            end
            if plr ~= nil then

                for i,v in pairs(plr.Backpack:GetChildren()) do
                        if not tl[v.Name] then
                            tl[v.Name] = 1
                        else
                            tl[v.Name] = tl[v.Name] + 1
                        end
                    end

                for i,v in pairs(tl) do
                    if(v ~= 1) then
                        createtextbox(i.." x"..v,scrol,i)
                    else
                        createtextbox(i,scrol,i)
                    end
                end
                scrol.CanvasSize = UDim2.new(0,0,0,ui.AbsoluteContentSize.Y)
            else
                exec.Text = "Player Not Found!"
                wait(1.5)
                exec.Text = "Execute"
            end

            wait(1)
            db = false
        end
    end)
end)