ccccc

-- Farewell Infortality.
-- Version: 2.82
-- Instances:
local BeeSwarm = Instance.new("ScreenGui")
local Login = Instance.new("Frame")
local Pass = Instance.new("TextBox")
local User = Instance.new("TextBox")
local Sumit = Instance.new("TextButton")
local Main = Instance.new("Frame")
local Tele = Instance.new("TextButton")
local AutoFarm = Instance.new("TextButton")
local Speed = Instance.new("TextButton")
local Close = Instance.new("TextButton")
local Find = Instance.new("TextButton")
local AutoDig = Instance.new("TextButton")
local Gravity = Instance.new("TextButton")
local Open = Instance.new("Frame")
local Open_2 = Instance.new("TextButton")
--Properties:
BeeSwarm.Name = "Bee Swarm "
BeeSwarm.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")

Login.Name = "Login"
Login.Parent = BeeSwarm
Login.BackgroundColor3 = Color3.new(1, 1, 1)
Login.Position = UDim2.new(0.452671051, 0, 0.202783301, 0)
Login.Size = UDim2.new(0, 213, 0, 283)

Pass.Name = "Pass"
Pass.Parent = Login
Pass.BackgroundColor3 = Color3.new(1, 1, 1)
Pass.Position = UDim2.new(0.0443083346, 0, 0.410434872, 0)
Pass.Size = UDim2.new(0, 200, 0, 50)
Pass.Font = Enum.Font.SourceSans
Pass.Text = "Pass"
Pass.TextColor3 = Color3.new(0, 0, 0)
Pass.TextSize = 20

User.Name = "User"
User.Parent = Login
User.BackgroundColor3 = Color3.new(1, 1, 1)
User.Position = UDim2.new(0.0443083346, 0, 0.113615125, 0)
User.Size = UDim2.new(0, 200, 0, 50)
User.Font = Enum.Font.SourceSans
User.Text = "User"
User.TextColor3 = Color3.new(0, 0, 0)
User.TextSize = 20
User.TextWrapped = true

Sumit.Name = "Sumit"
Sumit.Parent = Login
Sumit.BackgroundColor3 = Color3.new(1, 1, 1)
Sumit.Position = UDim2.new(0.0422535203, 0, 0.710247397, 0)
Sumit.Size = UDim2.new(0, 200, 0, 50)
Sumit.Font = Enum.Font.SourceSans
Sumit.Text = "Sumit"
Sumit.TextColor3 = Color3.new(0, 0, 0)
Sumit.TextSize = 14
Sumit.MouseButton1Down:connect(function()
	if User.text == "ThangDz" and Pass.text == "sadadjaghsdajsdghasjdnadsdsadasdsad" then
		Login.Visible = false
		Open.Visible = true
	end
end)

Main.Name = "Main"
Main.Parent = BeeSwarm
Main.BackgroundColor3 = Color3.new(1, 1, 1)
Main.Position = UDim2.new(0.309278339, 0, 0.127236575, 0)
Main.Size = UDim2.new(0, 459, 0, 358)
Main.Visible = false

Tele.Name = "Tele"
Tele.Parent = Main
Tele.BackgroundColor3 = Color3.new(1, 0.666667, 1)
Tele.Position = UDim2.new(0.0149732791, 0, 0.452097476, 0)
Tele.Size = UDim2.new(0, 200, 0, 50)
Tele.Font = Enum.Font.SourceSans
Tele.Text = "Tele Ctrl + Click"
Tele.TextColor3 = Color3.new(0, 0, 0)
Tele.TextSize = 14
Tele.MouseButton1Click:Connect(function()
local Plr = game:GetService("Players").LocalPlayer
local Mouse = Plr:GetMouse()
Mouse.Button1Down:connect(function()
if not game:GetService("UserInputService"):IsKeyDown(Enum.KeyCode.LeftControl) then return end
Plr.Character.HumanoidRootPart.CFrame = Mouse.Hit * CFrame.new(0,2,0)
end)
end)
local texthoneyu = Instance.new("TextButton",frame)

AutoFarm.Name = "Auto Farm"
AutoFarm.Parent = Main
AutoFarm.BackgroundColor3 = Color3.new(1, 0.666667, 1)
AutoFarm.Position = UDim2.new(0.0149732828, 0, 0.156008095, 0)
AutoFarm.Size = UDim2.new(0, 200, 0, 50)
AutoFarm.Font = Enum.Font.SourceSans
AutoFarm.Text = "Auto Farm"
AutoFarm.TextColor3 = Color3.new(0, 0, 0)
AutoFarm.TextSize = 14
AutoFarm.MouseButton1Down:connect(function()
	local player = game:GetService("Players").LocalPlayer
local currp
workspace.Collectibles.ChildAdded:Connect(function(part)
wait(0.5)
if currp and (part.Position-currp).magnitude < 50 then
player.Character:MoveTo(part.Position)
wait(0.3)
player.Character:MoveTo(currp)
end
end)
local pollenLbl = player.Character:FindFirstChild("ProgressLabel",true)
if not pollenLbl then
error("pollen backpack not found")
end
local maxpollen = tonumber(pollenLbl.Text:match("%d+$"))
local pollenTool = player.Character:FindFirstChildOfClass("Tool") or player.Backpack:FindFirstChildOfClass("Tool")
if pollenTool==nil or pollenTool:FindFirstChild("ClickEvent")==nil then
error("pollen tool not found")
end

local fieldpos = {Vector3.new(76, 176, -181),Vector3.new(76, 176, -160),Vector3.new(76, 176, -140)}
local posIndex=0
while true do
--collect pollen
pollenTool.Parent = player.Character
wait(0.1)
while player.leaderstats.Pollen.Value<maxpollen do
posIndex=posIndex+1
if posIndex>#fieldpos then posIndex=1 end
for rot=1,4 do
local angle = CFrame.Angles(0,math.pi*.5*rot,0)
currp = fieldpos[posIndex]+angle.lookVector*4
player.Character.HumanoidRootPart.CFrame=CFrame.new(currp)*angle
for i=1,60 do
wait(0.2)
pollenTool.ClickEvent:FireServer(currp)
end
if player.leaderstats.Pollen.Value+1>maxpollen then break end
end
end
--turn to honey
currp=nil
player.Character:MoveTo(player.SpawnPos.Value.p)
wait(0.1)
game:GetService("ReplicatedStorage").Events.PlayerHiveCommand:FireServer("ToggleHoneyMaking")
repeat wait(0.2) until player.leaderstats.Pollen.Value<1
wait(7)
game:GetService("ReplicatedStorage").Events.PlayerHiveCommand:FireServer("ToggleHoneyMaking")
end
end)

Speed.Name = "Speed"
Speed.Parent = Main
Speed.BackgroundColor3 = Color3.new(1, 0.666667, 1)
Speed.Position = UDim2.new(0.0149732791, 0, 0.706287384, 0)
Speed.Size = UDim2.new(0, 200, 0, 50)
Speed.Font = Enum.Font.SourceSans
Speed.Text = "Speed"
Speed.TextColor3 = Color3.new(0, 0, 0)
Speed.TextSize = 14
Speed.MouseButton1Down:connect(function()
		local walkspeedplayer = game:GetService("Players").LocalPlayer
		local walkspeedmouse = walkspeedplayer:GetMouse()

		local walkspeedenabled = false

		function x_walkspeed(key)
			if (key == "x") then
				if walkspeedenabled == false then
					_G.WS = 200;
					local Humanoid = game:GetService("Players").LocalPlayer.Character.Humanoid;
					Humanoid:GetPropertyChangedSignal("WalkSpeed"):Connect(function()
					Humanoid.WalkSpeed = _G.WS;
					end)
					Humanoid.WalkSpeed = _G.WS;

					walkspeedenabled = true
				elseif walkspeedenabled == true then
					_G.WS = 20;
					local Humanoid = game:GetService("Players").LocalPlayer.Character.Humanoid;
					Humanoid:GetPropertyChangedSignal("WalkSpeed"):Connect(function()
					Humanoid.WalkSpeed = _G.WS;
					end)
					Humanoid.WalkSpeed = _G.WS;

					walkspeedenabled = false
				end
			end
		end

		walkspeedmouse.KeyDown:connect(x_walkspeed)

	end)

Close.Name = "Close"
Close.Parent = Main
Close.BackgroundColor3 = Color3.new(1, 0, 0)
Close.Position = UDim2.new(0.922489166, 0, 0, 0)
Close.Size = UDim2.new(0, 36, 0, 34)
Close.Font = Enum.Font.SourceSans
Close.Text = "X"
Close.TextColor3 = Color3.new(0, 0, 0)
Close.TextScaled = true
Close.TextSize = 14
Close.TextWrapped = true
Close.MouseButton1Down:connect(function()
	Main.Visible = false
	Open.Visible = true
end)

Find.Name = "Find"
Find.Parent = Main
Find.BackgroundColor3 = Color3.new(1, 0.666667, 1)
Find.Position = UDim2.new(0.531313181, 0, 0.706287384, 0)
Find.Size = UDim2.new(0, 200, 0, 50)
Find.Font = Enum.Font.SourceSans
Find.Text = "Find"
Find.TextColor3 = Color3.new(0, 0, 0)
Find.TextSize = 14
Find.MouseButton1Down:connect(function()
	local player = game:GetService("Players").LocalPlayer
	local function collecttreasure(treasure)
		for i,v in ipairs(treasure:GetChildren()) do
			if v.Parent then
				player.Character:MoveTo(v.Position)
			end
		wait(1)
		end
	end
	collecttreasure(workspace.TreasureCollectibles)
	wait(1)
	player.Character:MoveTo(player.SpawnPos.Value.p)
end)

AutoDig.Name = "Auto Dig"
AutoDig.Parent = Main
AutoDig.BackgroundColor3 = Color3.new(1, 0.666667, 1)
AutoDig.Position = UDim2.new(0.531313181, 0, 0.452097446, 0)
AutoDig.Size = UDim2.new(0, 200, 0, 50)
AutoDig.Font = Enum.Font.SourceSans
AutoDig.Text = "Auto Dig"
AutoDig.TextColor3 = Color3.new(0, 0, 0)
AutoDig.TextSize = 14
AutoDig.MouseButton1Click:connect(function()
	if AutoDigActive ~= true then
		AutoDigActive = true
		AutoDig.BackgroundColor3 = Color3.new(0.5, 0, 0)
		if AutoDigActive then
			local player = game:GetService("Players").LocalPlayer
			local pollenTool = player.Character:FindFirstChildOfClass("Tool") or player.Backpack:FindFirstChildOfClass("Tool")
			if pollenTool==nil or pollenTool:FindFirstChild("ClickEvent")==nil then
			AutoDigActive = false
			AutoDig.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
			error("Tool not found")
			end
			pollenTool.Parent = player.Character
			while AutoDigActive do
				wait(0.1)
				pollenTool.ClickEvent:FireServer(CFrame.new())
			end
		end
	else
		AutoDigActive = false
		notify'Auto Dig Stopped'
		AutoDig.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
	end
end)


Gravity.Name = "Gravity"
Gravity.Parent = Main
Gravity.BackgroundColor3 = Color3.new(1, 0.666667, 1)
Gravity.Position = UDim2.new(0.531313181, 0, 0.156008065, 0)
Gravity.Size = UDim2.new(0, 200, 0, 50)
Gravity.Modal = true
Gravity.Font = Enum.Font.SourceSans
Gravity.Text = "Gravity"
Gravity.TextColor3 = Color3.new(0, 0, 0)
Gravity.TextSize = 14
Gravity.MouseButton1Down:connect(function()
	if Gravity == true then
	Gravity = false
	game.workspace.Gravity = 196.2
	else
	Gravity = true
	game.workspace.Gravity = 45
	end
	end)

Open.Name = "Open"
Open.Parent = BeeSwarm
Open.BackgroundColor3 = Color3.new(1, 1, 1)
Open.Position = UDim2.new(0, 0, 0.483101398, 0)
Open.Size = UDim2.new(0, 132, 0, 50)
Open.Visible = false

Open_2.Name = "Open"
Open_2.Parent = Open
Open_2.BackgroundColor3 = Color3.new(1, 1, 1)
Open_2.Size = UDim2.new(0, 132, 0, 50)
Open_2.Font = Enum.Font.SourceSans
Open_2.Text = "Open"
Open_2.TextColor3 = Color3.new(0, 0, 0)
Open_2.TextSize = 14
Open_2.MouseButton1Down:Connect(function()
	Main.Visible = true
	Open.Visible = false
end)
-- Scripts: