Advertisement
Sakkzz

Other

Nov 11th, 2019
301
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.03 KB | None | 0 0
  1. local service = setmetatable({}, {__index = function(t, k) return game:GetService(k) end })
  2.  
  3. local OtherScreen = Instance.new("ScreenGui")
  4. local OtherFrame = Instance.new("Frame")
  5. local slotNum = Instance.new("TextBox")
  6. local Load = Instance.new("TextButton")
  7. local BpArt = Instance.new("TextButton")
  8. local Save = Instance.new("TextButton")
  9. local Dupe = Instance.new("TextButton")
  10. local EMPTY = Instance.new("TextButton")
  11. local EMPTY_2 = Instance.new("TextButton")
  12. local EMPTY_3 = Instance.new("TextButton")
  13.  
  14. OtherScreen.Name = "OtherScreen"
  15. OtherScreen.Parent = game.CoreGui.LT2.MainFrame.ButtonFrame.Other
  16.  
  17. OtherFrame.Name = "OtherFrame"
  18. OtherFrame.Parent = OtherScreen
  19. OtherFrame.BackgroundColor3 = Color3.new(0.145098, 0.145098, 0.14902)
  20. OtherFrame.BorderColor3 = Color3.new(0, 0, 0)
  21. OtherFrame.BorderSizePixel = 2
  22. OtherFrame.Position = UDim2.new(0, -145, 0, -260)
  23. OtherFrame.Size = UDim2.new(0, 335, 0, 255)
  24.  
  25. slotNum.Name = "slotNum"
  26. slotNum.Parent = OtherFrame
  27. slotNum.BackgroundColor3 = Color3.new(0.6, 0.6, 0.6)
  28. slotNum.BorderColor3 = Color3.new(0, 0, 0)
  29. slotNum.BorderSizePixel = 2
  30. slotNum.Position = UDim2.new(0, 45, 0, 185)
  31. slotNum.Size = UDim2.new(0, 90, 0, 20)
  32. slotNum.Font = Enum.Font.Gotham
  33. slotNum.PlaceholderColor3 = Color3.new(0, 0, 0)
  34. slotNum.PlaceholderText = "Slot #"
  35. slotNum.Text = ""
  36. slotNum.TextColor3 = Color3.new(0, 0, 0)
  37. slotNum.TextSize = 16
  38.  
  39. Load.Name = "Load"
  40. Load.Parent = OtherFrame
  41. Load.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  42. Load.BorderColor3 = Color3.new(0, 0, 0)
  43. Load.BorderSizePixel = 2
  44. Load.Position = UDim2.new(0, 175, 0, 215)
  45. Load.Size = UDim2.new(0, 150, 0, 20)
  46. Load.Font = Enum.Font.Gotham
  47. Load.Text = "3. Load"
  48. Load.TextColor3 = Color3.new(1, 1, 1)
  49. Load.TextSize = 14
  50.  
  51. BpArt.Name = "BpArt"
  52. BpArt.Parent = OtherFrame
  53. BpArt.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  54. BpArt.BorderColor3 = Color3.new(0, 0, 0)
  55. BpArt.BorderSizePixel = 2
  56. BpArt.Position = UDim2.new(0, 30, 0, 15)
  57. BpArt.Size = UDim2.new(0, 275, 0, 25)
  58. BpArt.Font = Enum.Font.Gotham
  59. BpArt.Text = "Blueprint Art"
  60. BpArt.TextColor3 = Color3.new(1, 1, 1)
  61. BpArt.TextSize = 14
  62.  
  63. Save.Name = "Save"
  64. Save.Parent = OtherFrame
  65. Save.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  66. Save.BorderColor3 = Color3.new(0, 0, 0)
  67. Save.BorderSizePixel = 2
  68. Save.Position = UDim2.new(0, 175, 0, 185)
  69. Save.Size = UDim2.new(0, 150, 0, 20)
  70. Save.Font = Enum.Font.Gotham
  71. Save.Text = "1. Save"
  72. Save.TextColor3 = Color3.new(1, 1, 1)
  73. Save.TextSize = 14
  74.  
  75. Dupe.Name = "Dupe"
  76. Dupe.Parent = OtherFrame
  77. Dupe.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  78. Dupe.BorderColor3 = Color3.new(0, 0, 0)
  79. Dupe.BorderSizePixel = 2
  80. Dupe.Position = UDim2.new(0, 15, 0, 215)
  81. Dupe.Size = UDim2.new(0, 150, 0, 20)
  82. Dupe.Font = Enum.Font.Gotham
  83. Dupe.Text = "2. Dupe"
  84. Dupe.TextColor3 = Color3.new(1, 1, 1)
  85. Dupe.TextSize = 14
  86.  
  87. EMPTY.Name = "EMPTY"
  88. EMPTY.Parent = OtherFrame
  89. EMPTY.Active = false
  90. EMPTY.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  91. EMPTY.BorderColor3 = Color3.new(0, 0, 0)
  92. EMPTY.BorderSizePixel = 2
  93. EMPTY.Position = UDim2.new(0, 30, 0, 50)
  94. EMPTY.Size = UDim2.new(0, 275, 0, 25)
  95. EMPTY.Font = Enum.Font.Gotham
  96. EMPTY.Text = "- EMPTY -"
  97. EMPTY.TextColor3 = Color3.new(0.298039, 0.298039, 0.298039)
  98. EMPTY.TextSize = 14
  99. EMPTY.TextStrokeTransparency = 0
  100.  
  101. EMPTY_2.Name = "EMPTY"
  102. EMPTY_2.Parent = OtherFrame
  103. EMPTY_2.Active = false
  104. EMPTY_2.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  105. EMPTY_2.BorderColor3 = Color3.new(0, 0, 0)
  106. EMPTY_2.BorderSizePixel = 2
  107. EMPTY_2.Position = UDim2.new(0, 30, 0, 85)
  108. EMPTY_2.Size = UDim2.new(0, 275, 0, 25)
  109. EMPTY_2.Font = Enum.Font.Gotham
  110. EMPTY_2.Text = "- EMPTY -"
  111. EMPTY_2.TextColor3 = Color3.new(0.298039, 0.298039, 0.298039)
  112. EMPTY_2.TextSize = 14
  113. EMPTY_2.TextStrokeTransparency = 0
  114.  
  115. EMPTY_3.Name = "EMPTY"
  116. EMPTY_3.Parent = OtherFrame
  117. EMPTY_3.Active = false
  118. EMPTY_3.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
  119. EMPTY_3.BorderColor3 = Color3.new(0, 0, 0)
  120. EMPTY_3.BorderSizePixel = 2
  121. EMPTY_3.Position = UDim2.new(0, 30, 0, 120)
  122. EMPTY_3.Size = UDim2.new(0, 275, 0, 25)
  123. EMPTY_3.Font = Enum.Font.Gotham
  124. EMPTY_3.Text = "- EMPTY -"
  125. EMPTY_3.TextColor3 = Color3.new(0.298039, 0.298039, 0.298039)
  126. EMPTY_3.TextSize = 14
  127. EMPTY_3.TextStrokeTransparency = 0
  128.  
  129. function Create(cls,props)
  130. local inst = Instance.new(cls)
  131. for i,v in pairs(props) do
  132. inst[i] = v
  133. end
  134. return inst
  135. end
  136. local MoneyCooldown = false
  137. local CurrentSlot = game.Players.LocalPlayer:WaitForChild("CurrentSaveSlot").Value
  138. local ScriptLoadOrSave = false
  139. local CurrentlySavingOrLoading = game.Players.LocalPlayer:WaitForChild("CurrentlySavingOrLoading")
  140. local TreeLogs={}
  141. local WoodPlanks={}
  142. local Render = service.RunService.RenderStepped
  143. local UserInputService = game:GetService("UserInputService")
  144. local shiftKeyL = Enum.KeyCode.LeftShift
  145. local Replicated = service.ReplicatedStorage
  146. local Client = Replicated.Interaction.ClientSetListPlayer
  147. local Dragging = Replicated.Interaction.ClientIsDragging
  148. local Properties = service.Workspace.Properties
  149. local Players = service.Players
  150. local PlayerModels = service.Workspace.PlayerModels
  151. local Player = Players.LocalPlayer
  152. local Char = Player.Character
  153. local Hum = Char.Humanoid
  154. local Root = Char.HumanoidRootPart
  155. local Mouse = Player:GetMouse()
  156. local Noclipper = false
  157. local Open = true
  158. local throwAxe = false
  159. local misc = false
  160. local player = false
  161. local slot = false
  162. local box = false
  163. local log = false
  164. local plank = false
  165. local players = false
  166. local wp = false
  167. local other = false
  168.  
  169. BpArt.MouseButton1Down:connect(function()
  170. loadstring(game:HttpGet("https://pastebin.com/raw/nKX32w8r", true))()
  171. end)
  172.  
  173. local function CheckIfSlotAvailable(Slot)
  174. for a,b in pairs(game.ReplicatedStorage.LoadSaveRequests.GetMetaData:InvokeServer(game.Players.LocalPlayer)) do
  175. if a == Slot then
  176. for c,d in pairs(b) do
  177. if c == "NumSaves" and d ~= 0 then
  178. return true
  179. else
  180. return false
  181. end
  182. end
  183. end
  184. end
  185. end
  186.  
  187. local function CheckSlotNumber() --Checks if the slot number is right
  188. if slotNum.Text == "1" or slotNum.Text == "2" or slotNum.Text == "3" or slotNum.Text == "4" or slotNum.Text == "5" or slotNum.Text == "6" then
  189. local SlotNumber = tonumber(slotNum.Text)
  190. return SlotNumber
  191. else return false
  192. end
  193. end
  194.  
  195. local function SendNotification(Title,Text,Duration) -- Sends Notification in the bottom right of the screen
  196. game.StarterGui:SetCore("SendNotification", {
  197. Title = Title;
  198. Text = Text;
  199. Icon = nil;
  200. Duration = Duration
  201. })
  202. end
  203.  
  204. Save.MouseButton1Down:connect(function() --Saves the slot that you want
  205. local CheckSlot = CheckSlotNumber()
  206. if CheckSlot ~= false then
  207. if CurrentSlot ~= -1 then
  208. ScriptLoadOrSave = true
  209. local SaveSlot = game.ReplicatedStorage.LoadSaveRequests.RequestSave:InvokeServer(CheckSlot)
  210. if SaveSlot == true then
  211. SendNotification("Save Notification", "Saved your Slot", 2)
  212. wait(.5)
  213. ScriptLoadOrSave = false
  214. elseif SaveSlot == false then
  215. SendNotification("Already Saving", "Saving/Loading is currently in Progress", 1)
  216. wait(.5)
  217. ScriptLoadOrSave = false
  218. end
  219. else
  220. SendNotification("Error", "Load Your Slot First before saving", 1)
  221. end
  222. else
  223. SendNotification("Incorrect Slot", "Enter a number in the upper field", 1)
  224. end
  225. end)
  226.  
  227. Load.MouseButton1Down:connect(function() --Loads the slot you want
  228. ScriptLoadOrSave = true
  229. local CheckSlot = CheckSlotNumber()
  230. if CheckSlot ~= false then
  231. if CheckIfSlotAvailable(CheckSlot) == true then
  232. local LoadSlot = game.ReplicatedStorage.LoadSaveRequests.RequestLoad:InvokeServer(CheckSlot)
  233. if LoadSlot == false then
  234. SendNotification("Cooldown Notification", "You aren't abled to load now", 1)
  235. end
  236. if LoadSlot == true then
  237. SendNotification("Reload Notification", "Loaded Your Slot", 2)
  238. CurrentSlot = CheckSlot
  239. end
  240. else
  241. SendNotification("Slot not Available", "This Slot is not Available, please choose another slot", 2)
  242. end
  243. else
  244. SendNotification("Incorrect Slot", "Enter a Valid number in the upper field", 1)
  245. end
  246. ScriptLoadOrSave = false
  247. end)
  248.  
  249. Dupe.MouseButton1Down:connect(function() --Sends the money and will come back after around 2 mins
  250. if MoneyCooldown == true then
  251. SendNotification("Cooldown Notification", "Wait for your Money to come back",2)
  252. return
  253. elseif MoneyCooldown == false then
  254. MoneyCooldown = true
  255. SendNotification("Money Sent", "Wait about 2 minutes for your Money to come back", 5)
  256. game.ReplicatedStorage.Transactions.ClientToServer.Donate:InvokeServer(game.Players.LocalPlayer, game.Players.LocalPlayer.leaderstats.Money.Value, 1)
  257. SendNotification("Money Received", "You received your money that you have sent earlier", 5)
  258. MoneyCooldown = false
  259. end
  260. end)
  261.  
  262. --Anti Overwrite Slot (Sub-Function)
  263. while wait(.15) do
  264. if CurrentlySavingOrLoading.Value == true and ScriptLoadOrSave == false then
  265. repeat
  266. wait(1)
  267. until CurrentlySavingOrLoading.Value == false
  268. wait(1)
  269. CurrentSlot = game.Players.LocalPlayer.CurrentSaveSlot.Value
  270. print(CurrentSlot)
  271. end
  272. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement