SHARE
TWEET

Untitled

a guest Jan 24th, 2020 144 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --[[ Dupe UI Update New Theme
  2.     And New Scripts!
  3.     By - Gouenji Shuuya#0005 ]]
  4.  
  5. -- Automatically Add players to Blacklist --
  6.  
  7. Mouse = game.Players.LocalPlayer:GetMouse()
  8.  
  9. Client = game.ReplicatedStorage.Interaction.ClientSetListPlayer
  10. players = game.Players
  11. for i, v in pairs(players:GetPlayers()) do
  12.     if v.Name ~= players.LocalPlayer.Name then
  13.         Client:InvokeServer(players.LocalPlayer.BlacklistFolder, v, true)
  14.     end
  15. end
  16. players.PlayerAdded:connect(function(plr)
  17.     Client:InvokeServer(players.LocalPlayer.BlacklistFolder, plr, true)
  18. end)
  19.  
  20.  
  21. game:GetService("StarterGui"):SetCore("SendNotification", {
  22.   Title = "Dupe UI",
  23.   Text = "Dupe UI Load Successful."
  24. })
  25.  
  26. game:GetService("StarterGui"):SetCore("SendNotification", {
  27.   Title = "Dupe UI",
  28.   Text = "Automatically Add players to Blacklist"
  29. })
  30.  
  31. game:GetService("StarterGui"):SetCore("SendNotification", {
  32.   Title = "Gui By:",
  33.   Text = "Gouenji Shuuya#0005"
  34. })
  35.  
  36. local ScreenGui = Instance.new("ScreenGui")
  37. local MainFrame = Instance.new("Frame")
  38. local Slot = Instance.new("TextBox")
  39. local CountAxes = Instance.new("TextBox")
  40. local SaveSlot = Instance.new("TextButton")
  41. local Store = Instance.new("TextButton")
  42. local Load = Instance.new("TextButton")
  43. local Restore = Instance.new("TextButton")
  44. local DMoney = Instance.new("TextButton")
  45. local DropAxes = Instance.new("TextButton")
  46. local Title = Instance.new("TextLabel")
  47. local Credit = Instance.new("TextLabel")
  48.  
  49.  
  50. --Properties:
  51.  
  52. ScreenGui.Parent = game.CoreGui
  53.  
  54. MainFrame.Name = "MainFrame"
  55. MainFrame.Parent = ScreenGui
  56. MainFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  57. MainFrame.BorderSizePixel = 0
  58. MainFrame.Position = UDim2.new(0.340206176, 0, 0.288270384, 0)
  59. MainFrame.Size = UDim2.new(0, 340, 0, 258)
  60. MainFrame.Active = true
  61. MainFrame.Draggable = true
  62.  
  63. Slot.Name = "Slot"
  64. Slot.Parent = MainFrame
  65. Slot.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  66. Slot.Position = UDim2.new(0.146419436, 0, 0.0542635657, 0)
  67. Slot.Size = UDim2.new(0, 78, 0, 44)
  68. Slot.Font = Enum.Font.SourceSans
  69. Slot.Text = "SlotNumber"
  70. Slot.TextColor3 = Color3.fromRGB(0, 0, 0)
  71. Slot.TextSize = 15.000
  72. Slot.TextWrapped = true
  73.  
  74. CountAxes.Name = "CountAxes"
  75. CountAxes.Parent = MainFrame
  76. CountAxes.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  77. CountAxes.Position = UDim2.new(0.615217388, 0, 0.0542635657, 0)
  78. CountAxes.Size = UDim2.new(0, 78, 0, 44)
  79. CountAxes.Font = Enum.Font.SourceSans
  80. CountAxes.Text = "CountAxes"
  81. CountAxes.TextColor3 = Color3.fromRGB(0, 0, 0)
  82. CountAxes.TextSize = 15.000
  83. CountAxes.TextWrapped = true
  84.  
  85. SaveSlot.Name = "SaveSlot"
  86. SaveSlot.Parent = MainFrame
  87. SaveSlot.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  88. SaveSlot.Position = UDim2.new(0.146419436, 0, 0.294573665, 0)
  89. SaveSlot.Size = UDim2.new(0, 78, 0, 44)
  90. SaveSlot.Font = Enum.Font.SourceSans
  91. SaveSlot.Text = "Save Slot"
  92. SaveSlot.TextColor3 = Color3.fromRGB(0, 0, 0)
  93. SaveSlot.TextSize = 14.000
  94.  
  95. Store.Name = "Store"
  96. Store.Parent = MainFrame
  97. Store.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  98. Store.Position = UDim2.new(0.615217388, 0, 0.294573665, 0)
  99. Store.Size = UDim2.new(0, 78, 0, 44)
  100. Store.Font = Enum.Font.SourceSans
  101. Store.Text = "Store Axe"
  102. Store.TextColor3 = Color3.fromRGB(0, 0, 0)
  103. Store.TextSize = 14.000
  104.  
  105. Load.Name = "Load"
  106. Load.Parent = MainFrame
  107. Load.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  108. Load.Position = UDim2.new(0.146419436, 0, 0.542635679, 0)
  109. Load.Size = UDim2.new(0, 78, 0, 44)
  110. Load.Font = Enum.Font.SourceSans
  111. Load.Text = "Load Slot"
  112. Load.TextColor3 = Color3.fromRGB(0, 0, 0)
  113. Load.TextSize = 14.000
  114.  
  115. Restore.Name = "Restore"
  116. Restore.Parent = MainFrame
  117. Restore.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  118. Restore.Position = UDim2.new(0.615217388, 0, 0.542635679, 0)
  119. Restore.Size = UDim2.new(0, 78, 0, 44)
  120. Restore.Font = Enum.Font.SourceSans
  121. Restore.Text = "Restore Axe"
  122. Restore.TextColor3 = Color3.fromRGB(0, 0, 0)
  123. Restore.TextSize = 14.000
  124.  
  125. DMoney.Name = "DMoney"
  126. DMoney.Parent = MainFrame
  127. DMoney.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  128. DMoney.Position = UDim2.new(0.146419436, 0, 0.782945752, 0)
  129. DMoney.Size = UDim2.new(0, 78, 0, 44)
  130. DMoney.Font = Enum.Font.SourceSans
  131. DMoney.Text = "Dupe Money"
  132. DMoney.TextColor3 = Color3.fromRGB(0, 0, 0)
  133. DMoney.TextSize = 14.000
  134.  
  135. DropAxes.Name = "DropAxes"
  136. DropAxes.Parent = MainFrame
  137. DropAxes.BackgroundColor3 = Color3.fromRGB(144, 144, 144)
  138. DropAxes.Position = UDim2.new(0.615217388, 0, 0.782945752, 0)
  139. DropAxes.Size = UDim2.new(0, 78, 0, 44)
  140. DropAxes.Font = Enum.Font.SourceSans
  141. DropAxes.Text = "Drop Axes"
  142. DropAxes.TextColor3 = Color3.fromRGB(0, 0, 0)
  143. DropAxes.TextSize = 14.000
  144.  
  145. Title.Name = "Title"
  146. Title.Parent = MainFrame
  147. Title.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  148. Title.BorderSizePixel = 0
  149. Title.Position = UDim2.new(0, 0, -0.193798453, 0)
  150. Title.Size = UDim2.new(0, 340, 0, 50)
  151. Title.Font = Enum.Font.SourceSans
  152. Title.Text = "Lumber Tycoon 2 Dupe UI"
  153. Title.TextColor3 = Color3.fromRGB(0, 0, 0)
  154. Title.TextSize = 25.000
  155. Title.TextWrapped = true
  156.  
  157. Credit.Name = "Credit"
  158. Credit.Parent = MainFrame
  159. Credit.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  160. Credit.BorderSizePixel = 0
  161. Credit.Position = UDim2.new(0, 0, 1, 0)
  162. Credit.Size = UDim2.new(0, 340, 0, 50)
  163. Credit.Font = Enum.Font.SourceSans
  164. Credit.Text = "Credit by Gouenji Shuuya#0005"
  165. Credit.TextColor3 = Color3.fromRGB(0, 0, 0)
  166. Credit.TextSize = 25.000
  167. Credit.TextWrapped = true
  168.  
  169. --Locals
  170. local MoneyCooldown = false
  171. local CurrentSlot = game.Players.LocalPlayer:WaitForChild("CurrentSaveSlot").Value
  172. local ScriptLoadOrSave = false
  173. local CurrentlySavingOrLoading = game.Players.LocalPlayer:WaitForChild("CurrentlySavingOrLoading")
  174.  
  175. --Functions
  176. local function CheckIfSlotAvailable(Slot)
  177.     for a,b in pairs(game.ReplicatedStorage.LoadSaveRequests.GetMetaData:InvokeServer(game.Players.LocalPlayer)) do
  178.         if a == Slot then
  179.             for c,d in pairs(b) do
  180.                 if c == "NumSaves" and d ~= 0 then
  181.                     return true
  182.                 else
  183.                     return false
  184.                 end
  185.             end
  186.         end
  187.     end
  188. end
  189.  
  190. local function CheckSlotNumber() --Checks if the slot number is right
  191.     if Slot.Text == "1" or Slot.Text == "2" or Slot.Text == "3" or Slot.Text == "4" or Slot.Text == "5" or Slot.Text == "6" then
  192.         local SlotNumber = tonumber(Slot.Text)
  193.         return SlotNumber
  194.         else return false
  195.     end
  196. end
  197.  
  198. local function SendNotification(Title,Text,Duration) -- Sends Notification in the bottom right of the screen
  199.     game.StarterGui:SetCore("SendNotification", {
  200.         Title = Title;
  201.         Text = Text;
  202.         Icon = nil;
  203.         Duration = Duration
  204.     })
  205. end
  206.  
  207. SaveSlot.MouseButton1Down:connect(function() --Saves the slot that you want
  208.     local CheckSlot = CheckSlotNumber()
  209.     if CheckSlot ~= false then
  210.         if CurrentSlot ~= -1 then
  211.             ScriptLoadOrSave = true
  212.             local SaveSlot = game.ReplicatedStorage.LoadSaveRequests.RequestSave:InvokeServer(CheckSlot)
  213.             if SaveSlot == true then
  214.                 SendNotification("Save Notification", "Saved your Slot", 2)
  215.                 wait(.5)
  216.                 ScriptLoadOrSave = false
  217.             elseif SaveSlot == false then
  218.                 SendNotification("Already Saving", "Saving/Loading is currently in Progress", 1)
  219.                 wait(.5)
  220.                 ScriptLoadOrSave = false
  221.             end
  222.         else
  223.             SendNotification("Error", "Load Your Slot First before saving", 1)
  224.         end
  225.     else
  226.         SendNotification("Incorrect Slot", "Enter a number in the upper field", 1)
  227.     end
  228. end)
  229.  
  230. Load.MouseButton1Down:connect(function() --Loads the slot you want
  231.     ScriptLoadOrSave = true
  232.     local CheckSlot = CheckSlotNumber()
  233.     if CheckSlot ~= false then
  234.         if CheckIfSlotAvailable(CheckSlot) == true then
  235.             local LoadSlot = game.ReplicatedStorage.LoadSaveRequests.RequestLoad:InvokeServer(CheckSlot)
  236.             if LoadSlot == false then
  237.                 SendNotification("Cooldown Notification", "You aren't abled to load now", 1)
  238.             end
  239.             if LoadSlot == true then
  240.                 SendNotification("Reload Notification", "Loaded Your Slot", 2)
  241.                 CurrentSlot = CheckSlot
  242.             end
  243.         else
  244.             SendNotification("Slot not Available", "This Slot is not Available, please choose another slot", 2)
  245.         end
  246.     else
  247.         SendNotification("Incorrect Slot", "Enter a Valid number in the upper field", 1)
  248.     end
  249.     ScriptLoadOrSave = false
  250. end)
  251.  
  252. Store.MouseButton1Down:connect(function() --Stores the Axes somewhere so you can restore them later
  253.     Amount = 0
  254.     for a,b in pairs(game.Players.LocalPlayer.Backpack:GetChildren())do
  255.         if b.Name ~= "BlueprintTool" and b.Name == "Tool" then
  256.             b.Parent = game.Players.LocalPlayer
  257.             Amount = Amount + 1
  258.         end
  259.     end
  260.     SendNotification("Store Notification", "Stored "..Amount.." Axes, you can restore them later", 2)
  261. end)
  262.  
  263. Restore.MouseButton1Down:connect(function() --Restores the axes that you stored with the Store function
  264.     Amount = 0
  265.     for a,b in pairs(game.Players.LocalPlayer:GetChildren()) do
  266.         if b.Name ~= "BlueprintTool" and b.Name == "Tool" then
  267.             b.Parent = game.Players.LocalPlayer.Backpack
  268.             Amount = Amount + 1
  269.         end
  270.     end
  271.     SendNotification("Restore Notification", "Restored "..Amount.." Axes that you Stored", 2)
  272. end)
  273.  
  274. CountAxes.MouseButton1Down:connect(function() --Counts Axes in your Backpack (Equiped Axes dont Count)
  275.     Amount = 0
  276.     for a,b in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
  277.         if b.Name ~= "BlueprintTool" and b.Name == "Tool" then
  278.             Amount = Amount + 1
  279.         end
  280.     end
  281.     SendNotification("Axe Amount", "You have "..Amount.." Axes in your Backpack",2)
  282. end)
  283.  
  284. DropAxes.MouseButton1Down:connect(function() --Drops all your Axes
  285.     Amount = 0
  286.     for a,b in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
  287.         if b.Name ~= "BlueprintTool" and b.Name == "Tool" then
  288.             game.ReplicatedStorage.Interaction.ClientInteracted:FireServer(b, "Drop tool", game.Players.LocalPlayer.Character.Head.CFrame)
  289.             Amount = Amount + 1
  290.         end
  291.     end
  292.     SendNotification("Axe Dropped", "Dropped "..Amount.." Axes from your Backpack",5)
  293. end)
  294.  
  295. DMoney.MouseButton1Down:connect(function() --Sends the money and will come back after around 2 mins
  296.     if MoneyCooldown == true then
  297.         SendNotification("Cooldown Notification", "Wait for your Money to come back",2)
  298.         return
  299.     elseif MoneyCooldown == false then
  300.         MoneyCooldown = true
  301.         SendNotification("Money Sent", "Wait about 2 minutes for your Money to come back", 5)
  302.         game.ReplicatedStorage.Transactions.ClientToServer.Donate:InvokeServer(game.Players.LocalPlayer, game.Players.LocalPlayer.leaderstats.Money.Value, 1)
  303.         SendNotification("Money Received", "You received your money that you have sent earlier", 5)
  304.         MoneyCooldown = false
  305.     end
  306. end)
  307.  
  308. --Anti Overwrite Slot (Sub-Function)
  309. while wait(.15) do
  310.     if CurrentlySavingOrLoading.Value == true and ScriptLoadOrSave == false then
  311.         repeat
  312.         wait(1)
  313.         until CurrentlySavingOrLoading.Value == false
  314.         wait(1)
  315.         CurrentSlot = game.Players.LocalPlayer.CurrentSaveSlot.Value
  316.         print(CurrentSlot)
  317.     end
  318. end
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top