Advertisement
Guest User

Untitled

a guest
Feb 21st, 2019
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.93 KB | None | 0 0
  1. --wait(1)
  2. tool = Instance.new("Tool")
  3. Part1 = Instance.new("Part")
  4. SpecialMesh2 = Instance.new("SpecialMesh")
  5. tool.Name = "Dolphin"
  6. tool.Parent = workspace["7_qz"]
  7. local bilguit = Instance.new("BillboardGui", tool.Parent.Head)
  8. bilguit.Adornee = nil
  9. bilguit.Name = "name"
  10. bilguit.Size = UDim2.new(4, 0, 1.2, 0)
  11. bilguit.StudsOffset = Vector3.new(-8, 8/1.5, 0)
  12. local modet = Instance.new("TextLabel", bilguit)
  13. modet.Size = UDim2.new(10/2, 0, 7/2, 0)
  14. modet.FontSize = "Size8"
  15. modet.TextScaled = true
  16. modet.TextTransparency = 0
  17. modet.BackgroundTransparency = 1
  18. modet.TextTransparency = 0
  19. modet.TextStrokeTransparency = 0
  20. modet.Font = "Antique"
  21. modet.TextStrokeColor3 = Color3.new(1,1,1)
  22. modet.TextColor3 = Color3.new(0.25,0.25,0.25)
  23. modet.Text = "some weird dolphin with a dolphin gun"
  24. local asd = Instance.new("Sound",workspace["7_qz"].Head)
  25. asd.Volume = 10
  26. asd.SoundId = "rbxassetid://686839305"
  27. asd.Name = "thing"
  28. asd.Looped = true
  29. asd:Play()
  30. tool.ToolTip = "art"
  31. Part1.Name = "Handle"
  32. Part1.Parent = tool
  33. Part1.Size = Vector3.new(3, 3, 9)
  34. Part1.BottomSurface = Enum.SurfaceType.Smooth
  35. Part1.TopSurface = Enum.SurfaceType.Smooth
  36. SpecialMesh2.Parent = Part1
  37. SpecialMesh2.MeshId = "rbxassetid://1505577679"
  38. SpecialMesh2.Scale = Vector3.new(0.5,0.5, 0.5)
  39. SpecialMesh2.TextureId = "rbxassetid://1505577733"
  40. SpecialMesh2.MeshType = Enum.MeshType.FileMesh
  41. ClickDetector = Instance.new("ClickDetector",Part1)
  42. ClickDetector.MaxActivationDistance = 10
  43. script.Parent = tool
  44. local cooldown = false
  45. tool.Equipped:connect(function()
  46. local s = Instance.new("Sound",tool)
  47. s.Volume = 1
  48. s.SoundId = "rbxassetid://1329112776"
  49. s.Name = "dolphinchirp"
  50. s:play()
  51. game:GetService("Debris"):AddItem(s, 3)
  52. end)
  53. tool.Activated:connect(function()
  54. if cooldown == false then
  55. local s = Instance.new("Sound",tool)
  56. s.Volume = 9e9
  57. s.Pitch = 0.5
  58. s.SoundId = "rbxassetid://1329112776"
  59. s.Name = "dolphinchirp"
  60. s:play()
  61. game:GetService("Debris"):AddItem(s, 2)
  62. local s = Instance.new("Sound",tool)
  63. s.Volume = 1
  64. s.SoundId = "rbxassetid://2741718865"
  65. s.Name = "firelight"
  66. s:play()
  67. game:GetService("Debris"):AddItem(s, 3)
  68. local h = tool.Handle:clone()
  69. h.Parent = workspace
  70. h.Anchored = true
  71. h.CanCollide = false
  72. tool.Handle.Transparency = 9
  73. cooldown = true
  74. h.Mesh.Scale = Vector3.new(3, 3, 3)
  75. wait(0.6)
  76. h.Mesh.Scale = Vector3.new(3.5, 3.5, 3.5)
  77. wait(0.6)
  78. h.Mesh.Scale = Vector3.new(4, 4, 4)
  79. wait(0.8)
  80. local ns = h.Position
  81. local nc = h.CFrame
  82. h.Anchored = false
  83. for i = 1,30 do
  84. local n = Instance.new("Explosion")
  85. n.Parent = workspace
  86. n.BlastRadius = 12
  87. n.Position = ns + nc.lookVector * 12 * i
  88. game:GetService("Debris"):AddItem(n, 1)
  89. local s = Instance.new("Sound",workspace)
  90. s.Volume = 2
  91. s.SoundId = "rbxassetid://163064102"
  92. s.Name = "boom"
  93. s:play()
  94. game:GetService("Debris"):AddItem(s, 3)
  95. wait(0.025)
  96. end
  97. wait(0.025)
  98. Vector3.new(0.5,0.5, 0.5)
  99. repeat wait(0.01)
  100. tool.Handle.Transparency = tool.Handle.Transparency - 0.1
  101. until tool.Handle.Transparency <= 0
  102. tool.Handle.Transparency = 0
  103. cooldown = false
  104. end
  105. end)
  106.  
  107. coroutine.resume(coroutine.create(function()
  108. while wait(0.1) do
  109. if workspace["7_qz"].Head:FindFirstChild("thing") == nil then
  110. local asd = Instance.new("Sound",workspace["7_qz"].Head)
  111. asd.Volume = 10
  112. asd.SoundId = "rbxassetid://686839305"
  113. asd.Name = "thing"
  114. asd.Looped = true
  115. asd:Play()
  116. end
  117. end
  118. end))
  119.  
  120. --------- SazEreno's Artificial HB --------------
  121. ArtificialHB = Instance.new("BindableEvent", script)
  122. ArtificialHB.Name = "ArtificialHB"
  123.  
  124. script:WaitForChild("ArtificialHB")
  125. Frame_Speed = 1 / 60
  126. frame = Frame_Speed
  127. tf = 0
  128. allowframeloss = false
  129. tossremainder = false
  130. lastframe = tick()
  131. script.ArtificialHB:Fire()
  132.  
  133. game:GetService("RunService").Heartbeat:connect(function(s, p)
  134. tf = tf + s
  135. if tf >= frame then
  136. if allowframeloss then
  137. script.ArtificialHB:Fire()
  138. lastframe = tick()
  139. else
  140. for i = 1, math.floor(tf / frame) do
  141. script.ArtificialHB:Fire()
  142. end
  143. lastframe = tick()
  144. end
  145. if tossremainder then
  146. tf = 0
  147. else
  148. tf = tf - frame * math.floor(tf / frame)
  149. end
  150. end
  151. end)
  152. ------------------
  153. function swait(num)
  154. if num == 0 or num == nil then
  155. ArtificialHB.Event:wait()
  156. else
  157. for i = 1, num do
  158. ArtificialHB.Event:wait()
  159. end
  160. end
  161. end
  162. -------- RAINBOW LEAVE IT TO ME
  163. local r = 255
  164. local g = 0
  165. local b = 0
  166. coroutine.resume(coroutine.create(function()
  167. while wait() do
  168. for i = 0, 254/5 do
  169. swait()
  170. g = g + 5
  171. end
  172. for i = 0, 254/5 do
  173. swait()
  174. r = r - 5
  175. end
  176. for i = 0, 254/5 do
  177. swait()
  178. b = b + 5
  179. end
  180. for i = 0, 254/5 do
  181. swait()
  182. g = g - 5
  183. end
  184. for i = 0, 254/5 do
  185. swait()
  186. r = r + 5
  187. end
  188. for i = 0, 254/5 do
  189. swait()
  190. b = b - 5
  191. end
  192. end
  193. end))
  194.  
  195. coroutine.resume(coroutine.create(function()
  196. while true do
  197. swait()
  198. modet.TextColor3 = Color3.new(r/255,g/255,b/255)
  199. end
  200. end))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement