View difference between Paste ID: 8GBKSzNM and 2whFj3uZ
SHOW: | | - or go back to the newest paste.
1
--- THE BELOW WILL FILTER ALL OBJS THAT APPEAR IN WORKSPACE WITH A TEXT PROPERTY
2
do
3
    local filteredMessages = { ['___'] = '___' };
4
    local onPropertyChanged = function (obj)  
5
        if (obj:isDescendantOf (workspace)) then  
6
            local objText = obj.Text;
7
           
8
            if (objText ~= '___' and objText:find '(%S)') then
9
                if (filteredMessages [objText] and filteredMessages [objText] ~= objText) then
10
                    obj.Text = filteredMessages [objText];
11
                elseif (not filteredMessages [objText]) then
12
                    obj.Text = '___';
13
                   
14
                    local filtered = game:service 'Chat':FilterStringForBroadcast (objText, game:service 'Players'.localPlayer);
15
                   
16
                    filteredMessages [objText] = filtered;
17
                    filteredMessages [filtered] = filtered;
18
                   
19
                    obj.Text = filtered;
20
                end;
21
            end;
22
        end;
23
    end;
24
   
25
    local newInstance = Instance.new;
26
    Instance = {
27
        new = function (class, parent)
28
            local obj = newInstance (class, parent);
29
           
30
            if (pcall (function()return obj.Text;end)) then
31
                obj:getPropertyChangedSignal ('Parent'):connect (function () onPropertyChanged (obj) end);
32
                obj:getPropertyChangedSignal ('Text'):connect (function() onPropertyChanged (obj) end);
33
            end;
34
           
35
            return obj;
36
        end;
37
    };
38
end;
39
--- THE ABOVE
40
41
plr = game.Players.LocalPlayer
42
mouse = plr:GetMouse()
43
part = nil
44
bp = nil
45
particles = nil
46
function clerp(a,b,c,d)
47
	for i = 0,d,.01 do
48
		a.CFrame = CFrame.new(b:lerp(c,i))
49
		wait()
50
	end
51
end
52
function slerp(a2,b2,c2,d2)
53
	for i2 = 0,d2,.01 do
54
		a2.CFrame = CFrame.new(b2:lerp(c2,i2))
55
		wait()
56
	end
57
end
58
mouse.KeyDown:connect(function(key)
59
	if key == "e" and plr.Character.Parent == workspace then
60
		plr.Character.Parent = workspace.Camera
61
		plr.Character.Archivable = true
62
		Instance.new("ForceField",plr.Character).Visible = false
63
		for y,t in pairs(plr.Character:GetChildren()) do
64
			if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
65
				t.Transparency = 1
66
				if t.Name == "Head" and t:FindFirstChild("face") then
67
					t.face.Transparency = 1
68
				end
69
			elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
70
				t.Handle.Transparency = 1
71
			end
72
		end
73
	elseif key == "z" and plr.Character.Parent == workspace.Camera and part == nil then
74
		plr.Character.Torso.CFrame = CFrame.new(Vector3.new(mouse.hit.p.X,mouse.hit.p.Y+1.5,mouse.hit.p.Z),plr.Character.Torso.CFrame.p)
75
	elseif key == "x" and plr.Character.Parent == workspace.Camera and part == nil then
76
		if plr.Character.Torso.Anchored == true then
77
			for y,t in pairs(plr.Character:GetChildren()) do
78
				if t:IsA("Part") then
79
					t.Anchored = false
80
				end
81
			end
82
		else
83
			for y,t in pairs(plr.Character:GetChildren()) do
84
				if t:IsA("Part") then
85
					t.Anchored = true
86
				end
87
			end
88
		end
89
	elseif key == "c" and plr.Character.Parent == workspace.Camera and part ~= nil then
90
		local clone = part:Clone()
91
		clone.Parent = workspace
92
		clone.Anchored = false
93
		clone:ClearAllChildren()
94
		clone.CanCollide = true
95
		bp.Parent = clone
96
		particles.Parent = clone
97
		if part.Parent:FindFirstChildOfClass("Humanoid") then
98
			part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false
99
		end
100
		part:Destroy()
101
		part = clone
102
	elseif key == "t" and plr.Character.Parent == workspace.Camera and part == nil then
103
		plr.Character.Parent = workspace
104
		plr.Character.Archivable = false
105
		plr.Character:FindFirstChildOfClass("ForceField"):Remove()
106
		for y,t in pairs(plr.Character:GetChildren()) do
107
			if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
108
				t.Transparency = 0
109
				if t.Name == "Head" and t:FindFirstChild("face") then
110
					t.face.Transparency = 0
111
				end
112
			elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
113
				t.Handle.Transparency = 0
114
			end
115
		end
116
	end
117
end)
118
mouse.Button1Down:connect(function()
119
	if plr.Character.Parent == workspace.Camera then
120
		if mouse ~= nil then
121
			if mouse.Target ~= nil then
122
				part = mouse.Target
123
				bp = Instance.new("BodyPosition",part)
124
				bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
125
				bp.Position = part.Position
126
				particles = Instance.new("ParticleEmitter",part)
127
				particles.Color = ColorSequence.new(Color3.new(0.99,0,0.95))
128
				particles.Size = NumberSequence.new(1)
129
				particles.Texture = "rbxassetid://292289455"
130
				particles.VelocitySpread = 360
131
				particles.Speed = NumberRange.new(0)
132
				particles.RotSpeed = NumberRange.new(0)
133
				particles.Rotation = NumberRange.new(0)
134
				particles.Rate = 250
135
				particles.Lifetime = NumberRange.new(.2,.4)
136
				particles.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(.12,.688,0),NumberSequenceKeypoint.new(.891,.887,0),NumberSequenceKeypoint.new(1,1,0)})
137
				dwn = true
138
			end
139
		end
140
		while dwn == true do 
141
			wait()	
142
			bp.Position = mouse.hit.p
143
			if part then
144
				if part.Parent:FindFirstChildOfClass("Humanoid") then
145
					part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = true
146
				end
147
			end
148
		end
149
	end
150-
				t.Material = ("Glass")
150+
151
mouse.Button1Up:connect(function()
152
	dwn = false
153
	if part then if part.Parent:FindFirstChildOfClass("Humanoid") then part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false end part = nil end
154
	if bp then bp:Destroy() end
155
	if particles then particles:Destroy() end
156
end)
157
base = Instance.new("ScreenGui",plr.PlayerGui)
158
bbg = Instance.new("BillboardGui",plr.Character.Head)
159
bbg.Size = UDim2.new(0,200,0,50)
160
bbg.StudsOffset = Vector3.new(0,3,0)
161
bbgTl = Instance.new("TextLabel",bbg)
162
bbgTl.BackgroundTransparency = 1
163
bbgTl.Size = UDim2.new(10,0,1,0)
164
bbgTl.Position = UDim2.new(-4.5,0,0,0)
165
bbgTl.Font = "Cartoon"
166
bbgTl.Text = " "
167
bbgTl.TextSize = 25
168
bbgTl.TextStrokeColor3 = Color3.new(1,1,1)
169
bbgTl.TextColor3 = Color3.new(0.99,0,0.95)
170
bbgTl.TextStrokeTransparency = 0
171
bbgTl.TextWrapped = true
172
plr.Chatted:connect(function(msg)
173
	bbgTl.Text = msg
174
	wait(9)
175
	if bbgTl.Text == msg then
176
		bbgTl.Text = " "
177
	end
178
end)
179
touchCounter = 0
180
while wait() do
181
	if plr.Character.Parent == workspace.Camera then
182
		local c = plr.Character:Clone()
183
		c:MakeJoints()
184
		for y,t in pairs(c:GetChildren()) do
185
			if t:IsA("Part") then
186
				t.CanCollide = false 
187
				t.Anchored = true 
188
				t.Transparency = .5
189
				t.TopSurface = "Smooth"
190
				t.BottomSurface = "Smooth"
191
				t.RightSurface = "Smooth"
192
				t.LeftSurface = "Smooth"
193
				t.FrontSurface = "Smooth"
194
				t.BackSurface = "Smooth"
195
				t.BrickColor = BrickColor.new("Hot pink")
196
				if t.Name == "Head" and t:FindFirstChild("face") then
197
					t.face:Remove()
198
				elseif t.Name == "Torso" and t:FindFirstChild("roblox") then
199
					t.roblox:Remove()
200
				elseif t.Name == "HumanoidRootPart" then
201
					t:Remove()
202
				end
203
			else 
204
				t:Remove()
205
			end
206
		end
207
		c.Parent = workspace
208
		game.Debris:AddItem(c,.05)
209
	end
210
end