OofNoob

leaked back up

Mar 22nd, 2018
194
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.74 KB | None | 0 0
  1. --A Remark Script
  2. local Player = game.Players.LocalPlayer
  3. script.Parent = Player.PlayerGui
  4. local Camera = workspace.CurrentCamera
  5. local Mouse = Player:GetMouse()
  6. local Run = game["Run Service"]
  7. local MaxDistance = 500
  8. Player.Character = nil
  9. Camera.CameraType = "Fixed"
  10. local Block = Instance.new("Part",workspace.Terrain)
  11. Block.Anchored = true
  12. Block.CanCollide = false
  13. Block.Size = Vector3.new(1,1,1)
  14. Block.BackSurface = "SmoothNoOutlines"
  15. Block.BottomSurface = "SmoothNoOutlines"
  16. Block.FrontSurface = "SmoothNoOutlines"
  17. Block.LeftSurface = "SmoothNoOutlines"
  18. Block.RightSurface = "SmoothNoOutlines"
  19. Block.TopSurface = "SmoothNoOutlines"
  20. Block.BrickColor = BrickColor.Black()
  21. Block.Transparency = 0
  22. local BigBlock = Instance.new("Part",workspace.Terrain)
  23. BigBlock.Anchored = true
  24. BigBlock.CanCollide = false
  25. BigBlock.Size = Vector3.new(3,3,3)
  26. BigBlock.BackSurface = "SmoothNoOutlines"
  27. BigBlock.BottomSurface = "SmoothNoOutlines"
  28. BigBlock.FrontSurface = "SmoothNoOutlines"
  29. BigBlock.LeftSurface = "SmoothNoOutlines"
  30. BigBlock.RightSurface = "SmoothNoOutlines"
  31. BigBlock.TopSurface = "SmoothNoOutlines"
  32. BigBlock.BrickColor = BrickColor.White()
  33. BigBlock.Transparency = 0.5
  34. local MinSize = 20
  35. DestroyPart = function(Part)
  36. for i = 1,4 do
  37. if Part and Part.Size.X < MinSize and Part.Size.Z < MinSize then
  38. Part:Destroy()
  39. else
  40. local Clone = Part:Clone()
  41. Clone.Parent = workspace
  42. Clone.Size = Vector3.new(Part.Size.X/2,Part.Size.Y,Part.Size.Z/2)
  43. if i == 1 then
  44. Clone.CFrame = Part.CFrame * CFrame.new(Clone.Size.X/2,0,Clone.Size.Z/2)
  45. end
  46. if i == 2 then
  47. Clone.CFrame = Part.CFrame * CFrame.new(-Clone.Size.X/2,0,-Clone.Size.Z/2)
  48. end
  49. if i == 3 then
  50. Clone.CFrame = Part.CFrame * CFrame.new(-Clone.Size.X/2,0,Clone.Size.Z/2)
  51. end
  52. if i == 4 then
  53. Clone.CFrame = Part.CFrame * CFrame.new(Clone.Size.X/2,0,-Clone.Size.Z/2)
  54. end
  55. end
  56. end
  57. Part:Destroy()
  58. end
  59. Mouse.Button1Down:connect(function()
  60. local Model = Instance.new("Model",workspace.Terrain)
  61. local Block = Instance.new("Part",Model)
  62. Mouse.TargetFilter = Model
  63. local DistFromBlock = 5
  64. Block.Anchored = true
  65. Block.CanCollide = false
  66. local Distance = (Mouse.hit.p-BigBlock.CFrame.p).magnitude
  67. local OverDis = false
  68. local OverDisNum = 0
  69. if Distance > MaxDistance then
  70. OverDis = true OverDisNum = Distance - MaxDistance Distance = MaxDistance
  71. local EndPoint = CFrame.new(Mouse.hit.p,BigBlock.CFrame.p) * CFrame.new(0,0,-Distance/2+DistFromBlock-OverDisNum) * CFrame.Angles(0,math.rad(90),0)
  72. local Break = coroutine.resume(coroutine.create(function()
  73. for i = 1,10 do
  74. if Mouse.Target and Mouse.Target:IsA("Part") and Mouse.Target ~= Block and Mouse.Target ~= BigBlock then
  75. DestroyPart(Mouse.Target)
  76. end
  77. end
  78. end))
  79. Block.Size = Vector3.new(Distance-DistFromBlock,5,5)
  80. Block.BackSurface = "SmoothNoOutlines"
  81. Block.BottomSurface = "SmoothNoOutlines"
  82. Block.FrontSurface = "SmoothNoOutlines"
  83. Block.LeftSurface = "SmoothNoOutlines"
  84. Block.RightSurface = "SmoothNoOutlines"
  85. Block.TopSurface = "SmoothNoOutlines"
  86. Block.Shape = "Cylinder"
  87. Block.BrickColor = BrickColor.White()
  88. Block.Transparency = 0
  89. Block.CFrame = EndPoint
  90. local ShrinkIncrement = 5
  91. local Break = coroutine.resume(coroutine.create(function()
  92. for i = 1,30 do
  93. if Mouse.Target and Mouse.Target:IsA("Part") and Mouse.Target ~= Block and Mouse.Target ~= BigBlock then
  94. DestroyPart(Mouse.Target)
  95. end
  96. wait()
  97. end
  98. end))
  99. local Shrink = coroutine.resume(coroutine.create(function()
  100. for i = 1,Block.Size.Z*10, ShrinkIncrement do
  101. Distance = (Mouse.hit.p-BigBlock.CFrame.p).magnitude if Distance > MaxDistance then
  102. OverDisNum = Distance - MaxDistance Distance = MaxDistance print(OverDisNum)
  103. EndPoint = CFrame.new(Mouse.hit.p,BigBlock.CFrame.p) * CFrame.new(0,0,-Distance/2+DistFromBlock-OverDisNum) * CFrame.Angles(0,math.rad(90),0)
  104. else
  105. EndPoint = CFrame.new(Mouse.hit.p,BigBlock.CFrame.p) * CFrame.new(0,0,-Distance/2+DistFromBlock) * CFrame.Angles(0,math.rad(90),0)
  106. end
  107. Block.Size = Vector3.new(Distance-DistFromBlock,5,5)
  108. Block.CFrame = EndPoint
  109. if Mouse.Target and Mouse.Target:IsA("Part") and Mouse.Target ~= Block and Mouse.Target ~= BigBlock then
  110. DestroyPart(Mouse.Target)
  111. end
  112. wait()
  113. end
  114. Block:Destroy()
  115. end))
  116. else
  117. local EndPoint = CFrame.new(Mouse.hit.p,BigBlock.CFrame.p) * CFrame.new(0,0,-Distance/2+DistFromBlock) * CFrame.Angles(0,math.rad(90),0)
  118. local Break = coroutine.resume(coroutine.create(function()
  119. for i = 1,10 do if Mouse.Target and Mouse.Target:IsA("Part") and Mouse.Target ~= Block and Mouse.Target ~= BigBlock then
  120. DestroyPart(Mouse.Target)
  121. end
  122. end
  123. end))
  124. Block.Size = Vector3.new(Distance-DistFromBlock,5,5)
  125. Block.BackSurface = "SmoothNoOutlines"
  126. Block.BottomSurface = "SmoothNoOutlines"
  127. Block.FrontSurface = "SmoothNoOutlines"
  128. Block.LeftSurface = "SmoothNoOutlines"
  129. Block.RightSurface = "SmoothNoOutlines"
  130. Block.TopSurface = "SmoothNoOutlines"
  131. Block.Shape = "Cylinder"
  132. Block.BrickColor = BrickColor.White()
  133. Block.Transparency = 0
  134. Block.CFrame = EndPoint
  135. local ShrinkIncrement = 5
  136. local Break = coroutine.resume(coroutine.create(function()
  137. for i = 1,30 do
  138. if Mouse.Target and Mouse.Target:IsA("Part") and Mouse.Target ~= Block and Mouse.Target ~= BigBlock then
  139. DestroyPart(Mouse.Target)
  140. end
  141. wait()
  142. end
  143. end))
  144. local Shrink = coroutine.resume(coroutine.create(function()
  145. for i = 1,Block.Size.Z*10, ShrinkIncrement do
  146. Distance = (Mouse.hit.p-BigBlock.CFrame.p).magnitude
  147. if Distance > MaxDistance then OverDisNum = Distance - MaxDistance Distance = MaxDistance
  148. print(OverDisNum)
  149. EndPoint = CFrame.new(Mouse.hit.p,BigBlock.CFrame.p) * CFrame.new(0,0,-Distance/2+DistFromBlock-OverDisNum) * CFrame.Angles(0,math.rad(90),0)
  150. else
  151. EndPoint = CFrame.new(Mouse.hit.p,BigBlock.CFrame.p) * CFrame.new(0,0,-Distance/2+DistFromBlock) * CFrame.Angles(0,math.rad(90),0)
  152. end
  153. Block.Size = Vector3.new(Distance-DistFromBlock,5,5)
  154. Block.CFrame = EndPoint
  155. if Mouse.Target and Mouse.Target:IsA("Part") and Mouse.Target ~= Block and Mouse.Target ~= BigBlock then
  156. DestroyPart(Mouse.Target)
  157. end
  158. wait()
  159. end
  160. Block:Destroy()
  161. end))
  162. end
  163.  
  164. end)
  165. Player.Chatted:connect(function(msg)
  166. local Chat = coroutine.resume(coroutine.create(function()
  167. local Bill = Instance.new("BillboardGui",BigBlock)
  168. Bill.StudsOffset = Vector3.new(0,6,0)
  169. Bill.Size = UDim2.new(10,0,3,0)
  170. local Frame = Instance.new("ScrollingFrame",Bill)
  171. Frame.Size = UDim2.new(1,0,1,-1)
  172. Frame.Transparency = 1
  173. Frame.ScrollBarThickness = 0
  174. Frame.CanvasSize = UDim2.new(0,0,0,0)
  175. local Text = Instance.new("TextLabel",Frame)
  176. Text.Position = UDim2.new(0.5,0,1,-1)
  177. Text.Size = UDim2.new(0,0,1,0)
  178. Text.Text = ""
  179. Text.BorderColor = BigBlock.BrickColor
  180. Text.BackgroundTransparency = 0
  181. Text.BorderSizePixel = 0
  182. Text.Font = "SourceSansBold"
  183. Text.FontSize = "Size36"
  184. Text.TextScaled = true
  185. Text.TextColor = BigBlock.BrickColor
  186. local top = 255
  187. local Bubble = true
  188. local ColorChanger = coroutine.resume(coroutine.create(function()
  189. while Bubble do
  190. for i = 1,top,10 do
  191. Text.BackgroundColor3 = Color3.new(top/top,i/top,0/top)
  192. wait()
  193. end
  194. for i = 1,top,10 do
  195. Text.BackgroundColor3 = Color3.new(top/top,top/top,i/top)
  196. wait()
  197. end
  198. for i = top,1,-10 do
  199. Text.BackgroundColor3 = Color3.new(i/top,top/top,top/top)
  200. wait()
  201. end
  202. for i = top,1,-10 do
  203. Text.BackgroundColor3 = Color3.new(0/top,i/top,top/top)
  204. wait()
  205. end
  206. for i = top,1,-10 do
  207. Text.BackgroundColor3 = Color3.new(-i/top,0/top,i/top)
  208. wait()
  209. end
  210. end
  211. end))
  212. Text:TweenSize(UDim2.new(1, 0, 1, 0),"Out", "Quad", 0.5)
  213. Text:TweenPosition(UDim2.new(0, 0, 1, -1),"Out", "Quad", 0.5)
  214. wait(0.5)
  215. Text:TweenPosition(UDim2.new(0, 0, 0, 0),"Out", "Quad", 0.5)
  216. wait(0.5)
  217. for i = 1,#msg do
  218. Text.Text = msg:sub(1,i)
  219. wait(0.1)
  220. end
  221. wait(3)
  222. Text:TweenPosition(UDim2.new(0, 0, 1, -1),"Out", "Quad", 0.5)
  223. wait(0.5)
  224. Text:TweenPosition(UDim2.new(0.5, 0, 1, -1),"Out", "Quad", 0.5)
  225. Text:TweenSize(UDim2.new(0, 0, 1, 0),"Out", "Quad", 0.5)
  226. Bubble = false
  227. end))
  228. end)
  229. local PLight = Instance.new("PointLight",BigBlock)
  230. PLight.Color = BigBlock.BrickColor.Color
  231. PLight.Brightness = 25 PLight.Range = 10
  232. local Bill = Instance.new("BillboardGui",BigBlock)
  233. Bill.StudsOffset = Vector3.new(0,3,0)
  234. Bill.Size = UDim2.new(5,0,2,0)
  235. Text = Instance.new("TextLabel",Bill)
  236. Text.Size = UDim2.new(1,0,1,0)
  237. Text.BackgroundTransparency = 1
  238. Text.Text = Player.Name
  239. Text.Font = "SourceSansBold"
  240. Text.FontSize = "Size96"
  241. Text.TextScaled = true
  242. Text.TextColor = BigBlock.BrickColor
  243. local Angle = 0
  244. Run.RenderStepped:connect(function()
  245. Angle = Angle + 0.1 BigBlock.Rotation = Vector3.new(0,0,0)
  246. BigBlock.CFrame = CFrame.new(Camera.Focus.X,Camera.Focus.Y,Camera.Focus.Z) * CFrame.Angles(0,Angle,0)
  247. Block.CFrame = BigBlock.CFrame * CFrame.Angles(Angle,0,Angle)
  248. end)
Add Comment
Please, Sign In to add comment