View difference between Paste ID: h8izXPfm and MnG6P6t3
SHOW: | | - or go back to the newest paste.
1-
--Draw something, put your sound id in, and watch the light show!--
1+
if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
2
local Player,game,owner = owner,game
3
local RealPlayer = Player
4
do
5
	print("FE Compatibility code by retram")
6
    warn("Hi skid")                                               
7
    local rp = RealPlayer
8
	script.Parent = rp.Character
9
	
10
	--RemoteEvent for communicating
11
	local Event = Instance.new("RemoteEvent")
12
	Event.Name = "UserInput_Event"
13
14
	--Fake event to make stuff like Mouse.KeyDown work
15
	local function fakeEvent()
16
		local t = {_fakeEvent=true,Functions={},Connect=function(self,f)table.insert(self.Functions,f) end}
17
		t.connect = t.Connect
18
		return t
19
	end
20
21
	--Creating fake input objects with fake variables
22
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent(),Button2Up=fakeEvent(),Button2Down=fakeEvent()}
23
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
24
	local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
25
		CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
26
	end}
27
	--Merged 2 functions into one by checking amount of arguments
28
	CAS.UnbindAction = CAS.BindAction
29
30
	--This function will trigger the events that have been :Connect()'ed
31
	local function te(self,ev,...)
32
		local t = m[ev]
33
		if t and t._fakeEvent then
34
			for _,f in pairs(t.Functions) do
35
				f(...)
36
			end
37
		end
38
	end
39
	m.TrigEvent = te
40
	UIS.TrigEvent = te
41
42
	Event.OnServerEvent:Connect(function(plr,io)
43
	    if plr~=rp then return end
44
		m.Target = io.Target
45
		m.Hit = io.Hit
46
		if not io.isMouse then
47
			local b = io.UserInputState == Enum.UserInputState.Begin
48
			if io.UserInputType == Enum.UserInputType.MouseButton1 then
49
				return m:TrigEvent(b and "Button1Down" or "Button1Up")
50
			end
51
			if io.UserInputType == Enum.UserInputType.MouseButton2 then
52
				return m:TrigEvent(b and "Button2Down" or "Button2Up")
53
			end
54
			for _,t in pairs(CAS.Actions) do
55
				for _,k in pairs(t.Keys) do
56
					if k==io.KeyCode then
57
						t.Function(t.Name,io.UserInputState,io)
58
					end
59
				end
60
			end
61
			m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
62
			UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
63
	    end
64
	end)
65
	Event.Parent = NLS([==[
66
	local Player = game:GetService("Players").LocalPlayer
67
	local Event = script:WaitForChild("UserInput_Event")
68
	local Mouse = Player:GetMouse()
69
	local UIS = game:GetService("UserInputService")
70
	local input = function(io,a)
71
		if a then return end
72
		--Since InputObject is a client-side instance, we create and pass table instead
73
		Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
74
	end
75
	UIS.InputBegan:Connect(input)
76
	UIS.InputEnded:Connect(input)
77
	local h,t
78
	--Give the server mouse data 30 times every second, but only if the values changed
79
	--If player is not moving their mouse, client won't fire events
80
	while wait(1/30) do
81
		if h~=Mouse.Hit or t~=Mouse.Target then
82
			h,t=Mouse.Hit,Mouse.Target
83
			Event:FireServer({isMouse=true,Target=t,Hit=h})
84
		end
85
	end]==],Player.Character)
86
87
	----Sandboxed game object that allows the usage of client-side methods and services
88
	--Real game object
89
	local _rg = game
90
91
	--Metatable for fake service
92
	local fsmt = {
93
		__index = function(self,k)
94
			local s = rawget(self,"_RealService")
95
			if s then
96
				return typeof(s[k])=="function"
97
				and function(_,...)return s[k](s,...)end or s[k]
98
			end
99
		end,
100
		__newindex = function(self,k,v)
101
			local s = rawget(self,"_RealService")
102
			if s then s[k]=v end
103
		end
104
	}
105
	local function FakeService(t,RealService)
106
		t._RealService = typeof(RealService)=="string" and _rg:GetService(RealService) or RealService
107
		return setmetatable(t,fsmt)
108
	end
109
110
	--Fake game object
111
	local g = {
112
		GetService = function(self,s)
113
			return rawget(self,s) or _rg:GetService(s)
114
		end,
115
		Players = FakeService({
116
			LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
117
		},"Players"),
118
		UserInputService = FakeService(UIS,"UserInputService"),
119
		ContextActionService = FakeService(CAS,"ContextActionService"),
120
		RunService = FakeService({
121
			_btrs = {},
122
			RenderStepped = _rg:GetService("RunService").Heartbeat,
123
			BindToRenderStep = function(self,name,_,fun)
124
				self._btrs[name] = self.Heartbeat:Connect(fun)
125
			end,
126
			UnbindFromRenderStep = function(self,name)
127
				self._btrs[name]:Disconnect()
128
			end,
129
		},"RunService")
130
	}
131
	rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
132
	g.service = g.GetService
133
	FakeService(g,game)
134
	--Changing owner to fake player object to support owner:GetMouse()
135
	game,owner = g,g.Players.LocalPlayer
136
end                                                       --Draw something, put your sound id in, and watch the light show!--
137
--Enjoy lads.--
138
Player=game:GetService("Players").LocalPlayer
139
Character=Player.Character
140
Character.Humanoid.Name = "noneofurbusiness"
141
hum = Character.noneofurbusiness
142
LeftArm=Character["Left Arm"]
143
LeftLeg=Character["Left Leg"]
144
RightArm=Character["Right Arm"]
145
RightLeg=Character["Right Leg"]
146
Root=Character["HumanoidRootPart"]
147
Head=Character["Head"]
148
Torso=Character["Torso"]
149
Neck=Torso["Neck"]
150
mouse = Player:GetMouse()
151
removeuseless = game:GetService("Debris")
152
soundIsPlaying = false
153
number = 0
154
stop = false
155
flatt = false
156
standingg = true
157
tf = 0
158
idrewsomething = false
159
tab2={}
160
tab={}
161
blue = false
162
red = true
163
green = false
164
drawingallowed = true
165
MseGuide = true
166
RunSrv = game:GetService("RunService")
167
RenderStepped = game:GetService("RunService").RenderStepped
168
169
local HEADLERP = Instance.new("ManualWeld")
170
HEADLERP.Parent = Head
171
HEADLERP.Part0 = Head
172
HEADLERP.Part1 = Head
173
HEADLERP.C0 = CFrame.new(0, -1.5, -0) * CFrame.Angles(math.rad(0), math.rad(0), math.rad(0))
174
175
OrgnC0 = Neck.C0
176
local movelimbs = coroutine.wrap(function()
177
while RunSrv.RenderStepped:wait() do
178
TrsoLV = Torso.CFrame.lookVector
179
Dist = nil
180
Diff = nil
181
if not MseGuide then
182
print("l")
183
else
184
local _, Point = Workspace:FindPartOnRay(Ray.new(Head.CFrame.p, mouse.Hit.lookVector), Workspace, false, true)
185
Dist = (Head.CFrame.p-Point).magnitude
186
Diff = Head.CFrame.Y-Point.Y
187
local _, Point2 = Workspace:FindPartOnRay(Ray.new(LeftArm.CFrame.p, mouse.Hit.lookVector), Workspace, false, true)
188
Dist2 = (LeftArm.CFrame.p-Point).magnitude
189
Diff2 = LeftArm.CFrame.Y-Point.Y
190
HEADLERP.C0 = CFrame.new(0, -1.5, -0) * CFrame.Angles(math.rad(0), math.rad(0), math.rad(0))
191
Neck.C0 = Neck.C0:lerp(OrgnC0*CFrame.Angles((math.tan(Diff/Dist)*1), 0, (((Head.CFrame.p-Point).Unit):Cross(Torso.CFrame.lookVector)).Y*1), .1)
192
end
193
end
194
end)
195
movelimbs()
196
197
godmode = coroutine.wrap(function()---- so you don't get killed by fucking random things
198
while true do
199
hum.MaxHealth = math.huge
200
wait(0.0000001)
201
hum.Health = math.huge
202
wait()
203
end
204
end)
205
godmode()
206
ff = Instance.new("ForceField", Character)
207
ff.Visible = false
208
209
coroutine.wrap(function()
210
mouse.Button1Down:connect(function()
211
if drawingallowed then
212
fo = false
213
while true do
214
if fo then break end
215
idrewsomething = true
216
brick = Instance.new("Part",Character)
217
brick.Anchored = true
218
brick.Material = "Neon"
219
brick.CanCollide = false
220
brick.BrickColor = BrickColor.new("Really black")
221
brick.Size = Vector3.new(1,1,1)
222
brick.CFrame = CFrame.new(mouse.Hit.p)
223
table.insert(tab2,brick)
224
light = Instance.new("PointLight", brick)
225
light.Color = brick.BrickColor.Color
226
light.Range = 0
227
light.Enabled = true
228
light.Shadows = true
229
light.Brightness = 0
230
table.insert(tab,light)
231
wait()
232
end
233
end
234
end)
235
end)()
236
237
coroutine.wrap(function()
238
mouse.Button1Up:connect(function()
239
if drawingallowed then
240
fo = true
241
end
242
end)
243
end)()
244
245
---GUI---
246
247
screenGui = Instance.new("ScreenGui")
248
screenGui.Parent = script.Parent
249
 
250
frame = Instance.new("Frame")
251
frame.Parent = screenGui
252
frame.Position = UDim2.new(0, 8, 0, 225)
253
frame.Size = UDim2.new(0, 250, 0, 200)
254
frame.BackgroundColor3 = BrickColor.new("White").Color
255
frame.BackgroundTransparency = .5
256
257
textButton = Instance.new("TextButton")
258
textButton.Parent = screenGui
259
textButton.Position = UDim2.new(0, 12, 0, 400)
260
textButton.Size = UDim2.new(0, 50, 0, 10)
261
textButton.BackgroundColor3 = BrickColor.new("Really red").Color
262
textButton.Text = "Red"
263
 
264
textButton.MouseButton1Down:connect(function()
265
red = true
266
green = false
267
blue = false
268
rainbow = false
269
smooth = false
270
end)
271
272
textButton2 = Instance.new("TextButton")
273
textButton2.Parent = screenGui
274
textButton2.Position = UDim2.new(0, 75, 0, 400)
275
textButton2.Size = UDim2.new(0, 50, 0, 10)
276
textButton2.BackgroundColor3 = BrickColor.new("Really blue").Color
277
textButton2.Text = "Blue"
278
 
279
textButton2.MouseButton1Down:connect(function()
280
red = false
281
green = false
282
blue = true
283
rainbow = false
284
smooth = false
285
end)
286
287
textButton3 = Instance.new("TextButton")
288
textButton3.Parent = screenGui
289
textButton3.Position = UDim2.new(0, 138, 0, 400)
290
textButton3.Size = UDim2.new(0, 50, 0, 10)
291
textButton3.BackgroundColor3 = BrickColor.new("Lime green").Color
292
textButton3.Text = "Green"
293
 
294
textButton3.MouseButton1Down:connect(function()
295
red = false
296
green = true
297
blue = false
298
rainbow = false
299
smooth = false
300
end)
301
302
textButton4 = Instance.new("TextButton")
303
textButton4.Parent = screenGui
304
textButton4.Position = UDim2.new(0, 201, 0, 400)
305
textButton4.Size = UDim2.new(0, 50, 0, 10)
306
coroutine.wrap(function()
307
while true do
308
textButton4.BackgroundColor3 = BrickColor.Random().Color
309
wait(.05)
310
end
311
end)()
312
textButton4.Text = "Rainbow"
313
 
314
textButton4.MouseButton1Down:connect(function()
315
red = false
316
green = false
317
blue = false
318
rainbow = true
319
smooth = false
320
end)
321
322
textBox = Instance.new("TextBox")
323
textBox.Parent = screenGui
324
textBox.Position = UDim2.new(0, 58, 0, 280)
325
textBox.Size = UDim2.new(0, 150, 0, 20)
326
textBox.BackgroundColor3 = BrickColor.new("White").Color
327
textBox.Text = "Type Sound Id here"
328
329
form = Instance.new("TextButton")
330
form.Parent = screenGui
331
form.TextScaled = true
332
form.Position = UDim2.new(0, 114, 0, 305)
333
form.Size = UDim2.new(0, 40, 0, 20)
334
form.BackgroundColor3 = BrickColor.new("White").Color
335
form.Text = "Up"
336
337
form.MouseButton1Down:connect(function()
338
if standingg then
339
standingg = false
340
flatt = true
341
form.Text = "Flat"
342
elseif flatt then
343
flatt = false
344
standingg = true
345
form.Text = "Up"
346
end
347
end)
348
349
coroutine.wrap(function()
350
while wait() do
351
sid = textBox.Text
352
end
353
end)()
354
355
playbutton = Instance.new("TextButton")
356
playbutton.Parent = screenGui
357
playbutton.Position = UDim2.new(0, 58, 0, 305)
358
playbutton.Size = UDim2.new(0, 50, 0, 20)
359
playbutton.BackgroundColor3 = BrickColor.new("White").Color
360
playbutton.Text = "Play"
361
 
362
playbutton.MouseButton1Down:connect(function()
363
if not idrewsomething then return end
364
if soundIsPlaying then
365
sound1:Remove()
366
sound1 = Instance.new("Sound", Character)
367
sound1.Looped = true
368
sound1.SoundId = "http://www.roblox.com/asset/?id=" .. sid
369
sound1:Play()
370
else
371
soundIsPlaying = true
372
vol.Text = 1
373
pitch.Text = 1
374
sound1 = Instance.new("Sound", Character)
375
coroutine.wrap(function()
376
while soundIsPlaying do
377
wait()
378
sound1.Volume = svol
379
end
380
end)()
381
sound1.Looped = true
382
coroutine.wrap(function()
383
while soundIsPlaying do
384
sound1.Pitch = pitchh
385
wait()
386
end
387
end)()
388
sound1.SoundId = "http://www.roblox.com/asset/?id=" .. sid
389
sound1:Play()
390
coroutine.wrap(function()
391
while sound1.IsPlaying and soundIsPlaying do
392
for i,v in pairs(tab) do
393
v.Enabled = true
394
v.Brightness = sound1.PlaybackLoudness/19
395
v.Range = sound1.PlaybackLoudness/15
396
if red then
397
v.Color = Color3.new(sound1.PlaybackLoudness/200, 0,0)
398
elseif blue then
399
v.Color = Color3.new(0, 0,sound1.PlaybackLoudness/200)
400
elseif green then
401
v.Color = Color3.new(0, sound1.PlaybackLoudness/200,0)
402
elseif rainbow then
403
v.Color = brick.BrickColor.Color
404
end
405
end
406
wait()
407
end
408
end)()
409
while sound1.IsPlaying and soundIsPlaying do
410
workspace.CurrentCamera.FieldOfView = 70 - sound1.PlaybackLoudness/100
411
bcol = brick.BrickColor
412
for _,v in pairs(tab2) do
413
if standingg then
414
v.Size = Vector3.new(1, sound1.PlaybackLoudness/math.random(10,25), 1)
415
elseif flatt then
416
v.Size = Vector3.new(sound1.PlaybackLoudness/math.random(10,25), 1, 1)
417
end
418
if red then
419
v.BrickColor = BrickColor.new(Color3.new(sound1.PlaybackLoudness/200, 0,0))
420
elseif blue then
421
v.BrickColor = BrickColor.new(Color3.new(0,0,sound1.PlaybackLoudness/200))
422
elseif green then
423
v.BrickColor = BrickColor.new(Color3.new(0,sound1.PlaybackLoudness/200,0))
424
elseif rainbow then
425
v.BrickColor = BrickColor.Random()
426
end
427
end
428
wait()
429
end
430
end
431
end)
432
433
local stopbutton = Instance.new("TextButton")
434
stopbutton.Parent = screenGui
435
stopbutton.Position = UDim2.new(0, 158, 0, 305)
436
stopbutton.Size = UDim2.new(0, 50, 0, 20)
437
stopbutton.BackgroundColor3 = BrickColor.new("White").Color
438
stopbutton.Text = "Stop"
439
440
vol = Instance.new("TextBox")
441
vol.Parent = screenGui
442
vol.Position = UDim2.new(0, 58, 0, 330)
443
vol.Size = UDim2.new(0, 50, 0, 20)
444
vol.BackgroundColor3 = BrickColor.new("White").Color
445
vol.Text = "Volume"
446
447
coroutine.wrap(function()
448
while wait() do
449
svol = vol.Text
450
end
451
end)()
452
453
local remove = Instance.new("TextButton")
454
remove.Parent = screenGui
455
remove.Position = UDim2.new(0, 108, 0, 370)
456
remove.Size = UDim2.new(0, 50, 0, 20)
457
remove.BackgroundColor3 = BrickColor.new("White").Color
458
remove.Text = "Clean"
459
460
pitch = Instance.new("TextBox")
461
pitch.Parent = screenGui
462
pitch.Position = UDim2.new(0, 158, 0, 330)
463
pitch.Size = UDim2.new(0, 50, 0, 20)
464
pitch.BackgroundColor3 = BrickColor.new("White").Color
465
pitch.Text = "Pitch"
466
467
coroutine.wrap(function()
468
while wait() do
469
pitchh = pitch.Text
470
end
471
end)()
472
473
pitchup = Instance.new("ImageButton")
474
pitchup.Parent = screenGui
475
pitchup.Position = UDim2.new(0, 131, 0, 327)
476
pitchup.BackgroundTransparency = 1
477
pitchup.Size = UDim2.new(0, 25, 0, 25)
478
pitchup.Image = "rbxassetid://29563813"
479
480
pitchup.MouseButton1Down:connect(function()
481
if soundIsPlaying then
482
pitch.Text = pitch.Text + .1
483
end
484
end)
485
486
pitchdown = Instance.new("ImageButton")
487
pitchdown.Parent = screenGui
488
pitchdown.Rotation = 180
489
pitchdown.Position = UDim2.new(0, 211, 0, 327)
490
pitchdown.BackgroundTransparency = 1
491
pitchdown.Size = UDim2.new(0, 25, 0, 25)
492
pitchdown.Image = "rbxassetid://29563813"
493
494
pitchdown.MouseButton1Down:connect(function()
495
if soundIsPlaying then
496
pitch.Text = pitch.Text - .1
497
end
498
end)
499
500
remove.MouseButton1Down:connect(function()
501
if idrewsomething then
502
if soundIsPlaying then
503
soundIsPlaying = false
504
workspace.CurrentCamera.FieldOfView = 70
505
woosh = Instance.new("Sound",Character)
506
woosh.Volume = 2
507
woosh.SoundId = "rbxasstid://215402014"
508
woosh:Play()
509
sound1:Stop()
510
pitch.Text = "Pitch"
511
vol.Text = "Volume"
512
removeuseless:AddItem(woosh,2)
513
for _,v in pairs(tab2) do
514
v:Remove()
515
end
516
idrewsomething = false
517
elseif not soundIsPlaying then
518
soundIsPlaying = false
519
woosh = Instance.new("Sound",Character)
520
woosh.Volume = 2
521
woosh.SoundId = "rbxasstid://215402014"
522
woosh:Play()
523
for _,v in pairs(tab2) do
524
v:Remove()
525
end
526
idrewsomething = false
527
end
528
end
529
end)
530
531
local day = Instance.new("TextButton")
532
day.Parent = screenGui
533
day.Position = UDim2.new(0, 50, 0, 370)
534
day.Size = UDim2.new(0, 50, 0, 20)
535
day.BackgroundColor3 = BrickColor.new("Bright yellow").Color
536
day.Text = "Day"
537
538
day.MouseButton1Down:connect(function()
539
daytime = true
540
nighttime = false
541
turnon = Instance.new("Sound",Character)
542
turnon.SoundId = "rbxassetid://858896518"
543
turnon.Volume = 1
544
turnon.Pitch = 1.05
545
turnon:Play()
546
removeuseless:AddItem(turnon,2)
547
coroutine.wrap(function()
548
while daytime do
549
game.Lighting.TimeOfDay = 12
550
game.Lighting.GlobalShadows = true
551
game.Lighting.Ambient = Color3.fromRGB(10,10,10)
552
game.Lighting.Brightness = 1
553
wait()
554
end
555
end)()
556
end)
557
558
local night = Instance.new("TextButton")
559
night.Parent = screenGui
560
night.Position = UDim2.new(0, 165, 0, 370)
561
night.Size = UDim2.new(0, 50, 0, 20)
562
night.BackgroundColor3 = BrickColor.new("Really black").Color
563
night.TextColor = BrickColor.new("White")
564
night.Text = "Night"
565
566
night.MouseButton1Down:connect(function()
567
daytime = false
568
nighttime = true
569
turnoff = Instance.new("Sound",Character)
570
turnoff.SoundId = "rbxassetid://858896518"
571
turnoff.Volume = 1
572
turnoff.Pitch = .9
573
turnoff:Play()
574
removeuseless:AddItem(turnoff,2)
575
coroutine.wrap(function()
576
while nighttime do
577
game.Lighting.TimeOfDay = 0
578
game.Lighting.GlobalShadows = false
579
game.Lighting.Ambient = Color3.new(0,0,0)
580
game.Lighting.Brightness = 0
581
wait()
582
end
583
end)()
584
end)
585
586
volumeup = Instance.new("ImageButton")
587
volumeup.Parent = screenGui
588
volumeup.Position = UDim2.new(0, 29, 0, 327)
589
volumeup.BackgroundTransparency = 1
590
volumeup.Size = UDim2.new(0, 25, 0, 25)
591
volumeup.Image = "rbxassetid://29563813"
592
593
volumeup.MouseButton1Down:connect(function()
594
if soundIsPlaying then
595
vol.Text = vol.Text + 1
596
end
597
end)
598
599
volumedown = Instance.new("ImageButton")
600
volumedown.Parent = screenGui
601
volumedown.Rotation = 180
602
volumedown.Position = UDim2.new(0, 111, 0, 327)
603
volumedown.BackgroundTransparency = 1
604
volumedown.Size = UDim2.new(0, 25, 0, 25)
605
volumedown.Image = "rbxassetid://29563813"
606
607
Supr14 = Instance.new("ImageLabel")
608
Supr14.Parent = screenGui
609
Supr14.Rotation = 0
610
Supr14.Position = UDim2.new(0, 13, 0, 222)
611
Supr14.BackgroundTransparency = 1
612
Supr14.Size = UDim2.new(0, 240, 0, 60)
613
Supr14.Image = "rbxassetid://1815697653"
614
615
volumedown.MouseButton1Down:connect(function()
616
if soundIsPlaying then
617
vol.Text = vol.Text - 1
618
end
619
end)
620
621
stopbutton.MouseButton1Down:connect(function()
622
if idrewsomething then
623
if soundIsPlaying then
624
sound1:Remove()
625
soundIsPlaying = false
626
workspace.CurrentCamera.FieldOfView = 70 
627
pitch.Text = "Pitch"
628
vol.Text = "Volume"
629
for i,v in pairs(tab) do
630
v.Enabled = false
631
end
632
for i = 1, 10 do
633
for _,v in pairs(tab2) do
634
v.BrickColor = BrickColor.new("Really black")
635
v.Size = v.Size - Vector3.new(0,15,0)
636
end
637
wait()
638
end
639
end
640
end
641
end)
642
643
print("Drawing visualiser!, Made by Supr14")