Advertisement
Guest User

yes xD

a guest
Aug 25th, 2019
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.95 KB | None | 0 0
  1. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  2.  
  3. local Player,game,owner = owner,game
  4.  
  5. local RealPlayer = Player
  6.  
  7. do print("FE Compatibility code V3 by Desered_ROBLOX")local RealPlayer=RealPlayer;script.Parent=RealPlayer.Character;local a=function(b)b[1].f[b[2]]=nil end;local c={__index={disconnect=a,Disconnect=a}}local d={__index={Connect=function(b,e)local f=tostring(math.random(0,10000))while b.f[f]do f=tostring(math.random(0,10000))end;b.f[f]=e;return setmetatable({b,f},c)end}}d.__index.connect=d.__index.Connect;local function g()return setmetatable({f={}},d)end;local h={Hit=CFrame.new(),KeyUp=g(),KeyDown=g(),Button1Up=g(),Button1Down=g(),Button2Up=g(),Button2Down=g()}h.keyUp=h.KeyUp;h.keyDown=h.KeyDown;local i={InputBegan=g(),InputEnded=g()}local CAS={Actions={},BindAction=function(self,j,k,l,...)CAS.Actions[j]=k and{Name=j,Function=k,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function m(self,n,...)for o,e in pairs(self[n].f)do e(...)end end;h.T=m;i.T=m;local p=Instance.new("RemoteEvent")p.Name="UserInput_Event"p.OnServerEvent:Connect(function(q,r)if q~=RealPlayer then return end;h.Target=r.e;h.Hit=r.d;if not r.f then local s=r.c==Enum.UserInputState.Begin;if r.b==Enum.UserInputType.MouseButton1 then return h:T(s and"Button1Down"or"Button1Up")end;if r.b==Enum.UserInputType.MouseButton2 then return h:T(s and"Button2Down"or"Button2Up")end;for o,t in pairs(CAS.Actions)do for o,u in pairs(t.Keys)do if u==r.a then t.Function(t.Name,r.c,r)end end end;h:T(s and"KeyDown"or"KeyUp",r.a.Name:lower())i:T(s and"InputBegan"or"InputEnded",r,false)end end)p.Parent=NLS([==[local a=script:WaitForChild("UserInput_Event")local b=owner:GetMouse()local c=game:GetService("UserInputService")local d=function(e,f)if f then return end;a:FireServer({a=e.KeyCode,b=e.UserInputType,c=e.UserInputState,d=b.Hit,e=b.Target})end;c.InputBegan:Connect(d)c.InputEnded:Connect(d)local g,h;local i=game:GetService("RunService").Heartbeat;while true do if g~=b.Hit or h~=b.Target then g,h=b.Hit,b.Target;a:FireServer({f=1,Target=h,d=g})end;for j=1,2 do i:Wait()end end]==],script)local v=game;local w={__index=function(self,u)local x=rawget(self,"_RealService")if x then return typeof(x[u])=="function"and function(o,...)return x[u](x,...)end or x[u]end end,__newindex=function(self,u,y)local x=rawget(self,"_RealService")if x then x[u]=y end end}local function z(t,A)t._RealService=typeof(A)=="string"and v:GetService(A)or A;return setmetatable(t,w)end;local B={GetService=function(self,x)return rawget(self,x)or v:GetService(x)end,Players=z({LocalPlayer=z({GetMouse=function(self)return h end},Player)},"Players"),UserInputService=z(i,"UserInputService"),ContextActionService=z(CAS,"ContextActionService"),RunService=z({_btrs={},RenderStepped=v:GetService("RunService").Heartbeat,BindToRenderStep=function(self,j,o,k)self._btrs[j]=self.Heartbeat:Connect(k)end,UnbindFromRenderStep=function(self,j)self._btrs[j]:Disconnect()end},"RunService")}rawset(B.Players,"localPlayer",B.Players.LocalPlayer)B.service=B.GetService;z(B,game)game,owner=B,B.Players.LocalPlayer end
  8.  
  9. -- Made by Zuu_Roku w/ Help from Cass!
  10. -- Venge is ok happy? But nebby is better /e dab
  11.  
  12. print("Made by Zuu_Roku, Thanks Cass for Cloud CLerp.")
  13.  
  14. print("Rain Cloud Visualizer (Update 1.2 I guess) Commands:")
  15.  
  16. print("!play (ID) [Changes song]")
  17.  
  18. print("!pitch (#) [normal pitch is '10'][THIS IS FIXED AAAAAAAAAAAAAAAAAA, Sound.Pitch was Depreciated and never knew, hence why it never worked]")
  19.  
  20. print("!snow / !rain [Changes Weather]")
  21.  
  22. print("!rate (#) [Changes amount of particles]")
  23.  
  24. print("Click for a Lightning bolt!")
  25.  
  26.  
  27.  
  28. local Player = game.Players.LocalPlayer
  29.  
  30. local Character = Player.Character
  31.  
  32. local maus = Player:GetMouse()
  33.  
  34. local H = Character["Head"]
  35.  
  36. local multiplier = 4
  37.  
  38. local ltdb = false
  39.  
  40. local Cloud = Instance.new('Part',Character)
  41.  
  42. Cloud.Size = Vector3.new(1,1,1)
  43.  
  44. Cloud.Anchored = true
  45.  
  46. Cloud.CanCollide = false
  47.  
  48. Cloud.Transparency = 0
  49.  
  50.  
  51.  
  52. local CloudMesh = Instance.new('SpecialMesh',Cloud)
  53.  
  54. CloudMesh.Scale = Vector3.new(5,1,5)
  55.  
  56. CloudMesh.MeshId = "http://www.roblox.com/asset/?id=1095708"
  57.  
  58. CloudMesh.Offset = Vector3.new(0,1,0)
  59.  
  60.  
  61. local loudness = 0
  62.  
  63.  
  64.  
  65. local S = Instance.new('Sound',Cloud)
  66.  
  67. S.SoundId = "rbxassetid://170020261"
  68.  
  69. S.Looped = true
  70.  
  71. S.Volume = 8
  72.  
  73. S.PlaybackSpeed = 1
  74.  
  75. S.MaxDistance = 100
  76.  
  77. S:Play()
  78.  
  79.  
  80. local Volume = 5
  81.  
  82.  
  83.  
  84. local Rain = Instance.new('ParticleEmitter',Cloud)
  85.  
  86. Rain.Color = ColorSequence.new(Color3.new(1,1,1),Color3.fromRGB(175,255,255))
  87.  
  88. Rain.Size = NumberSequence.new(.5)
  89.  
  90. Rain.Texture = "http://www.roblox.com/asset/?id=241876428"
  91.  
  92. Rain.Transparency = NumberSequence.new(0,.6)
  93.  
  94. Rain.Acceleration = Vector3.new(0,-150,0)
  95.  
  96. Rain.Lifetime = NumberRange.new(5,10)
  97.  
  98. Rain.Rate = 100
  99.  
  100.  
  101.  
  102. local Shade = Instance.new('PointLight',Cloud)
  103.  
  104. Shade.Range = 10
  105.  
  106. Shade.Color = Color3.fromRGB(50,50,50)
  107.  
  108. Shade.Enabled = true
  109.  
  110. Shade.Shadows = true
  111.  
  112.  
  113.  
  114. local rad = math.rad
  115.  
  116. local sin = math.sin
  117.  
  118. local tan = math.tan
  119.  
  120. local cos = math.cos
  121.  
  122. Player.Chatted:connect(function(m)
  123.  
  124. if m:match("!play%s%d+") then
  125.  
  126. S:Stop()
  127.  
  128. S.SoundId = "rbxassetid://"..m:match("!play%s(%d+)")
  129.  
  130. S:Play()
  131.  
  132. elseif m:match("!volume%s%d+") then
  133.  
  134. S.Volume = m:match("!volume%s(%d+)")
  135.  
  136. Volume = m:match("!volume%s(%d+)")
  137.  
  138. elseif m:match("!pitch%s%d+") then
  139.  
  140. S.PlaybackSpeed = m:match("!pitch%s(%d+)")/10
  141.  
  142. elseif m:match("!snow") then
  143.  
  144. Rain.Texture = "http://www.roblox.com/asset/?id=605668174"
  145.  
  146. Rain.Acceleration = Vector3.new(0,-10,0)
  147.  
  148. Rain.Lifetime = NumberRange.new(15,20)
  149.  
  150. Rain.Size = NumberSequence.new(.2)
  151.  
  152. elseif m:match("!rain") then
  153.  
  154. Rain.Texture = "http://www.roblox.com/asset/?id=241876428"
  155.  
  156. Rain.Acceleration = Vector3.new(0,-150,0)
  157.  
  158. Rain.Lifetime = NumberRange.new(5,10)
  159.  
  160. Rain.Size = NumberSequence.new(.5)
  161.  
  162. elseif m:match("!rate%s%d+") then
  163.  
  164. multiplier = m:match("!rate%s(%d+)")
  165.  
  166. elseif m:match("!rr") then
  167.  
  168. print(Rain.Rate)
  169.  
  170. elseif m:match("!pbs") then
  171.  
  172. print(S.PlaybackSpeed)
  173.  
  174. elseif m:match("!rot") then
  175.  
  176. print(Cloud.Rotation)
  177.  
  178. end
  179. end)
  180.  
  181.  
  182.  
  183. function Weld(x,y)
  184.  
  185. local w = Instance.new("Weld")
  186.  
  187. w.Part0 = x
  188.  
  189. w.Part1 = y
  190.  
  191. w.Name = tostring(y.Name).."_Weld"
  192.  
  193. w.Parent = x
  194.  
  195. return w
  196.  
  197. end
  198.  
  199.  
  200.  
  201. function Clerp(start,destination,increment)
  202.  
  203. local function slerp(a,b,c)return (1-c)*a+(c*b)end
  204.  
  205. local c1 = {start.X,start.Y,start.Z,start:toEulerAnglesXYZ()}
  206.  
  207. local c2 = {destination.X,destination.Y,destination.Z,destination:toEulerAnglesXYZ()}
  208.  
  209. for i,v in pairs(c1)do c1[i] = slerp(v,c2[i],increment)end
  210.  
  211. return CFrame.new(c1[1],c1[2],c1[3])*CFrame.Angles(c1[4],c1[5],c1[6])
  212.  
  213. end
  214.  
  215.  
  216.  
  217. DrawLightning = function(Start,End,Times,Offset,Color,Thickness)
  218.  
  219. if Start.y>End.y then
  220.  
  221. local magz = (Start - End).magnitude
  222.  
  223. local curpos = Start
  224.  
  225. local trz = {-Offset,Offset}
  226.  
  227. for i=1,Times do
  228.  
  229. local li = Instance.new("Part",workspace)
  230.  
  231. li.TopSurface =10
  232.  
  233. li.BottomSurface = 10
  234.  
  235. li.Anchored = true
  236.  
  237. li.Transparency = 0
  238.  
  239. li.BrickColor = Color
  240.  
  241. li.formFactor = "Custom"
  242.  
  243. li.CanCollide = false
  244.  
  245. li.Size = Vector3.new(Thickness,Thickness,magz/Times)
  246.  
  247. local lt=Instance.new("SpotLight",li)
  248.  
  249. lt.Range=16
  250.  
  251. lt.Brightness=5
  252.  
  253. lt.Shadows=true
  254.  
  255. lt.Angle=45
  256.  
  257. lt.Face="Top"
  258.  
  259. lt.Color=li.BrickColor.Color
  260.  
  261. local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)])
  262.  
  263. local trolpos = CFrame.new(curpos,End)*CFrame.new(0,0,magz/Times).p+ofz
  264.  
  265. if Times == i then
  266.  
  267. local magz2 = (curpos - End).magnitude
  268.  
  269. li.Size = Vector3.new(Thickness,Thickness,magz2)
  270.  
  271. li.CFrame = CFrame.new(curpos,End)*CFrame.new(0,0,-magz2/2)
  272.  
  273. else
  274.  
  275. li.CFrame = CFrame.new(curpos,trolpos)*CFrame.new(0,0,magz/Times/2)
  276.  
  277. end
  278.  
  279. curpos = li.CFrame*CFrame.new(0,0,magz/Times/2).p Spawn(function() for i=1,5 do wait() li.Transparency = li.Transparency+.2 end li:Destroy() end)
  280.  
  281. end
  282.  
  283. for i,x in pairs(workspace:GetChildren()) do if x:IsA'Model' and x:findFirstChild('Head') and x~=Character and x.Name~="Zuu_Roku" then
  284.  
  285. for a,v in pairs(x:GetChildren()) do if v:IsA'Humanoid' then if (x.Head.CFrame.p-End).magnitude<10 then x:BreakJoints() end end end end end
  286.  
  287. end
  288.  
  289. end
  290.  
  291.  
  292.  
  293. maus.Button1Down:connect(function()
  294.  
  295. if ltdb==false then
  296.  
  297. ltdb=true
  298.  
  299. DrawLightning(Cloud.CFrame.p,maus.Hit.p,5,.5,BrickColor.new("New Yeller"),.2)
  300.  
  301. wait()
  302.  
  303. ltdb=false
  304.  
  305. end
  306.  
  307. end)
  308.  
  309. local Spinny = 0
  310.  
  311. local NoU = 0
  312.  
  313. while true do
  314.  
  315. Rain.Rate = (S.PlaybackLoudness + 1) * multiplier/5
  316.  
  317. game:GetService('RunService').RenderStepped:wait()
  318.  
  319. local HP = H.CFrame.p
  320.  
  321. local sizer = S.PlaybackLoudness/55 + 5
  322.  
  323. Cloud.Size = Vector3.new(sizer,1,sizer)
  324.  
  325. Shade.Range = sizer
  326.  
  327. CloudMesh.Scale = Vector3.new(sizer,5,sizer)
  328.  
  329. Cloud.CFrame = Clerp(Cloud.CFrame, CFrame.new(HP + Vector3.new(0,4,0))*CFrame.Angles(0,rad(90),0), .1)
  330.  
  331. Cloud.BrickColor = BrickColor.new(Color3.fromRGB(255 - S.PlaybackLoudness/2, 255-S.PlaybackLoudness/2, 255-S.PlaybackLoudness/2))
  332. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement