local Manager = game:GetService("VirtualInputManager")
local Fol = Instance.new("Folder", game.Workspace)
Fol.Name = "Folder"
Fol.ChildAdded:connect(function(child)
if child.Value == "Money" then
wait()
child:Destroy()
game.ReplicatedStorage.Transactions.ClientToServer.Donate:InvokeServer(game.Players.LocalPlayer, game.Players.LocalPlayer.leaderstats.Money.Value, 1)
elseif child.Value == "Load" then
wait()
child:Destroy()
repeat
game.ReplicatedStorage.LoadSaveRequests.RequestLoad:InvokeServer(-1)
wait(1)
until game.Players.LocalPlayer.leaderstats.Money.Value == 20
game.ReplicatedStorage.LoadSaveRequests.RequestLoad:InvokeServer(game.Players.LocalPlayer.CurrentSaveSlot.Value)
elseif child.Value == "Save" then
wait()
child:Destroy()
game.ReplicatedStorage.LoadSaveRequests.RequestSave:InvokeServer(game.Players.LocalPlayer.CurrentSaveSlot.Value)
end
end)
function Call(VAL)
local String = Instance.new("StringValue")
String.Value = VAL
String.Parent = Fol
end
local CurrentMoney
function MoneyDupe(Times)
for i = 1, Times do
if game.Players.LocalPlayer.CurrentSaveSlot.Value ~= -1 then
CurrentMoney = game.Players.LocalPlayer.leaderstats.Money.Value
local DupeSlot = game.Players.LocalPlayer.CurrentSaveSlot.Value
repeat
Call("Money")
wait(1)
until game.Players.LocalPlayer.leaderstats.Money.Value == 0
wait(59)
Call("Load")
repeat
wait(0.1)
until game:GetService("Players").LocalPlayer.PlayerGui.PropertyPurchasingGUI.SelectPurchase.Visible == true
wait(1.2)
Manager:SendKeyEvent(true,"E",false,game)
repeat
wait(0.1)
until game:GetService("Players").LocalPlayer.PlayerGui.PropertyPurchasingGUI.ConfirmPurchase.Visible == true
wait(0.5)
Manager:SendKeyEvent(true,"E",false,game)
repeat
wait(0.1)
until game.Players.LocalPlayer.leaderstats.Money.Value > CurrentMoney
for i = 1, 3 do
Call("Save")
wait(0.1)
end
end
end
end
MoneyDupe(1) sw