Keyless

Key Required
Find all Keys open source
Lua Script•158 lines (4657 chars)
local player = game.Players.LocalPlayer
local UIS = game:GetService("UserInputService")
local gui = Instance.new("ScreenGui", player:WaitForChild("PlayerGui"))
gui.Name = "MoneyHub"
gui.ResetOnSpawn = false
local frame = Instance.new("Frame", gui)
frame.Size = UDim2.new(0, 350, 0, 180)
frame.Position = UDim2.new(1, -350, 0, 50)
frame.BackgroundColor3 = Color3.fromRGB(173, 216, 230)
frame.Active = true
frame.Visible = true
local function rainbowText(label)
coroutine.wrap(function()
local hue = 0
while true do
hue = (hue + 0.01) % 1
label.TextColor3 = Color3.fromHSV(hue, 1, 1)
task.wait(0.05)
end
end)()
end
local discordLabel = Instance.new("TextLabel", frame)
discordLabel.Size = UDim2.new(0, 150, 0, 25)
discordLabel.Position = UDim2.new(0, 5, 0, 5)
discordLabel.BackgroundTransparency = 1
discordLabel.Text = "دسكورد: 1w69"
discordLabel.Font = Enum.Font.GothamBold
discordLabel.TextSize = 16
discordLabel.TextXAlignment = Enum.TextXAlignment.Left
discordLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
discordLabel.Visible = true
rainbowText(discordLabel)
local closeBtn = Instance.new("TextButton", frame)
closeBtn.Size = UDim2.new(0, 30, 0, 30)
closeBtn.Position = UDim2.new(1, -30, 0, 0)
closeBtn.BackgroundColor3 = Color3.fromRGB(0, 30, 80)
closeBtn.Text = "X"
closeBtn.Font = Enum.Font.GothamBold
closeBtn.TextSize = 18
closeBtn.Visible = true
closeBtn.TextColor3 = Color3.new(1, 1, 1)
closeBtn.MouseButton1Click:Connect(function()
frame.Visible = false
end)
local currentLang = "ar"
local langBtn = Instance.new("TextButton", frame)
langBtn.Size = UDim2.new(0, 60, 0, 30)
langBtn.Position = UDim2.new(1, -95, 0, 0)
langBtn.BackgroundColor3 = Color3.fromRGB(0, 30, 80)
langBtn.Font = Enum.Font.GothamBold
langBtn.TextSize = 16
langBtn.Text = "English"
langBtn.Visible = true
langBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
rainbowText(langBtn)
local mainBtn = Instance.new("TextButton", frame)
mainBtn.Size = UDim2.new(0.8, 0, 0, 50)
mainBtn.Position = UDim2.new(0.1, 0, 0, 50)
mainBtn.BackgroundColor3 = Color3.fromRGB(0, 30, 80)
mainBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
mainBtn.Font = Enum.Font.GothamBold
mainBtn.TextSize = 22
mainBtn.Text = "الحصول على المفاتيح"
mainBtn.Visible = true
local subLabel = Instance.new("TextLabel", frame)
subLabel.Size = UDim2.new(0.8, 0, 0, 25)
subLabel.Position = UDim2.new(0.1, 0, 0, 105)
subLabel.BackgroundTransparency = 1
subLabel.Font = Enum.Font.GothamBold
subLabel.TextSize = 16
subLabel.Text = "يشتغل على جميع العوالم 1-5"
subLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
subLabel.TextXAlignment = Enum.TextXAlignment.Center
rainbowText(subLabel)
local run = false
mainBtn.MouseButton1Click:Connect(function()
if run then
run = false
mainBtn.BackgroundColor3 = Color3.fromRGB(0, 30, 80)
else
run = true
mainBtn.BackgroundColor3 = Color3.fromRGB(0, 150, 255)
coroutine.wrap(function()
while run do
for i = 1, 20 do
if not run then break end
local llave = workspace:FindFirstChild("Nivel") and workspace.Nivel:FindFirstChild("Llaves") and workspace.Nivel.Llaves:FindFirstChild(tostring(i))
if llave and llave:IsA("BasePart") then
if player.Character and player.Character.PrimaryPart then
player.Character:SetPrimaryPartCFrame(CFrame.new(llave.Position + Vector3.new(0, 3, 0)))
end
task.wait(0.3)
end
end
if run then
run = false
mainBtn.BackgroundColor3 = Color3.fromRGB(0, 30, 80)
end
end
end)()
end
end)
langBtn.MouseButton1Click:Connect(function()
if currentLang == "ar" then
currentLang = "en"
mainBtn.Text = "Get Keys"
subLabel.Text = "Works on all worlds 1-5"
langBtn.Text = "عربي"
else
currentLang = "ar"
mainBtn.Text = "الحصول على المفاتيح"
subLabel.Text = "يشتغل على جميع العوالم 1-5"
langBtn.Text = "English"
end
end)
local dragging, dragStart, startPos
local function update(input)
local delta = input.Position - dragStart
frame.Position = UDim2.new(
startPos.X.Scale,
startPos.X.Offset + delta.X,
startPos.Y.Scale,
startPos.Y.Offset + delta.Y
)
end
frame.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = input.Position
startPos = frame.Position
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
end
end)
end
end)
UIS.InputChanged:Connect(function(input)
if dragging and (input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch) then
update(input)
end
end)Features & Information
It has 2 buttons.
1. Get all keys in all worlds.
2. Translate it from Arabic to English.
Community Comments (0)
No comments yet for this script.

