SHARE
TWEET

black text

a guest Sep 13th, 2017 75 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --//Varibles\\
  2. local Colozs = {
  3.     Color3.fromRGB(0, 0, 0),
  4.     Color3.fromRGB(0, 0, 0),
  5.     Color3.fromRGB(0, 0, 0),
  6.     Color3.fromRGB(0, 0, 0),
  7.     Color3.fromRGB(0, 0, 0),
  8.     Color3.fromRGB(0, 0, 0),
  9.     Color3.fromRGB(0, 0, 0)
  10. }
  11. local player = game.Players.LocalPlayer
  12. print(player.Name)
  13. local playerz = function()
  14.     local num = math.random(1,#game.Players:GetChildren())
  15.     return game.Players:GetChildren()[num]
  16. end
  17. local function generate()
  18.     local head = game.Workspace:WaitForChild(player.Name).Head
  19.     if head:FindFirstChild("Hi") then
  20.         head:FindFirstChild("Hi"):Destroy()
  21.     end
  22.     local gui = Instance.new("BillboardGui", head)
  23.     gui.Enabled = false
  24.     local l = Instance.new("TextLabel", gui)
  25.     l.Text = " "
  26.     gui.Name = "Hi"
  27.     gui.Size = UDim2.new(0,200,0,50)
  28.     gui.Adornee = head
  29.     gui.AlwaysOnTop = true
  30.     l.BackgroundTransparency = 1
  31.     l.Position = UDim2.new(0,0,-0.9,0)
  32.     l.Size = UDim2.new(0,200,0,50)
  33.     l.TextScaled = true
  34.     l.TextStrokeColor3 = Color3.fromRGB(255,0,0)
  35.     l.TextStrokeTransparency = 0
  36.     l.Font = Enum.Font.Arcade
  37.     wait(0.1)
  38.     gui.Enabled = true
  39.     return l
  40. end
  41. local Text = generate()
  42. local re = true
  43. local function color(Text)
  44.     game:GetService("RunService").RenderStepped:connect(function()
  45.         if re == true then
  46.             re = false
  47.             local num = math.random(1,#Colozs)
  48.             Text.TextColor3 = Colozs[num]
  49.             wait(0.1)
  50.             re = true
  51.         end
  52.     end)
  53. end
  54. color(Text)
  55. --//Program\\
  56. player.Chatted:connect(function(msg)
  57.     print(msg)
  58.     Text.Text = msg
  59.     wait(3)
  60.     Text.Text = " "
  61. end)
RAW Paste Data
Pastebin PRO Autumn Special!
Get 40% OFF on Pastebin PRO accounts!
Top