--bc everyvone is so annoyd that i whant to make some money have the script  
--this script is cracked btw not mine


local VLib = loadstring(game:HttpGet("https://raw.githubusercontent.com/vep1032/VepStuff/main/VL"))()
local w = VLib:Window("Chernobyl", "Area51 crack", "")
local Tab = w:Tab("Combat")

if not workspace:FindFirstChild("BudgieHub–AntiCheatBypass") then
local par = Instance.new("Part", workspace)
par.Anchored = true
par.Locked = true
par.Name = "BudgieHub–AntiCheatBypass"
par.Position = Vector3.new(624, 1143.7354695, 747)
par.CanCollide = false
par.Transparency = 1
par.Size = Vector3.new(35, 2, 35)
end

task.spawn(function()
 while task.wait() do
  pcall(function()
   firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, par, 0)
   firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, par, 1)
  end)
 end
end)

local function gettime()
   return game.Players.LocalPlayer.PlayerGui.EventGUI.Time.Value
end

game.Players.LocalPlayer:SetAttribute("WaitScriptEnd", false)

Tab:Toggle("Hit Aura", function(Value)
togl = Value
   while togl and task.wait(0.1) do
 pcall(function()
 local tool = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool")
  if tool then
    pcall(function()
local parts = workspace:GetPartBoundsInRadius(game.Players.LocalPlayer.Character.HumanoidRootPart.Position, 40)
  for _, part in ipairs(parts) do
     if part.Parent:IsA("Model") and part.Parent:FindFirstChildOfClass("Humanoid") and part.Parent ~= game.Players.LocalPlayer.Character then
local humanoid = part.Parent:FindFirstChildOfClass("Humanoid")
local args = {
    [1] = "Head",
    [2] = humanoid,
    [3] = humanoid.Parent.Head,
    [4] = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool"),
    [5] = Vector3.new(0.937201201915741, -0.3045220375061035, -0.17005980014801025)
}

game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool").GunScript_Server.InflictTarget:FireServer(unpack(args))
      end
     end
    end)
   end
end)
    end
 end)

 Tab:Toggle("powerfull Hit Aura", function(Value)
togl = Value
   while togl and task.wait(0.1) do
    pcall(function()
local parts = workspace:GetPartBoundsInRadius(game.Players.LocalPlayer.Character.HumanoidRootPart.Position, 40)
  for _, part in ipairs(parts) do
     if part.Parent:IsA("Model") and part.Parent:FindFirstChildOfClass("Humanoid") and part.Parent ~= game.Players.LocalPlayer.Character and part.Parent.Name ~= "FakeFriend" then
local humanoid = part.Parent:FindFirstChildOfClass("Humanoid")
 if humanoid.Health > 0 and not game.Players:GetPlayerFromCharacter(humanoid.Parent) and not humanoid:IsDescendantOf(Workspace.Ground) and not humanoid:IsDescendantOf(Workspace.Mineshaft) then
 for _, tool in next, table.merger(game.Players.LocalPlayer.Character:GetChildren(), game.Players.LocalPlayer.Backpack:GetChildren()) do
   if tool:IsA("Tool") and tool:FindFirstChild("GunScript_Server") then
local args = {
    [1] = "Head",
    [2] = humanoid,
    [3] = humanoid.Parent.Head,
    [4] = tool,
    [5] = Vector3.new(0.937201201915741, -0.3045220375061035, -0.17005980014801025)
}

tool.GunScript_Server.InflictTarget:FireServer(unpack(args))
         end
        end
       end
      end
     end
     end)
    end
 end    )

Tab:Button("Insta regen)", function(t)
game.Players.LocalPlayer.Character.Humanoid.HealthChanged:Connect(function()
  firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc["Blizzard Armor"].Head, 1)
  firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc["Blizzard Armor"].Head, 0)
end)
   end)

   Tab:Toggle("Insta regen toggle", function(Value)
loip = Value
 while loip and task.wait() do
   pcall(function()
     if gettime() < 15 then
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc["Blizzard Armor"].Head, 1)
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc["Blizzard Armor"].Head, 0)
       elseif gettime() >= 15 and gettime() < 30 then
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc:FindFirstChild("Silver Armor - 15 min Playtime").Head, 0)
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc:FindFirstChild("Silver Armor - 15 min Playtime").Head, 1)
       elseif gettime() >= 30 and gettime() < 60 then
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc:FindFirstChild("Golden Armor - 30 min Playtime").Head, 0)
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc:FindFirstChild("Golden Armor - 30 min Playtime").Head, 1)
       elseif gettime() >= 60 then
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc:FindFirstChild("Diamond Armor - 60 min Playtime").Head, 0)
         firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.Misc:FindFirstChild("Diamond Armor - 60 min Playtime").Head, 1)
     end
   end)
 end
   end    )

Tab:Dropdown("Dropdown",{"Ice crossbow", "Volcano", "Rocket Launcher", "LXW", "Hex gun", "Fire sword", "Water gun"},function(Value)

game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(625, 1147, 750)
 task.wait(0.3)
        if Value == "Ice crossbow" then
firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.IceZone.GetIceCrossbow.Head, 0)
firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.IceZone.GetIceCrossbow.Head, 1)
        elseif Value == "Volcano" then
firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.LavaZone.Escape.Head, 0)
firetouchinterest(game.Players.LocalPlayer.Character.Head, Workspace.LavaZone.Escape.Head, 1)
        elseif Value == "Rocket Launcher" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-354, 1073, 411)
        elseif Value == "LXW" then
firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.Exit, 0)
firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.Exit, 1)
        elseif Value == "Hex gun" then
firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace["Floor 2"].GetHEXGun.Head, 0)
firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace["Floor 2"].GetHEXGun.Head, 1)
        elseif Value == "Corrupted rifle (Only event)" then
if Workspace:FindFirstChild("NightCity") then
  game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = Workspace.NightCity.Exit.Head.CFrame
end
       elseif Value == "Starecrown skull (Only event)" then
if workspace:FindFirstChild("GetScarecrowSkull") then
  game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = Workspace["GetScarecrowSkull"].CFrame
end
      elseif Value == "Fire sword" then
repeat task.wait()
  game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = Workspace.Incinerator.ChallengeButton7.Button.CFrame
  fireproximityprompt(Workspace.Incinerator.ChallengeButton7.Button.ProximityPrompt, 0)
until Workspace.Incinerator.ChallengeButton7.Button.ProximityPrompt.Enabled == false
  game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(61, 1062, 1158)
      elseif Value == "Water gun" then
 repeat task.wait()
   game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = workspace.Sewer.Valve1.CFrame
   fireproximityprompt(workspace.Sewer.Valve1.ProximityPrompt, 0)
 until workspace.Sewer.Valve1.ProximityPrompt.Enabled == false
 repeat task.wait()
   game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = workspace.Sewer.Valve2.CFrame
   fireproximityprompt(workspace.Sewer.Valve2.ProximityPrompt, 0)
 until workspace.Sewer.Valve2.ProximityPrompt.Enabled == false
 game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-362, 960, -54)
        end
	end    )

    Tab:Button("Safe incinerator", function(t)
Workspace.Incinerator.Challenge1.Model.Model.ChallengeGate:Destroy()
Workspace.Incinerator.Acid:Destroy()

for _, bull in ipairs(Workspace.Bulls:GetDescendants()) do
  bull:Destroy()
end
   end)

Tab:Dropdown("Dropdown",{"Spawn", "Portal", "Incinerator", "Metro", "Sewerage", "Reaper door", "Craft zone", "Mineshaft"},function(Value)
		if Value == "Spawn" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(709, 1150, 744)
		elseif Value == "Portal" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-101, 982, 805)
		elseif Value == "Incinerator" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-322, 1062, 1159)
		elseif Value == "Metro" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-469, 922, 749)
		elseif Value == "Sewerage" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-495, 916, -56)
		elseif Value == "Reaper door" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-202, 982, 294)
        elseif Value == "Mineshaft" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-471, 753, 920)
        elseif Value == "Craft zone" then
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(954, 1070, 735)
		end
	end )

    Tab:Button("Unpack all supply items", function(t)
local saved = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
for _, promp in ipairs(workspace:GetChildren()) do
  if promp:IsA("BasePart") and promp.Name == "SupplyBox" or promp.Name == "SupplyBall" then
promp.ProximityPrompt.MaxActivationDistance = 100
promp.ProximityPrompt.Enabled = true
promp.ProximityPrompt.ClickablePrompt = true

repeat task.wait()
 game.Workspace[game.Players.LocalPlayer.Name]:SetPrimaryPartCFrame(promp.CFrame)
 pcall(function() fireproximityprompt(promp.ProximityPrompt, 1e9) end)
until not promp or not promp:FindFirstChild("ProximityPrompt")

 end
end
 task.wait(0.1)
game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = saved
   end    )

local function havetool(toool)
  for _, tool in next, table.merger(game.Players.LocalPlayer.Backpack:GetChildren(), game.Players.LocalPlayer.Character:GetChildren()) do
    if tool:IsA("Tool") and tool.Name == toool.Name then
      return true
    end
  end
  return false
end

local function returnpos(time)
  if game.Players.LocalPlayer:GetAttribute("WaitScriptEnd") == false then
    game.Players.LocalPlayet:SetAttribute("WaitScriptEnd", true)
    local pos = game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame
      task.delay(time, function() 
       game.Players.LocalPlayer:SetAttribute("WaitScriptEnd", false)
       game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = pos 
      end)
   end
end

