-- Server Script (ServerScriptService or ServerScript)
-- Create RemoteEvent
local fireEvent = Instance.new("RemoteEvent")
fireEvent.Name = "FireEvent"
fireEvent.Parent = game:GetService("ReplicatedStorage") -- ReplicatedStorage is
used for storing objects that need to be replicated to all clients
-- Function to handle firing effect
local function fireOnPlayers()
-- Get all players in the game
local players = game:GetService("Players"):GetPlayers()
-- Loop through each player and apply the "fire" effect
for _, player in ipairs(players) do
-- Perform fire effect on each player (example: teleport them to a fire
location, damage them, etc.)
-- Replace this with your desired fire effect
print("Firing on player:", player.Name)
-- Example: teleport player to a fire location
-- local fireLocation = Vector3.new(0, 100, 0) -- Example fire location
-- player.Character:MoveTo(fireLocation)
end
end
-- Listen for RemoteEvent triggered by clients
fireEvent.OnServerEvent:Connect(function(player)
fireOnPlayers() -- Call the function to fire on all players
end)
-- Client Script (LocalScript)
-- Locate where your ScreenGui creation code is and add this LocalScript
-- Create ScreenGui
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "CustomGui"
screenGui.ResetOnSpawn = false
screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
-- Function to make the ScreenGui draggable
local function makeDraggable(frame)
local dragging = false
local dragInput, mousePos, framePos
frame.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 then
dragging = true
mousePos = input.Position
framePos = frame.Position
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
end
end)
end
end)
frame.InputChanged:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseMovement then
dragInput = input
end
end)
game:GetService("UserInputService").InputChanged:Connect(function(input)
if input == dragInput and dragging then
local delta = input.Position - mousePos
frame.Position = UDim2.new(
framePos.X.Scale,
framePos.X.Offset + delta.X,
framePos.Y.Scale,
framePos.Y.Offset + delta.Y
)
end
end)
end
-- Create the main frame (ScreenGui)
local frame = Instance.new("Frame")
frame.Size = UDim2.new(0.5, 0, 0.4, 0) -- Adjusted size to be larger
frame.Position = UDim2.new(0.25, 0, 0.3, 0) -- Adjusted position to center
frame.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
frame.BorderSizePixel = 5
frame.BorderColor3 = Color3.fromRGB(0, 0, 0)
frame.Parent = screenGui
makeDraggable(frame)
-- Create the "Open" button to show the ScreenGui
local openButton = Instance.new("TextButton")
openButton.Size = UDim2.new(0.2, 0, 0.1, 0)
openButton.Position = UDim2.new(0.4, 0, 0.85, 0)
openButton.Text = "Open"
openButton.Parent = screenGui
openButton.MouseButton1Click:Connect(function()
frame.Visible = true
openButton.Visible = false -- Hide the Open button when frame is open
closeButton.Visible = true -- Show the Close button when frame is open
end)
-- Create the "Close" button to hide the ScreenGui
local closeButton = Instance.new("TextButton")
closeButton.Size = UDim2.new(0.2, 0, 0.1, 0)
closeButton.Position = UDim2.new(0.6, 0, 0.85, 0)
closeButton.Text = "Close"
closeButton.Visible = false -- Initially hide Close button
closeButton.Parent = screenGui
closeButton.MouseButton1Click:Connect(function()
frame.Visible = false
openButton.Visible = true -- Show the Open button when frame is closed
closeButton.Visible = false -- Hide the Close button when frame is closed
end)
-- Create the "Fire" button to fire on all players
local fireButton = Instance.new("TextButton")
fireButton.Size = UDim2.new(0.2, 0, 0.1, 0)
fireButton.Position = UDim2.new(0.4, 0, 0.7, 0)
fireButton.Text = "Fire on All Players"
fireButton.Parent = screenGui
fireButton.MouseButton1Click:Connect(function()
fireEvent:FireServer() -- Fire the RemoteEvent to all clients
end)
-- Create the "k00lkidd81 laugh" button
local laughButton = Instance.new("TextButton")
laughButton.Size = UDim2.new(0.8, 0, 0.1, 0)
laughButton.Position = UDim2.new(0.1, 0, 0.1, 0)
laughButton.Text = "k00lkidd81 laugh"
laughButton.Parent = frame
laughButton.MouseButton1Click:Connect(function()
local sound = Instance.new("Sound")
sound.SoundId = "rbxassetid://18475341140"
sound.Parent = game.Workspace
sound:Play()
end)
-- Create the "Day to Night" button
local dayNightButton = Instance.new("TextButton")
dayNightButton.Size = UDim2.new(0.8, 0, 0.1, 0)
dayNightButton.Position = UDim2.new(0.1, 0, 0.25, 0)
dayNightButton.Text = "Day to Night"
dayNightButton.Parent = frame
dayNightButton.MouseButton1Click:Connect(function()
local lighting = game:GetService("Lighting")
if lighting.ClockTime >= 6 and lighting.ClockTime < 18 then
lighting.ClockTime = 18
else
lighting.ClockTime = 6
end
end)
-- Create the "Play Music" button
local musicButton = Instance.new("TextButton")
musicButton.Size = UDim2.new(0.8, 0, 0.1, 0)
musicButton.Position = UDim2.new(0.1, 0, 0.4, 0)
musicButton.Text = "Play Music"
musicButton.Parent = frame
musicButton.MouseButton1Click:Connect(function()
local sound = Instance.new("Sound")
sound.SoundId = "rbxassetid://18431141543"
sound.Parent = game.Workspace
sound:Play()
end)
-- Create the "Hint" label at the top of the screen
local hintLabel = Instance.new("TextLabel")
hintLabel.Size = UDim2.new(0.3, 0, 0.05, 0)
hintLabel.Position = UDim2.new(0.35, 0, 0, 0)
hintLabel.BackgroundTransparency = 1
hintLabel.TextColor3 = Color3.new(1, 1, 1)
hintLabel.TextStrokeTransparency = 0
hintLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
hintLabel.TextScaled = true
hintLabel.TextWrapped = true
hintLabel.Font = Enum.Font.SourceSans
hintLabel.Text = "Hacked by k00lkidd81"
hintLabel.Visible = false
hintLabel.Parent = screenGui
-- Create the "Message" label at the top of the screen
local messageLabel = Instance.new("TextLabel")
messageLabel.Size = UDim2.new(0.3, 0, 0.05, 0)
messageLabel.Position = UDim2.new(0.35, 0, 0.05, 0)
messageLabel.BackgroundTransparency = 1
messageLabel.TextColor3 = Color3.new(1, 1, 1)
messageLabel.TextStrokeTransparency = 0
messageLabel.TextStrokeColor3 = Color3.new(0, 0, 0)
messageLabel.TextScaled = true
messageLabel.TextWrapped = true
messageLabel.Font = Enum.Font.SourceSans
messageLabel.Text = "Hacked by k00lkidd81"
messageLabel.Visible = false
messageLabel.Parent = screenGui
-- Update hint and message visibility based on ScreenGui visibility
frame:GetPropertyChangedSignal("Visible"):Connect(function()
local isVisible = frame.Visible
hintLabel.Visible = isVisible
messageLabel.Visible = isVisible
end)
