SHARE
TWEET

Untitled

a guest Apr 20th, 2019 68 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. wait()
  2. script.Parent = workspace.CurrentCamera
  3. Camera=workspace.CurrentCamera
  4. Player=game.Players.hippiekid94
  5. Create=LoadLibrary'RbxUtility'.Create
  6. Core={
  7.     SystemCall='>',
  8. Color=BrickColor.new('Really black');
  9. OutlineColor=BrickColor.new('Institutional white');
  10. TextColor=BrickColor.new('Institutional white');
  11. };
  12. local s = {
  13.     Players = game:getService('Players'),
  14.     Workspace = game:getService('Workspace'),
  15.     RunService = game:getService('RunService');
  16.     }
  17. local RunService = game:GetService('RunService')local loopCount = 5
  18. local count = 0
  19.  
  20. RunService.Heartbeat:Connect(function(step)
  21.     if count < loopCount then
  22.         count = count + 3
  23.         print("Time between each loop: "..step)
  24.     end
  25. end)
  26.  
  27. local chats = {}
  28. local NextRainbowColor = Color3.new()
  29. local function HSLtoRGB(hue, sat, light)
  30.         local c = light > .5 and (2 - 2 * light) * sat or (2 * light) * sat
  31.         local h2 = hue / 60
  32.         local x = c * (1 - math.abs((h2 % 2) - 1))
  33.         local rgbvals = {{c, x, 0}, {x, c, 0}, {0, c, x}, {0, x, c}, {x, 0, c}, {c, 0, x}}
  34.         local rgb = rgbvals[math.floor(h2) + 1]
  35.         for i = 1, 3 do rgb[i] = rgb[i] + (light - .5 * c) end
  36.         return Color3.new(rgb[1], rgb[2], rgb[3])
  37. end
  38.  
  39. spawn(function()
  40.     while wait() do
  41.     for i = 0,350,5 do -- Heres how fast it changes colours
  42.             pcall(function() NextRainbowColor = HSLtoRGB(i,1,0.5) end)
  43.             s.RunService.Heartbeat:wait()
  44.         end
  45.     end
  46. end)
  47.  
  48. local Dark =Color3.new("Really black")
  49.  
  50. local Purple =Color3.new("Royal purple")
  51.  
  52.  
  53. function color(r,g,b)
  54. return Color3.new(r/255,g/255,b/255)
  55. end
  56. Player.CharacterAdded:connect(function()
  57. for i,v in next,chats do
  58. v.Removed = true
  59. end
  60. end)
  61. function Chat(msg,dark)
  62. if #msg > 200 or msg:match("^/e ") or msg:match("^/emote") or msg:match("^create/") or msg:match("^edit/") or msg:match("^exit/") or msg:match("^run") or msg:match("^g/") or msg:match("^c/") or msg:match("^h/") or msg:match("^hl/") or msg:match("^get/") then return end
  63. coroutine.wrap(function()
  64. delay(0,function()
  65. local isDark = dark or false
  66. local y = -40
  67. for i = #chats,1,-1 do
  68. local v = chats[i]
  69. if v.Removed == false then
  70. y = y - 40
  71. v.Message:TweenPosition(UDim2.new(1,v.Message.Position.X.Offset,1,y),"In","Linear",1,true,function()
  72. if v.Message.Position.Y.Offset <= -40*4 then
  73. v.Remove = true
  74. end
  75. end)
  76. end
  77. end
  78.  
  79. local bg = Instance.new('BillboardGui',Create'Part'{Anchored=true,Transparency=1,CanCollide=false,Parent=Instance.new('Script', workspace),CFrame=workspace.CurrentCamera.CoordinateFrame})
  80. bg.Name = 'Chat'
  81. bg.StudsOffset = Vector3.new(0,7,0)
  82. bg.Adornee = bg.Parent
  83. bg.Size = UDim2.new(11,0,11,0)
  84. bg.AlwaysOnTop = true
  85. game:service'RunService'.Heartbeat:connect(function()
  86. if bg.Parent~=nil then
  87. if Player.Character~=nil then
  88. bg.Parent.CFrame=Player.Character.Head.CFrame
  89. end
  90. end
  91. end)    
  92. local mesg = ""
  93. for i = 1, #msg do
  94. mesg = mesg .. msg:sub(i,i) .. "\1"
  95. end
  96.  
  97. local tl = Instance.new('TextLabel',bg)
  98. tl.Text = mesg
  99. tl.Name = "Message"
  100. tl.BorderSizePixel = 0
  101. tl.ClipsDescendants = true
  102. tl.BackgroundTransparency = 0
  103. tl.TextTransparency = 1
  104. if isDark then
  105. tl.TextColor = BrickColor.new('Magenta')
  106. else
  107. tl.TextColor = BrickColor.new('White')
  108. end
  109. tl.FontSize = 5
  110. tl.Font =("SourceSansBold")
  111. tl.Size = UDim2.new(0,tl.TextBounds.X+25,0,0)
  112. tl.Position = UDim2.new(.5,(-tl.TextBounds.X-25)/2,1,0)
  113.  
  114. tl:TweenSizeAndPosition(UDim2.new(0,tl.TextBounds.X+25,0,40),UDim2.new(.5,(-tl.TextBounds.X-25)/2,1,-40),"In","Linear",0.5,true)
  115.  
  116. local spot = #chats+1
  117.  
  118. chats[spot] = {Message = tl,Removed = false,Remove = false}
  119.  
  120. local r,g,b = math.random(1,255),math.random(1,255),math.random(1,255)
  121. local rr,gr,br = false,false,false
  122. local removed = false
  123.  
  124. delay(0,function()
  125. for i = 1,.5,-.05 do
  126. wait(0.05)
  127. tl.BackgroundTransparency = i
  128. end
  129. end)
  130. delay(0,function()
  131. for i = 1,0,-.1 do
  132. wait(0.05)
  133. tl.TextTransparency = i
  134. end
  135. end)
  136.  
  137. delay(0,function()
  138. while removed == false do
  139. wait(0.05)
  140. if r >= 250 then
  141. rr = true
  142. end
  143. if g >= 250 then
  144. gr = true
  145. end
  146. if b >= 250 then
  147. br = true
  148. end
  149. if b <= 5 then
  150. br = false
  151. end
  152. if g <= 5 then
  153. gr = false
  154. end
  155. if r <= 5 then
  156. rr = false
  157. end
  158. if rr == true then
  159. r = r - 5
  160. else
  161. r = r + 5
  162. end
  163. if gr == true then
  164. g = g - 5
  165. else
  166. g = g + 5
  167. end
  168. if br == true then
  169. b = b - 5
  170. else
  171. b = b + 5
  172. end
  173. pcall(function() if not isDark then tl.BackgroundColor3 = NextRainbowColor else tl.BackgroundColor = BrickColor.new("Really black") end end)
  174. end
  175. end)
  176.  
  177.  
  178. local remove = false
  179.  
  180. delay(0,function()
  181. wait(3)
  182. remove = true
  183. end)
  184.  
  185. delay(0,function()
  186. while remove == false do
  187. wait()
  188. if chats[spot].Remove == true then
  189. remove = true
  190. end
  191. end
  192. end)
  193.  
  194. delay(0,function()
  195. repeat wait() until remove == true
  196. delay(0,function()
  197. for i = .5,1,.05 do
  198. wait(0.05)
  199. tl.BackgroundTransparency = i
  200. end
  201. end)
  202. delay(0,function()
  203. for i = 0,1,.1 do
  204. wait(0.05)
  205. tl.TextTransparency = i
  206. end
  207. bg:remove()
  208. removed = true
  209. chats[spot].Removed = true
  210. end)
  211. end)
  212. end)
  213. end)()
  214. end
  215. Player.Chatted:connect(function(msg)
  216. Chat(msg)
  217. end)
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top