Advertisement
RgRacks

) ROblox l Horrific housing script (works)

Apr 13th, 2020
9,289
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. local HorrificHousingGUI = Instance.new("ScreenGui")
  2. local frame = Instance.new("Frame")
  3. local open = Instance.new("TextButton")
  4. local main = Instance.new("Frame")
  5. local title = Instance.new("TextBox")
  6. local titledown = Instance.new("TextBox")
  7. local noclip = Instance.new("TextButton")
  8. local clicktp = Instance.new("TextButton")
  9. local ezwin = Instance.new("TextButton")
  10. local close = Instance.new("TextButton")
  11.  
  12. HorrificHousingGUI.Name = "Horrific Housing GUI"
  13. HorrificHousingGUI.Parent = game.CoreGui
  14. HorrificHousingGUI.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  15.  
  16. frame.Name = "frame"
  17. frame.Parent = HorrificHousingGUI
  18. frame.Active = true
  19. frame.BackgroundColor3 = Color3.new(1, 1, 1)
  20. frame.Position = UDim2.new(0, 0, 0.584534764, 0)
  21. frame.Selectable = true
  22. frame.Size = UDim2.new(0, 158, 0, 20)
  23. frame.Style = Enum.FrameStyle.DropShadow
  24.  
  25. open.Name = "open"
  26. open.Parent = frame
  27. open.BackgroundColor3 = Color3.new(0, 0, 0)
  28. open.BackgroundTransparency = 0.80000001192093
  29. open.BorderSizePixel = 0
  30. open.Position = UDim2.new(0.17984356, 0, -1.25, 0)
  31. open.Size = UDim2.new(0, 91, 0, 17)
  32. open.AutoButtonColor = false
  33. open.Font = Enum.Font.SciFi
  34. open.Text = "Open"
  35. open.TextColor3 = Color3.new(0, 0, 0)
  36. open.TextScaled = true
  37. open.TextSize = 14
  38. open.TextWrapped = true
  39. open.MouseButton1Down:connect(function()
  40. main.Visible = true
  41. frame.Visible = false
  42. end)
  43.  
  44. main.Name = "main"
  45. main.Parent = HorrificHousingGUI
  46. main.BackgroundColor3 = Color3.new(1, 1, 1)
  47. main.BorderSizePixel = 0
  48. main.Position = UDim2.new(0.287713826, 0, 0.446920037, 0)
  49. main.Size = UDim2.new(0, 216, 0, 230)
  50. main.Visible = false
  51. main.Style = Enum.FrameStyle.DropShadow
  52. main.Active = true
  53. main.Draggable = true
  54.  
  55. title.Archivable = false
  56. title.Name = "title"
  57. title.Parent = main
  58. title.Active = false
  59. title.BackgroundColor3 = Color3.new(0, 0, 0)
  60. title.Position = UDim2.new(-0.000929091126, 0, -0.000190004706, 0)
  61. title.Selectable = false
  62. title.Size = UDim2.new(0, 201, 0, 17)
  63. title.ClearTextOnFocus = false
  64. title.Font = Enum.Font.SciFi
  65. title.ShowNativeInput = false
  66. title.Text = "Horrific House GUI"
  67. title.TextColor3 = Color3.new(0.666667, 1, 1)
  68. title.TextScaled = true
  69. title.TextSize = 14
  70. title.TextWrapped = true
  71.  
  72. titledown.Archivable = false
  73. titledown.Name = "titledown"
  74. titledown.Parent = main
  75. titledown.Active = false
  76. titledown.BackgroundColor3 = Color3.new(0, 0, 0)
  77. titledown.Position = UDim2.new(-0.000929091126, 0, 0.965027392, 0)
  78. titledown.Selectable = false
  79. titledown.Size = UDim2.new(0, 201, 0, 17)
  80. titledown.ClearTextOnFocus = false
  81. titledown.Font = Enum.Font.SciFi
  82. titledown.ShowNativeInput = false
  83. titledown.Text = "Horrific House GUI"
  84. titledown.TextColor3 = Color3.new(0.666667, 1, 1)
  85. titledown.TextScaled = true
  86. titledown.TextSize = 14
  87. titledown.TextWrapped = true
  88.  
  89. noclip.Name = "noclip"
  90. noclip.Parent = main
  91. noclip.BackgroundColor3 = Color3.new(0.117647, 0.117647, 0.117647)
  92. noclip.Position = UDim2.new(0.140775025, 0, 0.120869577, 0)
  93. noclip.Size = UDim2.new(0, 151, 0, 34)
  94. noclip.Font = Enum.Font.SciFi
  95. noclip.Text = "Noclip"
  96. noclip.TextColor3 = Color3.new(1, 1, 0)
  97. noclip.TextScaled = true
  98. noclip.TextSize = 14
  99. noclip.TextWrapped = true
  100. noclip.MouseButton1Down:connect(function()
  101. noclip = false
  102. game:GetService('RunService').Stepped:connect(function()
  103. if noclip then
  104. game.Players.LocalPlayer.Character.Humanoid:ChangeState(11)
  105. end
  106. end)
  107. plr = game.Players.LocalPlayer
  108. mouse = plr:GetMouse()
  109. mouse.KeyDown:connect(function(key)
  110.  
  111. if key == "q" then
  112. noclip = not noclip
  113. game.Players.LocalPlayer.Character.Humanoid:ChangeState(11)
  114. end
  115. end)
  116. end)
  117.  
  118. clicktp.Name = "clicktp"
  119. clicktp.Parent = main
  120. clicktp.BackgroundColor3 = Color3.new(0.117647, 0.117647, 0.117647)
  121. clicktp.Position = UDim2.new(0.140775025, 0, 0.399130434, 0)
  122. clicktp.Size = UDim2.new(0, 151, 0, 34)
  123. clicktp.Font = Enum.Font.SciFi
  124. clicktp.Text = "ClickTp"
  125. clicktp.TextColor3 = Color3.new(0.333333, 1, 0)
  126. clicktp.TextScaled = true
  127. clicktp.TextSize = 14
  128. clicktp.TextWrapped = true
  129. clicktp.MouseButton1Down:connect(function()
  130. -- developed by elite_doge, 1,11,2015, 5:18 PM
  131.  
  132. local enableKey = "e" -- what key you need to press to teleport
  133.  
  134. ------------------------------------
  135. -- getting needed locals
  136. local p = game.Players.LocalPlayer
  137. local mouse = p:GetMouse()
  138. local char = p.Character
  139. -- creating gui creation functions
  140. function setProperties(gui,t)
  141.     gui.BackgroundColor3 = Color3.new(0,0,0)
  142.     gui.BackgroundTransparency = t
  143.     gui.BorderSizePixel = 0
  144. end
  145.  
  146. function setText(gui,te)
  147.     gui.TextStrokeTransparency = 0
  148.     gui.TextStrokeColor3 = Color3.new(255,255,255)
  149.     gui.TextColor3 = Color3.new(0,0,0)
  150.     gui.Text = te
  151.     gui.TextScaled = true
  152.     gui.TextXAlignment = Enum.TextXAlignment.Center
  153. end
  154. --- creating gui
  155. local gui = Instance.new("ScreenGui",p.PlayerGui)
  156. gui.Name = "TeleportationInfo"
  157. local f = Instance.new("Frame",gui)
  158. f.Size = UDim2.new(0.2,0,0.4,0)
  159. f.Position = UDim2.new(1,0,0.3,0)
  160. setProperties(f,0.5)
  161. local open = Instance.new("TextButton",gui)
  162. open.Name = "Open"
  163. setProperties(open,0.5)
  164. setText(open,"Tele Help")
  165. open.Size = UDim2.new(0.1,0,0.05,0)
  166. open.Position = UDim2.new(1 - open.Size.X.Scale,0,0.5,0)
  167. local text = Instance.new("TextLabel",f)
  168. text.Name = "Text"
  169. setProperties(text,1)
  170. text.Size = UDim2.new(1,0,0.8,0)
  171. setText(text,"Hold 'e' and click where you want to teleport. Click on this gui to close.")
  172. local name = "elite_doge"
  173. local text2  = text:Clone()
  174. text2.Parent = text.Parent
  175. text2.Size = UDim2.new(1,0,0.2,0)
  176. text2.Position = UDim2.new(0,0,0.8,0)
  177. text2.Name = "Creator"
  178. local isOpen = false
  179. local close = Instance.new("TextButton",f)
  180. close.Name = "Close"
  181. text2.Text = "Developed by " .. name.. ", 1/11/2015"
  182. setProperties(close,1)
  183. close.Visible = false
  184. close.Text = ""
  185. close.Size = UDim2.new(1,0,1,0)
  186. -- creating gui functions
  187. close.MouseButton1Down:connect(function()
  188.     if isOpen == true then
  189.         f:TweenPosition(UDim2.new(1,0,0.3,0),"InOut","Quad",1,true)
  190.         open:TweenPosition(UDim2.new(1 - open.Size.X.Scale,0,0.5,0),"InOut","Quad",1,true)
  191.         isOpen = false
  192.         close.Visible = false
  193.     else
  194.         close.Visible = false
  195.         open:TweenPosition(UDim2.new(1,0,0.5,0),"InOut","Quad",1,true)
  196.     end
  197. end)
  198.  
  199. open.MouseButton1Down:connect(function()
  200.     if isOpen == false then
  201.         isOpen = true
  202.         f:TweenPosition(UDim2.new(1 - f.Size.X.Scale,0,0.3,0),"InOut","Quad",1,true)
  203.         open:TweenPosition(UDim2.new(1,0,0.5,0),"InOut","Quad",1,true)
  204.         close.Visible = true
  205.     end
  206. end)
  207. -- click and keydown functions
  208. local enabled = false
  209.  
  210. mouse.KeyDown:connect(function(key)
  211.     key = key:lower()
  212.     if key == "e" then
  213.         enabled = true
  214.     end
  215. end)
  216.  
  217. mouse.KeyUp:connect(function(key)
  218.     key = key:lower()
  219.     if key == "e" then
  220.         enabled = false
  221.     end
  222. end)
  223.  
  224. mouse.Button1Down:connect(function()
  225.     if char and enabled == true then
  226.         char.HumanoidRootPart.CFrame = mouse.Hit + Vector3.new(0,7,0)
  227.     end
  228. end)
  229. end)
  230.  
  231. ezwin.Name = "ezwin"
  232. ezwin.Parent = main
  233. ezwin.BackgroundColor3 = Color3.new(0.117647, 0.117647, 0.117647)
  234. ezwin.Position = UDim2.new(0.342952311, 0, 0.651669025, 0)
  235. ezwin.Size = UDim2.new(0, 151, 0, 34)
  236. ezwin.Font = Enum.Font.SciFi
  237. ezwin.Text = "Ez win"
  238. ezwin.TextColor3 = Color3.new(0, 1, 1)
  239. ezwin.TextScaled = true
  240. ezwin.TextSize = 14
  241. ezwin.TextWrapped = true
  242. ezwin.MouseButton1Down:connect(function()
  243. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-21.8475571, 6.14766121, -16.8852406)
  244. end)
  245.  
  246.  
  247. close.Name = "close"
  248. close.Parent = main
  249. close.BackgroundColor3 = Color3.new(0.117647, 0.117647, 0.117647)
  250. close.Position = UDim2.new(0.580899477, 0, 0.456387252, 0)
  251. close.Size = UDim2.new(0, 20, 0, 16)
  252. close.Font = Enum.Font.SciFi
  253. close.Text = "X"
  254. close.TextColor3 = Color3.new(0, 1, 1)
  255. close.TextScaled = true
  256. close.TextSize = 14
  257. close.TextWrapped = true
  258. close.MouseButton1Down:connect(function()
  259. frame.Visible = true
  260. main.Visible = false
  261. end)
Advertisement
RAW Paste Data Copied
Advertisement