Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[
- Again, This time i may update this, very very soon, also copying this would be idiotic since if you do you may be counted as a skid and a script copier, People may also edit this which may also make you a editor, So Don't copy, let people enjoy editing and making this script famous, Basically this uses a GUI i made, so, ehm, this uses my own idea to use for n =number,number do end since it's smooth i guess, you can test it out on void and other games then this, you are also welcomed as a tester, so bye!
- ]]
- -- aaa the fe converter is copied pasted --
- if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
- local Player,Mouse,mouse,UserInputService,ContextActionService = owner
- do
- print("FE Compatibility code by Mokiros")
- script.Parent = Player.Character
- --RemoteEvent for communicating
- local Event = Instance.new("RemoteEvent")
- Event.Name = "UserInput_Event"
- --Fake event to make stuff like Mouse.KeyDown work
- local function fakeEvent()
- local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
- t.connect = t.Connect
- return t
- end
- --Creating fake input objects with fake variables
- local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
- local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
- local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
- CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
- end}
- --Merged 2 functions into one by checking amount of arguments
- CAS.UnbindAction = CAS.BindAction
- --This function will trigger the events that have been :Connect()'ed
- local function te(self,ev,...)
- local t = m[ev]
- if t and t._fakeEvent and t.Function then
- t.Function(...)
- end
- end
- m.TrigEvent = te
- UIS.TrigEvent = te
- Event.OnServerEvent:Connect(function(plr,io)
- if plr~=Player then return end
- if io.isMouse then
- m.Target = io.Target
- m.Hit = io.Hit
- else
- local b = io.UserInputState == Enum.UserInputState.Begin
- if io.UserInputType == Enum.UserInputType.MouseButton1 then
- return m:TrigEvent(b and "Button1Down" or "Button1Up")
- end
- for _,t in pairs(CAS.Actions) do
- for _,k in pairs(t.Keys) do
- if k==io.KeyCode then
- t.Function(t.Name,io.UserInputState,io)
- end
- end
- end
- m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
- UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
- end
- end)
- Event.Parent = NLS([==[
- local Player = game:GetService("Players").LocalPlayer
- local Event = script:WaitForChild("UserInput_Event")
- local UIS = game:GetService("UserInputService")
- local input = function(io,a)
- if a then return end
- --Since InputObject is a client-side instance, we create and pass table instead
- Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
- end
- UIS.InputBegan:Connect(input)
- UIS.InputEnded:Connect(input)
- local Mouse = Player:GetMouse()
- local h,t
- --Give the server mouse data 30 times every second, but only if the values changed
- --If player is not moving their mouse, client won't fire events
- while wait(1/30) do
- if h~=Mouse.Hit or t~=Mouse.Target then
- h,t=Mouse.Hit,Mouse.Target
- Event:FireServer({isMouse=true,Target=t,Hit=h})
- end
- end]==],Player.Character)
- Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
- end
- wait(0.1)
- player = owner
- char = player.Character
- visual = true
- Frame1 = Instance.new("Frame")
- TextBox2 = Instance.new("TextBox")
- TextBox3 = Instance.new("TextBox")
- TextBox4 = Instance.new("TextBox")
- TextButton5 = Instance.new("TextButton")
- TextButton6 = Instance.new("TextButton")
- Frame12 = Instance.new("Frame")
- TextLabel13 = Instance.new("TextLabel")
- ScreenGui0 =Instance.new("ScreenGui")
- ScreenGui0.Parent = player.PlayerGui
- Frame1.Parent = ScreenGui0
- Frame1.Position = UDim2.new(0.0673828125, 0, 0.261770248, 0)
- Frame1.Size = UDim2.new(0, 311, 0, 344)
- Frame1.BackgroundColor = BrickColor.new("Institutional white")
- Frame1.BackgroundColor3 = Color3.new(1, 1, 1)
- Frame1.Style = Enum.FrameStyle.DropShadow
- TextBox2.Name = "ID"
- TextBox2.Parent = Frame1
- TextBox2.Position = UDim2.new(0.156463534, 0, 0.107448623, 0)
- TextBox2.Size = UDim2.new(0, 200, 0, 50)
- TextBox2.BackgroundColor = BrickColor.new("Dark stone grey")
- TextBox2.BackgroundColor3 = Color3.new(0.388235, 0.388235, 0.388235)
- TextBox2.BackgroundTransparency = 0.89999997615814
- TextBox2.Font = Enum.Font.SourceSans
- TextBox2.FontSize = Enum.FontSize.Size14
- TextBox2.Text = "Sound ID Here"
- TextBox2.TextColor = BrickColor.new("Really black")
- TextBox2.TextColor3 = Color3.new(0, 0, 0)
- TextBox2.TextScaled = true
- TextBox2.TextSize = 14
- TextBox2.TextWrap = true
- TextBox2.TextWrapped = true
- TextBox3.Name = "Vol"
- TextBox3.Parent = Frame1
- TextBox3.Position = UDim2.new(0.156463534, 0, 0.359523475, 0)
- TextBox3.Size = UDim2.new(0, 200, 0, 50)
- TextBox3.BackgroundColor = BrickColor.new("Dark stone grey")
- TextBox3.BackgroundColor3 = Color3.new(0.388235, 0.388235, 0.388235)
- TextBox3.BackgroundTransparency = 0.89999997615814
- TextBox3.Font = Enum.Font.SourceSans
- TextBox3.FontSize = Enum.FontSize.Size14
- TextBox3.Text = " Volume Num Value Here"
- TextBox3.TextColor = BrickColor.new("Really black")
- TextBox3.TextColor3 = Color3.new(0, 0, 0)
- TextBox3.TextScaled = true
- TextBox3.TextSize = 14
- TextBox3.TextWrap = true
- TextBox3.TextWrapped = true
- TextBox4.Name = "Pitch"
- TextBox4.Parent = Frame1
- TextBox4.Position = UDim2.new(0.156463534, 0, 0.563165188, 0)
- TextBox4.Size = UDim2.new(0, 200, 0, 50)
- TextBox4.BackgroundColor = BrickColor.new("Dark stone grey")
- TextBox4.BackgroundColor3 = Color3.new(0.388235, 0.388235, 0.388235)
- TextBox4.BackgroundTransparency = 0.89999997615814
- TextBox4.Font = Enum.Font.SourceSans
- TextBox4.FontSize = Enum.FontSize.Size14
- TextBox4.Text = "Pitch Num Value Here"
- TextBox4.TextColor = BrickColor.new("Really black")
- TextBox4.TextColor3 = Color3.new(0, 0, 0)
- TextBox4.TextScaled = true
- TextBox4.TextSize = 14
- TextBox4.TextWrap = true
- TextBox4.TextWrapped = true
- TextButton5.Parent = Frame1
- TextButton5.Position = UDim2.new(0.156463534, 0, 0.802752614, 0)
- TextButton5.Size = UDim2.new(0, 200, 0, 50)
- TextButton5.BackgroundColor = BrickColor.new("Institutional white")
- TextButton5.BackgroundColor3 = Color3.new(1, 1, 1)
- TextButton5.BackgroundTransparency = 1
- TextButton5.Font = Enum.Font.SourceSans
- TextButton5.FontSize = Enum.FontSize.Size14
- TextButton5.Text = "Change Sound"
- TextButton5.TextColor = BrickColor.new("Really black")
- TextButton5.TextColor3 = Color3.new(0, 0, 0)
- TextButton5.TextSize = 14
- TextButton6.Parent = Frame1
- TextButton6.Position = UDim2.new(0.156463534, 0, 0.702752614, 0)
- TextButton6.Size = UDim2.new(0, 200, 0, 50)
- TextButton6.BackgroundColor = BrickColor.new("Institutional white")
- TextButton6.BackgroundColor3 = Color3.new(1, 1, 1)
- TextButton6.BackgroundTransparency = 1
- TextButton6.Font = Enum.Font.SourceSans
- TextButton6.FontSize = Enum.FontSize.Size14
- TextButton6.Text = "Activate Visualizer"
- TextButton6.TextColor = BrickColor.new("Really black")
- TextButton6.TextColor3 = Color3.new(0, 0, 0)
- TextButton6.TextSize = 14
- Frame12.Name = "Title"
- Frame12.Parent = ScreenGui0
- Frame12.Position = UDim2.new(0.0673828125, 0, 0.0659133717, 0)
- Frame12.Size = UDim2.new(0, 311, 0, 91)
- Frame12.BackgroundColor = BrickColor.new("Institutional white")
- Frame12.BackgroundColor3 = Color3.new(1, 1, 1)
- Frame12.Style = Enum.FrameStyle.DropShadow
- TextLabel13.Parent = Frame12
- TextLabel13.Position = UDim2.new(0.156463534, 0, 0.147534192, 0)
- TextLabel13.Size = UDim2.new(0, 200, 0, 50)
- TextLabel13.BackgroundColor = BrickColor.new("Institutional white")
- TextLabel13.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel13.BackgroundTransparency = 1
- TextLabel13.Font = Enum.Font.SourceSans
- TextLabel13.FontSize = Enum.FontSize.Size14
- TextLabel13.Text = "Visualizer Command Gui"
- TextLabel13.TextColor = BrickColor.new("Really black")
- TextLabel13.TextColor3 = Color3.new(0, 0, 0)
- TextLabel13.TextScaled = true
- TextLabel13.TextSize = 14
- TextLabel13.TextWrap = true
- TextLabel13.TextWrapped = true
- TextBox2.Text = 0
- TextBox3.Text = 4
- TextBox4.Text = 1
- TextButton5.Visible = false
- TextButton6.MouseButton1Click:connect(function()
- if visual == true then
- visual = false
- print("Visualizer was activated")
- TextButton6.Text= "Visualizer Was Enabled"
- wait(2)
- TextButton6.Visible = false
- TextButton5.Visible = true
- mod = Instance.new("Model",char)
- mod.Name = "Visualizer Hold"
- playing = true
- num = 12
- sound = Instance.new("Sound")
- id = 287532293
- Part0 = Instance.new("Part")
- Part0.Parent = mod
- Part0.CFrame = CFrame.new(char.HumanoidRootPart.CFrame.p)
- Part0.Size = Vector3.new(1,1,1)
- Part0.CanCollide = false
- Part0.Transparency = 1
- Part0.Anchored = true
- Part0.BottomSurface = Enum.SurfaceType.Smooth
- Part0.TopSurface = Enum.SurfaceType.Smooth
- mod.PrimaryPart = Part0
- i = 0
- pressed = true
- for n =1,num do
- wait()
- i = i + 10
- Part = Part0:Clone()
- Part.CFrame = CFrame.new(Part0.CFrame.p) * CFrame.new(i,i,i)
- Part.Parent = mod
- Part.Material = "Glass"
- end
- g = mod:GetChildren()
- for h =1,#g do
- if g[h] ~= nil then
- mod:GetPrimaryPartCFrame(CFrame.new(char.HumanoidRootPart.CFrame.p) * CFrame.new(0,7,0))
- g[h].Material = "Glass"
- sound.Volume = 4
- sound.Parent = char.HumanoidRootPart
- sound.Pitch = 1
- sound.Looped = true
- sound.SoundId = "rbxassetid://"..id
- TextButton5.MouseButton1Click:connect(function()
- if pressed == true then
- playing = false
- id = TextBox2.Text
- pressed = false
- wait()
- sound.Volume = TextBox3.Text
- sound.Pitch = TextBox4.Text
- sound.Looped = true
- sound.SoundId = "rbxassetid://"..id
- sound:Stop()
- wait( 1 )
- sound:Play()
- pressed = true
- playing = true
- end
- end)
- for n =1,90 do
- wait()
- g[h].Transparency = g[h].Transparency - 0.05
- end
- wait(2)
- sound:Play()
- if g[h].Transparency < 0 then
- while playing do
- gc = mod:GetChildren()
- mod_ = math.random(1,#gc)
- beep = gc[mod_]
- wait()
- for n =1,80 do
- g[h].Size = Vector3.new(sound.PlaybackLoudness/60,sound.PlaybackLoudness/60,sound.PlaybackLoudness/60)
- g[h].Transparency = g[h].Transparency - 0.05
- wait()
- end
- for n =1,120 do
- g[h].Size = Vector3.new(sound.PlaybackLoudness/60,sound.PlaybackLoudness/60,sound.PlaybackLoudness/60)
- g[h].Transparency = g[h].Transparency - 0.05
- beep.Size = Vector3.new(sound.PlaybackLoudness/60,sound.PlaybackLoudness/60,sound.PlaybackLoudness/60)
- beep.Transparency = g[h].Transparency - 0.05
- wait()
- end
- for n =1,120 do
- wait()
- g[h].Orientation = Vector3.new(sound.PlaybackLoudness/12,sound.PlaybackLoudness/12,sound.PlaybackLoudness/12)
- beep.Orientation = Vector3.new(sound.PlaybackLoudness/12,sound.PlaybackLoudness/12,sound.PlaybackLoudness/12)
- end
- end
- end
- end
- end
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement