SpellBlade

--Game: https://www.roblox.com/games/4489411976/4th-of-July-Spellblade-Legends

--https://detourious.gitbook.io/project-finity/docs
if game:GetService("CoreGui"):FindFirstChild("FinityUI") then
    game.CoreGui.FinityUI:Destroy()
end
local desc = [[
V.4
]]
local plr = game.Players.LocalPlayer
local Finity = loadstring(game:HttpGet("http://finity.vip/scripts/finity_lib.lua"))()
local FinityWindow = Finity.new(true)
FinityWindow.ChangeToggleKey(Enum.KeyCode.Semicolon)
local CreditsCategory = FinityWindow:Category("Credits/Info")
local CreditsCreator = CreditsCategory:Sector("Finity Library Creator:")
local ScriptCredit = CreditsCategory:Sector("Cheat Credit:")
local Description = CreditsCategory:Sector("Description:")
local OC = CreditsCategory:Sector("Open Close Button:")
CreditsCreator:Cheat("Label", "detourious @ v3rmillion.net")
ScriptCredit:Cheat("Label", "brianops16 @ v3rmillion.net")
Description:Cheat("Label", desc)
local Cheats = FinityWindow:Category("Cheats")
local S1 = Cheats:Sector("Auto Hacks")
local S2 = Cheats:Sector("Auto Settings")
local S3 = Cheats:Sector("Kill Hacks")
local S4 = Cheats:Sector("Special Abilities")
local S5 = Cheats:Sector("Pet Utilities")
local EnumKeys = {'Semicolon','Tab','Equals','Comma','Minus','Period','F1',"F2","F3","F4",'F5',"F6","F7",
"F8","F9","F10","F11","F12",'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', 'O', 'P', 'A', 'S', 'D', 'F', 'G', 'H',
 'J', 'K', 'L', 'Z', 'X', 'C', 'V', 'B', 'N', 'M','Slash','One','Two','Three',"Four","Five","Six","Seven","Eight",
 "Nine","Zero",'BackSlash','RightBracket','LeftBracket'}
OC:Cheat("Dropdown", "(Default ';')", function(Option) --Dropdowns
  print('Current key: '..Option)
    FinityWindow.ChangeToggleKey(Enum.KeyCode[Option])
end, {
    options = EnumKeys
})



function Launch(Pos)
    local RemoteEvent = plr.Character:FindFirstChildOfClass("Tool").RemoteEvent
    RemoteEvent:FireServer(
    "FireProjectile",
    Pos
    )
end

local Legendary = Color3.new (1, 0.6, 0)
local Epic = Color3.new (0.6, 0.3, 1)
local Rare = Color3.new (0, 0.6, 1)
local Uncommon = Color3.new (0, 1, 0.4)
local Common = Color3.new (0.6, 0.6, 0.6)
local Legend,Epi,Rar,Uncom,Comm = false,false,false,false,false

local aura = 75
local Purchase = game:GetService("ReplicatedStorage").Remotes.Purchase
local M = 1000
local RankUp,WeaponUp,AuraUp = false,false,false
local TpLoc = "Random"
local Speed = .5
local LocationNames = {}

function TpToSpawns()
    local root = plr.Character:FindFirstChild("HumanoidRootPart")
    if root then
        local Points = game:GetService("Workspace")["SpawnPoints"]
        local Area = Points:GetChildren()
        if TpLoc == "Random" then
            Area = Area[math.random(1,#Area)]
        else
            Area = Points[TpLoc]
        end
        local Norm = Area:GetChildren()
        Norm = Norm[math.random(1,#Norm)]
        local Spawn = Norm:GetChildren()
        Spawn = Spawn[math.random(1,#Spawn)]
        root.CFrame = Spawn.CFrame
        root.Velocity = Vector3.new(0,0,0)
        if TpLoc ~= "Random" then
            wait(.5)
        else
            wait(1)
        end
    end
end

function UpdateNames()
    LocationNames = {}
    table.insert(LocationNames,"Random")
    for i,v in pairs(game:GetService("Workspace")["SpawnPoints"]:GetChildren()) do
        table.insert(LocationNames,v.Name)
    end
end
UpdateNames()



S1:Cheat("Checkbox","AutoFarmMoney",
function(State)
    if not State then
        _G.on3 = 0
    else
        _G.on3 = 1
        while _G.on3 == 1 do
            pcall(function()
                local root = plr.Character:FindFirstChild("HumanoidRootPart")
                local C = tonumber(game:GetService("Players")["LocalPlayer"]["leaderstats"]["Magic"].Value)
                if C >= M then
                    local bef = root.CFrame
                    root.CFrame = CFrame.new(game:GetService("Workspace")["Rings"].SellRing.Position)
                    wait(.1)
                    root.CFrame = bef
                else
                    local tool = plr.Character:FindFirstChildOfClass("Tool")
                    if tool then
                        local RemoteEvent = tool.RemoteEvent
                        RemoteEvent:FireServer(
                            "Attack",
                            1
                        )
                    end
                end
                if RankUp then
                    Purchase:InvokeServer("Rank")
                end
                if WeaponUp then
                    Purchase:InvokeServer("AllWeapons")
                end
                if AuraUp then
                    Purchase:InvokeServer("AllAuras")
                end
                if not plr.Character:FindFirstChildOfClass("Tool") then
                    game:GetService("ReplicatedStorage").Remotes.EquipSpellblade:FireServer()
                end
            end)
            wait()
        end
    end
end
)

S1:Cheat("Checkbox","AutoHit",
function(State)
    if not State then
        _G.on2 = 0
    else
        _G.on2 = 1
        while _G.on2 == 1 do
            pcall(function()
                local root = plr.Character:FindFirstChild("HumanoidRootPart")
                local tool = plr.Character:FindFirstChildOfClass("Tool")
                if tool then
                    local RemoteEvent = tool.RemoteEvent
                    RemoteEvent:FireServer(
                        "Attack",
                        1
                    )
                end
            end)
            wait()
        end
    end
end
)

--------------------------------------------------


S2:Cheat("Textbox", "AutoSellAmt", function(Value) --Textbox
    if not pcall(function()
        M = tonumber(Value)
    end) then
        M = 1000
    end
end, {
    placeholder = "1k Default"
})

S2:Cheat("Checkbox","AutoRankUp",
function(State)
    if not State then
        RankUp = false
    else
        RankUp = true
    end
end
)

S2:Cheat("Checkbox","AutoWepUp",
function(State)
    if not State then
        WeaponUp = false
    else
        WeaponUp = true
    end
end
)

S2:Cheat("Checkbox","AutoAuraUp",
function(State)
    if not State then
        AuraUp = false
    else
        AuraUp = true
    end
end
)


--------------------------------------------------

S3:Cheat("Slider", "KillAuraSpeed", function(Value)--Slider
    Speed = tonumber(Value)
end, {min = 0, max = 1, suffix = " seconds"})


S3:Cheat("Checkbox","KillAuraPlayers",
function(State)
    if not State then
        _G.on1 = 0
    else
        _G.on1 = 1
        while _G.on1 == 1 do
            wait(Speed)
            pcall(function()
                local root = plr.Character:FindFirstChild("HumanoidRootPart")
                if root then
                    for i,v in pairs(game.Players:GetChildren()) do
                        if v and v ~= plr and v.Character:FindFirstChild("HumanoidRootPart") and v.Character.Humanoid.Health > 0 and not v.Character:FindFirstChild("SafezoneForceField") and (v.Character.HumanoidRootPart.Position - root.Position).Magnitude < aura then
                            Launch(v.Character.HumanoidRootPart.Position)
                        end
                    end
                end
            end)
        end
    end
end
)

S3:Cheat("Checkbox","KillAuraMobs",
function(State)
    if not State then
        _G.on = 0
    else
        _G.on = 1
        while _G.on == 1 do
            wait(Speed)
            pcall(function()
                local root = plr.Character:FindFirstChild("HumanoidRootPart")
                if root then
                    for i,v in pairs(game:GetService("Workspace")["Mobs"]:GetChildren()) do
                        if v and v:FindFirstChild("HumanoidRootPart") and v.Humanoid.Health > 0 and (v.HumanoidRootPart.Position - root.Position).Magnitude < aura then
                            Launch(v.HumanoidRootPart.Position)
                        end
                    end
                end
            end)
        end
    end
end
)

S3:Cheat("Checkbox","TpToMobs",
function(State)
    if not State then
        _G.on7 = 0
    else
        _G.on7 = 1
        while _G.on7 == 1 do
            game:GetService('RunService').Stepped:wait()
            pcall(function()
                local root = plr.Character:FindFirstChild("HumanoidRootPart")
                if root then
                    for i,v in pairs(game:GetService("Workspace")["Mobs"]:GetChildren()) do
                        if v and v:FindFirstChild("HumanoidRootPart") and v.Humanoid.Health > 0 then
                            local OldHp = v.Humanoid.Health
                            local T = time()
                            while v.Humanoid.Health > 0 and root and _G.on7 == 1 do
                                if time() - T  >= 5 then
                                    if v.Humanoid.Health >= OldHp then
                                        break
                                    end
                                end
                                wait()
                                root.CFrame = v.HumanoidRootPart.CFrame * CFrame.new(0,10,2)
                                root.Velocity = Vector3.new(0,0,0)
                            end
                        end
                    end
                    TpToSpawns()
                end
            end)
        end
    end
end
)

local DropDown = S3:Cheat("Dropdown", "MobSpawnArea", function(Option) --Dropdowns
    TpLoc = Option
end, {
    options = LocationNames
})


S3:Cheat("Button", "ResetMobAreas", function() --Button
    UpdateNames()
    DropDown:AddOption()
end)


--------------------------------------------------


S4:Cheat("Button", "MegaBlast", function() --Button
    pcall(function()
        local root = plr.Character:FindFirstChild("HumanoidRootPart")
        if root then
            for i,v in pairs(game.Players:GetChildren()) do
                if v and v ~= plr and v.Character:FindFirstChild("HumanoidRootPart") and v.Character.Humanoid.Health > 0 and not v.Character:FindFirstChild("SafezoneForceField") and (v.Character.HumanoidRootPart.Position - root.Position).Magnitude < aura then
                    for i = 1,30 do
                        Launch(v.Character.HumanoidRootPart.Position)
                    end
                end
            end
            for i,v in pairs(game:GetService("Workspace")["Mobs"]:GetChildren()) do
                if v and v:FindFirstChild("HumanoidRootPart") and v.Humanoid.Health > 0 and (v.HumanoidRootPart.Position - root.Position).Magnitude < aura then
                    for i = 1,30 do
                        Launch(v.HumanoidRootPart.Position)
                    end
                end
            end
        end
    end)
end)

---------------------------------

local Egg = "Basic Egg"
local Ops = {}
for i,v in pairs(game:GetService("Workspace")["Eggs"]:GetChildren()) do
    table.insert(Ops,v.Name)
end

S5:Cheat("Dropdown", "EggType", function(Option) --Dropdowns
    Egg = Option
end, {
    options = Ops
})

S5:Cheat("Checkbox","Delete Legendaries",
function(State)
    if not State then
        Legend = false
    else
        Legend = true
    end
end
)

S5:Cheat("Checkbox","Delete Epics",
function(State)
    if not State then
        Epi = false
    else
        Epi = true
    end
end
)

S5:Cheat("Checkbox","Delete Rares",
function(State)
    if not State then
        Rar = false
    else
        Rar = true
    end
end
)

S5:Cheat("Checkbox","Delete Uncommons",
function(State)
    if not State then
        Uncom = false
    else
        Uncom = true
    end
end
)

S5:Cheat("Checkbox","Delete Commons",
function(State)
    if not State then
        Comm = false
    else
        Comm = true
    end
end
)

function ColorCheck(obj,col)

    --THIS IS THE DUMBEST SHIT I'VE EVER HAD TO DEAL WITH
    --ROBLOX COLOR SYSTEMS CAN EAT MY ASS

    local Or = tonumber(string.match(tostring(obj.ImageColor3.R),".\..")) or obj.ImageColor3.R
    local Ob = tonumber(string.match(tostring(obj.ImageColor3.G),".\..")) or obj.ImageColor3.G
    local Og = tonumber(string.match(tostring(obj.ImageColor3.B),".\..")) or obj.ImageColor3.B
    local Cr = tonumber(string.match(tostring(col.R),".\..")) or col.R
    local Cb = tonumber(string.match(tostring(col.G),".\..")) or col.G
    local Cg = tonumber(string.match(tostring(col.B),".\..")) or col.B

    --LIKE WHY THE FUCK DO I HAVE TO MINIMIZE THE GOD DAMN COLORS
    --SO THEY ONLY GO UP TO THE TENTH DECIMAL

    --FUCKIN STUPID

    if (Or == Cr and Og == Cg and Ob == Cb) then
        return true
    end
    return false
end

function Check(v)
    if ColorCheck(v,Legendary) and Legend then
        return true
    elseif ColorCheck(v,Epic) and Epi then
        return true
    elseif ColorCheck(v,Rare) and Rar then
        return true
    elseif ColorCheck(v,Uncommon) and Uncom then
        return true
    elseif ColorCheck(v,Common) and Comm then
        return true
    end
    return false
end

S5:Cheat("Checkbox","AutoSell",
function(State)
    if not State then
        _G.on5 = 0
    else
        _G.on5 = 1
        while _G.on5 == 1 do
            wait()
            pcall(function()
                for i,v in pairs(plr["PlayerGui"]["Pets"]["Frame"]["Frame"]["ScrollingFrame"]:GetChildren()) do
                    if v:IsA("ImageButton") and game:GetService("ReplicatedStorage")["PlayerData"][plr.Name]["Pets"]:FindFirstChild(v.Name) and Check(v) then
                        local PetEvent = game:GetService("ReplicatedStorage").Remotes.PetEvent
                        PetEvent:FireServer(
                            "DeletePet",
                            game:GetService("ReplicatedStorage")["PlayerData"][plr.Name]["Pets"][v.Name]
                        )
                    end
                end
            end)
        end
    end
end
)



S5:Cheat("Checkbox","AutoBuy",
function(State)
    if not State then
        _G.on6 = 0
    else
        _G.on6 = 1
        iiter = 0
        while _G.on6 == 1 do
            wait()
            pcall(function()
                local OpenEgg = game:GetService("ReplicatedStorage").Remotes.OpenEgg
                OpenEgg:InvokeServer(
                    Egg,
                    5
                )
                wait(.05)
                if iiter == 10 then
                    local PetRequest = game:GetService("ReplicatedStorage").Remotes.PetRequest
                    PetRequest:InvokeServer(
                        "EvolveAll"
                    )
                    iiter = 0
                end
                iiter = iiter + 1
            end)
        end
    end
end
)