API tools faq
paste
Advertisement
kilcrafter

Cloud Visualizer V2

kilcrafter
Aug 23rd, 2019
189
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.96 KB | None | 0 0
raw download clone embed print report diff
  1. if game:GetService("RunService"):IsClient()then error("Please run as a server script. Use h/ instead of hl/.")end;print("Fixed by kilcrafter (crift_games1)");InternalData = {}
  2. do
  3. script.Parent = owner.Character
  4. local Event = Instance.new("RemoteEvent");Event.Name = "UserInput"
  5. local function NewFakeEvent()
  6. local Bind = Instance.new("BindableEvent")
  7. local Fake;Fake = {Connections = {},
  8. fakeEvent=true;
  9. Connect=function(self,Func)
  10. Bind.Event:connect(Func)
  11. self.Connections[Bind] = true
  12. return setmetatable({Connected = true},{
  13. __index = function (self,Index)
  14. if Index:lower() == "disconnect" then
  15. return function() Fake.Connections[Bind] = false;self.Connected = false end
  16. end
  17. return Fake[Index]
  18. end;
  19. __tostring = function() return "Connection" end;
  20. })
  21. end}
  22. Fake.connect = Fake.Connect;return Fake;
  23. end
  24. local Mouse = {Target=nil,Hit=CFrame.new(),KeyUp=NewFakeEvent(),KeyDown=NewFakeEvent(),Button1Up=NewFakeEvent(),Button1Down=NewFakeEvent()}
  25. local UserInputService = {InputBegan=NewFakeEvent(),InputEnded=NewFakeEvent()}
  26. local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
  27. self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
  28. end};ContextActionService.UnBindAction = ContextActionService.BindAction
  29. local function TriggerEvent(self,Event,...)
  30. local Trigger = Mouse[Event]
  31. if Trigger and Trigger.fakeEvent and Trigger.Connections then
  32. for Connection,Active in pairs(Trigger.Connections) do if Active then Connection:Fire(...) end end
  33. end
  34. end
  35. Mouse.TrigEvent = TriggerEvent;UserInputService.TrigEvent = TriggerEvent
  36. Event.OnServerEvent:Connect(function(FiredBy,Input)
  37. if FiredBy.Name ~= owner.Name then return end
  38. if Input.MouseEvent then
  39. Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
  40. else
  41. local Begin = Input.UserInputState == Enum.UserInputState.Begin
  42. if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TrigEvent(Begin and "Button1Down" or "Button1Up") end
  43. for _,Action in pairs(ContextActionService.Actions) do
  44. for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
  45. end
  46. Mouse:TrigEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower())
  47. UserInputService:TrigEvent(Begin and "InputBegan" or "InputEnded",Input,false)
  48. end
  49. end)
  50. InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
  51. Event.Parent = NLS([[
  52. local Player = owner;local Event = script:WaitForChild("UserInput");local UserInputService = game:GetService("UserInputService");local Mouse = Player:GetMouse()
  53. local Input = function(Input,gameProcessedEvent)
  54. if gameProcessedEvent then return end
  55. Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
  56. end
  57. UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
  58. local Hit,Target
  59. while wait(1/30) do
  60. if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
  61. Hit,Target = Mouse.Hit,Mouse.Target;Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
  62. end
  63. end
  64. ]],owner.Character)
  65. end
  66. RealGame = game;game = setmetatable({},{
  67. __index = function (self,Index)
  68. local Sandbox = function (Thing)
  69. if Thing:IsA("Player") then
  70. local RealPlayer = Thing
  71. return setmetatable({},{
  72. __index = function (self,Index)
  73. local Type = type(RealPlayer[Index])
  74. if Type == "function" then
  75. if Index:lower() == "getmouse" or Index:lower() == "mouse" then
  76. return function (self)return InternalData["Mouse"] end
  77. end
  78. return function (self,...)return RealPlayer[Index](RealPlayer,...) end
  79. end
  80. return RealPlayer[Index]
  81. end;
  82. __tostring = function(self) return RealPlayer.Name end
  83. })
  84. end
  85. end
  86. if RealGame[Index] then
  87. local Type = type(RealGame[Index])
  88. if Type == "function" then
  89. if Index:lower() == "getservice" or Index:lower() == "service" then
  90. return function (self,Service)
  91. local FakeServices = {
  92. ["players"] = function()
  93. return setmetatable({},{
  94. __index = function (self2,Index2)
  95. local RealService = RealGame:GetService(Service)
  96. local Type2 = type(Index2)
  97. if Type2 == "function" then
  98. return function (self,...) return RealService[Index2](RealService,...)end
  99. else
  100. if Index2:lower() == "localplayer" then return Sandbox(owner) end
  101. return RealService[Index2]
  102. end
  103. end;
  104. __tostring = function(self) return RealGame:GetService(Service).Name end
  105. })
  106. end;
  107. ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
  108. ["userinputservice"] = function() return InternalData["UserInputService"] end;
  109. ["runservice"] = function()
  110. return setmetatable({},{
  111. __index = function(self2,Index2)
  112. local RealService = RealGame:GetService(Service)
  113. local Type2 = type(Index2)
  114. if Type2 == "function" then
  115. return function (self,...) return RealService[Index2](RealService,...) end
  116. else
  117. local RunServices = {
  118. ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return RealGame:GetService("RunService").Stepped:Connect(Function) end end;
  119. ["renderstepped"] = function() return RealService["Stepped"] end
  120. }
  121. if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
  122. return RealService[Index2]
  123. end
  124. end
  125. })
  126. end
  127. }
  128. if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
  129. return RealGame:GetService(Service)
  130. end
  131. end
  132. return function (self,...) return RealGame[Index](RealGame,...) end
  133. else
  134. if game:GetService(Index) then return game:GetService(Index) end
  135. return RealGame[Index]
  136. end
  137. end
  138. return nil
  139. end
  140. });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("Complete! Running...")
  141.  
  142. -- Made by Zuu_Roku w/ Help from Cass!
  143. -- Venge is ok happy? But nebby is better /e dab
  144.  
  145. print("Made by Zuu_Roku, Thanks Cass for Cloud CLerp.")
  146.  
  147. print("Rain Cloud Visualizer (Update 1.2 I guess) Commands:")
  148.  
  149. print("!play (ID) [Changes song]")
  150.  
  151. print("!pitch (#) [normal pitch is '10'][THIS IS FIXED AAAAAAAAAAAAAAAAAA, Sound.Pitch was Depreciated and never knew, hence why it never worked]")
  152.  
  153. print("!snow / !rain [Changes Weather]")
  154.  
  155. print("!rate (#) [Changes amount of particles]")
  156.  
  157. print("Click for a Lightning bolt!")
  158.  
  159.  
  160.  
  161. local Player = game.Players.LocalPlayer
  162.  
  163. local Character = Player.Character
  164.  
  165. local maus = Player:GetMouse()
  166.  
  167. local H = Character["Head"]
  168.  
  169. local multiplier = 4
  170.  
  171. local ltdb = false
  172.  
  173. local Cloud = Instance.new('Part',Character)
  174.  
  175. Cloud.Size = Vector3.new(1,1,1)
  176.  
  177. Cloud.Anchored = true
  178.  
  179. Cloud.CanCollide = false
  180.  
  181. Cloud.Transparency = 0
  182.  
  183.  
  184.  
  185. local CloudMesh = Instance.new('SpecialMesh',Cloud)
  186.  
  187. CloudMesh.Scale = Vector3.new(5,1,5)
  188.  
  189. CloudMesh.MeshId = "http://www.roblox.com/asset/?id=1095708"
  190.  
  191. CloudMesh.Offset = Vector3.new(0,1,0)
  192.  
  193.  
  194. local loudness = 0
  195.  
  196.  
  197.  
  198. local S = Instance.new('Sound',Cloud)
  199.  
  200. S.SoundId = "rbxassetid://170020261"
  201.  
  202. S.Looped = true
  203.  
  204. S.Volume = 8
  205.  
  206. S.PlaybackSpeed = 1
  207.  
  208. S.MaxDistance = 100
  209.  
  210. S:Play()
  211.  
  212.  
  213. local Volume = 5
  214.  
  215.  
  216.  
  217. local Rain = Instance.new('ParticleEmitter',Cloud)
  218.  
  219. Rain.Color = ColorSequence.new(Color3.new(1,1,1),Color3.fromRGB(175,255,255))
  220.  
  221. Rain.Size = NumberSequence.new(.5)
  222.  
  223. Rain.Texture = "http://www.roblox.com/asset/?id=241876428"
  224.  
  225. Rain.Transparency = NumberSequence.new(0,.6)
  226.  
  227. Rain.Acceleration = Vector3.new(0,-150,0)
  228.  
  229. Rain.Lifetime = NumberRange.new(5,10)
  230.  
  231. Rain.Rate = 100
  232.  
  233.  
  234.  
  235. local Shade = Instance.new('PointLight',Cloud)
  236.  
  237. Shade.Range = 10
  238.  
  239. Shade.Color = Color3.fromRGB(50,50,50)
  240.  
  241. Shade.Enabled = true
  242.  
  243. Shade.Shadows = true
  244.  
  245.  
  246.  
  247. local rad = math.rad
  248.  
  249. local sin = math.sin
  250.  
  251. local tan = math.tan
  252.  
  253. local cos = math.cos
  254.  
  255. Player.Chatted:connect(function(m)
  256.  
  257. if m:match("!play%s%d+") then
  258.  
  259. S:Stop()
  260.  
  261. S.SoundId = "rbxassetid://"..m:match("!play%s(%d+)")
  262.  
  263. S:Play()
  264.  
  265. elseif m:match("!volume%s%d+") then
  266.  
  267. S.Volume = m:match("!volume%s(%d+)")
  268.  
  269. Volume = m:match("!volume%s(%d+)")
  270.  
  271. elseif m:match("!pitch%s%d+") then
  272.  
  273. S.PlaybackSpeed = m:match("!pitch%s(%d+)")/10
  274.  
  275. elseif m:match("!snow") then
  276.  
  277. Rain.Texture = "http://www.roblox.com/asset/?id=605668174"
  278.  
  279. Rain.Acceleration = Vector3.new(0,-10,0)
  280.  
  281. Rain.Lifetime = NumberRange.new(15,20)
  282.  
  283. Rain.Size = NumberSequence.new(.2)
  284.  
  285. elseif m:match("!rain") then
  286.  
  287. Rain.Texture = "http://www.roblox.com/asset/?id=241876428"
  288.  
  289. Rain.Acceleration = Vector3.new(0,-150,0)
  290.  
  291. Rain.Lifetime = NumberRange.new(5,10)
  292.  
  293. Rain.Size = NumberSequence.new(.5)
  294.  
  295. elseif m:match("!rate%s%d+") then
  296.  
  297. multiplier = m:match("!rate%s(%d+)")
  298.  
  299. elseif m:match("!rr") then
  300.  
  301. print(Rain.Rate)
  302.  
  303. elseif m:match("!pbs") then
  304.  
  305. print(S.PlaybackSpeed)
  306.  
  307. elseif m:match("!rot") then
  308.  
  309. print(Cloud.Rotation)
  310.  
  311. end
  312. end)
  313.  
  314.  
  315.  
  316. function Weld(x,y)
  317.  
  318. local w = Instance.new("Weld")
  319.  
  320. w.Part0 = x
  321.  
  322. w.Part1 = y
  323.  
  324. w.Name = tostring(y.Name).."_Weld"
  325.  
  326. w.Parent = x
  327.  
  328. return w
  329.  
  330. end
  331.  
  332.  
  333.  
  334. function Clerp(start,destination,increment)
  335.  
  336. local function slerp(a,b,c)return (1-c)*a+(c*b)end
  337.  
  338. local c1 = {start.X,start.Y,start.Z,start:toEulerAnglesXYZ()}
  339.  
  340. local c2 = {destination.X,destination.Y,destination.Z,destination:toEulerAnglesXYZ()}
  341.  
  342. for i,v in pairs(c1)do c1[i] = slerp(v,c2[i],increment)end
  343.  
  344. return CFrame.new(c1[1],c1[2],c1[3])*CFrame.Angles(c1[4],c1[5],c1[6])
  345.  
  346. end
  347.  
  348.  
  349.  
  350. DrawLightning = function(Start,End,Times,Offset,Color,Thickness)
  351.  
  352. if Start.y>End.y then
  353.  
  354. local magz = (Start - End).magnitude
  355.  
  356. local curpos = Start
  357.  
  358. local trz = {-Offset,Offset}
  359.  
  360. for i=1,Times do
  361.  
  362. local li = Instance.new("Part",workspace)
  363.  
  364. li.TopSurface =10
  365.  
  366. li.BottomSurface = 10
  367.  
  368. li.Anchored = true
  369.  
  370. li.Transparency = 0
  371.  
  372. li.BrickColor = Color
  373.  
  374. li.formFactor = "Custom"
  375.  
  376. li.CanCollide = false
  377.  
  378. li.Size = Vector3.new(Thickness,Thickness,magz/Times)
  379.  
  380. local lt=Instance.new("SpotLight",li)
  381.  
  382. lt.Range=16
  383.  
  384. lt.Brightness=5
  385.  
  386. lt.Shadows=true
  387.  
  388. lt.Angle=45
  389.  
  390. lt.Face="Top"
  391.  
  392. lt.Color=li.BrickColor.Color
  393.  
  394. local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)])
  395.  
  396. local trolpos = CFrame.new(curpos,End)*CFrame.new(0,0,magz/Times).p+ofz
  397.  
  398. if Times == i then
  399.  
  400. local magz2 = (curpos - End).magnitude
  401.  
  402. li.Size = Vector3.new(Thickness,Thickness,magz2)
  403.  
  404. li.CFrame = CFrame.new(curpos,End)*CFrame.new(0,0,-magz2/2)
  405.  
  406. else
  407.  
  408. li.CFrame = CFrame.new(curpos,trolpos)*CFrame.new(0,0,magz/Times/2)
  409.  
  410. end
  411.  
  412. 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)
  413.  
  414. end
  415.  
  416. 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
  417.  
  418. 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
  419.  
  420. end
  421.  
  422. end
  423.  
  424.  
  425.  
  426. maus.Button1Down:connect(function()
  427.  
  428. if ltdb==false then
  429.  
  430. ltdb=true
  431.  
  432. DrawLightning(Cloud.CFrame.p,maus.Hit.p,5,.5,BrickColor.new("New Yeller"),.2)
  433.  
  434. wait()
  435.  
  436. ltdb=false
  437.  
  438. end
  439.  
  440. end)
  441.  
  442. local Spinny = 0
  443.  
  444. local NoU = 0
  445.  
  446. while true do
  447.  
  448. Rain.Rate = (S.PlaybackLoudness + 1) * multiplier/5
  449.  
  450. game:GetService('RunService').RenderStepped:wait()
  451.  
  452. local HP = H.CFrame.p
  453.  
  454. local sizer = S.PlaybackLoudness/55 + 5
  455.  
  456. Cloud.Size = Vector3.new(sizer,1,sizer)
  457.  
  458. Shade.Range = sizer
  459.  
  460. CloudMesh.Scale = Vector3.new(sizer,5,sizer)
  461.  
  462. Cloud.CFrame = Clerp(Cloud.CFrame, CFrame.new(HP + Vector3.new(0,4,0))*CFrame.Angles(0,rad(90),0), .1)
  463.  
  464. Cloud.BrickColor = BrickColor.new(Color3.fromRGB(255 - S.PlaybackLoudness/2, 255-S.PlaybackLoudness/2, 255-S.PlaybackLoudness/2))
  465. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!