Systemconf

Untitled

May 30th, 2019
51
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.36 KB | None | 0 0
  1. -- Farewell Infortality.
  2. -- Version: 2.82
  3. -- Instances:
  4. local ScreenGui = Instance.new("ScreenGui")
  5. local Lt2Gui = Instance.new("Frame")
  6. local MaxLand = Instance.new("TextButton")
  7. local TpWood = Instance.new("TextButton")
  8. local SellWood = Instance.new("TextButton")
  9. local GetItem = Instance.new("TextButton")
  10. local SpawnBox = Instance.new("TextBox")
  11. local QBox = Instance.new("TextBox")
  12. --Properties:
  13. ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  14.  
  15. Lt2Gui.Name = "Lt2 Gui"
  16. Lt2Gui.Parent = ScreenGui
  17. Lt2Gui.BackgroundColor3 = Color3.new(0.333333, 0.333333, 0.333333)
  18. Lt2Gui.BorderSizePixel = 0
  19. Lt2Gui.Position = UDim2.new(0.326138616, 0, 0.311029792, 0)
  20. Lt2Gui.Size = UDim2.new(0, 402, 0, 200)
  21. Lt2Gui.Active = true
  22. Lt2Gui.Draggable = true
  23.  
  24. MaxLand.Name = "MaxLand"
  25. MaxLand.Parent = Lt2Gui
  26. MaxLand.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  27. MaxLand.BorderSizePixel = 0
  28. MaxLand.Position = UDim2.new(0.0654205605, 0, 0.109999999, 0)
  29. MaxLand.Size = UDim2.new(0, 113, 0, 34)
  30. MaxLand.Font = Enum.Font.SourceSans
  31. MaxLand.Text = "Max Land"
  32. MaxLand.TextColor3 = Color3.new(1, 1, 1)
  33. MaxLand.TextSize = 18
  34. MaxLand.MouseButton1Click:connect(function()
  35. for i, v in pairs(game:GetService("Workspace").Properties:GetChildren()) do
  36. if v:FindFirstChild("Owner") and v.Owner.Value == game.Players.LocalPlayer then
  37. base = v
  38. square = v.OriginSquare
  39. end
  40. end
  41. function makebase(pos)
  42. local Event = game:GetService("ReplicatedStorage").PropertyPurchasing.ClientExpandedProperty
  43. Event:FireServer(base, pos)
  44. end
  45. spos = square.Position
  46. makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z))
  47. makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z))
  48. makebase(CFrame.new(spos.X, spos.Y, spos.Z + 40))
  49. makebase(CFrame.new(spos.X, spos.Y, spos.Z - 40))
  50. makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z + 40))
  51. makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z - 40))
  52. makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z + 40))
  53. makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z - 40))
  54. makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z))
  55. makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z))
  56. makebase(CFrame.new(spos.X, spos.Y, spos.Z + 80))
  57. makebase(CFrame.new(spos.X, spos.Y, spos.Z - 80))
  58. --Corners--
  59. makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z + 80))
  60. makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z - 80))
  61. makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z + 80))
  62. makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z - 80))
  63. --Corners--
  64. makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z + 80))
  65. makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z + 80))
  66. makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z + 40))
  67. makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z - 40))
  68. makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z + 40))
  69. makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z - 40))
  70. makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z - 80))
  71. makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z - 80))
  72. end
  73. end)
  74.  
  75. TpWood.Name = "TpWood"
  76. TpWood.Parent = Lt2Gui
  77. TpWood.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  78. TpWood.BorderSizePixel = 0
  79. TpWood.Position = UDim2.new(0.383317083, 0, 0.109999999, 0)
  80. TpWood.Size = UDim2.new(0, 113, 0, 34)
  81. TpWood.Font = Enum.Font.SourceSans
  82. TpWood.Text = "Tp Wood"
  83. TpWood.TextColor3 = Color3.new(1, 1, 1)
  84. TpWood.TextSize = 18
  85. TpWood.MouseButton1Click:connec(function()
  86. for _, Log in pairs(game.Workspace.LogModels:GetChildren()) do
  87. if Log.Name:sub(1, 6) == "Loose_" and Log:findFirstChild("Owner") then
  88. if Log.Owner.Value == game.Players.LocalPlayer then
  89. Log:MoveTo(game.Players.LocalPlayer.Character.HumanoidRootPart.Position + Vector3.new(0, 20, 0))
  90. for i=1,100 do
  91. game.ReplicatedStorage.Interaction.ClientIsDragging:FireServer(Log)
  92. end
  93. end
  94. end
  95. end
  96. end)
  97.  
  98. SellWood.Name = "Sell Wood"
  99. SellWood.Parent = Lt2Gui
  100. SellWood.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  101. SellWood.BorderSizePixel = 0
  102. SellWood.Position = UDim2.new(0.694504499, 0, 0.109999985, 0)
  103. SellWood.Size = UDim2.new(0, 113, 0, 34)
  104. SellWood.Font = Enum.Font.SourceSans
  105. SellWood.Text = "Sell Wood"
  106. SellWood.TextColor3 = Color3.new(1, 1, 1)
  107. SellWood.TextSize = 18
  108. SellWood.MouseButton1Click:Connect(function()
  109. for _, Log in pairs(game.Workspace.LogModels:GetChildren()) do
  110. if Log.Name:sub(1, 6) == "Loose_" and Log:findFirstChild("Owner") then
  111. if Log.Owner.Value == game.Players.LocalPlayer then
  112. for i,v in pairs(Log:GetChildren()) do
  113. if v.Name=="WoodSection" then
  114. spawn(function()
  115. for i=1,10 do
  116. wait()
  117. v.CFrame=CFrame.new(Vector3.new(315, -0.296, 85.791))*CFrame.Angles(math.rad(90),0,0)
  118. end
  119. end)
  120. end
  121. end
  122. spawn(function()
  123. for i=1,20 do
  124. wait()
  125. game.ReplicatedStorage.Interaction.ClientIsDragging:FireServer(Log)
  126. end
  127. end)
  128. end
  129. end
  130. end
  131. end)
  132.  
  133. GetItem.Name = "GetItem"
  134. GetItem.Parent = Lt2Gui
  135. GetItem.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  136. GetItem.BorderSizePixel = 0
  137. GetItem.Position = UDim2.new(0.381071657, 0, 0.74000001, 0)
  138. GetItem.Size = UDim2.new(0, 113, 0, 19)
  139. GetItem.Font = Enum.Font.SourceSans
  140. GetItem.Text = "Get"
  141. GetItem.TextColor3 = Color3.new(1, 1, 1)
  142. GetItem.TextSize = 18
  143. GetItem.MouseButton1Click:Connect(function()
  144. local Item = SpawnBox.Text
  145. local Quantity = QBox.Text
  146.  
  147. local Land = nil
  148. for i,v in pairs(game.Workspace.Properties:GetChildren()) do
  149. if v.Owner.Value == game.Players.LocalPlayer then
  150. Land = v
  151. break
  152. end
  153. end
  154. if not Land then
  155. for i,v in pairs(game.Workspace.Properties:GetChildren()) do
  156. if v.Owner.Value == game.Players.LocalPlayer or v.Owner.Value == nil then
  157. Land = v
  158. game.ReplicatedStorage.Interaction.ClientIsDragging:FireServer(v)
  159. break
  160. end
  161. end
  162. end
  163.  
  164. function Spawn(Item)
  165. local Info = {}
  166. Info.Name = Item.Name
  167. Info.Type = game.ReplicatedStorage.Purchasables.Structures.HardStructures.Sawmill2.Type
  168. Info.OtherInfo = game.ReplicatedStorage.Purchasables.WireObjects.Wire.OtherInfo
  169. local Points = {Land.OriginSquare.Position + Vector3.new(0,5,0), Land.OriginSquare.Position + Vector3.new(0,5,0)}
  170. game.ReplicatedStorage.PlaceStructure.ClientPlacedWire:FireServer(Info, Points)
  171. end
  172.  
  173. for i=1, Quantity do
  174. Spawn(game.ReplicatedStorage.Purchasables:FindFirstChild(Item, true))
  175. end
  176. end)
  177. SpawnBox.Name = "SpawnBox"
  178. SpawnBox.Parent = Lt2Gui
  179. SpawnBox.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  180. SpawnBox.BorderSizePixel = 0
  181. SpawnBox.Position = UDim2.new(0.293532342, 0, 0.430000007, 0)
  182. SpawnBox.Size = UDim2.new(0, 182, 0, 31)
  183. SpawnBox.Font = Enum.Font.SourceSans
  184. SpawnBox.Text = ""
  185. SpawnBox.TextColor3 = Color3.new(1, 1, 1)
  186. SpawnBox.TextSize = 18
  187.  
  188. QBox.Name = "QBox"
  189. QBox.Parent = Lt2Gui
  190. QBox.BackgroundColor3 = Color3.new(0.203922, 0.203922, 0.203922)
  191. QBox.BorderSizePixel = 0
  192. QBox.Position = UDim2.new(0.370646775, 0, 0.61499995, 0)
  193. QBox.Size = UDim2.new(0, 123, 0, 19)
  194. QBox.Font = Enum.Font.SourceSans
  195. QBox.Text = ""
  196. QBox.TextColor3 = Color3.new(1, 1, 1)
  197. QBox.TextSize = 18
  198. -- Scripts:
Add Comment
Please, Sign In to add comment