Advertisement
BobMe

some lum thing

May 27th, 2019
176
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.12 KB | None | 0 0
  1. tableitems = {
  2. "------ STRUCTURES ------",
  3. "",
  4. "Sawmill2",
  5. "StraightConveyor",
  6. "TightTurnConveyor",
  7. "TiltConveyor",
  8. "LogSweeper",
  9. "ConveyorFunnel",
  10. "ConveyorSupports",
  11. "ConveyorSwitch",
  12. "TightTurnConveyorSupports",
  13. "Sawmill",
  14. "FloorLamp1",
  15. "WallLight1",
  16. "WallLight2",
  17. "Seat_Couch",
  18. "Seat_Loveseat",
  19. "Seat_ArmChair",
  20. "Refridgerator",
  21. "Stove",
  22. "Dishwasher",
  23. "Toilet",
  24. "Sawmill3",
  25. "Bed1",
  26. "Bed2",
  27. "Sawmill4",
  28. "GlassPane1",
  29. "GlassPane2",
  30. "GlassPane3",
  31. "GlassPane4",
  32. "Lamp1",
  33. "GlassDoor1",
  34. "Sawmill4L",
  35. "Painting1",
  36. "StraightSwitchConveyorRight",
  37. "StraightSwitchConveyorLeft",
  38. "Painting2",
  39. "Painting3",
  40. "Painting4",
  41. "Painting5",
  42. "Painting6",
  43. "Painting7",
  44. "Painting8",
  45. "Painting9",
  46. "ToiletGold",
  47. "",
  48. "------ AXES ------",
  49. "",
  50. "BasicHatchet",
  51. "Axe1",
  52. "Axe2",
  53. "AxeAlphaTesters",
  54. "FireAxe",
  55. "SilverAxe",
  56. "EndTimesAxe",
  57. "AxeChicken",
  58. "CandyCaneAxe",
  59. "Beesaxe",
  60. "AxeAmber",
  61. "GingerbreadAxe",
  62. "ManyAxe",
  63. "AxeTwitter",
  64. "",
  65. "------ WIRE OBJECTS ------",
  66. "",
  67. "Wire",
  68. "Lever0",
  69. "Button0",
  70. "ChopSaw",
  71. "PressurePlate",
  72. "SignalSustain",
  73. "Laser",
  74. "LaserReceiver",
  75. "Hatch",
  76. "GateNOT",
  77. "GateOR",
  78. "GateAND",
  79. "GateXOR",
  80. "WoodChecker",
  81. "SignalDelay",
  82. "NeonWireRed",
  83. "NeonWireOrange",
  84. "NeonWireGreen",
  85. "NeonWireCyan",
  86. "NeonWireBlue",
  87. "NeonWireViolet",
  88. "NeonWireWhite",
  89. "NeonWirePinky",
  90. "IcicleWireAmber",
  91. "IcicleWireRed",
  92. "IcicleWireGreen",
  93. "IcicleWireBlue",
  94. "IcicleWireMagenta",
  95. "FireworkLauncher",
  96. "IcicleWireHalloween",
  97. "",
  98. "----- VEHICLES -----",
  99. "",
  100. "UtilityTruck",
  101. "UtilityTruck2",
  102. "SmallTrailer",
  103. "Pickup1",
  104. "Trailer2",
  105. "Sleigh",
  106. "",
  107. "----- OTHER -----",
  108. "",
  109. "PropertySoldSign",
  110. "WorkLight",
  111. "BagOfSand",
  112. "CanOfWorms",
  113. "LightBulb",
  114. "Dynamite",
  115. "PumpkinClassic",
  116. "[Gifts]",
  117. "BlueBaii",
  118. "Bobblehead",
  119. "Spork",
  120. "CoalLump",
  121. "RedBall",
  122. "PumpkinDark",
  123. "Skull",
  124. "Eye1",
  125. "Turkey",
  126. "Bobblehead2",
  127. "B1",
  128. "Blueball",
  129. "PumpkinGreen",
  130. "Turkey2",
  131. "Bobblehead3",
  132. "GreenBall",
  133. "Bobblehead4",
  134. "Bobblehead5",
  135. "PumpkinCursed",
  136. "CanOfCranberry",
  137. "BagOfCandy",
  138. "[Candy]",
  139. "Turkey3",
  140. "Snowball",
  141. "Plate",
  142. "Cocoa",
  143. "CandyCane",
  144. "Duck",
  145. "Cone",
  146. "Toboggan",
  147. "Scoobis",
  148. "PlumBall",
  149. "YellowBall",
  150. }
  151.  
  152. -- Objects
  153.  
  154. local CommandBar = Instance.new("ScreenGui")
  155. local Frame = Instance.new("Frame")
  156. local TextBox = Instance.new("TextBox")
  157. local Execute = Instance.new("TextButton")
  158. local Close = Instance.new("TextButton")
  159. local exit = false
  160.  
  161. -- Properties
  162.  
  163. CommandBar.Name = "CommandBar"
  164. CommandBar.Parent = game.Players.LocalPlayer.PlayerGui
  165. CommandBar.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  166. CommandBar.ResetOnSpawn = false
  167.  
  168. Frame.Parent = CommandBar
  169. Frame.AnchorPoint = Vector2.new(0.5, 1)
  170. Frame.BackgroundColor3 = Color3.new(0, 0, 0)
  171. Frame.BackgroundTransparency = 0.60000002384186
  172. Frame.Position = UDim2.new(0.5, 0, 1.23000002, 0)
  173. Frame.Size = UDim2.new(0.25, 0, 0.165999994, 0)
  174.  
  175. TextBox.Parent = Frame
  176. TextBox.AnchorPoint = Vector2.new(0.5, 0)
  177. TextBox.BackgroundColor3 = Color3.new(1, 1, 1)
  178. TextBox.BackgroundTransparency = 0.5
  179. TextBox.BorderSizePixel = 0
  180. TextBox.Position = UDim2.new(0.5, 0, 0.0661462694, 0)
  181. TextBox.Size = UDim2.new(0.964999974, 0, 0.546999991, 0)
  182. TextBox.Font = Enum.Font.SourceSans
  183. TextBox.PlaceholderColor3 = Color3.new(0.470588, 0.470588, 0.470588)
  184. TextBox.PlaceholderText = "Execute a command"
  185. TextBox.Text = ""
  186. TextBox.TextColor3 = Color3.new(1, 1, 1)
  187. TextBox.TextScaled = true
  188. TextBox.TextSize = 14
  189. TextBox.TextWrapped = true
  190.  
  191. Execute.Name = "Execute"
  192. Execute.Parent = Frame
  193. Execute.BackgroundColor3 = Color3.new(0.305882, 0.470588, 0.819608)
  194. Execute.Position = UDim2.new(0.519782007, 0, 0.648300946, 0)
  195. Execute.Size = UDim2.new(0.461793363, 0, 0.330000013, 0)
  196. Execute.Font = Enum.Font.SourceSans
  197. Execute.Text = "Execute"
  198. Execute.TextColor3 = Color3.new(1, 1, 1)
  199. Execute.TextScaled = true
  200. Execute.TextSize = 14
  201. Execute.TextWrapped = true
  202.  
  203. Close.Name = "Close"
  204. Close.Parent = Frame
  205. Close.BackgroundColor3 = Color3.new(0.305882, 0.470588, 0.819608)
  206. Close.Position = UDim2.new(0.0175000206, 0, 0.648300946, 0)
  207. Close.Size = UDim2.new(0.462000012, 0, 0.330000013, 0)
  208. Close.Font = Enum.Font.SourceSans
  209. Close.Text = "Close"
  210. Close.TextColor3 = Color3.new(1, 1, 1)
  211. Close.TextScaled = true
  212. Close.TextSize = 14
  213. Close.TextWrapped = true
  214.  
  215. -- Scripts
  216.  
  217.  
  218. -- developed by elite_doge, 1,11,2015, 5:18 PM
  219.  
  220. local enableKey = "e" -- what key you need to press to teleport
  221.  
  222. ------------------------------------
  223. -- getting needed locals
  224. local p = game.Players.LocalPlayer
  225. local mouse = p:GetMouse()
  226. local char = p.Character
  227. local tpkey = "z"
  228.  
  229. -- click and keydown functions
  230. local enabled = false
  231.  
  232. mouse.KeyDown:connect(function(key)
  233. key = key:lower()
  234. if key == tpkey then
  235. enabled = true
  236. end
  237. end)
  238.  
  239. mouse.KeyUp:connect(function(key)
  240. key = key:lower()
  241. if key == tpkey then
  242. enabled = false
  243. end
  244. end)
  245.  
  246. mouse.Button1Down:connect(function()
  247. if char and enabled == true then
  248. char.HumanoidRootPart.CFrame = mouse.Hit + Vector3.new(0,7,0)
  249. end
  250. end)
  251.  
  252. function cmds()
  253. local ExampleLabel = Instance.new("TextLabel")
  254. ExampleLabel.Name = "ExampleLabel"
  255. ExampleLabel.BackgroundColor3 = Color3.new(1, 1, 1)
  256. ExampleLabel.BackgroundTransparency = 0.89999997615814
  257. ExampleLabel.Size = UDim2.new(1, 0, 0, 50)
  258. ExampleLabel.Font = Enum.Font.SourceSans
  259. ExampleLabel.TextColor3 = Color3.new(1, 1, 1)
  260. ExampleLabel.TextScaled = true
  261. ExampleLabel.TextSize = 14
  262. ExampleLabel.TextWrapped = true
  263.  
  264. local ids = Instance.new("ScreenGui")
  265. local OuterFrame = Instance.new("Frame")
  266. local InnerFrame = Instance.new("ScrollingFrame")
  267. local Button = Instance.new("TextButton")
  268. ids.Name = "ids"
  269. ids.Parent = game.Players.LocalPlayer.PlayerGui
  270. ids.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  271.  
  272. OuterFrame.Name = "OuterFrame"
  273. OuterFrame.Parent = ids
  274. OuterFrame.AnchorPoint = Vector2.new(0.5, 0.5)
  275. OuterFrame.BackgroundColor3 = Color3.new(0, 0, 0)
  276. OuterFrame.BackgroundTransparency = 0.5
  277. OuterFrame.Position = UDim2.new(0.5, 0, 0.5, 0)
  278. OuterFrame.Size = UDim2.new(0.699999988, 0, 0.899999976, 0)
  279.  
  280. InnerFrame.Name = "InnerFrame"
  281. InnerFrame.Parent = OuterFrame
  282. InnerFrame.BackgroundColor3 = Color3.new(1, 1, 1)
  283. InnerFrame.BackgroundTransparency = 1
  284. InnerFrame.Size = UDim2.new(1, 0, 1, 0)
  285. InnerFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
  286.  
  287. Button.Name = "Button"
  288. Button.Parent = OuterFrame
  289. Button.AnchorPoint = Vector2.new(1, 0)
  290. Button.BackgroundColor3 = Color3.new(1, 1, 1)
  291. Button.Position = UDim2.new(1, 0, 0, 0)
  292. Button.Size = UDim2.new(0.0250000004, 0, 0.0250000004, 0)
  293. Button.SizeConstraint = Enum.SizeConstraint.RelativeXX
  294. Button.Font = Enum.Font.SourceSans
  295. Button.Text = "X"
  296. Button.TextColor3 = Color3.new(0, 0, 0)
  297. Button.TextScaled = true
  298. Button.TextSize = 14
  299. Button.TextWrapped = true
  300.  
  301. local h = Instance.new("ScreenGui")
  302. coroutine.resume(coroutine.create(function()
  303. for i=1,#tableitems do
  304. local value = 50*(i-1)
  305. local g = ExampleLabel:Clone()
  306. g.Parent = InnerFrame
  307. g.Text = tableitems[i]
  308. g.Position = UDim2.new(0,0,0,value)
  309. InnerFrame.CanvasSize = UDim2.new(0,0,0,value)
  310. wait()
  311. end
  312. end))
  313. Button.MouseButton1Click:Connect(function()
  314. ids:Destroy()
  315. end)
  316. end
  317.  
  318. wait()
  319.  
  320. player = game.Players.LocalPlayer
  321. mouse = player:GetMouse()
  322. opened = false
  323. rank = false
  324.  
  325. function checkrank()
  326. return true
  327. end
  328.  
  329. function summon(stri)
  330. local Item
  331. local Quantity
  332. local keker
  333.  
  334. for i=1,#stri do
  335. if stri:sub(i,i) == "/" then
  336. keker = i
  337. end
  338. end
  339.  
  340. if keker == nil then
  341. Item = stri
  342. Quantity = 1
  343. else
  344. Item = stri:sub(1,keker-1)
  345. Quantity = tonumber(stri:sub(keker+1))
  346. end
  347.  
  348. local Land = nil
  349. for i,v in pairs(game.Workspace.Properties:GetChildren()) do
  350. if v.Owner.Value == game.Players.LocalPlayer then
  351. Land = v
  352. break
  353. end
  354. end
  355. if not Land then
  356. for i,v in pairs(game.Workspace.Properties:GetChildren()) do
  357. if v.Owner.Value == game.Players.LocalPlayer or v.Owner.Value == nil then
  358. Land = v
  359. game.ReplicatedStorage.Interaction.ClientIsDragging:FireServer(v)
  360. break
  361. end
  362. end
  363. end
  364.  
  365. local function Spawnn(Item)
  366. local Info = {}
  367. Info.Name = Item.Name
  368. Info.Type = game.ReplicatedStorage.Purchasables.Structures.HardStructures.Sawmill2.Type
  369. Info.OtherInfo = game.ReplicatedStorage.Purchasables.WireObjects.Wire.OtherInfo
  370. local Points = {game.Players.LocalPlayer.Character.Head.Position+Vector3.new(1,1,0),game.Players.LocalPlayer.Character.Head.Position+Vector3.new(1,-1,0)}
  371. game.ReplicatedStorage.PlaceStructure.ClientPlacedWire:FireServer(Info, Points)
  372. end
  373.  
  374. for i=1, Quantity do
  375. Spawnn(game.ReplicatedStorage.Purchasables:FindFirstChild(Item, true))
  376. end
  377. end
  378.  
  379. mouse.KeyDown:Connect(function(key)
  380. if exit == false then
  381. if string.byte(key) == 92 and opened == false and checkrank() == true then
  382. opened = true
  383. Frame:TweenPosition(UDim2.new(0.5, 0, 1, 0),"Out","Quad",0.25)
  384. TextBox:CaptureFocus()
  385. elseif string.byte(key) == 92 and opened == true and checkrank() == true then
  386. TextBox:CaptureFocus()
  387. end
  388. end
  389. end)
  390.  
  391. TextBox.FocusLost:Connect(function(input)
  392. wait(.1)
  393. if input == true and opened == true and checkrank() == true then
  394. coroutine.resume(coroutine.create(function()
  395. if TextBox.Text:lower() == "cmds" or TextBox.Text:lower() == "commands" then
  396. cmds()
  397. elseif TextBox.Text:lower() == "exit" then
  398. CommandBar.Parent = game.Players.LocalPlayer
  399. exit = true
  400. elseif TextBox.Text:lower() == " " or TextBox.Text:lower() == "" then
  401.  
  402. elseif TextBox.Text:lower():sub(1,6) == "tpkey/" then
  403. tpkey = TextBox.Text:lower():sub(7,7)
  404. else
  405. summon(TextBox.Text)
  406. end
  407. Frame:TweenPosition(UDim2.new(0.5, 0, 1.23, 0),"In","Quad",0.25)
  408. end))
  409. opened = false
  410. elseif input == true and opened == false and checkrank() == true then
  411. opened = true
  412. Frame:TweenPosition(UDim2.new(0.5, 0, 1, 0),"Out","Quad",0.25)
  413. TextBox:CaptureFocus()
  414. elseif input == false and opened == false and checkrank() == true then
  415. opened = true
  416. Frame:TweenPosition(UDim2.new(0.5, 0, 1, 0),"Out","Quad",0.25)
  417. TextBox:CaptureFocus()
  418. elseif opened == true and checkrank() == false then
  419. Frame:TweenPosition(UDim2.new(0.5, 0, 1.23, 0),"In","Quad",0.25)
  420. opened = false
  421. end
  422. end)
  423.  
  424. Close.MouseButton1Click:Connect(function()
  425. if checkrank() == true then
  426. opened = false
  427. Frame:TweenPosition(UDim2.new(0.5, 0, 1.23, 0),"In","Quad",0.25)
  428. end
  429. end)
  430.  
  431. Execute.MouseButton1Click:Connect(function()
  432. if checkrank() == true then
  433. coroutine.resume(coroutine.create(function()
  434. if TextBox.Text:lower() == "cmds" or TextBox.Text:lower() == "commands" then
  435. cmds()
  436. elseif TextBox.Text:lower() == "exit" then
  437. CommandBar.Parent = game.Players.LocalPlayer
  438. exit = true
  439. elseif TextBox.Text:lower() == " " or TextBox.Text:lower() == "" then
  440.  
  441. elseif TextBox.Text:lower():sub(1,6) == "tpkey/" then
  442. tpkey = TextBox.Text:lower():sub(7,7)
  443. else
  444. summon(TextBox.Text)
  445. end
  446. end))
  447. end
  448. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement