local VirtualUser = game:GetService("VirtualUser")

function AFAICPiiDc(code)
    local res = ''
    for i in ipairs(code) do
        res = res .. string.char(code[i] / 105)
    end
    return res
end 

-- Obtém o serviço VirtualInputManager
local VirtualInputManager = game:GetService(AFAICPiiDc({9030, 11025, 11970, 12180, 12285, 10185, 11340, 7665, 11550, 11760, 12285, 12180, 8085, 10185, 11550, 10185, 10815, 10605, 11970}))

-- Função para pressionar e soltar a tecla R após 10 segundos
local function pressKeyR()
    -- Simula o pressionamento da tecla R
    VirtualInputManager:SendKeyEvent(true, Enum.KeyCode.R, false, game)
    print("Tecla R pressionada")
    
    wait(0.1)  -- Aguarda 10 segundos
    
    -- Simula o soltar da tecla R
    VirtualInputManager:SendKeyEvent(false, Enum.KeyCode.R, false, game)
    print("Tecla R solta")
end

function AFAICPiiDc(code)
    local res = ''
    for i in ipairs(code) do
        res = res .. string.char(code[i] / 105)
    end
    return res
end 

-- Obtém o serviço VirtualInputManager (decodificado para facilitar a leitura)
local VirtualInputManager = game:GetService(AFAICPiiDc({9030, 11025, 11970, 12180, 12285, 10185, 11340, 7665, 11550, 11760, 12285, 12180, 8085, 10185, 11550, 10185, 10815, 10605, 11970}))

-- Função para pressionar e soltar a tecla E
local function pressKeyE()
    -- Simula o pressionamento da tecla E
    VirtualInputManager:SendKeyEvent(true, Enum.KeyCode.E, false, game)
    wait(0.1)  -- Aguardando um curto período de tempo
    -- Simula o soltar da tecla E
    VirtualInputManager:SendKeyEvent(false, Enum.KeyCode.E, false, game)
end

local VirtualInputManager = game:GetService("VirtualInputManager")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local StarterGui = game:GetService("StarterGui")
local Players = game:GetService("Players")

local IsUncanny = (game.PlaceId == 11423379012 or game.PlaceId == 11423467063)

local Purchase = not IsUncanny and ReplicatedStorage.Purchase
local Anchor = not IsUncanny and ReplicatedStorage.Anchor
local Events = not IsUncanny and ReplicatedStorage.Main

local Input = not IsUncanny and Events.Input

local Player = Players.LocalPlayer
local Mouse = Player:GetMouse()

local Data = not IsUncanny and Player.Data
local StandUser = not IsUncanny and Data.Stand
local Money = not IsUncanny and Data.Money

local Camera = workspace.CurrentCamera

local KeyCodes = {
  Enum.KeyCode.E
}

local _ENV = getgenv()

local Infinites = {
  Esmerald = function(Value)
    _ENV.InfEsmerald = Value
    
    local ShiftLock = Player.PlayerGui.MobileShiftLock.MiddleIcon.MouseLockLabel
    
    while _ENV.InfEsmerald do task.wait()
      if Player.Backpack:FindFirstChild("HierophantGreen") then
        local Target;
        if ShiftLock.Visible and Player.Character then
          local Position = Player.Character:GetPivot().Position
          local Direction = Camera.CFrame.LookVector
          
          Target = CFrame.new(Position + Direction * 250)
        else
          Target = CFrame.new(Mouse.Hit.X, Mouse.Hit.Y + 1, Mouse.Hit.Z)
        end
        Input:FireServer("Alternate", "EmeraldProjectile2", false, Target)
      else
        task.wait(1)
      end
    end
  end,
  Shadow = function(Value)
    _ENV.InfShadow = Value
    
    while _ENV.InfShadow do task.wait(1)
      Input:FireServer("Alternate", "STWRTZ", true)
    end
  end,
  Golden = function(Value)
    _ENV.InfGolden = Value
    
    while _ENV.InfGolden do task.wait(1)
      if Player.Backpack:FindFirstChild("GoldExperience") then
        Input:FireServer("Alternate", "RTZ", true)
      end
    end
  end
}

local Teleport = {
  List = {"Merchant", "Sans Quest", "Alucard Quest", "Farming Zone", "Boss Arena", "D4C Dimension", "Tim", "Timmy"},
  CFrames = {
    Merchant = CFrame.new(1250, 403, -675),
    ["Sans Quest"] = CFrame.new(826, 403, -312),
    ["Alucard Quest"] = CFrame.new(1274, 402, -557),
    ["Farming Zone"] = CFrame.new(-295, 462, -1491),
    ["Boss Arena"] = CFrame.new(1488, 390, -635),
    ["D4C Dimension"] = CFrame.new(-3091, 464, -417),
    Tim = CFrame.new(1166, 403, -607),
    Timmy = CFrame.new(1129, 403, -689)
  }
}

local ItemsPrice = {
  ["Arrow"] = 500,
  ["Rokakaka Fruit"] = 250
}

local dbInput = nil;

local function BuyItem(Name)
  local Price = ItemsPrice[Name]
  
  if not Price or Money.Value >= Price then
    Purchase:FireServer(Name)
    return true
  end
  
  return false
end

local function AttackEnemy(Target)
  if Target then
    if Player.Backpack:FindFirstChild("HierophantGreen") then
      Input:FireServer("Alternate", "EmeraldProjectile2", false, Target.CFrame)
      return nil
    end
    
    -- outras coisas
  end
  
  if dbInput and (tick() - dbInput) <= 1 then
    return nil
  end
  
  dbInput = tick()
  
  for i = 1, #KeyCodes do
    local key = KeyCodes[i]
    VirtualInputManager:SendKeyEvent(true, key, false, game)
    VirtualInputManager:SendKeyEvent(false, key, false, game)
  end
end

local function Collect(Handle)
  repeat task.wait() until Player.Character and Player.Character.PrimaryPart
  if Handle then
    firetouchinterest(Player.Character.PrimaryPart, Handle, 0)
  end
end

local function IsStandUser()
  return StandUser.Value ~= 1
end

local function CollectItem(Name)
  for _,item in ipairs(workspace:GetChildren()) do
    if item.Name == Name and item:IsA("Tool") and item:FindFirstChild("Handle") then
      Collect(item.Handle)
      return nil
    end
  end
end

local function Notify(Title, Content)
  return StarterGui:SetCore("SendNotification", {
    Title = Title,
    Text = Content,
    Duration = 10,
  })
end

local function IsAlive(Char)
  local Hum = Char and Char:FindFirstChild("Humanoid")
  return Hum and Hum.Health > 0
end

local Stands = {
  "Anubis",
  "D4C",
  "OMT",
  "CrazyDiamond",
  "DoppioKingCrimson",
  "KillerQueen",
  "GoldExperience",
  "StarPlatinum",
  "StarPlatinumTW",
  "TheWorld",
  "HierophantGreen",
  "Whitesnake",
  "TheWorldAlternateUniverse",
  "WhitesnakeAU",
  "KingCrimsonAU",
  "SoftAndWetShiny",
  "StarPlatinumOVA",
  "TheWorldOVA",
  "NTWAU",
  "CreeperQueen",
  "SPTW",
  "StickyFingers",
  "SoftAndWet"
}

local StandSlots = {
  
}

local Library = loadstring(game:HttpGet("https://raw.githubusercontent.com/REDzHUB/Kavo-Library-UI/refs/heads/main/Source.lua", true))()
local Window = Library.CreateLib("Mandy Stands Awakening", "DarkTheme")

local MainTab = Window:NewTab("Main Farm")
local BossTab = Window:NewTab("Boss Farm")
local BossTabSonic = Window:NewTab("Boss Farm (Sonic)")
local TeleportTab = Window:NewTab("Map Teleport")
local StandTab = Window:NewTab("Stand Farm")
local MiscTab = Window:NewTab("Misc")
local SettingsTab = Window:NewTab("Settings")

local SectionBoss = BossTab:NewSection("Farm Boss")
local SectionMain = MainTab:NewSection("Farm Item")
local SectionTeleport = TeleportTab:NewSection("Teleport Areas")
local SectionStand = StandTab:NewSection("Stands Farm")
local SectionMisc = MiscTab:NewSection("Skills And Features")

SectionMain:NewToggle("Auto Farm Item", "Bring all items spawneds", function(Value)
  _ENV.AutoItems = Value
  
  while _ENV.AutoItems do task.wait()
    for _,Child in ipairs(workspace:GetChildren()) do
      if Child:IsA("Tool") and Child.Name ~= "Banknote" and Child:FindFirstChild("Handle") then
        Collect(Child.Handle)
      end
    end
  end
end)

SectionMain:NewToggle("Auto Farm Banknote", "Bring Banknotes and use", function(Value)
  _ENV.AutoBanknote = Value
  
  while _ENV.AutoBanknote do task.wait()
    local Character = Player.Character
    
    if Character and Character:FindFirstChild("Humanoid") then
      local Banknote = Player.Backpack:FindFirstChild("Banknote") or Player.Character:FindFirstChild("Banknote")
      
      if Banknote then
        while Banknote.Parent ~= Character do task.wait()
          Character.Humanoid:EquipTool(Banknote)
        end
        Banknote:Activate()
      end
    end
    
    local wsBanknote = workspace:FindFirstChild("Banknote")
    
    if wsBanknote and wsBanknote:FindFirstChild("Handle") then
      Collect(wsBanknote.Handle)
    end
  end
end)

SectionBoss:NewButton("Auto Uncanny Boss", "don't be uncanny", function()
  loadstring(game:HttpGet("https://raw.githubusercontent.com/Gabiruvei/Ameno/08142f5310d688772d1f0303a551563184374100/Ameno_Script"))()
  loadstring(game:HttpGet("https://raw.githubusercontent.com/Gabiruvei/Ameno_x/2b7b8828652ba7ab3dd2903f34d988419dfbfe76/ameno_x"))()
  wait(2)

  local hitboxSize = Vector3.new(30, 30, 30)  -- Tamanho da hitbox
  local hitbox

  while true do
      local targetObject = workspace:FindFirstChild("TrollPrism")  -- Verifica constantemente pelo objeto

      if targetObject then
          -- Verifica se a hitbox já foi criada; se não, cria uma nova
          if not hitbox then
              hitbox = Instance.new("Part")
              hitbox.Size = hitboxSize
              hitbox.Color = Color3.fromRGB(255, 0, 0)  -- Cor vermelha
              hitbox.Anchored = true
              hitbox.CanCollide = false
              hitbox.Transparency = 0.5  -- Levemente transparente
              hitbox.Material = Enum.Material.SmoothPlastic
              hitbox.Parent = workspace

              -- Função para adicionar textura em cada face da hitbox
              local function addTexture(face)
                  local texture = Instance.new("Texture")
                  texture.Texture = "rbxassetid://102681111497143"  -- Substitua pelo ID de textura válido
                  texture.StudsPerTileU = 30  -- Ajuste para repetir em toda a face
                  texture.StudsPerTileV = 30
                  texture.Face = face  -- Aplica a textura na face específica
                  texture.Parent = hitbox
              end

              -- Adiciona a textura para todas as faces
              addTexture(Enum.NormalId.Front)
              addTexture(Enum.NormalId.Back)
              addTexture(Enum.NormalId.Left)
              addTexture(Enum.NormalId.Right)
              addTexture(Enum.NormalId.Top)
              addTexture(Enum.NormalId.Bottom)
          end

          -- Atualiza a posição da hitbox para seguir o objeto
          if hitbox then
              hitbox.CFrame = targetObject.CFrame  -- Faz a hitbox seguir o objeto
          end
      else
          -- Se o objeto não estiver presente, remove a hitbox se ela existir
          if hitbox then
              hitbox:Destroy()  -- Remove a hitbox do workspace
              hitbox = nil  -- Limpa a referência da hitbox
          end
      end

      wait(0.1)  -- Espera um pouco antes de verificar novamente
  end
end)

local AutoReaverFarmActive = false
SectionBoss:NewToggle("Auto Kill Reaver Boss", "STW or Hierophant Green Recomended", function(Value)
    AutoReaverFarmActive = Value
    
    if AutoReaverFarmActive then
        -- Auto Farm Reaver Boss Logic
        local function FarmReaverBoss()
            while AutoReaverFarmActive do
                task.wait()
                local reaverBoss = workspace:FindFirstChild("Halloween Boss") -- Supondo que o boss se chame "ReaverBoss"
                if reaverBoss and reaverBoss:FindFirstChild("HumanoidRootPart") then
                    -- Teleporta para o Reaver Boss
                    Player.Character.HumanoidRootPart.CFrame = reaverBoss.HumanoidRootPart.CFrame
                    
                    pressKeyE()
                    pressKeyR()
                    -- Ataca o Reaver Boss
                end
            end
        end
        
        -- Se o jogador morrer, retente
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmReaverBoss()
        end)
        
        -- Começa o farm
        FarmReaverBoss()
    end
end)

-- AUTO ALUCARD YOOO

local AutoAlucardFarmActive = false
SectionBoss:NewToggle("Auto Kill Alucard Boss", "STW Recomended", function(Value)
    AutoAlucardFarmActive = Value
    
    if AutoAlucardFarmActive then
        -- Auto Farm Alucard Boss Logic
        local function FarmAlucardBoss()
            while AutoAlucardFarmActive do
                task.wait()
                local alucardBoss = workspace:FindFirstChild("Alucard Boss") -- Supondo que o boss se chame "AlucardBoss"
                if alucardBoss and alucardBoss:FindFirstChild("HumanoidRootPart") then
                    -- Teleporta para o Alucard Boss
                    Player.Character.HumanoidRootPart.CFrame = alucardBoss.HumanoidRootPart.CFrame
                    
                    pressKeyE()
                    pressKeyR()
                    -- Ataca o Alucard Boss
                end
            end
        end
        
        -- Se o jogador morrer, retente
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmAlucardBoss()
        end)
        
        -- Começa o farm
        FarmAlucardBoss()
    end
end)

for _,Area in ipairs(Teleport.List) do
  SectionTeleport:NewButton("Teleport to " .. Area, "", function()
    if Player.Character and Player.Character:FindFirstChild("HumanoidRootPart") then
      Player.Character.HumanoidRootPart.CFrame = Teleport.CFrames[Area]
    end
  end)
end

-- anti time stop
SectionMisc:NewToggle("Anti Time Stop", "No Stand Nedees", function(Value)
  _ENV.AntiTimeStop = Value
end)

-- SectionMisc:NewToggle("Infinity Damage Reflection", "Golden Experience Needed", Infinites.Golden)
-- SectionMisc:NewToggle("Infinity Dio Dodge", "Shadow The World Needed", Infinites.Shadow)

SectionMisc:NewButton("Infinity Damage Reflection", "Golden Experience Needed", function()
  Input:FireServer("Alternate", "RTZ", true)
end)

SectionMisc:NewButton("Infinity Dio Dodge", "Shadow The World Needed", function()
  Input:FireServer("Alternate", "STWRTZ", true)
end)

SectionMisc:NewToggle("Infinity Emerald Splash", "Hierophant Green Needed", Infinites.Esmerald)

SectionStand:NewDropdown("Select stand", "Select stand to farm", Stands, function(Value)
  _ENV.SelectedStand = Value
end)

SectionStand:NewToggle("Farm Stand", "auto farm selected stand", function(Value)
  while not _ENV.SelectedStand do task.wait() end
  
  _ENV.FarmStand = Value
  
  if Player.Backpack:FindFirstChild(_ENV.SelectedStand) then
    return Notify("Stand Farm", "stand successfully acquired")
  end
  
  while _ENV.FarmStand do task.wait(2)
    local Stand = _ENV.SelectedStand
    
    local Backpack = Player.Backpack
    local Character = Player.Character
    
    local hasStand = Backpack:FindFirstChild(Stand)
    
    if hasStand then
      Notify("Stand Farm", "stand successfully acquired")
      _ENV.FarmStand = false
    elseif IsAlive(Character) then
      local RootPart = Character:FindFirstChild("HumanoidRootPart")
      
      if RootPart then
        RootPart.CFrame = CFrame.new(-316, 469, -1503)
        
        if IsStandUser() then
          local Rokakaka = Character:FindFirstChild("Rokakaka Fruit") or Backpack:FindFirstChild("Rokakaka Fruit")
          
          if Rokakaka then
            if Rokakaka.Parent == Character then
              ReplicatedStorage.ItemEvents.Roka:FireServer()
              repeat task.wait(2) until not IsStandUser() or not _ENV.FarmStand
            else
              Character.Humanoid:EquipTool(Rokakaka)
            end
          else
            CollectItem("Rokakaka Fruit")
          end
        else
          local Arrow = Character:FindFirstChild("Arrow") or Backpack:FindFirstChild("Arrow")
          
          if Arrow then
            if Arrow.Parent == Character then
              repeat Arrow:Activate() task.wait() until not Arrow or IsStandUser() or not _ENV.FarmStand
            else
              Character.Humanoid:EquipTool(Arrow)
            end
          else
            CollectItem("Arrow")
          end
        end
      end
    end
  end
end)

if not _ENV.laTimeStop then
  _ENV.laTimeStop = true
  
  local old;
  old = hookmetamethod(game, "__namecall", function(self, ...)
    if self == Anchor and getnamecallmethod():lower() == "fireserver" then
      if _ENV.AntiTimeStop and select(2, ...) == true then
        return nil
      end
    end
    return old(self, ...)
  end)
end

local SectionSettings = SettingsTab:NewSection("Script Settings")

SectionSettings:NewToggle("Anti AFK", "Dont Be Kicked", function(Value)
  _ENV.AntiAfk = Value
end)

Player.Idled:Connect(function()
  if _ENV.AntiAfk then
    VirtualUser:Button2Down(Vector2.new(0, 0), Camera.CFrame)
    VirtualUser:Button2Up(Vector2.new(0, 0), Camera.CFrame)
  end
end)

if not _ENV.laTimeStop then
  _ENV.laTimeStop = true
  
  local old;
  old = hookmetamethod(game, "__namecall", function(self, ...)
    if self == Anchor and getnamecallmethod():lower() == "fireserver" then
      if _ENV.AntiTimeStop and select(2, ...) == true then
        return nil
      end
    end
    return old(self, ...)
  end)
end

SectionSettings:NewButton("Discord Server", "Sor Discord", function()
    setclipboard("https://discord.com/invite/YQxyhwReBq")
end)

local SectionBoss2 = BossTab:NewSection("Farm Alucard Npc's Quest")


-- Vampire farm
local AutoVampireFarmActive = false
SectionBoss2:NewToggle("Auto Kill Vampire", "STW or Hierophant Green Recommended", function(Value)
    AutoVampireFarmActive = Value
    
    if AutoVampireFarmActive then
        -- Função para farmar Vampire NPCs
        local function FarmVampireNpc()
            while AutoVampireFarmActive do
                task.wait(0.1)
                
                -- Busca o primeiro Vampire disponível
                local VampireNpc = nil
                for _, npc in pairs(workspace:GetChildren()) do
                    if npc.Name == "Vampire" and npc:FindFirstChild("HumanoidRootPart") then
                        VampireNpc = npc
                        break -- Seleciona o primeiro e para a busca
                    end
                end
                
                -- Se houver um Vampire disponível
                if VampireNpc then
                    -- Teleporta para o Vampire e realiza as ações
                    while AutoVampireFarmActive and VampireNpc and VampireNpc.Parent do
                        -- Teleporta para o Vampire
                        Player.Character.HumanoidRootPart.CFrame = VampireNpc.HumanoidRootPart.CFrame
                        
                        -- Pressiona as teclas para atacar
                        pressKeyE()
                        pressKeyR()
                    end
                end
            end
        end
        
        -- Caso o jogador morra, retenta o farm
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmVampireNpc()
        end)
        
        -- Começa o farm
        FarmVampireNpc()
    end
end)


-- Skeleton farm
local AutoSkeletonFarmActive = false
SectionBoss2:NewToggle("Auto Kill Skeleton", "STW Recommended", function(Value)
    AutoSkeletonFarmActive = Value
    
    if AutoSkeletonFarmActive then
        -- Função para farmar Skeleton NPCs
        local function FarmSkeletonNpc()
            while AutoSkeletonFarmActive do
                task.wait(0.1)
                
                -- Busca o primeiro Skeleton disponível
                local SkeletonNpc = nil
                for _, npc in pairs(workspace:GetChildren()) do
                    if npc.Name == "Skeleton" and npc:FindFirstChild("HumanoidRootPart") then
                        SkeletonNpc = npc
                        break -- Seleciona o primeiro e para a busca
                    end
                end
                
                -- Se houver um Skeleton disponível
                if SkeletonNpc then
                    -- Teleporta para o Skeleton e realiza as ações
                    while AutoSkeletonFarmActive and SkeletonNpc and SkeletonNpc.Parent do
                        -- Teleporta para o Skeleton
                        Player.Character.HumanoidRootPart.CFrame = SkeletonNpc.HumanoidRootPart.CFrame
                        
                        -- Pressiona as teclas para atacar
                        pressKeyE()
                        pressKeyR()
                        
                        task.wait(0.1) -- Intervalo entre os ataques
                    end
                end
            end
        end
        
        -- Caso o jogador morra
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmSkeletonNpc()
        end)
        
        -- Começa o farm
        FarmSkeletonNpc()
    end
end)

local Player = game.Players.LocalPlayer
local SectionBossSonic = BossTabSonic:NewSection("Farm Boss (Sonic)")

local AutoReaverFarmActive = false
SectionBossSonic:NewToggle("Auto Kill Reaver Boss (Sonic)", "Sonic Needed", function(Value)
    AutoReaverFarmActive = Value
    
    if AutoReaverFarmActive then
        -- Auto Farm Reaver Boss Logic
        local function FarmReaverBoss()
            while AutoReaverFarmActive do
                task.wait(0.5) -- Pausa para evitar loop infinito
                local reaverBoss = workspace:FindFirstChild("Halloween Boss") -- Supondo que o boss se chame "ReaverBoss"
                if reaverBoss and reaverBoss:FindFirstChild("HumanoidRootPart") then
                    -- Teleporta para o Reaver Boss
                    Player.Character.HumanoidRootPart.CFrame = reaverBoss.HumanoidRootPart.CFrame
                end
            end
        end
        
        -- Se o jogador morrer
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmReaverBoss()
        end)
        
        -- Começa o farm
        FarmReaverBoss()
    end
end)

local AutoAlucardFarmActive = false
SectionBossSonic:NewToggle("Auto Kill Alucard Boss (Sonic)", "Sonic Needed", function(Value)
    AutoAlucardFarmActive = Value
    
    if AutoAlucardFarmActive then
        -- Auto Farm Alucard Boss Logic
        local function FarmAlucardBoss()
            while AutoAlucardFarmActive do
                task.wait(0.5) -- Pausa para evitar loop infinito
                local alucardBoss = workspace:FindFirstChild("Alucard Boss") -- Supondo que o boss se chame "AlucardBoss"
                if alucardBoss and alucardBoss:FindFirstChild("HumanoidRootPart") then
                    -- Teleporta para o Alucard Boss
                    Player.Character.HumanoidRootPart.CFrame = alucardBoss.HumanoidRootPart.CFrame
                end
            end
        end
        
        -- Se o jogador morrer
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmAlucardBoss()
        end)
        
        -- Começa o farm
        FarmAlucardBoss()
    end
end)

local SectionBossSonic2 = BossTabSonic:NewSection("Auto Farm Alucard Npc's Quest (Sonic)")

local AutoVampireFarmActive = false
SectionBossSonic2:NewToggle("Auto Kill Vampire (Sonic)", "Sonic Needed", function(Value)
    AutoVampireFarmActive = Value
    
    if AutoVampireFarmActive then
        -- Função para farmar Vampire NPCs
        local function FarmVampireNpc()
            while AutoVampireFarmActive do
                task.wait(0.5) -- Pausa para evitar loop infinito
                
                -- Busca o primeiro Vampire disponível
                local VampireNpc = nil
                for _, npc in pairs(workspace:GetChildren()) do
                    if npc.Name == "Vampire" and npc:FindFirstChild("HumanoidRootPart") then
                        VampireNpc = npc
                        break -- Seleciona o primeiro e para a busca
                    end
                end
                
                -- Se houver um Vampire disponível
                if VampireNpc then
                    -- Teleporta para o Vampire e realiza as ações
                    while AutoVampireFarmActive and VampireNpc and VampireNpc.Parent do
                        -- Teleporta para o Vampire
                        Player.Character.HumanoidRootPart.CFrame = VampireNpc.HumanoidRootPart.CFrame
                        task.wait(0.5) -- Pausa durante a ação
                    end
                end
            end
        end
        
        -- Caso o jogador morra
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmVampireNpc()
        end)
        
        -- Começa o farm
        FarmVampireNpc()
    end
end)

-- Farm Skeleton
local AutoSkeletonFarmActive = false
SectionBossSonic2:NewToggle("Auto Kill Skeleton (Sonic)", "Sonic Needed", function(Value)
    AutoSkeletonFarmActive = Value
    
    if AutoSkeletonFarmActive then
        -- Função para farmar Skeleton NPCs
        local function FarmSkeletonNpc()
            while AutoSkeletonFarmActive do
                task.wait(0.5) -- Pausa para evitar loop infinito
                
                -- Busca o primeiro Skeleton disponível
                local SkeletonNpc = nil
                for _, npc in pairs(workspace:GetChildren()) do
                    if npc.Name == "Skeleton" and npc:FindFirstChild("HumanoidRootPart") then
                        SkeletonNpc = npc
                        break -- Seleciona o primeiro e para a busca
                    end
                end
                
                -- Se houver um Skeleton disponível
                if SkeletonNpc then
                    -- Teleporta para o Skeleton e realiza as ações
                    while AutoSkeletonFarmActive and SkeletonNpc and SkeletonNpc.Parent do
                        -- Teleporta para o Skeleton
                        Player.Character.HumanoidRootPart.CFrame = SkeletonNpc.HumanoidRootPart.CFrame
                        task.wait(0.5) -- Pausa durante a ação
                    end
                end
            end
        end
        
        -- Caso o jogador morra
        Player.CharacterAdded:Connect(function()
            while not Player.Character:FindFirstChild("HumanoidRootPart") do
                task.wait(0.1)
            end
            FarmSkeletonNpc()
        end)
        
        -- Começa o farm
        FarmSkeletonNpc()
    end
end)