Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local service = setmetatable({}, {__index = function(t, k) return game:GetService(k) end })
- local SlotScreen = Instance.new("ScreenGui")
- local SlotFrame = Instance.new("Frame")
- local wipeBase = Instance.new("TextButton")
- local copyBase = Instance.new("TextButton")
- local fillBase = Instance.new("TextButton")
- local Me = Instance.new("TextButton")
- local maxLand = Instance.new("TextButton")
- local TreeLabel = Instance.new("TextLabel")
- local SelectedLabel = Instance.new("TextLabel")
- local selectedBG = Instance.new("TextLabel")
- local selectedPlayer = Instance.new("TextBox")
- local treeBG = Instance.new("TextLabel")
- local treeType = Instance.new("TextBox")
- --Properties:
- SlotScreen.Name = "SlotScreen"
- SlotScreen.Parent = game.CoreGui.LT2.MainFrame.ButtonFrame.SlotEditor
- SlotFrame.Name = "SlotFrame"
- SlotFrame.Parent = SlotScreen
- SlotFrame.Active = true
- SlotFrame.BackgroundColor3 = Color3.new(0.145098, 0.145098, 0.14902)
- SlotFrame.BorderColor3 = Color3.new(0, 0, 0)
- SlotFrame.BorderSizePixel = 2
- SlotFrame.Draggable = true
- SlotFrame.Position = UDim2.new(0, -95, 0, -235)
- SlotFrame.Selectable = true
- SlotFrame.Size = UDim2.new(0, 355, 0, 230)
- wipeBase.Name = "wipeBase"
- wipeBase.Parent = SlotFrame
- wipeBase.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
- wipeBase.BorderColor3 = Color3.new(0, 0, 0)
- wipeBase.BorderSizePixel = 2
- wipeBase.Position = UDim2.new(0, 20, 0, 15)
- wipeBase.Size = UDim2.new(0, 145, 0, 25)
- wipeBase.Font = Enum.Font.Gotham
- wipeBase.Text = "Wipe Players Base"
- wipeBase.TextColor3 = Color3.new(1, 1, 1)
- wipeBase.TextSize = 14
- copyBase.Name = "copyBase"
- copyBase.Parent = SlotFrame
- copyBase.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
- copyBase.BorderColor3 = Color3.new(0, 0, 0)
- copyBase.BorderSizePixel = 2
- copyBase.Position = UDim2.new(0, 190, 0, 15)
- copyBase.Size = UDim2.new(0, 145, 0, 25)
- copyBase.Font = Enum.Font.Gotham
- copyBase.Text = "Copy Players Base"
- copyBase.TextColor3 = Color3.new(1, 1, 1)
- copyBase.TextSize = 14
- fillBase.Name = "fillBase"
- fillBase.Parent = SlotFrame
- fillBase.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
- fillBase.BorderColor3 = Color3.new(0, 0, 0)
- fillBase.BorderSizePixel = 2
- fillBase.Position = UDim2.new(0, 20, 0, 55)
- fillBase.Size = UDim2.new(0, 145, 0, 25)
- fillBase.Font = Enum.Font.Gotham
- fillBase.Text = "Fill Blueprints"
- fillBase.TextColor3 = Color3.new(1, 1, 1)
- fillBase.TextSize = 14
- Me.Name = "Me"
- Me.Parent = SlotFrame
- Me.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
- Me.BorderColor3 = Color3.new(0, 0, 0)
- Me.Position = UDim2.new(0, 305, 0, 130)
- Me.Size = UDim2.new(0, 30, 0, 20)
- Me.Font = Enum.Font.Gotham
- Me.Text = "ME"
- Me.TextColor3 = Color3.new(1, 1, 1)
- Me.TextSize = 14
- maxLand.Name = "maxLand"
- maxLand.Parent = SlotFrame
- maxLand.BackgroundColor3 = Color3.new(0.054902, 0.054902, 0.0588235)
- maxLand.BorderColor3 = Color3.new(0, 0, 0)
- maxLand.BorderSizePixel = 2
- maxLand.Position = UDim2.new(0, 190, 0, 55)
- maxLand.Size = UDim2.new(0, 145, 0, 25)
- maxLand.Font = Enum.Font.Gotham
- maxLand.Text = "Max Owned Land"
- maxLand.TextColor3 = Color3.new(1, 1, 1)
- maxLand.TextSize = 14
- TreeLabel.Name = "TreeLabel"
- TreeLabel.Parent = SlotFrame
- TreeLabel.BackgroundColor3 = Color3.new(1, 1, 1)
- TreeLabel.BackgroundTransparency = 1
- TreeLabel.Position = UDim2.new(0, 80, 0, 165)
- TreeLabel.Size = UDim2.new(0, 195, 0, 25)
- TreeLabel.Font = Enum.Font.Gotham
- TreeLabel.Text = "Tree Type:"
- TreeLabel.TextColor3 = Color3.new(1, 1, 1)
- TreeLabel.TextSize = 18
- SelectedLabel.Name = "SelectedLabel"
- SelectedLabel.Parent = SlotFrame
- SelectedLabel.BackgroundColor3 = Color3.new(1, 1, 1)
- SelectedLabel.BackgroundTransparency = 1
- SelectedLabel.Position = UDim2.new(0, 80, 0, 100)
- SelectedLabel.Size = UDim2.new(0, 195, 0, 25)
- SelectedLabel.Font = Enum.Font.Gotham
- SelectedLabel.Text = "Player Name:"
- SelectedLabel.TextColor3 = Color3.new(1, 1, 1)
- SelectedLabel.TextSize = 18
- selectedBG.Name = "selectedBG"
- selectedBG.Parent = SlotFrame
- selectedBG.BackgroundColor3 = Color3.new(0.6, 0.6, 0.6)
- selectedBG.BorderColor3 = Color3.new(0, 0, 0)
- selectedBG.Position = UDim2.new(0, 20, 0, 130)
- selectedBG.Size = UDim2.new(0, 285, 0, 20)
- selectedBG.Font = Enum.Font.Gotham
- selectedBG.Text = ""
- selectedBG.TextColor3 = Color3.new(1, 1, 1)
- selectedBG.TextSize = 18
- selectedPlayer.Name = "selectedPlayer"
- selectedPlayer.Parent = selectedBG
- selectedPlayer.BackgroundColor3 = Color3.new(0.6, 0.6, 0.6)
- selectedPlayer.BackgroundTransparency = 1
- selectedPlayer.BorderColor3 = Color3.new(0, 0, 0)
- selectedPlayer.Position = UDim2.new(0, 5, 0, 0)
- selectedPlayer.Size = UDim2.new(0, 275, 0, 20)
- selectedPlayer.Font = Enum.Font.Code
- selectedPlayer.LineHeight = 1.2999999523163
- selectedPlayer.PlaceholderColor3 = Color3.new(0, 0, 0)
- selectedPlayer.PlaceholderText = "|"
- selectedPlayer.Text = ""
- selectedPlayer.TextColor3 = Color3.new(0, 0, 0)
- selectedPlayer.TextSize = 14
- selectedPlayer.TextXAlignment = Enum.TextXAlignment.Left
- treeBG.Name = "treeBG"
- treeBG.Parent = SlotFrame
- treeBG.BackgroundColor3 = Color3.new(0.6, 0.6, 0.6)
- treeBG.BorderColor3 = Color3.new(0, 0, 0)
- treeBG.Position = UDim2.new(0, 20, 0, 195)
- treeBG.Size = UDim2.new(0, 315, 0, 20)
- treeBG.Font = Enum.Font.Gotham
- treeBG.Text = ""
- treeBG.TextColor3 = Color3.new(1, 1, 1)
- treeBG.TextSize = 18
- treeType.Name = "treeType"
- treeType.Parent = treeBG
- treeType.BackgroundColor3 = Color3.new(0.6, 0.6, 0.6)
- treeType.BackgroundTransparency = 1
- treeType.BorderColor3 = Color3.new(0, 0, 0)
- treeType.Position = UDim2.new(0, 5, 0, 0)
- treeType.Size = UDim2.new(0, 310, 0, 20)
- treeType.Font = Enum.Font.Code
- treeType.LineHeight = 1.2999999523163
- treeType.PlaceholderColor3 = Color3.new(0, 0, 0)
- treeType.PlaceholderText = "|"
- treeType.Text = ""
- treeType.TextColor3 = Color3.new(0, 0, 0)
- treeType.TextSize = 14
- treeType.TextXAlignment = Enum.TextXAlignment.Left
- function Create(cls,props)
- local inst = Instance.new(cls)
- for i,v in pairs(props) do
- inst[i] = v
- end
- return inst
- end
- local MoneyCooldown = false
- local CurrentSlot = game.Players.LocalPlayer:WaitForChild("CurrentSaveSlot").Value
- local ScriptLoadOrSave = false
- local CurrentlySavingOrLoading = game.Players.LocalPlayer:WaitForChild("CurrentlySavingOrLoading")
- local TreeLogs={}
- local WoodPlanks={}
- local Render = service.RunService.RenderStepped
- local UserInputService = game:GetService("UserInputService")
- local shiftKeyL = Enum.KeyCode.LeftShift
- local Replicated = service.ReplicatedStorage
- local Client = Replicated.Interaction.ClientSetListPlayer
- local Dragging = Replicated.Interaction.ClientIsDragging
- local Properties = service.Workspace.Properties
- local Players = service.Players
- local PlayerModels = service.Workspace.PlayerModels
- local Player = Players.LocalPlayer
- local Char = Player.Character
- local Hum = Char.Humanoid
- local Root = Char.HumanoidRootPart
- local Mouse = Player:GetMouse()
- local Noclipper = false
- local Open = true
- local throwAxe = false
- local misc = false
- local player = false
- local slot = false
- local box = false
- local log = false
- local plank = false
- local players = false
- local wp = false
- local other = false
- Me.MouseButton1Click:Connect(function()
- selectedPlayer.Text = Player.Name
- end)
- copyBase.MouseButton1Down:connect(function()
- local plr = selectedPlayer.Text
- pmds = PlayerModels
- PlaceR = Replicated.PlaceStructure.ClientPlacedBlueprint
- PlaceS = Replicated.PlaceStructure.ClientPlacedStructure
- Property = nil
- MProperty = nil
- for i, v in pairs(Properties:GetChildren()) do
- if v:FindFirstChild("Owner") and v.Owner.Value ~= nil and v.Owner.Value == Players[plr] then
- Property = v.OriginSquare
- end
- end
- for i, v in pairs(Properties:GetChildren()) do
- if v:FindFirstChild("Owner") and v.Owner.Value ~= nil and v.Owner.Value == Player then
- MProperty = v.OriginSquare
- end
- end
- function copypart(mod)
- if mod:FindFirstChild("MainCFrame") then
- Cframe = mod.MainCFrame.Value
- else
- Cframe = mod.PrimaryPart.CFrame
- end
- X = Property.Position.X - Cframe.X
- Y = Property.Position.Y - Cframe.Y
- Z = Property.Position.Z - Cframe.Z
- PlaceR:FireServer(mod.ItemName.Value, (CFrame.new(MProperty.Position.X, MProperty.Position.Y, MProperty.Position.Z)*CFrame.Angles(Cframe:toEulerAnglesXYZ())) - Vector3.new(X, Y, Z), Player)
- wait()
- end
- for i, v in pairs(pmds:GetChildren()) do
- if v:FindFirstChild("Owner") and v.Owner.Value ~= nil and v.Owner.Value == Players[plr] and v:FindFirstChild("ItemName") and v:FindFirstChild("Type") and (v.PrimaryPart ~= nil or v:FindFirstChild("MainCFrame")) then
- copypart(v)
- end
- end
- end)
- --- Fill Blueprints ---
- fillBase.MouseButton1Down:connect(function()
- local PlayerName = selectedPlayer.Text
- local WoodName = treeType.Text
- local ItsCFrame
- local Remote = Replicated.PlaceStructure.ClientPlacedStructure
- for i,v in pairs(PlayerModels:GetChildren()) do
- if v:FindFirstChild("Owner") and tostring(v.Owner.Value) == PlayerName then
- if v:FindFirstChild("Type") and v.Type.Value == "Blueprint" then
- if v:FindFirstChild("MainCFrame") then
- ItsCFrame = v.MainCFrame.Value
- else
- ItsCFrame = v.PrimaryPart.CFrame
- end
- if v ~= nil then
- Remote:FireServer(v.Name, ItsCFrame, Player, WoodName, v, false)
- end
- end
- end
- end
- end)
- maxLand.MouseButton1Down:connect(function()
- for i, v in pairs(service.Workspace.Properties:GetChildren()) do
- if v:FindFirstChild("Owner") and v.Owner.Value == game.Players.LocalPlayer then
- base = v
- square = v.OriginSquare
- end
- end
- function makebase(pos)
- local Event = service.ReplicatedStorage.PropertyPurchasing.ClientExpandedProperty
- Event:FireServer(base, pos)
- end
- spos = square.Position
- makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z))
- makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z))
- makebase(CFrame.new(spos.X, spos.Y, spos.Z + 40))
- makebase(CFrame.new(spos.X, spos.Y, spos.Z - 40))
- makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z + 40))
- makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z - 40))
- makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z + 40))
- makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z - 40))
- makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z))
- makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z))
- makebase(CFrame.new(spos.X, spos.Y, spos.Z + 80))
- makebase(CFrame.new(spos.X, spos.Y, spos.Z - 80))
- makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z + 80))
- makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z - 80))
- makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z + 80))
- makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z - 80))
- makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z + 80))
- makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z + 80))
- makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z + 40))
- makebase(CFrame.new(spos.X + 80, spos.Y, spos.Z - 40))
- makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z + 40))
- makebase(CFrame.new(spos.X - 80, spos.Y, spos.Z - 40))
- makebase(CFrame.new(spos.X + 40, spos.Y, spos.Z - 80))
- makebase(CFrame.new(spos.X - 40, spos.Y, spos.Z - 80))
- end)
- --- Wipe Base ---
- wipeBase.MouseButton1Down:connect(function()
- plr = selectedPlayer.Text
- pmds = service.Workspace.PlayerModels
- PlaceR = service.ReplicatedStorage.Interaction.DestroyStructure
- for i, v in pairs(pmds:GetChildren()) do
- if v:FindFirstChild("Owner") and v.Owner.Value ~= nil and v.Owner.Value == Players[plr] and v:FindFirstChild("ItemName") and v:FindFirstChild("Type") and (v.PrimaryPart ~= nil or v:FindFirstChild("MainCFrame")) then
- PlaceR:FireServer(v)
- end
- end
- end)
Add Comment
Please, Sign In to add comment