Thank you for using our website
Your script:
local plr = game.Players.LocalPlayer
local Library = loadstring(game:HttpGet("https://raw.githubusercontent.com/xHeptc/Kavo-UI-Library/main/source.lua"))()
-- documents https://xheptcofficial.gitbook.io/kavo-library#update
local Window = Library.CreateLib("I love greedy devs", "DarkTheme")
local Tab = Window:NewTab("Farming")
local Misc = Window:NewTab("Misc")
local Section = Tab:NewSection("Enemy Farm")
--Section:NewLabel("LabelText")
local dd
function updateDropDown()
local updatedList = {}
for i, v in pairs(workspace.Main.Live:GetChildren()) do
if not table.find(updatedList, v.Name) and v.PrimaryPart then
table.insert(updatedList, v.Name)
end
end
dd:Refresh(updatedList)
end
local farming = false
local tog = Section:NewToggle("Farming", "Start the whole farming process", function(state)
farming = state
end)
Section:NewKeybind("KeybindText", "KeybindInfo", Enum.KeyCode.Plus, function()
farming = not farming
end)
local range = 5
Section:NewSlider("Range", "How far you are from the enemy Upwards", 15, 0, function(s) -- 500 (MaxValue) | 0 (MinValue)
range = s
end)
Section:NewButton("Update Enemy List", "Specific for this game, due to loading NPCs", function()
updateDropDown()
end)
local enemyName = ""
dd = Section:NewDropdown("Enemy", "List of current Enemies loaded", {}, function(currentOption)
enemyName = currentOption
end)
updateDropDown()
local dd2
function updateDropDown2()
local updatedList = {}
for i, v in pairs(workspace.QuestObjects:GetChildren()) do
if not table.find(updatedList, v.Name) and v:IsA("Model") and v.PrimaryPart and v.PrimaryPart:FindFirstChild("ProximityPrompt") then
table.insert(updatedList, v.Name)
end
end
dd2:Refresh(updatedList)
end
local Questsos = Tab:NewSection("Auto Quest")
local questing = false
Questsos:NewToggle("Auto Quest", "Automatically Start the Quest", function(state)
questing = state
end)
Questsos:NewButton("Update Quest List", "Specific for this game, due to loading NPCs", function()
updateDropDown2()
end)
local questNPC = ""
dd2 = Questsos:NewDropdown("Quests", "List of current Quests loaded", {}, function(currentOption)
questNPC = currentOption
end)
updateDropDown2()
local miscTab = Misc:NewSection("Random Stuff ngl")
local revF = false
miscTab:NewToggle("Auto Reveal Fragments", "Automatically Reveals the ? Fragment", function(state)
revF = state
end)
miscTab:NewButton("Reveal Soul Orbss", "Shows the Names of the 5 Orbs in Soul Wish", function()
for i, v in pairs(workspace.Camera:GetChildren()) do
if v.Name == "SelectableEffect" and v.Glow:FindFirstChild("BillboardGui") then
v.Glow.BillboardGui.ZIndexBehavior = Enum.ZIndexBehavior.Global
end
end
end)
coroutine.wrap(function()
local ui = game:GetService("Players").LocalPlayer.PlayerGui.Inventory.Root.RightPanel.InventoryGridContainer.InventoryGrid
while task.wait(.3) do
if revF == false then return end
for i, v in pairs(ui:GetDescendants()) do
if v:IsA("TextLabel") and v.Text == "?" then
game:GetService("ReplicatedStorage").dataRemoteEvent:FireServer(
{
[1] = {
["GUID"] = v.Parent.Parent.Name,
["Data"] = {
["Revealed"] = true
},
["Category"] = "Bindable"
},
[2] = "~"
})
end
end
end
end)
function findEnemy()
for i, v in pairs(workspace.Main.Live:GetChildren()) do
if v.PrimaryPart and v:GetAttribute("Dead") == false and v.Name == enemyName then
return v
end
end
return nil
end
local questName = ""
while task.wait() do
if questing then
pcall(function()
if not workspace.QuestObjects:FindFirstChild(questNPC) then return end
local npc = workspace.QuestObjects:FindFirstChild(questNPC)
local theQuestName = ""
if npc == nil then return end
for i, v in pairs(workspace.QuestPackages:GetChildren()) do
if v:FindFirstChildWhichIsA("Model") and v:FindFirstChildWhichIsA("Model").PrimaryPart and v:FindFirstChildWhichIsA("Model").PrimaryPart.Name == "HumanoidRootPart" and (npc.PrimaryPart.Position - v:FindFirstChildWhichIsA("Model").PrimaryPart.Position).Magnitude < 6 then
theQuestName = v.Name
end
end
if theQuestName ~= "" then
if not plr.PlayerGui.QuestCards.Root.QuestCardsList:FindFirstChild(theQuestName) then
game:GetService("ReplicatedStorage").dataRemoteEvent:FireServer({
[1] = theQuestName,
[2] = utf8.char(6)
})
end
end
end)
end
if farming then
local enemy = findEnemy()
if enemy then
spawn(function()
while farming and enemy and enemy.Name == enemyName and enemy.PrimaryPart and enemy:GetAttribute("Dead") == false do
task.wait()
pcall(function()
plr.Character:MoveTo(enemy.PrimaryPart.Position + Vector3.new(0, range, 0))
end)
end
end)
repeat task.wait(1.3)
for i = 1, 7 do
if enemy and enemy.PrimaryPart and farming and enemy:GetAttribute("Dead") == false and enemy.Name == enemyName then
game:GetService("ReplicatedStorage").Events.TryAttack:FireServer({
["Victim"] = enemy,
["Type"] = "Light",
["VictimPosition"] = enemy.PrimaryPart.Position,
["LocalInfo"] = {
["Flying"] = true,
},
["CurrentLight"] = i,
["CurrentLightCombo"] = 1,
["CurrentHeavy"] = 3,
["AnimSet"] = "Vegito"
})
task.wait(.08)
end
end
until not enemy or enemy:GetAttribute("Dead") == true or farming == false or enemy.Name ~= enemyName
end
end
end