Advertisement
Guest User

Team Changer

a guest
Apr 21st, 2018
2,269
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.79 KB | None | 0 0
  1. --This goes into a local script
  2. Open = false
  3. Hidden = false
  4. Speed = 1 -- seconds
  5. script.Parent.Change.MouseButton1Down:connect(function()
  6.     if Open then
  7.         Open = false
  8.         script.Parent.Frame:TweenPosition(UDim2.new(-1, 0,0.25, 0),'Out','Quart',Speed,true)
  9.     else
  10.         Open = true
  11.         script.Parent.Frame:TweenPosition(UDim2.new(0.25, 0,0.25, 0),'Out','Quart',Speed,true)
  12.     end
  13. end)
  14. script.Parent.Frame.Close.MouseButton1Down:connect(function()
  15.     if Open then
  16.         Open = false
  17.         script.Parent.Frame:TweenPosition(UDim2.new(-1, 0,0.25, 0),'Out','Quart',Speed,true)
  18.     end
  19. end)
  20. script.Parent.HideShow.MouseButton1Down:connect(function()
  21.     if Hidden then
  22.         Hidden = false
  23.         script.Parent.HideShow.Text = ">"
  24.         script.Parent.HideShow:TweenPosition(UDim2.new(0, 0,0.4, 0),'Out','Quart',Speed/2,true)
  25.         script.Parent.Change:TweenPosition(UDim2.new(-.1, 0,0.4, 0),'Out','Quart',Speed/2,true)
  26.     else
  27.         Hidden = true
  28.         script.Parent.HideShow.Text = "<"
  29.         script.Parent.HideShow:TweenPosition(UDim2.new(0.1, 0,0.4, 0),'Out','Quart',Speed/2,true)
  30.         script.Parent.Change:TweenPosition(UDim2.new(0, 0,0.4, 0),'Out','Quart',Speed/2,true)
  31.     end
  32. end)
  33. player = game.Players.LocalPlayer
  34. script.Parent.Frame.ScrollingFrame.Civilians.MouseButton1Down:connect(function()
  35.     if Open then
  36.         Open = false
  37.         script.Parent.Frame:TweenPosition(UDim2.new(-1, 0,0.25, 0),'Out','Quart',Speed,true)
  38.     end
  39.     if player.Team ~= game.Teams.Civilians then
  40.         game.ReplicatedStorage.ChangingTeams:FireServer("Civilians")
  41.     end
  42. end)
  43. script.Parent.Frame.ScrollingFrame.Police.MouseButton1Down:connect(function()
  44.     if Open then
  45.         Open = false
  46.         script.Parent.Frame:TweenPosition(UDim2.new(-1, 0,0.25, 0),'Out','Quart',Speed,true)
  47.     end
  48.     if player.Team ~= game.Teams.Police then
  49.         game.ReplicatedStorage.ChangingTeams:FireServer("Police")
  50.     end
  51. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement