API tools faq
paste
View difference between Paste ID: XFQCXTJJ and ztZUKMSV
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
plr = game.Players.idkidkge
9
part = nil
10
bp = nil
11
particles = nil
12
function clerp(a,b,c,d)
13
	for i = 0,d,.01 do
14
		a.CFrame = CFrame.new(b:lerp(c,i))
15
		wait()
16
	end
17
end
18
function slerp(a2,b2,c2,d2)
19
	for i2 = 0,d2,.01 do
20
		a2.CFrame = CFrame.new(b2:lerp(c2,i2))
21
		wait()
22
	end
23
end
24
mouse.KeyDown:connect(function(key)
25
	if key == "e" and plr.Character.Parent == workspace then
26
		plr.Character.Parent = workspace.Camera
27
		plr.Character.Archivable = true
28
		Instance.new("ForceField",plr.Character).Visible = false
29
		for y,t in pairs(plr.Character:GetChildren()) do
30
			if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
31
				t.Transparency = 1
32
				if t.Name == "Head" and t:FindFirstChild("face") then
33
					t.face.Transparency = 1
34
				end
35
			elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
36
				t.Handle.Transparency = 1
37
			end
38
		end
39
	elseif key == "z" and plr.Character.Parent == workspace.Camera and part == nil then
40
		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)
41
	elseif key == "x" and plr.Character.Parent == workspace.Camera and part == nil then
42
		if plr.Character.Torso.Anchored == true then
43
			for y,t in pairs(plr.Character:GetChildren()) do
44
				if t:IsA("Part") then
45
					t.Anchored = false
46
				end
47
			end
48
		else
49
			for y,t in pairs(plr.Character:GetChildren()) do
50
				if t:IsA("Part") then
51
					t.Anchored = true
52
				end
53
			end
54
		end
55
	elseif key == "c" and plr.Character.Parent == workspace.Camera and part ~= nil then
56
		local clone = part:Clone()
57
		clone.Parent = workspace
58
		clone.Anchored = false
59
		clone:ClearAllChildren()
60
		clone.CanCollide = true
61
		bp.Parent = clone
62
		particles.Parent = clone
63
		if part.Parent:FindFirstChildOfClass("Humanoid") then
64
			part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false
65
		end
66
		part:Destroy()
67
		part = clone
68
	elseif key == "t" and plr.Character.Parent == workspace.Camera and part == nil then
69
		plr.Character.Parent = workspace
70
		plr.Character.Archivable = false
71
		plr.Character:FindFirstChildOfClass("ForceField"):Remove()
72
		for y,t in pairs(plr.Character:GetChildren()) do
73
			if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
74
				t.Transparency = 0
75
				if t.Name == "Head" and t:FindFirstChild("face") then
76
					t.face.Transparency = 0
77
				end
78
			elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
79
				t.Handle.Transparency = 0
80
			end
81
		end
82
	end
83
end)
84
mouse.Button1Down:connect(function()
85
	if plr.Character.Parent == workspace.Camera then
86
		if mouse ~= nil then
87
			if mouse.Target ~= nil then
88
				part = mouse.Target
89
				bp = Instance.new("BodyPosition",part)
90
				bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
91
				bp.Position = part.Position
92
				particles = Instance.new("ParticleEmitter",part)
93
				particles.Color = ColorSequence.new(Color3.new(0,0,0))
94
				particles.Size = NumberSequence.new(1)
95
				particles.Texture = "rbxassetid://292289455"
96
				particles.VelocitySpread = 360
97
				particles.Speed = NumberRange.new(0)
98
				particles.RotSpeed = NumberRange.new(0)
99
				particles.Rotation = NumberRange.new(0)
100
				particles.Rate = 250
101
				particles.Lifetime = NumberRange.new(.2,.4)
102
				particles.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(.12,.688,0),NumberSequenceKeypoint.new(.891,.887,0),NumberSequenceKeypoint.new(1,1,0)})
103
				dwn = true
104
			end
105
		end
106
		while dwn == true do
107
			wait()
108
			bp.Position = mouse.hit.p
109
			if part then
110
				if part.Parent:FindFirstChildOfClass("Humanoid") then
111
					part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = true
112
				end
113
			end
114
		end
115
	end
116
end)
117
mouse.Button1Up:connect(function()
118
	dwn = false
119
	if part then if part.Parent:FindFirstChildOfClass("Humanoid") then part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false end part = nil end
120
	if bp then bp:Destroy() end
121
	if particles then particles:Destroy() end
122
end)
123
base = Instance.new("ScreenGui",plr.PlayerGui)
124
bbg = Instance.new("BillboardGui",plr.Character.Head)
125
bbg.Size = UDim2.new(0,200,0,50)
126
bbg.StudsOffset = Vector3.new(0,3,0)
127
bbgTl = Instance.new("TextLabel",bbg)
128
bbgTl.BackgroundTransparency = 1
129
bbgTl.Size = UDim2.new(10,0,1,0)
130
bbgTl.Position = UDim2.new(-4.5,0,0,0)
131
bbgTl.Font = "Code"
132
bbgTl.Text = " "
133
bbgTl.TextSize = 25
134
bbgTl.TextStrokeColor3 = Color3.new(1,1,1)
135
bbgTl.TextColor3 = Color3.new(0,0,0)
136
bbgTl.TextStrokeTransparency = 0
137
bbgTl.TextWrapped = true
138
plr.Chatted:connect(function(msg)
139
	bbgTl.Text = msg
140
	wait(5)
141
	if bbgTl.Text == msg then
142
		bbgTl.Text = " "
143
	end
144
end)
145
touchCounter = 0
146
while wait() do
147
	if plr.Character.Parent == workspace.Camera then
148
		local c = plr.Character:Clone()
149
		c:MakeJoints()
150
		for y,t in pairs(c:GetChildren()) do
151
			if t:IsA("Part") then
152
				t.CanCollide = false
153
				t.Anchored = true
154
				t.Transparency = .5
155
				t.TopSurface = "Smooth"
156
				t.BottomSurface = "Smooth"
157
				t.RightSurface = "Smooth"
158
				t.LeftSurface = "Smooth"
159
				t.FrontSurface = "Smooth"
160
				t.BackSurface = "Smooth"
161
				t.BrickColor = BrickColor.new("Really black")
162
				if t.Name == "Head" and t:FindFirstChild("face") then
163
					t.face:Remove()
164
				elseif t.Name == "Torso" and t:FindFirstChild("roblox") then
165
					t.roblox:Remove()
166
				elseif t.Name == "HumanoidRootPart" then
167
					t:Remove()
168
				end
169
			else
170
				t:Remove()
171
			end
172
		end
173
		c.Parent = workspace
174
		game.Debris:AddItem(c,.05)
175
	end
176
end
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!