Advertisement
iiMurpyh

Untitled

Oct 21st, 2017
64
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.41 KB | None | 0 0
  1. Chat2 = function(Msg)
  2. if LocalPlayer.Character ~= nil and LocalPlayer.Character:FindFirstChild("Head") ~= nil then
  3. --local tar = LocalPlayer.Character and LocalPlayer.Character:findFirstChild("Head") or Probe
  4. local Part = Instance.new("Part",LocalPlayer.Character)
  5. --local Part = Instance.new("Part",tar)
  6. Part.CanCollide = false
  7.  
  8. Part.Transparency = 1
  9.  
  10. Part.CFrame = LocalPlayer.Character.Head.CFrame * CFrame.new(0,3,0)
  11.  
  12. Part:BreakJoints()
  13.  
  14. local Pos = Instance.new("BodyPosition",Part)
  15.  
  16. Pos.maxForce = Vector3.new(1/0,1/0,1/0)
  17.  
  18. Pos.position = LocalPlayer.Character.Head.Position
  19.  
  20. local BBG = Instance.new("BillboardGui",LocalPlayer.Character)
  21. BBG.Adornee = Part
  22. --BBG.Size = UDim2.new(0,20*#Msg,0,30)
  23. BBG.Size = UDim2.new(1, 0, 1, 0)
  24. BBG.StudsOffset = Vector3.new(0,3,0)
  25. local Frame = Instance.new("Frame",BBG)
  26. Frame.Size = UDim2.new(1, 0, 1, 0)
  27. Frame.BackgroundTransparency = 1
  28. local Txt = Instance.new("TextLabel")
  29. Txt.Parent = Frame
  30. Txt.Text = Msg
  31. Txt.Size = UDim2.new(1,0,1,0)
  32. Txt.FontSize = "Size36"
  33. --Txt.TextColor3 = Color3.new(1,1,1)
  34. Txt.Font = 'ArialBold'
  35. Txt.TextStrokeTransparency = 0
  36. Txt.BackgroundTransparency = 1
  37. Txt.TextColor3 = Color3.new(2/3,2/3,2/3)
  38. wait()
  39. -- coroutine.wrap(function() while Txt.Parent ~= nil do for i = 0, 1, 0.1 do Txt.TextColor3 = Color3.new(i,0,0) wait() end for i = 1, 0, -0.1 do Txt.TextColor3 = Color3.new(i,0,0) wait() end for i = 0, 1, 0.1 do Txt.TextColor3 = Color3.new(0,i,0) wait() end for i = 1, 0, -0.1 do Txt.TextColor3 = Color3.new(0,i,0) wait() end for i = 0, 1, 0.1 do Txt.TextColor3 = Color3.new(0,0,i) wait() end for i = 1, 0, -0.1 do text.TextColor3 = Color3.new(i,0,i) wait() end wait() end end)()
  40. Txt.BackgroundColor3 = Color3.new(0,0,0)
  41.  
  42. --Txt.Size = UDim2.new(1,0,1,0)
  43. if #Msg < 50 then
  44. for i=1,#Msg do
  45. Txt.Text = Txt.Text .. Msg:sub(i,i)
  46. wait(0.09)
  47. end
  48. else
  49. Txt.Text = Msg
  50. if chattabs then
  51. Output(Msg,{Colors.Red},Localplayer)
  52. end
  53. end
  54. coroutine.wrap(function()
  55.  
  56. for i=3,100 do
  57.  
  58. BBG.StudsOffset = Vector3.new(0,i/10,0)
  59.  
  60. Pos.position = LocalPlayer.Character.Head.Position
  61.  
  62. Txt.TextTransparency = i / 100
  63.  
  64. Txt.BackgroundTransparency = i / 100
  65.  
  66. wait()
  67.  
  68. end
  69.  
  70. Part:Destroy()
  71.  
  72. BBG:Destroy()
  73.  
  74. end)()
  75.  
  76. end
  77. end
  78. Chat = function(Msg)
  79. if LocalPlayer.Character ~= nil and LocalPlayer.Character:FindFirstChild("Head") ~= nil then
  80. --local tar = LocalPlayer.Character and LocalPlayer.Character:findFirstChild("Head") or Probe
  81. local Part = Instance.new("Part",LocalPlayer.Character)
  82. --local Part = Instance.new("Part",tar)
  83. if chattabs then
  84. Output(Msg,{Colors.White},Localplayer)
  85. end
  86. Part.CanCollide = false
  87. Part.Transparency = 1
  88. Part.CFrame = LocalPlayer.Character.Head.CFrame * CFrame.new(0,3,0)
  89. Part:BreakJoints()
  90.  
  91. local Pos = Instance.new("BodyPosition",Part)
  92. Pos.maxForce = Vector3.new(1/0,1/0,1/0)
  93. Pos.position = LocalPlayer.Character.Head.Position
  94. local BBG = Instance.new("BillboardGui",LocalPlayer.Character)
  95. BBG.Adornee = Part
  96. --BBG.Size = UDim2.new(0,20*#Msg,0,30)
  97. BBG.Size = UDim2.new(1, 0, 1, 0)
  98. BBG.StudsOffset = Vector3.new(0,3,0)
  99. local Frame = Instance.new("Frame",BBG)
  100. Frame.Size = UDim2.new(1, 0, 1, 0)
  101. Frame.BackgroundTransparency = 1
  102. local Txt = Instance.new("TextLabel")
  103. Txt.Parent = Frame
  104. Txt.Text = Msg
  105. Txt.Size = UDim2.new(1,0,1,0)
  106. Txt.FontSize = "Size36"
  107. --Txt.TextColor3 = Color3.new(1,1,1)
  108. Txt.Font = 'ArialBold'
  109. Txt.TextStrokeTransparency = 0
  110. Txt.BackgroundTransparency = 1
  111. Txt.TextColor3 = Color3.new(2/3,2/3,2/3)
  112. wait()
  113. --coroutine.wrap(function() while Txt.Parent ~= nil do for i = 0, 1, 0.1 do Txt.TextColor3 = Color3.new(i,0,0) wait() end for i = 1, 0, -0.1 do Txt.TextColor3 = Color3.new(i,0,0) wait() end for i = 0, 1, 0.1 do Txt.TextColor3 = Color3.new(0,i,0) wait() end for i = 1, 0, -0.1 do Txt.TextColor3 = Color3.new(0,i,0) wait() end for i = 0, 1, 0.1 do Txt.TextColor3 = Color3.new(0,0,i) wait() end for i = 1, 0, -0.1 do text.TextColor3 = Color3.new(i,0,i) wait() end wait() end end)()
  114. Txt.BackgroundColor3 = Color3.new(0,0,0)
  115. --Txt.Size = UDim2.new(1,0,1,0)
  116. coroutine.wrap(function()
  117. for i=3,100 do
  118.  
  119. BBG.StudsOffset = Vector3.new(0,i/10,0)
  120.  
  121. Pos.position = LocalPlayer.Character.Head.Position
  122.  
  123. Txt.TextTransparency = i / 100
  124.  
  125. --Txt.BackgroundTransparency = i / 100
  126.  
  127. wait()
  128.  
  129. end
  130.  
  131. Part:Destroy()
  132.  
  133. BBG:Destroy()
  134.  
  135. end)()--]]
  136.  
  137. end
  138. end
  139. check = function(p)
  140. f = false
  141. for _,n in pairs(allowed) do
  142. if p.Name == n then f = true end
  143. end
  144. return f
  145. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement