Advertisement
boss123

Gui

Dec 17th, 2014
204
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.28 KB | None | 0 0
  1. Player = game.Players.smellyjackf0905.PlayerGui
  2. Screen = Instance.new("ScreenGui", Player)
  3. Kill = Instance.new("Frame", Screen)
  4. Button.BackgroundColor3 = Color3.new(204, 102, 0)
  5. Button.Size = UDim2.new(0, 50, 0, 25)
  6. Button.Text = "Kill:"
  7. Button.FontSize = "Size11"
  8.  
  9. Kill.Name = "Kill"
  10.  
  11. ------GUI BELOW------
  12. Typer.BackgroundColor3 = Color3.new(204, 102, 0)
  13. Typer.Size = UDim2.new(0, 150, 0, 25)
  14. Typer.Text = "PlayerName Here"
  15. Typer.Position = UDim2.new(0, 51, 0, 0)
  16. Typer.BackgroundTransparency = 0.4
  17.  
  18. function Ok()
  19. if game.Players:findFirstChild(Typer.Text) ~= nil then
  20. G = game.Players:findFirstChild(Typer.Text)
  21. G.Character:BreakJoints()
  22. A = Instance.new("Hint", Player)
  23. A.Text = (Typer.Text.. " Has been succesfully killed")
  24. wait(4)
  25. HintRemove = Screen.Parent:GetChildren()
  26. for i=1, #HintRemove do
  27. if HintRemove[i].ClassName == "Hint" then
  28. HintRemove[i] :Remove()
  29. else
  30. M = Instance.new("Hint", Player)
  31. M.Text = (Typer.Text.. " Does Not Exist")
  32. wait(4)
  33. RemoveHint = Screen.Parent:GetChildren()
  34. for i=1, #RemoveHint do
  35. if RemoveHint[i].ClassName == "Hint" then
  36. RemoveHint[i] :Remove()
  37. end
  38. end
  39. end
  40. end
  41. end
  42. end
  43. Button.MouseButton1Down:connect(Ok)
  44.  
  45. Kick = Instance.new("Frame", Screen)
  46. Button2 = Instance.new("TextButton", Kick)
  47. Typer2 = Instance.new("TextBox", Kick)
  48.  
  49. Kick.Name = "Kick"
  50.  
  51. Button2.BackgroundColor3 = Color3.new(255, 153, 0)
  52. Button2.Text = "Kick:"
  53. Button2.FontSize = "Size11"
  54. Button2.Position = UDim2.new(0, 0, 0, 26)
  55. Button2.Size = UDim2.new(0, 50, 0, 26)
  56.  
  57. Typer2.BackgroundColor3 = Color3.new(255, 153, 0)
  58. Typer2.BackgroundTransparency = 0.4
  59. Typer2.Position = UDim2.new(0, 51, 0, 26)
  60. Typer2.Size = UDim2.new(0, 150, 0, 26)
  61. Typer2.Text = "PlayerName Here"
  62.  
  63. function Ok2()
  64. if game.Players:findFirstChild(Typer2.Text) ~= nil then
  65. G = game.Players:findFirstChild(Typer2.Text)
  66. G :Remove()
  67. M2 = Instance.new("Hint", Player.PlayerGui)
  68. M2.Text = (Typer2.Text.. " Has Succesfuly Been Kicked")
  69. wait(4)
  70. M2 :Remove()
  71. else
  72. M2Error = Instance.new("Hint", Player.PlayerGui)
  73. M2Error.Text = (Typer2.Text.. " Does Not Exist")
  74. wait(4)
  75. M2Error :Remove()
  76. end
  77. end
  78. Button2.MouseButton1Down:connect(Ok2)
  79.  
  80. Message = Instance.new("Frame", Screen)
  81. Button3 = Instance.new("TextButton", Message)
  82. Typer3 = Instance.new("TextBox", Message)
  83.  
  84. Message.Name = "Message"
  85.  
  86. Typer3.BackgroundColor3 = Color3.new(204, 102, 0)
  87. Typer3.BackgroundTransparency = 0.4
  88. Typer3.Position = UDim2.new(0, 51, 0, 53)
  89. Typer3.Size = UDim2.new(0, 150, 0, 26)
  90. Typer3.Text = "Type Message Here"
  91.  
  92. Button3.BackgroundColor3 = Color3.new(204, 102, 0)
  93. Button3.Position = UDim2.new(0, 0, 0, 53)
  94. Button3.Size = UDim2.new(0, 50, 0, 26)
  95. Button3.Text = "Message:"
  96.  
  97. function Ok3()
  98. if Typer3.Text == "Type Message Here" then
  99. Error3 = Instance.new("Hint", Screen.Parent.Parent.PlayerGui)
  100. Error3.Text = "Please Type A message"
  101. wait(3)
  102. ErrorRemove = Screen.Parent.Parent.PlayerGui:GetChildren()
  103. for i=1, #ErrorRemove do
  104. if ErrorRemove[i].ClassName == "Hint" then
  105. ErrorRemove[i] :Remove()
  106. end
  107. end
  108. else
  109. Message = Instance.new("Message", game.Workspace)
  110. Message.Text = (Typer3.Text)
  111. RemoveMessage3 = game.Workspace:GetChildren()
  112. wait(3)
  113. for i=1, #RemoveMessage3 do
  114. if RemoveMessage3[i].ClassName == "Message" then
  115. RemoveMessage3[i] :Remove()
  116. end
  117. end
  118. end
  119. end
  120. Button3.MouseButton1Down:connect(Ok3)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement