
Key Required VerifiedUniversal

local UserInputService = game:GetService("UserInputService")
local TweenService = game:GetService("TweenService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local ScreenGui = Instance.new("ScreenGui")
local MainFrame = Instance.new("Frame")
local UICorner = Instance.new("UICorner")
local UIStroke = Instance.new("UIStroke")
local Title = Instance.new("TextLabel")
local MessageBox = Instance.new("TextBox")
local UserBox = Instance.new("TextBox")
local SendBtn = Instance.new("TextButton")
ScreenGui.Name = "ExternalUI"
ScreenGui.Parent = game:GetService("CoreGui")
ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
MainFrame.Name = "MainFrame"
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = Color3.fromRGB(15, 15, 15)
MainFrame.BorderSizePixel = 0
MainFrame.Position = UDim2.new(1, -180, 0, 50)
MainFrame.Size = UDim2.new(0, 180, 0, 110)
UICorner.CornerRadius = UDim.new(0, 4)
UICorner.Parent = MainFrame
UIStroke.Color = Color3.fromRGB(45, 45, 45)
UIStroke.Thickness = 1
UIStroke.Parent = MainFrame
Title.Name = "Title"
Title.Parent = MainFrame
Title.BackgroundTransparency = 1
Title.Position = UDim2.new(0, 8, 0, 2)
Title.Size = UDim2.new(1, -16, 0, 15)
Title.Font = Enum.Font.Code
Title.Text = "Sloppy Gui"
Title.TextColor3 = Color3.fromRGB(180, 180, 180)
Title.TextSize = 10
Title.TextXAlignment = Enum.TextXAlignment.Left
MessageBox.Parent = MainFrame
MessageBox.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
MessageBox.Position = UDim2.new(0, 5, 0, 20)
MessageBox.Size = UDim2.new(1, -10, 0, 20)
MessageBox.Font = Enum.Font.Code
MessageBox.PlaceholderText = "Message..."
MessageBox.Text = ""
MessageBox.TextColor3 = Color3.fromRGB(255,255,255)
MessageBox.TextScaled = true
MessageBox.TextWrapped = true
MessageBox.ClearTextOnFocus = false
local MBcorner = Instance.new("UICorner")
MBcorner.CornerRadius = UDim.new(0, 3)
MBcorner.Parent = MessageBox
UserBox.Parent = MainFrame
UserBox.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
UserBox.Position = UDim2.new(0, 5, 0, 45)
UserBox.Size = UDim2.new(1, -10, 0, 20)
UserBox.Font = Enum.Font.Code
UserBox.PlaceholderText = "User..."
UserBox.Text = ""
UserBox.TextColor3 = Color3.fromRGB(255,255,255)
UserBox.TextScaled = true
UserBox.TextWrapped = true
UserBox.ClearTextOnFocus = false
local UBcorner = Instance.new("UICorner")
UBcorner.CornerRadius = UDim.new(0, 3)
UBcorner.Parent = UserBox
SendBtn.Parent = MainFrame
SendBtn.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
SendBtn.Position = UDim2.new(0, 5, 0, 70)
SendBtn.Size = UDim2.new(1, -10, 0, 20)
SendBtn.Font = Enum.Font.Code
SendBtn.Text = "Send"
SendBtn.TextColor3 = Color3.fromRGB(255,255,255)
SendBtn.TextScaled = true
SendBtn.TextWrapped = true
SendBtn.AutoButtonColor = false
local SBCorner = Instance.new("UICorner")
SBCorner.CornerRadius = UDim.new(0, 3)
SBCorner.Parent = SendBtn
local dragging, dragInput, dragStart, startPos
local function update(input)
local delta = input.Position - dragStart
MainFrame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
end
MainFrame.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = input.Position
startPos = MainFrame.Position
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
end
end)
end
end)
MainFrame.InputChanged:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
dragInput = input
end
end)
UserInputService.InputChanged:Connect(function(input)
if input == dragInput and dragging then
update(input)
end
end)
SendBtn.MouseEnter:Connect(function()
TweenService:Create(SendBtn, TweenInfo.new(0.2), {BackgroundColor3 = Color3.fromRGB(35, 35, 35)}):Play()
end)
SendBtn.MouseLeave:Connect(function()
TweenService:Create(SendBtn, TweenInfo.new(0.2), {BackgroundColor3 = Color3.fromRGB(25, 25, 25)}):Play()
end)
SendBtn.MouseButton1Click:Connect(function()
local msg = MessageBox.Text
local usr = UserBox.Text
local Event = ReplicatedStorage.Shared.Packages.Network.rev_PlayMessage
pcall(function()
firesignal(Event.OnClientEvent, msg, "Dev", usr)
end)
pcall(function()
Event.OnClientEvent:Fire(msg, "Dev", usr)
end)
pcall(function()
Event:FireServer(msg, "Dev", usr)
end)
MessageBox.Text = ""
end)



fe?
btw no work