Tab:Toggle("Auto get portal event guns", function(Value)
   hhej = Value
    while hhej and task.wait() do
     pcall(function()
      if Workspace:FindFirstChild("GetReaperGun") and not havetool("Reaper\'s Scythe") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.GetReaperGun, 0)
        elseif Workspace:FindFirstChild("GetSecurityTablet") and not havetool("Security Tablet") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.GetSecurityTablet, 0)
        elseif Workspace:FindFirstChild("GetScarecrowSkull") and not havetool("Scarecrow Skull") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.GetScarecrowSkull, 0)
        elseif Workspace:FindFirstChild("DeadGround") and not havetool("LXD") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.DeadGround["LXD - 9999 Cell"], 0)
        elseif Workspace:FindFirstChild("NightCity") and not havetool("Corrupted Rifle") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.NightCity.Exit.Head, 0)
        elseif Workspace.Sewer:FindFirstChild("GetWaterGun") and not havetool("Water Gun") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.Sewer.GetWaterGun, 0)
        elseif Workspace:FindFirstChild("CyberLand") and Workspace.CyberLand:FindFirstChild("GetMechGun") and not havetool("Mech O\' Matic") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace.CyberLand.GetMechGun, 0)
        elseif Workspace:FindFirstChild("CorruptedZone") and not havetool("RGB") then
          firetouchinterest(game.Players.LocalPlayer.Character.HumanoidRootPart, Workspace["CorruptedZone.RGB - 9999 Cell"].Head, 0)
      end
     end)
    end
   end    )

   Tab:Toggle("spam tools", function(Value)
 Sorting = Value
while Sorting do
  for _, item in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
    if item:IsA("Tool") then
      game.Players.LocalPlayer.Character.Humanoid:EquipTool(item)
      game:GetService("RunService").RenderStepped:wait()
      game.Players.LocalPlayer.Character.Humanoid:UnequipTools()
    end
  end
   task.wait()
end
   end    )

   Tab:Button("Hit all entities", function(t)
for _, mod in ipairs(workspace:GetChildren()) do
  if mod:IsA("Model") and mod:FindFirstChild("Head") and mod:FindFirstChildOfClass("Humanoid") then
 local humanoid = mod:FindFirstChildOfClass("Humanoid")
local args = {
    [1] = "Head",
    [2] = humanoid,
    [3] = humanoid.Parent.Head,
    [4] = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool"),
    [5] = Vector3.new(0.937201201915741, -0.3045220375061035, -0.17005980014801025)
}

game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool").GunScript_Server.InflictTarget:FireServer(unpack(args))
  end
end
   end    )

Tab:Toggle("Hit all entities (loop)", function(Value)
 oop = Value
while oop and task.wait(0.1) do
 pcall(function()
 for _, mod in ipairs(workspace:GetChildren()) do
  if mod:IsA("Model") and mod:FindFirstChild("Head") and mod:FindFirstChildOfClass("Humanoid") then
 local humanoid = mod:FindFirstChildOfClass("Humanoid")
local args = {
    [1] = "Head",
    [2] = humanoid,
    [3] = humanoid.Parent.Head,
    [4] = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool"),
    [5] = Vector3.new(0.937201201915741, -0.3045220375061035, -0.17005980014801025)
}

game.Players.LocalPlayer.Character:FindFirstChildOfClass("Tool").GunScript_Server.InflictTarget:FireServer(unpack(args))
  end
 end
 end)
end
   end    )

   Tab:Label("Crafts")

   Tab:Textbox("Player regeneration (Cleansed Rifle)", true,function(Value)
   local player = api.Players:GetPlayerByLowerName(Value)
    if player then
      repeat task.wait()
        for _, tool in next, table.merger(game.Players.LocalPlayer.Character:GetChildren(), game.Players.LocalPlayer.Backpack:GetChildren()) do
          if tool:IsA("Tool") and tool.Name == "Cleansed Rifle" then
local args = {
    [1] = "Head",
    [2] = player.Character.Humanoid,
    [3] = player.Character.Head,
    [4] = tool,
    [5] = Vector3.new(0.937201201915741, -0.3045220375061035, -0.17005980014801025)
}

tool.GunScript_Server.InflictTarget:FireServer(unpack(args))
          end
        end
      until not player or not game.Players.LocalPlayer
    end
 end   )

 Tab:Toggle("Health all players (Cleansed Rifle)", function(Value)
    hgwy = Value
     while hgwy and task.wait(0.0435) do
      task.spawn(function()
       for _, tool in next, table.merger(game.Players.LocalPlayer.Character:GetChildren(), game.Players.LocalPlayer.Backpack:GetChildren()) do
         if tool:IsA("Tool") and tool:FindFirstChild("GunScript_Server") and tool.Name == "Cleansed Rifle" then
           for _, player in next, game.Players:GetPlayers() do
             if workspace:FindFirstChild(player.Name) and player.Character:FindFirstChild("Humanoid") and player.Character:FindFirstChild("Head") then
local args = {
    [1] = "Head",
    [2] = player.Character.Humanoid,
    [3] = player.Character.Head,
    [4] = tool,
    [5] = Vector3.new(0.937201201915741, -0.3045220375061035, -0.17005980014801025)
}

tool.GunScript_Server.InflictTarget:FireServer(unpack(args))
             end
           end
         end
       end
      end)
     end
   end    )