Infinty RPG Hack Gui

local pl = game.Players.LocalPlayer
local character = pl.Character
local hum = character:FindFirstChild("HumanoidRootPart")


local playerVer = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local openCloseButton = Instance.new("TextButton")
local Background = Instance.new("Frame")
local CreditFrame = Instance.new("Frame")
local credit = Instance.new("TextLabel")
local Info = Instance.new("Frame")
local speedInfo = Instance.new("TextLabel")
local xpInfo = Instance.new("TextLabel")
local moneyInfo = Instance.new("TextLabel")
local ImageLabel = Instance.new("ImageLabel")
local xpButton = Instance.new("TextButton")
local moneyButton = Instance.new("TextButton")
local speedLabel = Instance.new("TextLabel")
local add = Instance.new("TextButton")
local degrease = Instance.new("TextButton")
local speedShower = Instance.new("TextLabel")
local speedCurrent = Instance.new("TextLabel")




-- Properties

playerVer.Name = "playerVer"
playerVer.Parent = pl.PlayerGui

Frame.Parent = playerVer
Frame.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Frame.BackgroundTransparency = 0.10000000149012
Frame.BorderColor3 = Color3.new(0.196078, 0.196078, 0.196078)
Frame.BorderSizePixel = 0
Frame.LayoutOrder = 500
Frame.Position = UDim2.new(0.0308483299, 0, 0.0395480208, 0)
Frame.Size = UDim2.new(0, 370, 0, 50)

openCloseButton.Name = "openCloseButton"
openCloseButton.Parent = Frame
openCloseButton.BackgroundColor3 = Color3.new(1, 1, 1)
openCloseButton.BackgroundTransparency = 1
openCloseButton.Size = UDim2.new(0, 370, 0, 50)
openCloseButton.Font = Enum.Font.SourceSans
openCloseButton.Text = "Open/Close"
openCloseButton.TextColor3 = Color3.new(0, 0, 0)
openCloseButton.TextScaled = true
openCloseButton.TextSize = 14
openCloseButton.TextWrapped = true

Background.Name = "Background"
Background.Parent = Frame
Background.BackgroundColor3 = Color3.new(0.117647, 0.117647, 0.117647)
Background.BackgroundTransparency = 0.40000000596046
Background.BorderColor3 = Color3.new(0, 0, 0)
Background.BorderSizePixel = 0
Background.LayoutOrder = 100
Background.Position = UDim2.new(0, 0, 1, 0)
Background.Size = UDim2.new(0, 370, 0, 215)

CreditFrame.Name = "CreditFrame"
CreditFrame.Parent = Background
CreditFrame.BackgroundColor3 = Color3.new(0.196078, 0.196078, 0.196078)
CreditFrame.BackgroundTransparency = 0.10000000149012
CreditFrame.BorderColor3 = Color3.new(0.196078, 0.196078, 0.196078)
CreditFrame.BorderSizePixel = 0
CreditFrame.LayoutOrder = 101
CreditFrame.Position = UDim2.new(0, 0, 1, 0)
CreditFrame.Size = UDim2.new(0, 370, 0, 35)

credit.Name = "credit"
credit.Parent = CreditFrame
credit.BackgroundColor3 = Color3.new(1, 1, 1)
credit.BackgroundTransparency = 0.89999997615814
credit.BorderSizePixel = 0
credit.Size = UDim2.new(0, 370, 0, 35)
credit.Font = Enum.Font.SourceSans
credit.Text = "Xopabyteh's InfinityRpg Gui"
credit.TextColor3 = Color3.new(0, 0, 0)
credit.TextScaled = true
credit.TextSize = 14
credit.TextWrapped = true

Info.Name = "Info"
Info.Parent = Background
Info.BackgroundColor3 = Color3.new(0.117647, 0.117647, 0.117647)
Info.BorderColor3 = Color3.new(0, 0, 0)
Info.BorderSizePixel = 2
Info.Position = UDim2.new(0.0945945904, 0, 1.23255813, 0)
Info.Size = UDim2.new(0, 300, 0, 50)

