Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- tableitems = {
- "------ STRUCTURES ------",
- "",
- "Sawmill2",
- "StraightConveyor",
- "TightTurnConveyor",
- "TiltConveyor",
- "LogSweeper",
- "ConveyorFunnel",
- "ConveyorSupports",
- "ConveyorSwitch",
- "TightTurnConveyorSupports",
- "Sawmill",
- "FloorLamp1",
- "WallLight1",
- "WallLight2",
- "Seat_Couch",
- "Seat_Loveseat",
- "Seat_ArmChair",
- "Refridgerator",
- "Stove",
- "Dishwasher",
- "Toilet",
- "Sawmill3",
- "Bed1",
- "Bed2",
- "Sawmill4",
- "GlassPane1",
- "GlassPane2",
- "GlassPane3",
- "GlassPane4",
- "Lamp1",
- "GlassDoor1",
- "Sawmill4L",
- "Painting1",
- "StraightSwitchConveyorRight",
- "StraightSwitchConveyorLeft",
- "Painting2",
- "Painting3",
- "Painting4",
- "Painting5",
- "Painting6",
- "Painting7",
- "Painting8",
- "Painting9",
- "ToiletGold",
- "",
- "------ AXES ------",
- "",
- "BasicHatchet",
- "Axe1",
- "Axe2",
- "AxeAlphaTesters",
- "FireAxe",
- "SilverAxe",
- "EndTimesAxe",
- "AxeChicken",
- "CandyCaneAxe",
- "Beesaxe",
- "AxeAmber",
- "GingerbreadAxe",
- "ManyAxe",
- "AxeTwitter",
- "",
- "------ WIRE OBJECTS ------",
- "",
- "Wire",
- "Lever0",
- "Button0",
- "ChopSaw",
- "PressurePlate",
- "SignalSustain",
- "Laser",
- "LaserReceiver",
- "Hatch",
- "GateNOT",
- "GateOR",
- "GateAND",
- "GateXOR",
- "WoodChecker",
- "SignalDelay",
- "NeonWireRed",
- "NeonWireOrange",
- "NeonWireGreen",
- "NeonWireCyan",
- "NeonWireBlue",
- "NeonWireViolet",
- "NeonWireWhite",
- "NeonWirePinky",
- "IcicleWireAmber",
- "IcicleWireRed",
- "IcicleWireGreen",
- "IcicleWireBlue",
- "IcicleWireMagenta",
- "FireworkLauncher",
- "IcicleWireHalloween",
- "",
- "----- VEHICLES -----",
- "",
- "UtilityTruck",
- "UtilityTruck2",
- "SmallTrailer",
- "Pickup1",
- "Trailer2",
- "Sleigh",
- "",
- "----- OTHER -----",
- "",
- "PropertySoldSign",
- "WorkLight",
- "BagOfSand",
- "CanOfWorms",
- "LightBulb",
- "Dynamite",
- "PumpkinClassic",
- "[Gifts]",
- "BlueBaii",
- "Bobblehead",
- "Spork",
- "CoalLump",
- "RedBall",
- "PumpkinDark",
- "Skull",
- "Eye1",
- "Turkey",
- "Bobblehead2",
- "B1",
- "Blueball",
- "PumpkinGreen",
- "Turkey2",
- "Bobblehead3",
- "GreenBall",
- "Bobblehead4",
- "Bobblehead5",
- "PumpkinCursed",
- "CanOfCranberry",
- "BagOfCandy",
- "[Candy]",
- "Turkey3",
- "Snowball",
- "Plate",
- "Cocoa",
- "CandyCane",
- "Duck",
- "Cone",
- "Toboggan",
- "Scoobis",
- "PlumBall",
- "YellowBall",
- }
- -- Objects
- local CommandBar = Instance.new("ScreenGui")
- local Frame = Instance.new("Frame")
- local TextBox = Instance.new("TextBox")
- local Execute = Instance.new("TextButton")
- local Close = Instance.new("TextButton")
- local exit = false
- -- Properties
- CommandBar.Name = "CommandBar"
- CommandBar.Parent = game.Players.LocalPlayer.PlayerGui
- CommandBar.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
- CommandBar.ResetOnSpawn = false
- Frame.Parent = CommandBar
- Frame.AnchorPoint = Vector2.new(0.5, 1)
- Frame.BackgroundColor3 = Color3.new(0, 0, 0)
- Frame.BackgroundTransparency = 0.60000002384186
- Frame.Position = UDim2.new(0.5, 0, 1.23000002, 0)
- Frame.Size = UDim2.new(0.25, 0, 0.165999994, 0)
- TextBox.Parent = Frame
- TextBox.AnchorPoint = Vector2.new(0.5, 0)
- TextBox.BackgroundColor3 = Color3.new(1, 1, 1)
- TextBox.BackgroundTransparency = 0.5
- TextBox.BorderSizePixel = 0
- TextBox.Position = UDim2.new(0.5, 0, 0.0661462694, 0)
- TextBox.Size = UDim2.new(0.964999974, 0, 0.546999991, 0)
- TextBox.Font = Enum.Font.SourceSans
- TextBox.PlaceholderColor3 = Color3.new(0.470588, 0.470588, 0.470588)
- TextBox.PlaceholderText = "Execute a command"
- TextBox.Text = ""
- TextBox.TextColor3 = Color3.new(1, 1, 1)
- TextBox.TextScaled = true
- TextBox.TextSize = 14
- TextBox.TextWrapped = true
- Execute.Name = "Execute"
- Execute.Parent = Frame
- Execute.BackgroundColor3 = Color3.new(0.305882, 0.470588, 0.819608)
- Execute.Position = UDim2.new(0.519782007, 0, 0.648300946, 0)
- Execute.Size = UDim2.new(0.461793363, 0, 0.330000013, 0)
- Execute.Font = Enum.Font.SourceSans
- Execute.Text = "Execute"
- Execute.TextColor3 = Color3.new(1, 1, 1)
- Execute.TextScaled = true
- Execute.TextSize = 14
- Execute.TextWrapped = true
- Close.Name = "Close"
- Close.Parent = Frame
- Close.BackgroundColor3 = Color3.new(0.305882, 0.470588, 0.819608)
- Close.Position = UDim2.new(0.0175000206, 0, 0.648300946, 0)
- Close.Size = UDim2.new(0.462000012, 0, 0.330000013, 0)
- Close.Font = Enum.Font.SourceSans
- Close.Text = "Close"
- Close.TextColor3 = Color3.new(1, 1, 1)
- Close.TextScaled = true
- Close.TextSize = 14
- Close.TextWrapped = true
- -- Scripts
- -- developed by elite_doge, 1,11,2015, 5:18 PM
- local enableKey = "e" -- what key you need to press to teleport
- ------------------------------------
- -- getting needed locals
- local p = game.Players.LocalPlayer
- local mouse = p:GetMouse()
- local char = p.Character
- local tpkey = "z"
- -- click and keydown functions
- local enabled = false
- mouse.KeyDown:connect(function(key)
- key = key:lower()
- if key == tpkey then
- enabled = true
- end
- end)
- mouse.KeyUp:connect(function(key)
- key = key:lower()
- if key == tpkey then
- enabled = false
- end
- end)
- mouse.Button1Down:connect(function()
- if char and enabled == true then
- char.HumanoidRootPart.CFrame = mouse.Hit + Vector3.new(0,7,0)
- end
- end)
- function cmds()
- local ExampleLabel = Instance.new("TextLabel")
- ExampleLabel.Name = "ExampleLabel"
- ExampleLabel.BackgroundColor3 = Color3.new(1, 1, 1)
- ExampleLabel.BackgroundTransparency = 0.89999997615814
- ExampleLabel.Size = UDim2.new(1, 0, 0, 50)
- ExampleLabel.Font = Enum.Font.SourceSans
- ExampleLabel.TextColor3 = Color3.new(1, 1, 1)
- ExampleLabel.TextScaled = true
- ExampleLabel.TextSize = 14
- ExampleLabel.TextWrapped = true
- local ids = Instance.new("ScreenGui")
- local OuterFrame = Instance.new("Frame")
- local InnerFrame = Instance.new("ScrollingFrame")
- local Button = Instance.new("TextButton")
- ids.Name = "ids"
- ids.Parent = game.Players.LocalPlayer.PlayerGui
- ids.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
- OuterFrame.Name = "OuterFrame"
- OuterFrame.Parent = ids
- OuterFrame.AnchorPoint = Vector2.new(0.5, 0.5)
- OuterFrame.BackgroundColor3 = Color3.new(0, 0, 0)
- OuterFrame.BackgroundTransparency = 0.5
- OuterFrame.Position = UDim2.new(0.5, 0, 0.5, 0)
- OuterFrame.Size = UDim2.new(0.699999988, 0, 0.899999976, 0)
- InnerFrame.Name = "InnerFrame"
- InnerFrame.Parent = OuterFrame
- InnerFrame.BackgroundColor3 = Color3.new(1, 1, 1)
- InnerFrame.BackgroundTransparency = 1
- InnerFrame.Size = UDim2.new(1, 0, 1, 0)
- InnerFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
- Button.Name = "Button"
- Button.Parent = OuterFrame
- Button.AnchorPoint = Vector2.new(1, 0)
- Button.BackgroundColor3 = Color3.new(1, 1, 1)
- Button.Position = UDim2.new(1, 0, 0, 0)
- Button.Size = UDim2.new(0.0250000004, 0, 0.0250000004, 0)
- Button.SizeConstraint = Enum.SizeConstraint.RelativeXX
- Button.Font = Enum.Font.SourceSans
- Button.Text = "X"
- Button.TextColor3 = Color3.new(0, 0, 0)
- Button.TextScaled = true
- Button.TextSize = 14
- Button.TextWrapped = true
- local h = Instance.new("ScreenGui")
- coroutine.resume(coroutine.create(function()
- for i=1,#tableitems do
- local value = 50*(i-1)
- local g = ExampleLabel:Clone()
- g.Parent = InnerFrame
- g.Text = tableitems[i]
- g.Position = UDim2.new(0,0,0,value)
- InnerFrame.CanvasSize = UDim2.new(0,0,0,value)
- wait()
- end
- end))
- Button.MouseButton1Click:Connect(function()
- ids:Destroy()
- end)
- end
- wait()
- player = game.Players.LocalPlayer
- mouse = player:GetMouse()
- opened = false
- rank = false
- function checkrank()
- return true
- end
- function summon(stri)
- local Item
- local Quantity
- local keker
- for i=1,#stri do
- if stri:sub(i,i) == "/" then
- keker = i
- end
- end
- if keker == nil then
- Item = stri
- Quantity = 1
- else
- Item = stri:sub(1,keker-1)
- Quantity = tonumber(stri:sub(keker+1))
- end
- local Land = nil
- for i,v in pairs(game.Workspace.Properties:GetChildren()) do
- if v.Owner.Value == game.Players.LocalPlayer then
- Land = v
- break
- end
- end
- if not Land then
- for i,v in pairs(game.Workspace.Properties:GetChildren()) do
- if v.Owner.Value == game.Players.LocalPlayer or v.Owner.Value == nil then
- Land = v
- game.ReplicatedStorage.Interaction.ClientIsDragging:FireServer(v)
- break
- end
- end
- end
- local function Spawnn(Item)
- local Info = {}
- Info.Name = Item.Name
- Info.Type = game.ReplicatedStorage.Purchasables.Structures.HardStructures.Sawmill2.Type
- Info.OtherInfo = game.ReplicatedStorage.Purchasables.WireObjects.Wire.OtherInfo
- local Points = {game.Players.LocalPlayer.Character.Head.Position+Vector3.new(1,1,0),game.Players.LocalPlayer.Character.Head.Position+Vector3.new(1,-1,0)}
- game.ReplicatedStorage.PlaceStructure.ClientPlacedWire:FireServer(Info, Points)
- end
- for i=1, Quantity do
- Spawnn(game.ReplicatedStorage.Purchasables:FindFirstChild(Item, true))
- end
- end
- mouse.KeyDown:Connect(function(key)
- if exit == false then
- if string.byte(key) == 92 and opened == false and checkrank() == true then
- opened = true
- Frame:TweenPosition(UDim2.new(0.5, 0, 1, 0),"Out","Quad",0.25)
- TextBox:CaptureFocus()
- elseif string.byte(key) == 92 and opened == true and checkrank() == true then
- TextBox:CaptureFocus()
- end
- end
- end)
- TextBox.FocusLost:Connect(function(input)
- wait(.1)
- if input == true and opened == true and checkrank() == true then
- coroutine.resume(coroutine.create(function()
- if TextBox.Text:lower() == "cmds" or TextBox.Text:lower() == "commands" then
- cmds()
- elseif TextBox.Text:lower() == "exit" then
- CommandBar.Parent = game.Players.LocalPlayer
- exit = true
- elseif TextBox.Text:lower() == " " or TextBox.Text:lower() == "" then
- elseif TextBox.Text:lower():sub(1,6) == "tpkey/" then
- tpkey = TextBox.Text:lower():sub(7,7)
- else
- summon(TextBox.Text)
- end
- Frame:TweenPosition(UDim2.new(0.5, 0, 1.23, 0),"In","Quad",0.25)
- end))
- opened = false
- elseif input == true and opened == false and checkrank() == true then
- opened = true
- Frame:TweenPosition(UDim2.new(0.5, 0, 1, 0),"Out","Quad",0.25)
- TextBox:CaptureFocus()
- elseif input == false and opened == false and checkrank() == true then
- opened = true
- Frame:TweenPosition(UDim2.new(0.5, 0, 1, 0),"Out","Quad",0.25)
- TextBox:CaptureFocus()
- elseif opened == true and checkrank() == false then
- Frame:TweenPosition(UDim2.new(0.5, 0, 1.23, 0),"In","Quad",0.25)
- opened = false
- end
- end)
- Close.MouseButton1Click:Connect(function()
- if checkrank() == true then
- opened = false
- Frame:TweenPosition(UDim2.new(0.5, 0, 1.23, 0),"In","Quad",0.25)
- end
- end)
- Execute.MouseButton1Click:Connect(function()
- if checkrank() == true then
- coroutine.resume(coroutine.create(function()
- if TextBox.Text:lower() == "cmds" or TextBox.Text:lower() == "commands" then
- cmds()
- elseif TextBox.Text:lower() == "exit" then
- CommandBar.Parent = game.Players.LocalPlayer
- exit = true
- elseif TextBox.Text:lower() == " " or TextBox.Text:lower() == "" then
- elseif TextBox.Text:lower():sub(1,6) == "tpkey/" then
- tpkey = TextBox.Text:lower():sub(7,7)
- else
- summon(TextBox.Text)
- end
- end))
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement