View difference between Paste ID: r6h9xCug and FFJZcSR8
SHOW: | | - or go back to the newest paste.
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
-- Objects
9
MIDI = Instance.new("ScreenGui")
10
Frame = Instance.new("Frame")
11
ID = Instance.new("TextBox")
12
Play = Instance.new("TextButton")
13
Dark = Instance.new("TextButton")
14
Bright = Instance.new("TextButton")
15
Stop = Instance.new("TextButton")
16
Hide = Instance.new("TextButton")
17
Set = Instance.new("TextButton")
18
BColor = Instance.new("TextBox")
19
Random = Instance.new("TextButton")
20
Material = Instance.new("TextBox")
21
Trans = Instance.new("TextBox")
22
sound = Instance.new("Sound",game.Players.LocalPlayer.Character.Torso)
23
sound.Volume = 4
24
sound.Looped = true
25
BVal = "Deep orange"
26
MVal = "Neon"
27
TVal = 0
28
Active = false
29
30
-- Properties
31
32
MIDI.Name = "MIDI"
33
MIDI.Parent = game.Players.LocalPlayer.PlayerGui
34
35
Frame.Parent = MIDI
36
Frame.Active = true
37
Frame.BackgroundColor3 = Color3.new(0, 0, 0)
38
Frame.BackgroundTransparency = 0.5799999833107
39
Frame.BorderSizePixel = 0
40
Frame.Draggable = true
41
Frame.Position = UDim2.new(0, 300, 0, 50)
42
Frame.Size = UDim2.new(0, 310, 0, 200)
43
44
ID.Name = "ID"
45
ID.Parent = Frame
46
ID.BackgroundColor3 = Color3.new(1, 1, 1)
47
ID.BorderSizePixel = 0
48
ID.Position = UDim2.new(0, 100, 0, 10)
49
ID.Size = UDim2.new(0, 120, 0, 30)
50
ID.Font = Enum.Font.Arcade
51
ID.FontSize = Enum.FontSize.Size18
52
ID.Text = "639837244"
53
ID.TextColor3 = Color3.new(0, 0, 0)
54
ID.TextSize = 18
55
56
Material.Name = "Material"
57
Material.Parent = Frame
58
Material.BackgroundColor3 = Color3.new(1, 1, 1)
59
Material.BorderSizePixel = 0
60
Material.Position = UDim2.new(0, 210, 0, 95)
61
Material.Size = UDim2.new(0, 90, 0, 15)
62
Material.Font = Enum.Font.Arcade
63
Material.FontSize = Enum.FontSize.Size14
64
Material.Text = "Neon"
65
Material.TextSize = 14
66
67
Trans.Name = "Trans"
68
Trans.Parent = Frame
69
Trans.BackgroundColor3 = Color3.new(1, 1, 1)
70
Trans.BorderSizePixel = 0
71
Trans.Position = UDim2.new(0, 210, 0, 75)
72
Trans.Size = UDim2.new(0, 90, 0, 15)
73
Trans.Font = Enum.Font.Arcade
74
Trans.FontSize = Enum.FontSize.Size14
75
Trans.Text = "Transparency"
76
Trans.TextSize = 14
77
78
Set.Name = "Set"
79
Set.Parent = Frame
80
Set.BackgroundColor3 = Color3.new(1, 1, 1)
81
Set.BorderSizePixel = 0
82
Set.Position = UDim2.new(0, 210, 0, 135)
83
Set.Size = UDim2.new(0, 90, 0, 15)
84
Set.Font = Enum.Font.Arcade
85
Set.FontSize = Enum.FontSize.Size14
86
Set.Text = "Set"
87
Set.TextSize = 14
88
Set.MouseButton1Down:connect(function()
89
	if Active == true then
90
		Active = false
91
	end
92
	BVal = tostring(BColor.Text)
93
	TVal = tonumber(Trans.Text)
94
	MVal = tostring(Material.Text)
95
end)
96
97
BColor.Name = "BColor"
98
BColor.Parent = Frame
99
BColor.BackgroundColor3 = Color3.new(1, 1, 1)
100
BColor.BorderSizePixel = 0
101
BColor.Position = UDim2.new(0, 210, 0, 115)
102
BColor.Size = UDim2.new(0, 90, 0, 15)
103
BColor.Font = Enum.Font.Arcade
104
BColor.FontSize = Enum.FontSize.Size14
105
BColor.Text = "Lime Green"
106
BColor.TextSize = 14
107
108
Random.Name = "Random"
109
Random.Parent = Frame
110
Random.BackgroundColor3 = Color3.new(1, 1, 1)
111
Random.BorderSizePixel = 0
112
Random.Position = UDim2.new(0, 10, 0, 80)
113
Random.Size = UDim2.new(0, 90, 0, 30)
114
Random.Font = Enum.Font.Arcade
115
Random.FontSize = Enum.FontSize.Size14
116
Random.Text = "Random"
117
Random.TextSize = 14
118
Random.MouseButton1Down:connect(function()
119
	if Active == false then
120
		Active = true
121
	end
122
end)
123
124
Play.Name = "Play"
125
Play.Parent = Frame
126
Play.BackgroundColor3 = Color3.new(1, 1, 1)
127
Play.BorderSizePixel = 0
128
Play.Position = UDim2.new(0, 10, 0, 160)
129
Play.Size = UDim2.new(0, 90, 0, 30)
130
Play.Font = Enum.Font.Arcade
131
Play.FontSize = Enum.FontSize.Size14
132
Play.Text = "Play"
133
Play.TextSize = 14
134
Play.MouseButton1Down:connect(function()
135
	sound.TimePosition = 0
136
	sound.Playing = true
137
	sound.SoundId = "rbxassetid://"..tonumber(ID.Text)
138
end)
139
140
Dark.Name = "Dark"
141
Dark.Parent = Frame
142
Dark.BackgroundColor3 = Color3.new(1, 1, 1)
143
Dark.BorderSizePixel = 0
144
Dark.Position = UDim2.new(0, 10, 0, 120)
145
Dark.Size = UDim2.new(0, 90, 0, 30)
146
Dark.Font = Enum.Font.Arcade
147
Dark.FontSize = Enum.FontSize.Size14
148
Dark.Text = "Dark"
149
Dark.TextSize = 14
150
Dark.MouseButton1Down:connect(function()
151
	game.Lighting.TimeOfDay = 0
152
	game.Lighting.GlobalShadows = false
153
	game.Lighting.Ambient = Color3.new(0,0,0)
154
	game.Lighting.Brightness = 0
155
end)
156
157
Bright.Name = "Bright"
158
Bright.Parent = Frame
159
Bright.BackgroundColor3 = Color3.new(1, 1, 1)
160
Bright.BorderSizePixel = 0
161
Bright.Position = UDim2.new(0, 110, 0, 120)
162
Bright.Size = UDim2.new(0, 90, 0, 30)
163
Bright.Font = Enum.Font.Arcade
164
Bright.FontSize = Enum.FontSize.Size14
165
Bright.Text = "Bright"
166
Bright.TextSize = 14
167
Bright.MouseButton1Down:connect(function()
168
	game.Lighting.TimeOfDay = 12
169
	game.Lighting.GlobalShadows = true
170
	game.Lighting.Ambient = Color3.fromRGB(10,10,10)
171
	game.Lighting.Brightness = 1
172
end)
173
174
Stop.Name = "Stop"
175
Stop.Parent = Frame
176
Stop.BackgroundColor3 = Color3.new(1, 1, 1)
177
Stop.BorderSizePixel = 0
178
Stop.Position = UDim2.new(0, 110, 0, 160)
179
Stop.Size = UDim2.new(0, 90, 0, 30)
180
Stop.Font = Enum.Font.Arcade
181
Stop.FontSize = Enum.FontSize.Size14
182
Stop.Text = "Stop"
183
Stop.TextSize = 14
184
Stop.MouseButton1Down:connect(function()
185
	sound.Playing = false
186
end)
187
188
Hide.Name = "Hide"
189
Hide.Parent = Frame
190
Hide.BackgroundColor3 = Color3.new(1, 1, 1)
191
Hide.BorderSizePixel = 0
192
Hide.Position = UDim2.new(0, 210, 0, 160)
193
Hide.Size = UDim2.new(0, 90, 0, 30)
194
Hide.Font = Enum.Font.Arcade
195
Hide.FontSize = Enum.FontSize.Size14
196
Hide.Text = "Clear"
197
Hide.TextSize = 14
198
Hide.MouseButton1Down:connect(function()
199
	for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
200
		if v.Name == "location" then
201
			v:Remove()
202
		end
203
	end
204
end)
205
206
--- Made By Pugz AKA (PugLover77) 
207
plyr = game.Players.LocalPlayer
208
c = plyr.Character
209
RunService = game:service'RunService'
210
mouse = game.Players.LocalPlayer:GetMouse()
211
local draw2 = false
212
local colorA = 1
213
local lastPos
214
 
215
tool = Instance.new("HopperBin", plyr.Backpack)
216
tool.Name = "Draw"
217
 
218
 
219
 
220
mouse = plyr:GetMouse()
221
 
222
 
223
               function draw(obj) -- 
224
    local lastPos = obj.CFrame.p
225
    coroutine.wrap(function()
226
        while wait() do
227
        if draw2 then
228
        while draw2 do
229
            wait()
230
            objC = obj:Clone()
231
             objC.Parent = c
232
            objC.Anchored = true
233
            local distance = (lastPos- obj.CFrame.p).magnitude
234
            objC.Size = Vector3.new(.1,.1,distance)
235
            objC.CFrame = CFrame.new(lastPos,obj.Position)*CFrame.new(0,0,-distance/2)
236
            lastPos = obj.CFrame.p
237
        end
238
        else
239
                break
240
        end
241
        end
242
    end)()
243
                end
244
 
245
tool.Selected:connect(function(mouse)
246
       
247
        mouse.Button1Down:connect(function(mouse)
248
	draw2 = true
249
                part = Instance.new("Part", c)
250
mesh = Instance.new("BlockMesh",part)
251
		Li = Instance.new("PointLight",part)
252
		Li.Range = 8
253
		Li.Color = part.Color
254
                part.Name = "location"
255
           
256
                part.BottomSurface = 0
257
                part.Material = MVal
258
                part.TopSurface = 0
259
                part.Size = Vector3.new()
260
                part.Transparency = TVal
261
                if Active == true then
262
					part.Color = Color3.new(math.random(), math.random(), math.random())
263
				elseif Active == false then
264
					part.BrickColor = BrickColor.new(BVal)
265
				end
266
		Li.Color = part.Color
267
                part.FormFactor = "Custom"
268
                part.Size = Vector3.new(0.01, 0.01, 0.01)
269
                part.Anchored = true
270
                part.Locked = true
271
                coroutine.wrap(function()
272
                while part ~= nil do
273
                part.CFrame = CFrame.new(plyr:GetMouse().Hit.p.x,plyr:GetMouse().Hit.p.y,plyr:GetMouse().Hit.p.z)
274
                wait()
275
                end
276
                end)()
277
				wait()    
278
                draw(part)
279
				wait()
280
        end)
281
        mouse.Button1Up:connect(function(mouse)
282
	draw2 = false
283
               
284
        end)
285
                       
286
end)
287
x = 60
288
game:GetService("RunService").Stepped:connect(function()
289
	n = sound.PlaybackLoudness
290
	if n > 500 then
291
		x = 100
292
	elseif n < 500 then
293
		x = 110
294
	end
295
for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
296
	if v.Name == "location" then
297
		v.Mesh.Scale = Vector3.new(n / x, n / x, n / x)
298
		v.PointLight.Range = n / 50
299
	end
300
end
301
end)