Roblox Hack Money Tycoon !!!

game.StarterGui:SetCore("ChatMakeSystemMessage", {
    Text = "Creat By = Fauzan640!!";
    Font = Enum.Font.ArialBold; --Arial, Cartoon, ArialBold, etc
    Color = Color3.new(255, 255, 0);
   FontSize = Enum.FontSize.Size8;
})
wait(2)
local SuperHeroTycoonGui = Instance.new("ScreenGui")
local SiperHeroTycoonFrame = Instance.new("Frame")
local SuperHeroTycoonTitle = Instance.new("TextLabel")
local LineFrame = Instance.new("Frame")
local PlayerMoney = Instance.new("TextBox")
local Money = Instance.new("TextBox")
local SetMoneyButton = Instance.new("TextButton")
--Properties:
SuperHeroTycoonGui.Name = "SuperHeroTycoonGui"
SuperHeroTycoonGui.Parent = game.CoreGui

SiperHeroTycoonFrame.Name = "SiperHeroTycoonFrame"
SiperHeroTycoonFrame.Parent = SuperHeroTycoonGui
SiperHeroTycoonFrame.BackgroundColor3 = Color3.new(0.419608, 0.419608, 0.419608)
SiperHeroTycoonFrame.BackgroundTransparency = 0.30000001192093
SiperHeroTycoonFrame.BorderColor3 = Color3.new(0, 0, 0)
SiperHeroTycoonFrame.Position = UDim2.new(0.349934459, 0, 0.125498012, 0)
SiperHeroTycoonFrame.Size = UDim2.new(0, 210, 0, 221)
SiperHeroTycoonFrame.Visible = true
SiperHeroTycoonFrame.Active = true
SiperHeroTycoonFrame.Draggable = true

SuperHeroTycoonTitle.Name = "SuperHeroTycoonTitle"
SuperHeroTycoonTitle.Parent = SiperHeroTycoonFrame
SuperHeroTycoonTitle.BackgroundColor3 = Color3.new(1, 0, 0)
SuperHeroTycoonTitle.BorderColor3 = Color3.new(0, 0, 0)
SuperHeroTycoonTitle.Size = UDim2.new(0, 210, 0, 17)
SuperHeroTycoonTitle.Font = Enum.Font.SourceSans
SuperHeroTycoonTitle.Text = "~~ACHMAD_FAUZAN~~"
SuperHeroTycoonTitle.TextColor3 = Color3.new(0, 0, 0)
SuperHeroTycoonTitle.TextSize = 14

LineFrame.Name = "LineFrame"
LineFrame.Parent = SiperHeroTycoonFrame
LineFrame.BackgroundColor3 = Color3.new(0, 0, 0)
LineFrame.Position = UDim2.new(0, 0, 0.416289598, 0)
LineFrame.Size = UDim2.new(0, 210, 0, 1)

PlayerMoney.Name = "PlayerMoney"
PlayerMoney.Parent = SiperHeroTycoonFrame
PlayerMoney.BackgroundColor3 = Color3.new(0.333333, 0.666667, 0.498039)
PlayerMoney.BorderColor3 = Color3.new(0, 0, 0)
PlayerMoney.Position = UDim2.new(0.0817387402, 0, 0.498467684, 0)
PlayerMoney.Size = UDim2.new(0, 89, 0, 25)
PlayerMoney.Font = Enum.Font.SourceSans
PlayerMoney.PlaceholderColor3 = Color3.new(0, 0, 0)
PlayerMoney.PlaceholderText = "Player"
PlayerMoney.Text = "Player"
PlayerMoney.TextColor3 = Color3.new(0, 0, 0)
PlayerMoney.TextSize = 14

Money.Name = "Money"
Money.Parent = SiperHeroTycoonFrame
Money.BackgroundColor3 = Color3.new(0.333333, 0.666667, 0.498039)
Money.BorderColor3 = Color3.new(0, 0, 0)
Money.Position = UDim2.new(0.503145516, 0, 0.498467684, 0)
Money.Size = UDim2.new(0, 89, 0, 25)
Money.Font = Enum.Font.SourceSans
Money.PlaceholderColor3 = Color3.new(0, 0, 0)
Money.PlaceholderText = "Amount of Money"
Money.Text = "Amount of Money"
Money.TextColor3 = Color3.new(0, 0, 0)
Money.TextScaled = true
Money.TextSize = 14
Money.TextWrapped = true

SetMoneyButton.Name = "SetMoneyButton"
SetMoneyButton.Parent = SiperHeroTycoonFrame
SetMoneyButton.BackgroundColor3 = Color3.new(0.333333, 0.666667, 0.498039)
SetMoneyButton.BorderColor3 = Color3.new(0, 0, 0)
SetMoneyButton.Position = UDim2.new(0.0817387402, 0, 0.695796013, 0)
SetMoneyButton.Size = UDim2.new(0, 178, 0, 27)
SetMoneyButton.Font = Enum.Font.SourceSans
SetMoneyButton.Text = "Set Player Money"
SetMoneyButton.TextColor3 = Color3.new(0, 0, 0)
SetMoneyButton.TextSize = 14


-- Scripts:
SetMoneyButton.MouseButton1Click:connect(function()
               if PlayerMoney.Text == "others" then
                       for i,v in pairs(game.ReplicatedStorage.PlayerMoney:GetChildren()) do
                           if v.Name ~= game.Players.LocalPlayer.Name then
                               game.ReplicatedStorage.Events.changeValue:InvokeServer(v, Money.Text)
                           end
                       end
               else
               if PlayerMoney.Text == "all" then
                       for i,v in pairs(game.ReplicatedStorage.PlayerMoney:GetChildren()) do
                               game.ReplicatedStorage.Events.changeValue:InvokeServer(v, Money.Text)
                           end

               else
               if PlayerMoney.Text == "me" then
                       for i,v in pairs(game.ReplicatedStorage.PlayerMoney:GetChildren()) do
                           if v.Name == game.Players.LocalPlayer.Name then
                               game.ReplicatedStorage.Events.changeValue:InvokeServer(v, Money.Text)
                           end
                       end
else
               for i,v in pairs(game.ReplicatedStorage.PlayerMoney:GetChildren()) do
if v.Name == PlayerMoney.Text then
game.ReplicatedStorage.Events.changeValue:InvokeServer(v, Money.Text)
end
end
end
end
end
end)
OpenSecondFrame.MouseButton1Click:connect(function()
if SecondFrame.Visible == false then
SecondFrame.Visible = true
OpenSecondFrame.Text = "^"
else
SecondFrame.Visible = false
OpenSecondFrame.Text = "v"

end
end)