HKR Scripts

local titleName = game:GetService("MarketplaceService"):GetProductInfo(game.PlaceId).Name

local playerGui = game.Players.LocalPlayer:WaitForChild("PlayerGui")
local screenGui = Instance.new("ScreenGui", playerGui)
local tweenService = game:GetService("TweenService")
local lighting = game:GetService("Lighting")

local imageLabel = Instance.new("ImageLabel", screenGui)
imageLabel.Size = UDim2.new(0, 150, 0, 150)
imageLabel.Position = UDim2.new(0.5, -75, 0.5, -200)
imageLabel.Image = "rbxassetid://105855861857949"
imageLabel.BackgroundTransparency = 1
Instance.new("UICorner", imageLabel).CornerRadius = UDim.new(0, 20)

local texts = {
    {Text = "Roblox Scripts", Color = Color3.fromRGB(255, 255, 255), Position = UDim2.new(0.5, -75, 0.5, -130)},
    {Text = "HKR TEAM", Color = Color3.fromRGB(0, 255, 0), Position = UDim2.new(0.5, -75, 0.5, 70)},
    {Text = titleName, Color = Color3.fromRGB(255, 0, 0), Position = UDim2.new(0.5, -75, 0.5, -108)}
}

for _, info in ipairs(texts) do
    local text = Instance.new("TextLabel", screenGui)
    text.Size = UDim2.new(0, 150, 0, 30)
    text.Position = info.Position
    text.Text = info.Text
    text.TextColor3 = info.Color
    text.BackgroundTransparency = 1
    text.TextSize = 24
    text.TextTransparency = 1
    text.Font = Enum.Font.GothamBold
    text.TextStrokeTransparency = 0.5
    text.TextStrokeColor3 = Color3.fromRGB(0, 0, 0)
    text.TextXAlignment = Enum.TextXAlignment.Center
end

local blurEffect = Instance.new("BlurEffect", lighting)
blurEffect.Size = 0

tweenService:Create(blurEffect, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {Size = 25}):Play()
tweenService:Create(imageLabel, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {Position = UDim2.new(0.5, -75, 0.5, -75)}):Play()

wait(1)

tweenService:Create(imageLabel, TweenInfo.new(0.3, Enum.EasingStyle.Bounce, Enum.EasingDirection.Out), {Position = UDim2.new(0.5, -75, 0.5, -120)}):Play()
wait(0.3)
tweenService:Create(imageLabel, TweenInfo.new(0.3, Enum.EasingStyle.Bounce, Enum.EasingDirection.Out), {Position = UDim2.new(0.5, -75, 0.5, -75)}):Play()

for _, text in ipairs(screenGui:GetChildren()) do
    if text:IsA("TextLabel") and text.Text ~= titleName then
        tweenService:Create(text, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {TextTransparency = 0}):Play()
    end
end

wait(1.3)

for _, text in ipairs(screenGui:GetChildren()) do
    if text:IsA("TextLabel") and text.Text == titleName then
        tweenService:Create(text, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {TextTransparency = 0}):Play()
    end
end

wait(1)

for _, text in ipairs(screenGui:GetChildren()) do
    if text:IsA("TextLabel") then
        tweenService:Create(text, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {TextTransparency = 1}):Play()
    end
end

tweenService:Create(imageLabel, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {ImageTransparency = 1}):Play()
tweenService:Create(blurEffect, TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut), {Size = 0}):Play()

local paid = false
local isPaid = paid and "--| Premium |--" or "--| Free |--"
local DrRayLibrary = loadstring(game:HttpGet("https://raw.githubusercontent.com/AZYsGithub/DrRay-UI-Library/main/DrRay.lua"))()
local window = DrRayLibrary:Load(isPaid)

local function c(title, id)
    local t = DrRayLibrary.newTab(title, "rbxassetid://" .. id)
    return t
end

local v = c("Script", "ImageID")

local selectedTrap = nil
local delay = 1
local t = false
local traps = {}
for _, v in pairs(game:GetService("ReplicatedStorage").Traps:GetChildren()) do
    table.insert(traps, v.Name)
end

v.newLabel("--| Main |--")

v.newDropdown("Traps", "Choose a Trap", traps, function(trap)
    selectedTrap = trap
end)

v.newButton("Spawn Trap", "Spawn Selected Trap", function()
    game:GetService("ReplicatedStorage").THE_SOLDIER:FireServer(selectedTrap, CFrame.new(game.Players.LocalPlayer.Character.HumanoidRootPart.Position) * game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame.Rotation)
end)

v.newInput("Delay", "Value", function(v)
    delay = tonumber(v) or 1
end)

v.newToggle("Spawn Trap", "Toggle", false, function(s)
    t = s
    if t then
        while t do
            game:GetService("ReplicatedStorage").THE_SOLDIER:FireServer(selectedTrap, CFrame.new(game.Players.LocalPlayer.Character.HumanoidRootPart.Position) * game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame.Rotation)
            task.wait(delay)
        end
    end
end)

v.newLabel("--| Value |--")

v.newInput("Max Troops", "Value", function(v)
    game:GetService("Players").LocalPlayer.maxTroops.Value = tonumber(v) or 69
end)

v.newInput("Rank", "Value", function(v)
    game:GetService("Players").LocalPlayer.Rank.Value = tonumber(v) or 69
end)