ClockworkHorror

ffsdfds

Aug 10th, 2015
263
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.18 KB | None | 0 0
  1. local Screen = Instance.new("ScreenGui", game.Players.LocalPlayer.PlayerGui)
  2. local TextLabel = Instance.new("TextLabel",Screen)
  3. TextLabel.Size=UDim2.new(0,300,0,110)
  4. TextLabel.BackgroundColor3=Color3.new(0,0,0)
  5. TextLabel.BackgroundTransparency=0.4
  6. TextLabel.TextColor3=Color3.new(1,1,1)
  7. TextLabel.TextXAlignment="Center"
  8. TextLabel.TextYAlignment='Top'
  9. TextLabel.FontSize = "Size10"
  10. TextLabel.Position=UDim2.new(0.5,0-(TextLabel.Size.X.Offset/2),0.5,0-(TextLabel.Size.Y.Offset/2))
  11. TextLabel.Text = ""
  12.  
  13. local function GUISoundz(SoundId)
  14. if game.Players.LocalPlayer.PlayerGui:FindFirstChild("AddOnNS") then
  15. game.Players.LocalPlayer.PlayerGui.AddOnNS:Remove()
  16. b= Instance.new("StringValue", game.Players.LocalPlayer.PlayerGui)
  17. b.Name = "AddOnNS"
  18. c= Instance.new("StringValue", game.Players.LocalPlayer.PlayerGui.AddOnNS)
  19. c.Name = "AddOnNS"
  20. a = Instance.new("Sound", game.Players.LocalPlayer.PlayerGui.AddOnNS.AddOnNS)
  21. a.Name = "BlackHatHelper"
  22. a.SoundId = "rbxassetid://" .. SoundId
  23. a.Volume = math.huge
  24. a.Pitch = 1
  25. a.Looped = false
  26. a:Play()
  27. elseif not game.Players.LocalPlayer.PlayerGui:FindFirstChild("AddOnNS") then
  28. b= Instance.new("StringValue", game.Players.LocalPlayer.PlayerGui)
  29. b.Name = "AddOnNS"
  30. c= Instance.new("StringValue", game.Players.LocalPlayer.PlayerGui.AddOnNS)
  31. c.Name = "AddOnNS"
  32. a = Instance.new("Sound", game.Players.LocalPlayer.PlayerGui.AddOnNS)
  33. a.Name = "BlackHatHelper"
  34. a.SoundId = "rbxassetid://" .. SoundId
  35. a.Volume = math.huge
  36. a.Pitch = 1
  37. a.Looped = false
  38. a:Play()
  39. end
  40. end
  41.  
  42. wait(1)
  43.  
  44. local function Load()
  45. TextLabel.Text = 'Kappa GUI Loader.\n'
  46. wait(.1)
  47. TextLabel.Text = TextLabel.Text..'Explorer from Kappa GUI.\n'
  48. wait(.1)
  49. TextLabel.Text = TextLabel.Text..'Loader created by BlackHatHelper.\n'
  50. wait(.1)
  51. TextLabel.Text = TextLabel.Text..'Loading Stuff....'
  52. wait(.1)
  53. TextLabel.Text = TextLabel.Text..' DONE!\n'
  54. wait(.1)
  55. TextLabel.Text = TextLabel.Text..'Loading More Stuff....'
  56. wait(.1)
  57. TextLabel.Text = TextLabel.Text..' DONE!\n'
  58. wait(.1)
  59. TextLabel.Text = TextLabel.Text..'Launching GUI Loader...'
  60. wait(.1)
  61. if game.CoreGui:FindFirstChild("Explorer") then
  62. TextLabel.TextColor3=Color3.new(255,0,0)
  63. TextLabel.Text = TextLabel.Text..' ERROR\n'
  64. GUISoundz(138090596)
  65. wait(1)
  66. TextLabel.Text = TextLabel.Text..'Loader GUI already exists!\n'
  67. wait(1)
  68. Screen:Remove()
  69. else
  70. TextLabel.Text = TextLabel.Text..' SUCCESS!\n'
  71. TextLabel.TextColor3=Color3.new(0,255,0)
  72. p = Instance.new("ScreenGui",game.CoreGui)
  73. p.Name = "Explorer"
  74. f = Instance.new("Frame",p)
  75. f.BackgroundTransparency = 1
  76. f.Size = UDim2.new(1,0,1,0)
  77. tb = Instance.new("TextButton",f)
  78. tb.Position = UDim2.new(0,0,0.7,0)
  79. tb.BackgroundTransparency = 0.4
  80. tb.BackgroundColor3 = Color3.new(0,0,0)
  81. tb.Size = UDim2.new(0,50,0,50)
  82. tb.Font = "SourceSansBold"
  83. tb.FontSize = "Size18"
  84. tb.Text = "Load"
  85. tb.TextColor3 = Color3.new(255,255,255)
  86. function onClicked()
  87. if game.Players.LocalPlayer.PlayerGui:FindFirstChild("Explorer") then
  88. warn("Gui Already Exists")
  89. else
  90. game:GetObjects("rbxassetid://280660468")[1].Parent = game.Players.LocalPlayer.PlayerGui
  91. end
  92. end
  93. tb.MouseButton1Down:connect(onClicked)
  94. end
  95. wait(1)
  96. TextLabel.Text = TextLabel.Text..'Finished Loading.'
  97. wait(2)
  98. Screen:Remove()
  99. end
  100.  
  101. Load()
Add Comment
Please, Sign In to add comment