View difference between Paste ID: serrjpLt and Xigb3Kc7
SHOW: | | - or go back to the newest paste.
1
2
3
--https://github.com/Mokiros/roblox-FE-compatibility
4
if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
5
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
6
local RealPlayer = Player
7
do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end
8
--[[ 
9
edited by mr steal yo bork with a sweet gui
10
credits goes to the original creators 
11
--]] 
12
13
-- visualizer
14
local Parts = {}
15
local Parts2 = {}
16
local Direction = 1
17
local loudness = 0
18
local TColor = BrickColor.new("Black")
19
for i = 1, 100 do
20
 local p = Instance.new("Part", game.Players.LocalPlayer.Character.Torso)
21
 p.Size = Vector3.new(0.2, 0.2, 0.2)
22
 p.Anchored = true
23
 p.CanCollide = false
24
 p.Material = "Neon"
25
 p.Position = game.Players.LocalPlayer.Character.Torso.Position
26
 table.insert(Parts, p)
27
end
28
for i = 1, 100 do
29
 local p = Instance.new("Part", game.Players.LocalPlayer.Character.Torso)
30
 p.Size = Vector3.new(0.2, 0.2, 0.2)
31
 p.Anchored = true
32
 p.CanCollide = false
33
 p.Material = "Neon"
34
 p.Position = game.Players.LocalPlayer.Character.Torso.Position
35
 table.insert(Parts2, p)
36
end
37
local sound = Instance.new("Sound", game.Players.LocalPlayer.Character.Torso)
38
sound.SoundId = "rbxassetid://574539049"
39
sound.Volume = 1
40
sound:Play()
41
spawn(function()
42
 local SelectedPart = 0
43
 while true do
44
   if Direction == 1 then
45
     if SelectedPart < #Parts then
46
       SelectedPart = SelectedPart + Direction
47
     else
48
       Direction = -1
49
       TColor = BrickColor.Random()
50
     end
51
   elseif Direction == -1 then
52
     if SelectedPart > 1 then
53
       SelectedPart = SelectedPart + Direction
54
     else
55
       Direction = 1
56
       TColor = BrickColor.Random()
57
     end
58
   end
59
   local sel = Parts[SelectedPart]
60
   local sel2 = Parts2[SelectedPart]
61
   sel.BrickColor = BrickColor.Random()
62
   sel2.BrickColor = BrickColor.Random()
63
   loudness = sound.PlaybackLoudness / 500
64
   sel.Size = Vector3.new(loudness, loudness, 0.2)
65
   sel2.Size = Vector3.new(loudness, loudness, 0.2)
66
   wait()
67
   sel.BrickColor = TColor
68
   sel2.BrickColor = TColor
69
 end
70
end)
71
game:GetService("RunService").RenderStepped:connect(function()
72
 for i = 1, #Parts do
73
   if i == 1 then
74
     Parts[i].CFrame = Parts[i].CFrame:lerp(game.Players.LocalPlayer.Character.Torso.CFrame, 0.9)
75
   else
76
     Parts[i].CFrame = Parts[i].CFrame:lerp(Parts[i - 1].CFrame * CFrame.Angles(-loudness / 20, math.sin(-loudness / 50), 0) * CFrame.new(0, 0, 0.15), 0.8)
77
   end
78
 end
79
 for i = 1, #Parts2 do
80
   if i == 1 then
81
     Parts2[i].CFrame = Parts2[i].CFrame:lerp(game.Players.LocalPlayer.Character.Torso.CFrame, 0.9)
82
   else
83
     Parts2[i].CFrame = Parts2[i].CFrame:lerp(Parts2[i - 1].CFrame * CFrame.Angles(-loudness / 20, math.sin(loudness / 50), 0) * CFrame.new(0, 0, 0.15), 0.8)
84
   end
85
 end
86
end)
87
88
-- visualizer gui
89
90
local visualizergui = Instance.new("ScreenGui")
91
local Frame = Instance.new("Frame")
92
local idvalue = Instance.new("TextBox")
93
local play = Instance.new("TextButton")
94
local volume = Instance.new("TextBox")
95
local pitch = Instance.new("TextBox")
96
local close = Instance.new("TextButton")
97
local min = Instance.new("TextButton")
98
local credits = Instance.new("TextLabel")
99
local open = Instance.new("TextButton")
100
local set2 = Instance.new("TextButton")
101
local set1 = Instance.new("TextButton")
102
local loop = Instance.new("TextButton")
103
104
--properties xd
105
visualizergui.Name = "visualizergui"
106
visualizergui.Parent = game.Players.LocalPlayer.PlayerGui
107
108
Frame.Parent = visualizergui
109
Frame.BackgroundColor3 = Color3.new(0.701961, 0.952941, 1)
110
Frame.BackgroundTransparency = 0.20000000298023
111
Frame.BorderColor3 = Color3.new(0.211765, 0.329412, 0.415686)
112
Frame.BorderSizePixel = 8
113
Frame.Position = UDim2.new(0, 51, 0, 213)
114
Frame.Size = UDim2.new(0, 418, 0, 213)
115
Frame.Active = true
116
Frame.Draggable = true
117
Frame.Visible = false
118
119
idvalue.Name = "idvalue"
120
idvalue.Parent = Frame
121
idvalue.BackgroundColor3 = Color3.new(0.666667, 1, 1)
122
idvalue.BackgroundTransparency = 0.5
123
idvalue.Size = UDim2.new(0, 418, 0, 50)
124
idvalue.Font = Enum.Font.Fantasy
125
idvalue.FontSize = Enum.FontSize.Size24
126
idvalue.Text = "Put ID plz"
127
idvalue.TextSize = 24
128
129
play.Name = "play"
130
play.Parent = Frame
131
play.BackgroundColor3 = Color3.new(0.666667, 1, 1)
132
play.BackgroundTransparency = 0.44999998807907
133
play.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
134
play.BorderSizePixel = 3
135
play.Position = UDim2.new(0, 9, 0, 82)
136
play.Size = UDim2.new(0, 117, 0, 50)
137
play.Font = Enum.Font.SourceSans
138
play.FontSize = Enum.FontSize.Size28
139
play.Text = "Play"
140
play.TextSize = 28
141
142
volume.Name = "volume"
143
volume.Parent = Frame
144
volume.BackgroundColor3 = Color3.new(0.666667, 1, 1)
145
volume.BackgroundTransparency = 0.44999998807907
146
volume.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
147
volume.BorderSizePixel = 3
148
volume.Position = UDim2.new(0, 151, 0, 82)
149
volume.Size = UDim2.new(0, 117, 0, 50)
150
volume.Font = Enum.Font.SourceSans
151
volume.FontSize = Enum.FontSize.Size28
152
volume.Text = "Volume"
153
volume.TextSize = 28
154
155
pitch.Name = "pitch"
156
pitch.Parent = Frame
157
pitch.BackgroundColor3 = Color3.new(0.666667, 1, 1)
158
pitch.BackgroundTransparency = 0.44999998807907
159
pitch.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
160
pitch.BorderSizePixel = 3
161
pitch.Position = UDim2.new(0, 291, 0, 82)
162
pitch.Size = UDim2.new(0, 117, 0, 50)
163
pitch.Font = Enum.Font.SourceSans
164
pitch.FontSize = Enum.FontSize.Size28
165
pitch.Text = "Pitch"
166
pitch.TextSize = 28
167
168
close.Name = "close"
169
close.Parent = Frame
170
close.BackgroundColor3 = Color3.new(1, 0, 0.0156863)
171
close.BackgroundTransparency = 0.40000000596046
172
close.Position = UDim2.new(0, 393, 0, 190)
173
close.Size = UDim2.new(0, 25, 0, 23)
174
close.Font = Enum.Font.SourceSans
175
close.FontSize = Enum.FontSize.Size28
176
close.Text = "X"
177
close.TextSize = 28
178
179
min.Name = "min"
180
min.Parent = Frame
181
min.BackgroundColor3 = Color3.new(0.286275, 0.286275, 1)
182
min.BackgroundTransparency = 0.40000000596046
183
min.Position = UDim2.new(0, 357, 0, 190)
184
min.Size = UDim2.new(0, 25, 0, 23)
185
min.Font = Enum.Font.SourceSans
186
min.FontSize = Enum.FontSize.Size36
187
min.Text = "-"
188
min.TextSize = 36
189
190
credits.Name = "credits"
191
credits.Parent = Frame
192
credits.BackgroundColor3 = Color3.new(1, 1, 1)
193
credits.BackgroundTransparency = 1
194
credits.Position = UDim2.new(0, 0, 0, 161)
195
credits.Size = UDim2.new(0, 200, 0, 52)
196
credits.Font = Enum.Font.SourceSans
197
credits.FontSize = Enum.FontSize.Size14
198
credits.Text = "credits to mr steal yo bork for gui, i didn't make the visualizer credits to whoever leaked it or made it."
199
credits.TextSize = 14
200
credits.TextWrapped = true
201
202
open.Name = "open"
203
open.Parent = visualizergui
204
open.BackgroundColor3 = Color3.new(0.666667, 1, 1)
205
open.BackgroundTransparency = 0.44999998807907
206
open.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
207
open.BorderSizePixel = 3
208
open.Position = UDim2.new(0, 0, 0, 400)
209
open.Size = UDim2.new(0, 59, 0, 50)
210
open.Font = Enum.Font.SourceSans
211
open.FontSize = Enum.FontSize.Size28
212
open.Text = "Open"
213
open.TextSize = 28
214
open.Visible = false
215
216
set2.Name = "set2"
217
set2.Parent = Frame
218
set2.BackgroundColor3 = Color3.new(0.666667, 1, 1)
219
set2.BackgroundTransparency = 0.44999998807907
220
set2.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
221
set2.BorderSizePixel = 3
222
set2.Position = UDim2.new(0, 325, 0, 136)
223
set2.Size = UDim2.new(0, 55, 0, 25)
224
set2.Font = Enum.Font.SourceSans
225
set2.FontSize = Enum.FontSize.Size24
226
set2.Text = "Set"
227
set2.TextSize = 24
228
set2.TextWrapped = true
229
230
set1.Name = "set1"
231
set1.Parent = Frame
232
set1.BackgroundColor3 = Color3.new(0.666667, 1, 1)
233
set1.BackgroundTransparency = 0.44999998807907
234
set1.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
235
set1.BorderSizePixel = 3
236
set1.Position = UDim2.new(0, 181, 0, 136)
237
set1.Size = UDim2.new(0, 55, 0, 25)
238
set1.Font = Enum.Font.SourceSans
239
set1.FontSize = Enum.FontSize.Size24
240
set1.Text = "Set"
241
set1.TextSize = 24
242
set1.TextWrapped = true
243
244
loop.Name = "loop"
245
loop.Parent = Frame
246
loop.BackgroundColor3 = Color3.new(0.666667, 1, 1)
247
loop.BackgroundTransparency = 0.44999998807907
248
loop.BorderColor3 = Color3.new(0.207843, 0.0901961, 0.0705882)
249
loop.BorderSizePixel = 3
250
loop.Position = UDim2.new(0, 241, 0, 188)
251
loop.Size = UDim2.new(0, 84, 0, 25)
252
loop.Font = Enum.Font.SourceSans
253
loop.FontSize = Enum.FontSize.Size18
254
loop.Text = "Loop : OFF"
255
loop.TextSize = 18
256
loop.TextWrapped = true
257
258
-- functions
259
function start()
260
wait(0.5)
261
Frame.Position = UDim2.new(0, -500, 0, 400)
262
Frame.Visible = true
263
Frame:TweenPosition(UDim2.new(0, 0, 0, 400),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,1)
264
end
265
266
if game.Players.LocalPlayer.Character then
267
start()
268
else 
269
print'character not found plz try again XD'
270
end
271
272
function minimize()
273
Frame:TweenPosition(UDim2.new(0, 0, 0, 400),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,1)
274
credits.Text = ""
275
min.Text = ""
276
close.Text = ""
277
play.Text = ""
278
pitch.Text = ""
279
volume.Text = ""
280
idvalue.Text = ""
281
set1.Text = ""
282
set2.Text = ""
283
loop.Text = ""
284
Frame:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
285
credits:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
286
min:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
287
close:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
288
idvalue:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
289
volume:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
290
play:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
291
pitch:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
292
loop:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
293
set1:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
294
set2:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
295
Frame:TweenPosition(UDim2.new(0, 0, 0, 400),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
296
   wait(0.5)
297
Frame.Visible = false
298
open.Visible = true
299
end
300
301
function show()
302
open.Visible = false
303
Frame.Position = UDim2.new(0, -500, 0, 400)
304
Frame.Visible = true
305
credits.Text = "credits to me for gui, i didn't make the visualizer credits to whoever leaked it or made it."
306
min.Text = "-"
307
close.Text = "X"
308
play.Text = "Play"
309
pitch.Text = "Pitch"
310
volume.Text = "Volume"
311
idvalue.Text = "Put ID plz"
312
set1.Text = "Set"
313
set2.Text = "Set" 
314
loop.Text = "Loop : OFF"
315
Frame:TweenSize(UDim2.new(0, 418, 0, 213),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
316
credits:TweenSize(UDim2.new(0, 200, 0, 52),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
317
min:TweenSize(UDim2.new(0, 25, 0, 23),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
318
close:TweenSize(UDim2.new(0, 25, 0, 23),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
319
idvalue:TweenSize(UDim2.new(0, 418, 0, 50),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
320
volume:TweenSize(UDim2.new(0, 117, 0, 50),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
321
play:TweenSize(UDim2.new(0, 117, 0, 50),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
322
pitch:TweenSize(UDim2.new(0, 117, 0, 50),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
323
set1:TweenSize(UDim2.new(0, 55, 0, 25),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
324
loop:TweenSize(UDim2.new(0, 84, 0, 25),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
325
set2:TweenSize(UDim2.new(0, 55, 0, 25),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
326
Frame:TweenPosition(UDim2.new(0, 0, 0, 400),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint, 0.5)
327
end
328
329
function exitdatshit()
330
Frame:TweenPosition(UDim2.new(0, 0, 0, 400),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,1)
331
credits.Text = ""
332
min.Text = ""
333
close.Text = ""
334
play.Text = ""
335
pitch.Text = ""
336
volume.Text = ""
337
idvalue.Text = ""
338
Frame:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
339
credits:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
340
min:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
341
close:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
342
idvalue:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
343
volume:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
344
play:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
345
pitch:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
346
set1:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
347
set2:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
348
loop:TweenSize(UDim2.new(0, 0, 0, 0),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
349
Frame:TweenPosition(UDim2.new(0, 0, 0, 400),Enum.EasingDirection.InOut,Enum.EasingStyle.Quint,0.5)
350
wait(0.5)
351
   visualizergui:Destroy()
352
end
353
354
-- events
355
wait(1)
356
min.MouseButton1Down:connect(function()
357
minimize()
358
end)
359
360
open.MouseButton1Down:connect(function()
361
show()
362
end)
363
364
close.MouseButton1Down:connect(function()
365
exitdatshit()
366
end)
367
368
set1.MouseButton1Down:connect(function()
369
sound.Volume = volume.Text
370
end)
371
372
set2.MouseButton1Down:connect(function()
373
sound.Pitch = pitch.Text
374
end)
375
376
play.MouseButton1Down:connect(function()
377
sound.TimePosition = 0
378
sound.SoundId = "rbxassetid://" .. idvalue.Text
379
end)
380
381
loop.MouseButton1Down:connect(function()
382
if loop.Text == "Loop : OFF" then
383
sound.Looped = true
384
loop.Text = "Loop : ON"
385
else
386
sound.Looped = false
387
loop.Text = "Loop : OFF"
388
end
389
end)