Advertisement
TheFlamingBlaster

AlertUI

Dec 27th, 2016
255
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.86 KB | None | 0 0
  1. function alert(txt,plr,duration)
  2. if not duration then
  3. duration = 10
  4. end
  5. local SysAlert = Instance.new("ScreenGui")
  6. local SysAlertFrame = Instance.new("Frame")
  7. local FrameEffects = Instance.new("Frame")
  8. local AlertTxt = Instance.new("TextLabel")
  9.  
  10. SysAlert.Name = "SysAlert"
  11. SysAlert.Parent = plr.PlayerGui
  12. SysAlert.ResetOnSpawn = false
  13.  
  14. SysAlertFrame.Name = "SysAlertFrame"
  15. SysAlertFrame.Parent = SysAlert
  16. SysAlertFrame.BackgroundColor3 = Color3.new(0, 0, 0)
  17. SysAlertFrame.BorderSizePixel = 0
  18. SysAlertFrame.Size = UDim2.new(0, 0, 0.100000001, 0)
  19. SysAlertFrame:TweenSize(UDim2.new(1, 0, 0.100000001, 0))
  20. SysAlertFrame.Position = UDim2.new(0,0,0.45,0)
  21.  
  22. FrameEffects.Name = "FrameEffects"
  23. FrameEffects.Parent = SysAlertFrame
  24. FrameEffects.BackgroundColor3 = Color3.new(1, 1, 1)
  25. FrameEffects.BorderSizePixel = 0
  26. FrameEffects.Position = UDim2.new(0.0250000004, 0, 0.824999988, 0)
  27. FrameEffects.Size = UDim2.new(0.949999988, 0, 0.0250000004, 0)
  28.  
  29. AlertTxt.Name = "AlertTxt"
  30. AlertTxt.Parent = SysAlertFrame
  31. AlertTxt.BackgroundColor3 = Color3.new(1, 1, 1)
  32. AlertTxt.BackgroundTransparency = 1
  33. AlertTxt.Position = UDim2.new(0.0250000004, 0, 0, 0)
  34. AlertTxt.Size = UDim2.new(0.949999988, 0, 0.800000012, 0)
  35. AlertTxt.Font = Enum.Font.SourceSansLight
  36. AlertTxt.FontSize = Enum.FontSize.Size14
  37. AlertTxt.Text = txt
  38. AlertTxt.TextColor3 = Color3.new(1, 1, 1)
  39. AlertTxt.TextScaled = true
  40. AlertTxt.TextWrapped = true
  41. AlertTxt.TextXAlignment = Enum.TextXAlignment.Left
  42.  
  43. delay(duration,function()
  44. for i,v in pairs(SysAlertFrame:GetChildren()) do
  45. if v:IsA("TextLabel") or v:IsA("TextButton") then
  46. v.Text = ""
  47. end
  48. end
  49. SysAlertFrame:TweenSize(UDim2.new(0,0,0.100000001,0))
  50. delay(1,function() SysAlert:Destroy() end)
  51. end)
  52. end
  53. function alertall(txt,duration)
  54. for i,v in pairs(game.Players:GetChildren()) do
  55. alert(txt,v,duration)
  56. end
  57. end
  58.  
  59. alertall('test',10)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement