View difference between Paste ID: 2RLC5ARf and y8xUtnT0
SHOW: | | - or go back to the newest paste.
1
-- Farewell Infortality.
2
-- Version: 2.82
3
-- Instances:
4
--FE Converter By basstracker1970
5
--Made With Gui To Lua Plugin
6
if game:GetService("RunService"):IsClient() then
7
    error("Script must be server-side in order to work; use h/ and not hl/")
8
end
9
local Player, game, owner = owner, game
10-
ScreenGui.Parent = game.Players.basstracker1970:WaitForChild("PlayerGui")
10+
local RealPlayer = Player
11
do
12
    print("FE Compatibility code V2 by Mokiros")
13
    local RealPlayer = RealPlayer;
14
    script.Parent = RealPlayer.Character;
15
    local a = function(b)
16
        b[1].f[b[2]] = nil
17
    end;
18
    local c = {
19
        __index = {
20
            disconnect = a,
21
            Disconnect = a
22
        }
23
    }
24
    local d = {
25
        __index = {
26
            Connect = function(b, e)
27
                local f = tostring(math.random(0, 10000))
28
                while b.f[f] do
29
                    f = tostring(math.random(0, 10000))
30
                end;
31
                b.f[f] = e;
32
                return setmetatable({
33
                    b,
34
                    f
35
                }, c)
36
            end
37
        }
38
    }
39
    d.__index.connect = d.__index.Connect;
40
    local function g()
41
        return setmetatable({
42
            f = {}
43
        }, d)
44
    end;
45
    local h = {
46
        Hit = CFrame.new(),
47
        KeyUp = g(),
48
        KeyDown = g(),
49
        Button1Up = g(),
50
        Button1Down = g(),
51
        Button2Up = g(),
52
        Button2Down = g()
53
    }
54
    h.keyUp = h.KeyUp;
55
    h.keyDown = h.KeyDown;
56
    local i = {
57
        InputBegan = g(),
58
        InputEnded = g()
59
    }
60
    local CAS = {
61
        Actions = {},
62
        BindAction = function(self, j, k, l, ...)
63
            CAS.Actions[j] = k and {
64
                Name = j,
65
                Function = k,
66
                Keys = {
67
                    ...
68
                }
69
            } or nil
70
        end
71
    }
72
    CAS.UnbindAction = CAS.BindAction;
73
    local function m(self, n, ...)
74
        for o, e in pairs(self[n].f) do
75
            e(...)
76
        end
77
    end;
78
    h.T = m;
79
    i.T = m;
80
    local p = Instance.new("RemoteEvent")
81
    p.Name = "UserInput_Event"
82
    p.OnServerEvent:Connect(function(q, r)
83
        if q ~= RealPlayer then
84
            return
85
        end;
86
        h.Target = r.e;
87
        h.Hit = r.d;
88
        if not r.f then
89
            local s = r.c == Enum.UserInputState.Begin;
90
            if r.b == Enum.UserInputType.MouseButton1 then
91
                return h:T(s and "Button1Down" or "Button1Up")
92
            end;
93
            if r.b == Enum.UserInputType.MouseButton2 then
94
                return h:T(s and "Button2Down" or "Button2Up")
95
            end;
96
            for o, t in pairs(CAS.Actions) do
97
                for o, u in pairs(t.Keys) do
98
                    if u == r.a then
99
                        t.Function(t.Name, r.c, r)
100
                    end
101
                end
102
            end;
103
            h:T(s and "KeyDown" or "KeyUp", r.a.Name:lower())
104
            i:T(s and "InputBegan" or "InputEnded", r, false)
105
        end
106
    end)
107
    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)
108
    local v = game;
109
    local w = {
110
        __index = function(self, u)
111
            local x = rawget(self, "_RealService")
112
            if x then
113
                return typeof(x[u]) == "function" and function(o, ...)
114
                    return x[u](x, ...)
115
                end or x[u]
116
            end
117
        end,
118
        __newindex = function(self, u, y)
119
            local x = rawget(self, "_RealService")
120
            if x then
121
                x[u] = y
122
            end
123
        end
124
    }
125
    local function z(t, A)
126
        t._RealService = typeof(A) == "string" and v:GetService(A) or A;
127
        return setmetatable(t, w)
128
    end;
129
    local B = {
130
        GetService = function(self, x)
131
            return rawget(self, x) or v:GetService(x)
132
        end,
133
        Players = z({
134
            LocalPlayer = z({
135
                GetMouse = function(self)
136
                    return h
137
                end
138
            }, Player)
139
        }, "Players"),
140
        UserInputService = z(i, "UserInputService"),
141
        ContextActionService = z(CAS, "ContextActionService"),
142
        RunService = z({
143
            _btrs = {},
144
            RenderStepped = v:GetService("RunService").Heartbeat,
145
            BindToRenderStep = function(self, j, o, k)
146
                self._btrs[j] = self.Heartbeat:Connect(k)
147
            end,
148
            UnbindFromRenderStep = function(self, j)
149
                self._btrs[j]:Disconnect()
150
            end
151
        }, "RunService")
152
    }
153
    rawset(B.Players, "localPlayer", B.Players.LocalPlayer)
154
    B.service = B.GetService;
155
    z(B, game)
156
    game, owner = B, B.Players.LocalPlayer
157
end
158
wait(0.2)
159
local plr = owner
160
local ScreenGui = Instance.new("ScreenGui")
161
local TextBox = Instance.new("TextBox")
162
local TextLabel = Instance.new("TextLabel")
163
--Properties:
164
ScreenGui.Parent = plr:WaitForChild("PlayerGui")
165
ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
166
167
TextBox.Parent = ScreenGui
168
TextBox.BackgroundColor3 = Color3.new(0, 0.333333, 1)
169
TextBox.BorderColor3 = Color3.new(0, 0.333333, 1)
170
TextBox.BorderSizePixel = 0
171
TextBox.Position = UDim2.new(0.742599726, 0, 0.83808744, 0)
172
TextBox.Size = UDim2.new(0, 200, 0, 50)
173
TextBox.Font = Enum.Font.SourceSans
174
TextBox.Text = ""
175
TextBox.TextColor3 = Color3.new(0, 0, 0)
176
TextBox.TextSize = 14
177
178
TextLabel.Parent = ScreenGui
179
TextLabel.BackgroundColor3 = Color3.new(0, 0.333333, 1)
180
TextLabel.BorderSizePixel = 0
181
TextLabel.Position = UDim2.new(0.742599726, 0, 0.758901358, 0)
182
TextLabel.Size = UDim2.new(0, 200, 0, 50)
183
TextLabel.Font = Enum.Font.SourceSans
184
TextLabel.Text = "FE Script Converter By basstracker1970"
185
TextLabel.TextColor3 = Color3.new(0, 0, 0)
186
TextLabel.TextScaled = true
187
TextLabel.TextSize = 14
188
TextLabel.TextWrapped = true
189
-- Scripts:
190
function SCRIPT_AHJG82_FAKESCRIPT() -- TextBox.Script 
191
	local script = Instance.new('Script')
192
	script.Parent = TextBox
193
	link = script.Parent.Text
194
	script.Parent.FocusLost:Connect(function()
195
	local ScriptLink = ""..link
196
	
197
	--//Do not touch anything below this line, you may break it.
198
	local FeSource = nil;pcall(function()FeSource = game:GetService("HttpService"):GetAsync("https://pastebin.com/raw/V5gzxd1Z")end);
199
	local ScriptSource = nil;pcall(function()ScriptSource = game:GetService("HttpService"):GetAsync(ScriptLink)end);
200
	if not FeSource then error("Failed to grab update! Try again later.",0)end;if not ScriptSource then error("Failed to get link!",0)end;
201
	local FeConversion = loadstring(FeSource);local FeSucc,FeErr = pcall(FeConversion);if not FeSucc then warn(FeErr)error("Failed to initiate! Try again later.",0) end;
202
	local Script = loadstring(ScriptSource);local Succ,Err = pcall(Script);if not Succ then warn(Err)error("Error loading script.",0) end;
203
	end)
204
205
end
206
coroutine.resume(coroutine.create(SCRIPT_AHJG82_FAKESCRIPT))