Advertisement
Yayhey

dsfdfgsd

Jul 22nd, 2015
272
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --if you are going to use this, run normally
  2. pl = game.Players['iispecialeffects']
  3.  
  4. mouse=pl:GetMouse()
  5. colorscheme = BrickColor.new'White'
  6.  
  7. function tablet() --Makes tablet.
  8. t = Instance.new('Part', workspace)
  9. t.Size = Vector3.new(20,20,1)
  10. t.BrickColor = colorscheme
  11. t.Anchored = true
  12. t.Locked = true
  13. t.Transparency=0.5
  14. t.CanCollide=false
  15. tc = t:Clone()
  16. end
  17.  
  18. tablet() --Calls tablet.
  19.  
  20. function gui() --Makes gui.
  21. sg = Instance.new('SurfaceGui', pl.PlayerGui)
  22. sg.Adornee = t
  23. sg.Face = 'Back'
  24. end
  25. gui()
  26. val = Instance.new('StringValue', pl)
  27. val.Name = 'CommandList'
  28.  
  29. function op(str,f) -- Output text (string, function)
  30. local h = Instance.new('TextButton', sg)
  31. local v = Instance.new('StringValue', val)
  32. h.MouseButton1Down:connect(f)
  33. h.Size = UDim2.new(1,0,1/16,0)
  34. h.BackgroundColor3 = colorscheme.Color
  35. h.Position = UDim2.new(0,0,(1/16) *(#val:GetChildren()-1),0)
  36. h.FontSize = 'Size18'
  37. h.BorderSizePixel = 0
  38. h.TextColor3 = Color3.new(1,1,1)
  39. h.BackgroundTransparency = 0
  40. h.Text = str
  41. end
  42.  
  43. function clr() --Clear gui.
  44. val:ClearAllChildren()
  45. sg:ClearAllChildren()
  46. end
  47.  
  48. function menu(p,isnil) --Command menu for each player.
  49. op(p.Name,function() end)
  50. op('Age : '..tostring(p.AccountAge),function() end)
  51. op('Kill',function() pcall(function() p.Character:BreakJoints() end) end)
  52. op('[ Exit ]',function() pcall(function() clr(); gm() end) end)
  53. end
  54.  
  55. function gp(p) --Gets the players.
  56. local plist = {}
  57. for _,v in pairs(game:service'NetworkServer':children()) do
  58. if v:GetPlayer() then
  59. table.insert(plist,v:GetPlayer())
  60. end
  61. end
  62. for i,v in pairs(plist) do
  63. if v.Parent == game.Players then
  64. op(v.Name,function() clr(); menu(v); end)
  65. else
  66. op('[ Nil ] : '..v.Name,function() clr(); menu(v,true); end)
  67. end
  68. end
  69. op('[ Exit ]',function() pcall(function() clr(); gm() end) end)
  70. end
  71.  
  72. function gm() --General menu. When the admin loads, this is the first thing you see.
  73. op('Sample Admin',function() end)
  74. op('By AtlasGrim',function() end)
  75. op('[ Players ]',function() clr(); gp(pl); end)
  76. op('[ Test ]',function() clr();  wait(5) gm() end)
  77. end
  78. pl.CharacterAdded:connect(function()
  79. gui()
  80. val:ClearAllChildren()
  81. gm()
  82. end)
  83.  
  84. workspace.DescendantRemoving:connect(function(descendant) --To prevent g/c
  85. if descendant == t then
  86. t = tc:Clone()
  87. t.Parent = workspace
  88. clr()
  89. pcall(function() sg.Adornee = t end)
  90. gm()
  91. end        
  92. end)
  93.  
  94. gm() --Calls general menu.
  95.  
  96. game:service'RunService'.Stepped:connect(function()
  97. pcall(function()
  98. t.CFrame = pl.Character.Torso.CFrame * CFrame.new(0,10,-8) * CFrame.Angles(math.rad(-10),0,0)
  99. end)
  100. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement