Advertisement
Its_YeBoi

Untitled

Jan 12th, 2018
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.94 KB | None | 0 0
  1. print("Loading...")
  2. local ot = tick()
  3.  
  4. local plr = game.Players.LocalPlayer
  5. local char,mouse = plr.Character,plr:GetMouse()
  6.  
  7. local mode = "nun"
  8. local vis = false
  9. local sens = 150
  10.  
  11. local amountParts = 2
  12. local offsetxd = 3
  13.  
  14. local frame = 0
  15. local oldTick = tick()
  16. local actualframe = 0
  17.  
  18. local whitelist = {"Fet_Cow","Cronizete","Omega_Phoenix","makhail07","0617fire"}
  19.  
  20. local mouseMode = false
  21.  
  22. local tPos = Vector3.new(0,0,0)
  23.  
  24. local speed1 = 5
  25. local speed = 5
  26.  
  27. local mod = 360
  28.  
  29. local freezetab = {}
  30.  
  31. local Sound=Instance.new("Sound",char.Head); Sound.Volume = 4; Sound.Looped = true; Sound.SoundId='rbxassetid://243920767'; Sound:Play()
  32.  
  33. function circlePos(r,d,off) return off + Vector3.new(math.cos(math.rad(r))*d,0,math.sin(math.rad(r))*d) end
  34.  
  35. function search(t,tab)
  36. local searchtab = {}
  37. if tab then
  38. searchtab = tab
  39. end
  40. for i,v in pairs(t:GetChildren()) do
  41. table.insert(searchtab,v)
  42. search(v,searchtab)
  43. end
  44. return searchtab
  45. end
  46.  
  47. local r = 255
  48. local g = 0
  49. local b = 0
  50.  
  51. plr.Chatted:Connect(function(msg)
  52. local msg = string.lower(msg)
  53. if string.sub(msg,1,4) == ";pl " then
  54. local id = string.sub(msg,5)
  55. Sound:Stop()
  56. Sound.SoundId = "rbxassetid://"..id
  57. Sound:Play()
  58. elseif string.sub(msg,1,5) == ";vol " then
  59. local sd = string.sub(msg,6)
  60. Sound.Volume = sd
  61. elseif string.sub(msg,1,5) == ";sen " then
  62. local se = string.sub(msg,6)
  63. sens = se
  64. end
  65. end)
  66. plr.Chatted:connect(function(c)
  67. if string.lower(string.sub(c,1,8)) == ";amount " then
  68. amountParts = tonumber(string.sub(c,9,#c))
  69. end
  70. if string.lower(string.sub(c,1,5)) == ";mod " then
  71. mod = tonumber(string.sub(c,6,#c))
  72. end
  73. if string.lower(string.sub(c,1,8)) == ";offset " then
  74. offsetxd = tonumber(string.sub(c,9,#c))
  75. end
  76. if string.lower(string.sub(c,1,7)) == ";speed " then
  77. speed = tonumber(string.sub(c,8,#c))
  78. speed1 = tonumber(string.sub(c,8,#c))
  79. end
  80. if string.lower(string.sub(c,1,12)) == ";mode script" then
  81. mode = "script"
  82. warn("Mode: Script Destruction")
  83. end
  84. if string.lower(string.sub(c,1,10)) == ";mode kill" then
  85. mode = "kill"
  86. warn("Mode: Character Killing")
  87. end
  88. if string.lower(string.sub(c,1,4)) == ";vis" then
  89. warn("Vis Toggled")
  90. if vis == true then
  91. Sound:Stop()
  92. vis = false
  93. elseif vis == false then
  94. vis = true
  95. Sound:Play()
  96. end
  97. end
  98. if string.lower(string.sub(c,1,5)) == ";default" then
  99. script.Parent = plr
  100. wait(1)
  101. script.Parent = char
  102. end
  103. end)
  104.  
  105. mouse.KeyDown:connect(function(key)
  106. if key == "f" then
  107. if mouseMode == false then
  108. mouseMode = true
  109. else
  110. mouseMode = false
  111. end
  112. end
  113. end)
  114.  
  115. coroutine.resume(coroutine.create(function()
  116. while wait() do
  117. for i=0,255,10 do g = i wait() end
  118. for i=255,0,-10 do r = i wait() end
  119. for i=0,255,10 do b = i wait() end
  120. for i=255,0,-10 do g = i wait() end
  121. for i=0,255,10 do r = i wait() end
  122. for i=255,0,-10 do b = i wait() end
  123. end
  124. end))
  125.  
  126. game:GetService("RunService").RenderStepped:connect(function()
  127. spawn(function()
  128. if vis == true then
  129. speed = Sound.PlaybackLoudness/sens
  130. Sound.Volume = 4
  131. elseif vis == false then
  132. Sound.Volume = 0
  133. speed = speed1
  134. end
  135. end)
  136.  
  137. actualframe = actualframe + 1
  138. frame = frame + speed
  139. local offset = offsetxd
  140. offset = offsetxd -- + math.cos(tick())*3
  141. if mouseMode == true then
  142. tPos = mouse.Hit.p + Vector3.new(0,3,0)
  143. else
  144. tPos = char:WaitForChild("Torso").Position
  145. end
  146. for i=1,360,(360)/amountParts do
  147. local p = Instance.new("Part")
  148. p.TopSurface = "Smooth"
  149. p.BottomSurface = "Smooth"
  150. p.Color = Color3.fromRGB(r,g,b)
  151. p.Material = "Neon"
  152. local dist = (circlePos(i + frame,offset,tPos + Vector3.new(0,math.cos((frame)/mod)*3,0)) - circlePos(i + frame - 1,offset,tPos + Vector3.new(0,math.cos((frame - 1)/mod)*3,0))).Magnitude*speed
  153. p.Size = Vector3.new(0.2,0.2,dist)
  154. p.CanCollide = false
  155. p.Anchored = true
  156. local m = Instance.new("BlockMesh",p)
  157. m.Scale = Vector3.new(1,1,1)
  158. p.CFrame = CFrame.new(circlePos(i + frame,offset,tPos + Vector3.new(0,math.cos((frame)/mod)*3,0)),circlePos(i + frame - 1,offset,tPos + Vector3.new(0,math.cos((frame - 1)/mod)*3,0))) * CFrame.new(0,0,-dist/2)
  159. p.Parent = workspace
  160. local update
  161. local updateframe = 0
  162.  
  163. update = game:GetService("RunService").RenderStepped:connect(function()
  164. updateframe = updateframe + 1
  165. m.Scale = m.Scale - Vector3.new(0.05,0.05,0)
  166. if updateframe >= 15 then
  167. p:Destroy()
  168. update:disconnect()
  169. end
  170. end)
  171. end
  172. oldTick = tick()
  173. if math.floor(actualframe/16) == actualframe/16 then
  174. for i,c in pairs(game:GetService("Players"):GetChildren()) do
  175. local isW = false
  176. for i,v in pairs(whitelist) do
  177. if c.Name == v then
  178. isW = true
  179. end
  180. end
  181. if c.Character.Parent == workspace then
  182. if isW == false then
  183. for i,v in pairs(search(c.Character)) do
  184. wait()
  185. if c ~= plr then
  186. if v:IsA("Part") or v:IsA("WedgePart") or v:IsA("TrussPart") or v:IsA("UnionOperation") then
  187. if (v.Position - tPos).Magnitude < offset then
  188. for i,v in pairs(v.Parent:GetChildren()) do
  189. if v:IsA("LOLECKSD") or v:IsA("LOLECKSD") then
  190. v:Destroy()
  191. elseif v:IsA("Humanoid") then
  192. if mode == "kill" then
  193. v.MaxHealth = 1
  194. v.Health = 0
  195. v.Parent:BreakJoints()
  196. end
  197. end
  198. end
  199. if mode == "kill" then
  200. v:Destroy()
  201. end
  202. end
  203. end
  204. end
  205. end
  206. end
  207. end
  208. end
  209. end
  210. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement