BEE SWARM SIMULATOR

local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local gui = Instance.new("ScreenGui",player.PlayerGui)
local act = false
local act2 = false
local frame = Instance.new("Frame",gui)
frame.BackgroundTransparency = 0.2
frame.BackgroundColor3 = Color3.fromRGB(255,255,255)
frame.BorderColor3 = Color3.fromRGB(155,155,155)
frame.BorderSizePixel = 3
frame.Position = UDim2.new(0.3,0,.3,0)
frame.Size = UDim2.new(.25,0,.4,0)
frame.Active = true
frame.Draggable = true
frame.ClipsDescendants = false
local textl = Instance.new("TextLabel",frame)
textl.BackgroundTransparency = 0
textl.BackgroundColor3 = Color3.fromRGB(255,155,55)
textl.BorderColor3 = Color3.fromRGB(155,55,0)
textl.BorderSizePixel = 3
textl.Position = UDim2.new(0.05,0,.1,0)
textl.Size = UDim2.new(.4,0,.2,0)
textl.TextScaled = true
textl.TextColor3 = Color3.fromRGB(255,255,255)
textl.Text = "Type1"
textl.Font = "Highway"
local textbox = Instance.new("TextBox",frame)
textbox.BackgroundTransparency = 0
textbox.BackgroundColor3 = Color3.fromRGB(55,155,255)
textbox.BorderColor3 = Color3.fromRGB(0,55,155)
textbox.BorderSizePixel = 3
textbox.Position = UDim2.new(0.05,0,.35,0)
textbox.Size = UDim2.new(.4,0,.2,0)
textbox.TextScaled = true
textbox.TextColor3 = Color3.fromRGB(255,255,255)
textbox.Font = "Highway"
textbox.Text = "Gift"
textbox.PlaceholderText = "Optional"
local text2 = Instance.new("TextLabel",frame)
text2.BackgroundTransparency = 0
text2.BackgroundColor3 = Color3.fromRGB(255,155,55)
text2.BorderColor3 = Color3.fromRGB(155,55,0)
text2.BorderSizePixel = 3
text2.Position = UDim2.new(0.55,0,.1,0)
text2.Size = UDim2.new(.4,0,.2,0)
text2.TextScaled = true
text2.TextColor3 = Color3.fromRGB(255,255,255)
text2.Text = "Type2"
text2.Font = "Highway"
local textbox2 = Instance.new("TextBox",frame)
textbox2.BackgroundTransparency = 0
textbox2.BackgroundColor3 = Color3.fromRGB(55,155,255)
textbox2.BorderColor3 = Color3.fromRGB(0,55,155)
textbox2.BorderSizePixel = 3
textbox2.Position = UDim2.new(0.55,0,.35,0)
textbox2.Size = UDim2.new(.4,0,.2,0)
textbox2.TextScaled = true
textbox2.TextColor3 = Color3.fromRGB(255,255,255)
textbox2.Font = "Highway"
textbox2.Text = ""
textbox2.PlaceholderText = "Optional"
local textbox3 = Instance.new("TextBox",frame)
textbox3.BackgroundTransparency = 0
textbox3.BackgroundColor3 = Color3.fromRGB(55,155,255)
textbox3.BorderColor3 = Color3.fromRGB(0,55,155)
textbox3.BorderSizePixel = 3
textbox3.Position = UDim2.new(0.05,0,.85,0)
textbox3.Size = UDim2.new(.2,0,.1,0)
textbox3.TextScaled = true
textbox3.TextColor3 = Color3.fromRGB(255,255,255)
textbox3.Font = "Highway"
textbox3.Text = ""
textbox3.PlaceholderText = "L/R"
local textbox4 = Instance.new("TextBox",frame)
textbox4.BackgroundTransparency = 0
textbox4.BackgroundColor3 = Color3.fromRGB(55,155,255)
textbox4.BorderColor3 = Color3.fromRGB(0,55,155)
textbox4.BorderSizePixel = 3
textbox4.Position = UDim2.new(0.3,0,.85,0)
textbox4.Size = UDim2.new(.2,0,.1,0)
textbox4.TextScaled = true
textbox4.TextColor3 = Color3.fromRGB(255,255,255)
textbox4.Font = "Highway"
textbox4.Text = ""
textbox4.PlaceholderText = "U/D"
local textbutc = Instance.new("TextButton",frame)
textbutc.BackgroundTransparency = 0
textbutc.BackgroundColor3 = Color3.fromRGB(255,55,55)
textbutc.BorderColor3 = Color3.fromRGB(155,0,0)
textbutc.BorderSizePixel = 3
textbutc.Position = UDim2.new(0.925,0,0,0)
textbutc.Size = UDim2.new(.075,0,.075,0)
textbutc.SizeConstraint = "RelativeXX"
textbutc.TextScaled = true
textbutc.TextColor3 = Color3.fromRGB(255,255,255)
textbutc.Font = "Highway"
textbutc.Text = "X"
textbutc.MouseButton1Click:Connect(function()
gui:Remove()
end)
local textbut22 = Instance.new("TextButton",frame)
textbut22.BackgroundTransparency = 0
textbut22.BackgroundColor3 = Color3.fromRGB(55,255,155)
textbut22.BorderColor3 = Color3.fromRGB(0,155,55)
textbut22.BorderSizePixel = 3
textbut22.Position = UDim2.new(0.55,0,.6,0)
textbut22.Size = UDim2.new(.4,0,.2,0)
textbut22.TextScaled = true
textbut22.TextColor3 = Color3.fromRGB(255,255,255)
textbut22.Font = "Highway"
textbut22.Text = "Eggs"
textbut22.MouseButton1Click:Connect(function()
for i = 1,6 do
local A_1 = i
for a = 1,6 do
local A_2 = a
local A_3 = "Basic"
local A_4 = .001
local Event = game:GetService("ReplicatedStorage").Events.ConstructHiveCellFromEgg
Event:InvokeServer(A_1, A_2, A_3, A_4)
end
end
end)
local textbut = Instance.new("TextButton",frame)
textbut.BackgroundTransparency = 0
textbut.BackgroundColor3 = Color3.fromRGB(55,255,155)
textbut.BorderColor3 = Color3.fromRGB(0,155,55)
textbut.BorderSizePixel = 3
textbut.Position = UDim2.new(0.05,0,.6,0)
textbut.Size = UDim2.new(.4,0,.2,0)
textbut.TextScaled = true
textbut.TextColor3 = Color3.fromRGB(255,255,255)
textbut.Font = "Highway"
textbut.Text = "Start"
textbut.MouseButton1Click:Connect(function()
if act then
act = false
textbut.Text = "Start"
textbut.BackgroundColor3 = Color3.fromRGB(55,255,155)
textbut.BorderColor3 = Color3.fromRGB(0,155,55)
else
textbut.Text = "Stop"
textbut.BackgroundColor3 = Color3.fromRGB(255,55,55)
textbut.BorderColor3 = Color3.fromRGB(155,0,0)
act = true
local lr = tonumber(textbox3.Text)
local ud = tonumber(textbox4.Text)
local TypeOfBee = textbox.Text
local TypeOfBee2 = textbox2.Text
repeat
game:GetService("ReplicatedStorage").Events.ConstructHiveCellFromEgg:InvokeServer(lr, ud, "RoyalJelly", 0.001)
until string.find(game.Players.LocalPlayer.PlayerGui.ScreenGui.BeePopUp.TypeName.Text,TypeOfBee) and string.find(game.Players.LocalPlayer.PlayerGui.ScreenGui.BeePopUp.ColorAndRarity.Text,TypeOfBee2) or string.find(game.Players.LocalPlayer.PlayerGui.ScreenGui.BeePopUp.ColorAndRarity.Text,TypeOfBee) and string.find(game.Players.LocalPlayer.PlayerGui.ScreenGui.BeePopUp.TypeName.Text,TypeOfBee2) or not act
end
end)
local textbutf = Instance.new("TextButton",frame)
textbutf.BackgroundTransparency = 0
textbutf.BackgroundColor3 = Color3.fromRGB(55,255,155)
textbutf.BorderColor3 = Color3.fromRGB(0,155,55)
textbutf.BorderSizePixel = 3
textbutf.Position = UDim2.new(.05,0,-.2,0)
textbutf.Size = UDim2.new(.9,0,.2,0)
textbutf.TextScaled = true
textbutf.TextColor3 = Color3.fromRGB(255,255,255)
textbutf.Font = "Highway"
textbutf.Text = "Farm"
textbutf.MouseButton1Click:Connect(function()
if act2 then
act2 = false
textbutf.Text = "Farm"
textbutf.BackgroundColor3 = Color3.fromRGB(55,255,155)
textbutf.BorderColor3 = Color3.fromRGB(0,155,55)
else
act2 = true
textbutf.Text = "Stop"
textbutf.BackgroundColor3 = Color3.fromRGB(255,55,55)
textbutf.BorderColor3 = Color3.fromRGB(155,0,0)
local krispy = player.Character.HumanoidRootPart.CFrame
repeat
for k,v in pairs(workspace.TreasureCollectibles:GetChildren()) do
player.Character.HumanoidRootPart.CFrame = v.CFrame
wait(.1)
end
wait(1)
until not act2
player.Character.HumanoidRootPart.CFrame = krispy
end
end)