Advertisement
Death_Data

Untitled 404

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