speedInfo.Name = "speedInfo"
speedInfo.Parent = Info
speedInfo.BackgroundColor3 = Color3.new(1, 1, 1)
speedInfo.BackgroundTransparency = 0.85000002384186
speedInfo.Size = UDim2.new(0, 300, 0, 50)
speedInfo.Visible = false
speedInfo.Font = Enum.Font.SourceSans
speedInfo.Text = "Change Your Speed Statistics"
speedInfo.TextColor3 = Color3.new(0, 0, 0)
speedInfo.TextScaled = true
speedInfo.TextSize = 14
speedInfo.TextWrapped = true

xpInfo.Name = "xpInfo"
xpInfo.Parent = Info
xpInfo.BackgroundColor3 = Color3.new(1, 1, 1)
xpInfo.BackgroundTransparency = 0.85000002384186
xpInfo.Size = UDim2.new(0, 300, 0, 50)
xpInfo.Visible = false
xpInfo.Font = Enum.Font.SourceSans
xpInfo.Text = "Will Give You 50K Levels"
xpInfo.TextColor3 = Color3.new(0, 0, 0)
xpInfo.TextScaled = true
xpInfo.TextSize = 14
xpInfo.TextWrapped = true

moneyInfo.Name = "moneyInfo"
moneyInfo.Parent = Info
moneyInfo.BackgroundColor3 = Color3.new(1, 1, 1)
moneyInfo.BackgroundTransparency = 0.85000002384186
moneyInfo.Size = UDim2.new(0, 300, 0, 50)
moneyInfo.Visible = false
moneyInfo.Font = Enum.Font.SourceSans
moneyInfo.Text = "Will Give  You 1B Money"
moneyInfo.TextColor3 = Color3.new(0, 0, 0)
moneyInfo.TextScaled = true
moneyInfo.TextSize = 14
moneyInfo.TextWrapped = true

ImageLabel.Parent = Background
ImageLabel.BackgroundColor3 = Color3.new(1, 1, 1)
ImageLabel.BackgroundTransparency = 0.80000001192093
ImageLabel.BorderSizePixel = 0
ImageLabel.LayoutOrder = 1
ImageLabel.Size = UDim2.new(0, 370, 0, 215)
ImageLabel.Image = "rbxassetid://2045243336"

xpButton.Name = "xpButton"
xpButton.Parent = Background
xpButton.BackgroundColor3 = Color3.new(1, 1, 1)
xpButton.BackgroundTransparency = 0.85000002384186
xpButton.Position = UDim2.new(0.0675675645, 0, 0.116279073, 0)
xpButton.Size = UDim2.new(0, 150, 0, 50)
xpButton.Font = Enum.Font.SourceSans
xpButton.Text = "XP"
xpButton.TextColor3 = Color3.new(0, 0, 0)
xpButton.TextScaled = true
xpButton.TextSize = 14
xpButton.TextWrapped = true

moneyButton.Name = "MoneyButton"
moneyButton.Parent = Background
moneyButton.BackgroundColor3 = Color3.new(1, 1, 1)
moneyButton.BackgroundTransparency = 0.85000002384186
moneyButton.Position = UDim2.new(0.067567572, 0, 0.38139534, 0)
moneyButton.Size = UDim2.new(0, 150, 0, 50)
moneyButton.Font = Enum.Font.SourceSans
moneyButton.Text = "Money"
moneyButton.TextColor3 = Color3.new(0, 0, 0)
moneyButton.TextScaled = true
moneyButton.TextSize = 14
moneyButton.TextWrapped = true

speedLabel.Name = "speedLabel"
speedLabel.Parent = Background
speedLabel.BackgroundColor3 = Color3.new(1, 1, 1)
speedLabel.BackgroundTransparency = 0.85000002384186
speedLabel.Position = UDim2.new(0.068, 0,0.651, 0)
speedLabel.Size = UDim2.new(0, 150, 0, 50)
speedLabel.Font = Enum.Font.SourceSans
speedLabel.Text = "Speed"
speedLabel.TextColor3 = Color3.new(0, 0, 0)
speedLabel.TextScaled = true
speedLabel.TextSize = 14
speedLabel.TextWrapped = true

add.Parent = speedLabel
add.BackgroundColor3 = Color3.new(1, 1, 1)
add.BackgroundTransparency = 0.85000002384186
add.Position = UDim2.new(1.04000008, 0, 0, 0)
add.Size = UDim2.new(0, 50, 0, 50)
add.Font = Enum.Font.SourceSans
add.Text = "+"
add.TextColor3 = Color3.new(0, 0, 0)
add.TextScaled = true
add.TextSize = 14
add.TextWrapped = true

degrease.Parent = speedLabel
degrease.BackgroundColor3 = Color3.new(1, 1, 1)
degrease.BackgroundTransparency = 0.85000002384186
degrease.Position = UDim2.new(1.41333318, 0, 0, 0)
degrease.Size = UDim2.new(0, 50, 0, 50)
degrease.Font = Enum.Font.SourceSans
degrease.Text = "-"
degrease.TextColor3 = Color3.new(0, 0, 0)
degrease.TextScaled = true
degrease.TextSize = 14
degrease.TextWrapped = true

speedShower.Name = "speedShower"
speedShower.Parent = speedLabel
speedShower.BackgroundColor3 = Color3.new(1, 1, 1)
speedShower.BackgroundTransparency = 0.85000002384186
speedShower.Position = UDim2.new(1.78792787, 0, 0, 0)
speedShower.Size = UDim2.new(0, 70, 0, 50)
speedShower.Font = Enum.Font.SourceSans
speedShower.Text = ""
speedShower.TextColor3 = Color3.new(0, 0, 0)
speedShower.TextScaled = true
speedShower.TextSize = 14
speedShower.TextWrapped = true


speedCurrent.Name = "speedCurrent"
speedCurrent.Parent = speedShower
speedCurrent.BackgroundColor3 = Color3.new(1, 1, 1)
speedCurrent.BackgroundTransparency = 1
speedCurrent.BorderSizePixel = 0
speedCurrent.Size = UDim2.new(0, 73, 0, 50)
speedCurrent.Font = Enum.Font.SourceSans
speedCurrent.Text = "Idk Your Speed Change It"
speedCurrent.TextColor3 = Color3.new(0, 0, 0)
speedCurrent.TextScaled = true
speedCurrent.TextSize = 14
speedCurrent.TextWrapped = true




-------------------------------------------------
function xp()
local remote = game.Workspace.Core.TradeStatistics

for i=1,50 do

game.Workspace.Core.Buy:FireServer("Iron Sword",100)

wait(0.03)

game.Workspace.Core.Sell:FireServer("Iron Sword",500000100,"SellScript")

remote:FireServer()

	end
end
-------------------------------------------------
function money()
	for i=1,4 do

game.Workspace.Core.Buy:FireServer("Iron Sword",100)

wait(0.03)

game.Workspace.Core.Sell:FireServer("Iron Sword",500000100,"SellScript")

	end
end
-------------------------------------------------
function giveSpeed()
character.Humanoid.WalkSpeed = character.Humanoid.WalkSpeed + 5
local change = Instance.new("BoolValue")
change.Parent = speedCurrent
wait(0.005)
change:Destroy()

end
-------------------------------------------------
function degreaseSpeed()
character.Humanoid.WalkSpeed = character.Humanoid.WalkSpeed - 5
local change = Instance.new("BoolValue")
change.Parent = speedCurrent
wait(0.005)
change:Destroy()
end
--------------------------------------------------
function showSpeed()
	speedCurrent.Text = character.Humanoid.WalkSpeed

end
--------------------------------------------------
speedCurrent.ChildAdded:connect(showSpeed)
degrease.MouseButton1Click:connect(degreaseSpeed)
add.MouseButton1Click:connect(giveSpeed)
xpButton.MouseButton1Click:connect(xp)
moneyButton.MouseButton1Click:connect(money)
------------------------------------------------
------------------------------------------------
function openClose()
if Background.Visible == false then
	Background.Visible = true
else
	Background.Visible = false
end
end
-------------------------------------------------
speedLabel.MouseEnter:connect(function()
	speedInfo.Visible = true
end)

speedLabel.MouseLeave:connect(function()
	speedInfo.Visible = false
end)
---------------------------------------------------
xpButton.MouseEnter:connect(function()
	xpInfo.Visible = true
end)

xpButton.MouseLeave:connect(function()
	xpInfo.Visible = false
end)
---------------------------------------------------
moneyButton.MouseEnter:connect(function()
	moneyInfo.Visible = true
end)

moneyButton.MouseLeave:connect(function()
	moneyInfo.Visible = false
end)
---------------------------------------------------

openCloseButton.MouseButton1Click:connect(openClose)