Collect All Pets! Script

if game.CoreGui:FindFirstChild("CryptidHub - Collect All Pets!") then
    game.CoreGui["CryptidHub - Collect All Pets!"]:Destroy()
end
local Material = loadstring(game:HttpGet("https://raw.githubusercontent.com/Kinlei/MaterialLua/master/Module.lua"))()
local X = Material.Load({
	Title = "CryptidHub - Collect All Pets!",
	Style = 2,
	SizeX = 500,
	SizeY = 350,
	Theme = "Mocha",
	ColorOverrides = {
		MainFrame = Color3.fromRGB(235,235,235)
	}
})
local children = workspace.HiddenEggs:GetChildren()
local Pos = game:GetService('Players').LocalPlayer.Character.HumanoidRootPart
local Main = X.New({
    Title = "Main"
})
local Upgrades = X.New({
    Title = "Upgrades"
})
local Player = X.New({
    Title = "Player"
})
local Teleport = X.New({
    Title = "Teleports"
})
local Misc = X.New({
    Title = "Misc"
})local AutoOpenEgg = Main.Dropdown({
    Text = "Egg Option",
    Callback = function(Value)
        if Value == "Common Egg" then
            eggg = 1
        end
        if Value == "Uncommon Egg" then
            eggg = 2
        end
        if Value == "Rare Egg" then
            eggg = 3
        end
        if Value == "Epic Egg" then
            eggg = 4
        end
        if Value == "Legendary Egg" then
            eggg = 5
        end
        if Value == "Prodigious Egg" then
            eggg = 6
        end
    end,
    Options = {
        "Common Egg",
        "Uncommon Egg",
        "Rare Egg",
        "Epic Egg",
        "Legendary Egg",
        "Prodigious Egg"
    }
})
local QuestAutoComplete = Main.Toggle({
    Text = "Auto Complete Quests",
    Callback = function(Value)
        OS = Value
    end
})
local OpenEgg = Main.Toggle({
    Text = "Auto Open Egg",
    Callback = function(Value)
        Openn = Value
    end
})
local OpenEggOne = Main.Button({
    Text = "Open Egg Once",
    Callback = function(Value)
        game:GetService("ReplicatedStorage").Remotes.BuyEgg:FireServer(eggg)
    end
})
local AntiOpenGui = Main.Button({
    Text = "Anti Egg Open UI",
    Callback = function(Value)
        game:GetService('Players').LocalPlayer.PlayerGui.ScreenGui.Hatcher.Visible = false
        game:GetService('Players').LocalPlayer.PlayerGui.ScreenGui.Hatcher:FindFirstChildOfClass('LocalScript'):Destroy()
        AEOU = true
    end
})
local AutoQuest = Main.Toggle({
    Text = "Auto Collect Quests",
    Callback = function(Value)
        ACQ = Value
    end
})
local Autocollect = Main.Toggle({
    Text = "Auto Collect Drops",
    Callback = function(Value)
        enabledd = Value
    end,
    Menu = {
        Information = function(self)
            X.Banner({
                Text = "Can be laggy."
            })
        end
    }
})
Costone = Workspace.StatIncreaseShops.StatIncrease_Damage.GuiPart.Gui.PriceLabel.Text:split(">")[2]:split("<")[1]
local AutoBuyDamage = Upgrades.Toggle({
    Text = "Auto Buy Damage - " .. Costone .. " Gold",
    Callback = function(Value)
        ABD = Value
    end
})
local BuyDamage = Upgrades.Button({
    Text = "Buy Damage - " .. Costone .. " Gold",
    Callback = function(Value)
        local args = {
            [1] = "Damage"
        }

        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
    end
})
Costtwo = Workspace.StatIncreaseShops.StatIncrease_Speed.GuiPart.Gui.PriceLabel.Text:split(">")[2]:split("<")[1]
local AutoBuySpeed = Upgrades.Toggle({
    Text = "Auto Buy Speed - " .. Costtwo .. " Gold",
    Callback = function(Value)
        ABS = Value
    end
})
local BuySpeed = Upgrades.Button({
    Text = "Buy Speed - " .. Costtwo .. " Gold",
    Callback = function(Value)
        local args = {
            [1] = "Speed"
        }
        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
    end
})
local Cost = "0"
local hasgamepass = game:GetService('Players').LocalPlayer.HasPetEquipGamePass.Value
local petslots = game:GetService('Players').LocalPlayer.PetSlotsUnlocked.Value
if hasgamepass == false and petslots == 4 then
    Cost = "25,000 Gold"
    Current = 0
end
if hasgamepass == false and petslots == 5 then
    Cost = "100,000 Gold"
    Current = 1
end
if hasgamepass == false and petslots == 6 then
    Cost = "500,000 Gold"
    Current = 2
end
if hasgamepass == false and petslots == 7 then
    Cost = "10,000,000 Gold"
    Current = 3
end
if hasgamepass == false and petslots == 8 then
    Cost = "25,000,000 Gold"
    Current = 4
end
if hasgamepass == true and petslots == 6 then
    Cost = "25,000 Gold"
    Current = 0
end
if hasgamepass == true and petslots == 7 then
    Cost = "100,000 Gold"
    Current = 1
end
if hasgamepass == true and petslots == 8 then
    Cost = "500,000 Gold"
    Current = 2
end
if hasgamepass == true and petslots == 9 then
    Cost = "10,000,000 Gold"
    Current = 3
end
if hasgamepass == true and petslots == 10 then
    Cost = "25,000,000 Gold"
    Current = 4
end
local autobuypetslot = Upgrades.Toggle({
    Text = "Auto Buy Pet Slot - "..Cost,
    Callback = function(Value)
        ABPS = Value
    end
})
local buypetslot = Upgrades.Button({
    Text = "Buy Pet Slot - " .. Cost,
    Callback = function(Value)
        if Current == 0 and Value == true then
            local args = {
                [1] = 1
            }
            game:GetService("ReplicatedStorage").Remotes.BuyPetEquipSlot:FireServer(unpack(args))
        end
        if Current == 1 and Value == true then
            local args = {
                [1] = 2
            }
            game:GetService("ReplicatedStorage").Remotes.BuyPetEquipSlot:FireServer(unpack(args))
        end
        if Current == 2 and Value == true then
            local args = {
                [1] = 3
            }
            game:GetService("ReplicatedStorage").Remotes.BuyPetEquipSlot:FireServer(unpack(args))
        end
    end
})
Costthree = Workspace.StatIncreaseShops.StatIncrease_DropCollectionRange.GuiPart.Gui.PriceLabel.Text:split(">")[2]:split("<")[1]
local autobuydropcollect = Upgrades.Toggle({
    Text = "Auto Buy Drop Collection Range - " .. Costthree .. " Gold",
    Callback = function(Value)
        ABDCR = Value
    end
})
local buydropcollect = Upgrades.Button({
    Text = "Buy Drop Collection Range - " .. Costthree .. " Gold",
    Callback = function(Value)
        local args = {
            [1] = "DropCollectionRange"
        }

        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
    end
})
Costfive = Workspace.StatIncreaseShops.StatIncrease_ShinyLuck.GuiPart.Gui.PriceLabel.Text:split(">")[2]:split("<")[1]
local AutoShinyLuck = Upgrades.Toggle({
    Text = "Auto Buy Shiny Luck - " .. Costfive .. "Gold",
    Callback = function(Value)
        ASL = Value
    end
})
local Shinyluck = Upgrades.Button({
    Text = "Buy Shiny Luck - " .. Costfive .. "Gold",
    Callback = function(Value)
        local args = {
            [1] = "ShinyLuck"
        }
        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
        wait()
    end
})
local plrws = game:GetService('Players').LocalPlayer.Character.Humanoid.WalkSpeed
local plrjp = game:GetService('Players').LocalPlayer.Character:FindFirstChildOfClass('Humanoid').JumpHeight
local Teleporttoplayer = Player.TextField({
    Text = "Teleport to Player",
    Callback = function(Value)
        Pos.CFrame = game:GetService('Players')[Value].Character.HumanoidRootPart.CFrame
    end
})
local Walkspeed = Player.Slider({
    Text = "Walkspeed",
    Callback = function(Value)
        plrws = (Value)
    end,
    Min = 16.75,
    Max = 100,
    Def = 58.375
})
local Jumppower = Player.Slider({
    Text = "Jumppower",
    Callback = function(Value)
        plrjp  = Value
    end,
    Min = 10,
    Max = 100,
    Def = 55
})
local Spawn = Teleport.Button({
    Text = "Spawn",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(-0.4, 5.56, -57.33)
    end
})
local Meadow = Teleport.Button({
    Text = "Meadow",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(1.39, 5.56, -277.14)
    end
})
local Forest = Teleport.Button({
    Text = "Forest",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(9.9, 5.56, -418)
    end
})
local Desert = Teleport.Button({
    Text = "Desert",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(163.19, 5.56, -427.84)
    end
})
local Arctic = Teleport.Button({
    Text = "Arctic",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(167.67, 5.56, -272)
    end
})
local Beach = Teleport.Button({
    Text = "Beach",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(171.62, 5.56, -104.23)
    end
})
local Mountains = Teleport.Button({
    Text = "Mountains",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(174.63, 25.29, 46.63)
    end
})
local Jungle = Teleport.Button({
    Text = "Jungle",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(-40, 5.56, 72.34)
    end
})
local Grotto = Teleport.Button({
    Text = "Grotto",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(-266.59, 5.56, 146.12)
    end
})
local Cave = Teleport.Button({
    Text = "Cave",
    Callback = function(Value)
        Pos.CFrame = CFrame.new(-110.78, 5.56, -49.72)
    end
})
local CollectEggs = Misc.Button({
    Text = "Collect Eggs",
    Callback = function(Value)
        local children = workspace.HiddenEggs:GetChildren()
        for i = 1, #children do
            var = children[i].Position
            for i = 1, #children do
                Pos.CFrame = CFrame.new(var)
                wait(0.1)
            end
        end
    end,
    Menu = {
        Information = function(self)
            X.Banner({
                Text = "Requires zones eggs are in. (might take a while)"
            })
        end
    }
})
local RedeemCodes = Misc.Button({
    Text = "Redeem Codes",
    Callback = function(Value)
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("WhoLetTheDogsOut")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("ItsAlwaysADesert")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("DuelingDragons")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("FewAndFarBetween")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("KlausWasHere")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("ShinyHunting")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("TooManyDrops")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("TheGreatCodeInTheSky")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("PillarsOfCreation")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("TreeSauce")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("TillFjalls")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("Orion")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("HorseWithNoName")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("IfYouAintFirst")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("MemoryLeak")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("SecretCodeWasHere")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("Taikatalvi")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("Brrrrr")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("Click")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("4815162342")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("Erdentempel")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("FirstCodeEver")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("Groupie")
        game:GetService("ReplicatedStorage").Remotes.RedeemCode:FireServer("NewCode")
    end
})
while true do
    while enabledd do
		for _, obj in pairs(game.Workspace.Drops:GetDescendants()) do
			if obj.Name == "Base" then
				Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			end
		end
	    wait()
    end
    while Openn do
        game:GetService("ReplicatedStorage").Remotes.BuyEgg:FireServer(eggg)
        wait(1)
    end
    while ABD do
        local args = {
            [1] = "Damage"
        }

        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
        wait()
    end
    while ABS do
        local args = {
            [1] = "Speed"
        }
        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
        wait()
    end
    while ACQ do
        game:GetService("ReplicatedStorage").Remotes.ClaimQuestReward:FireServer()
        wait()
    end
    while ABDCR do
        local args = {
            [1] = "DropCollectionRange"
        }
        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
        wait()
    end

    while ASL do
        local args = {
            [1] = "ShinyLuck"
        }
        game:GetService("ReplicatedStorage").Remotes.BuyStatIncrease:FireServer(unpack(args))
        wait()
    end
	while OS do
        game:GetService('ReplicatedStorage').Remotes.ClaimQuestReward:FireServer()
        local Pos = game:GetService('Players').LocalPlayer.Character.HumanoidRootPart
		local QuestTask = game:GetService('Players').LocalPlayer.QuestTask.Value
        local QuestArea = game:GetService('Players').LocalPlayer.QuestArea.Value
        local CurrentArea = game:GetService('Players').LocalPlayer.Area.Value
        local Meadowpos = CFrame.new(1.39, 5.56, -277.14)
        local Forestpos = CFrame.new(9.9, 5.56, -418)
        local Desertpos = CFrame.new(163.19, 5.56, -427.84)
        local Arcticpos = CFrame.new(167.67, 5.56, -272)
        local Beachpos = CFrame.new(171.62, 5.56, -104.23)
        local Mountainspos = CFrame.new(174.63, 25.29, 46.63)
        local Junglepos = CFrame.new(-40, 5.56, 72.34)
        local Grottopos =  CFrame.new(-266.59, 5.56, 146.12)
        if QuestTask == 1 and QuestArea == 0 then
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
        end
        if QuestTask == 2 and QuestArea == 0 then
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
        end
        if QuestTask == 3 and QuestArea == 0 then
            if CurrentArea == 1 then
                Pos.CFrame = Meadowpos
                wait(0.2)
                if Pos.CFrame ~= Meadowpos then
                    Pos.CFrame = Meadowpos
                end
            end
            if CurrentArea == 2 then
                Pos.CFrame = Forestpos
                wait(0.2)
                if Pos.CFrame ~= Forestpos then
                    Pos.CFrame = Forestpos
                end
            end
            if CurrentArea == 3 then
                Pos.CFrame = Desertpos
                wait(0.2)
                if Pos.CFrame ~= Desertpos then
                    Pos.CFrame = Desertpos
                end
            end
            if CurrentArea == 4 then
                Pos.CFrame = Arcticpos
                wait(0.2)
                if Pos.CFrame ~= Arcticpos then
                    Pos.CFrame = Arcticpos
                end
            end
            if CurrentArea == 5 then
                Pos.CFrame = Beachpos
                wait(0.2)
                if Pos.CFrame ~= Beachpos then
                    Pos.CFrame = Beachpos
                end
            end
            if CurrentArea == 6 then
                Pos.CFrame = Mountainspos
                wait(0.2)
                if Pos.CFrame ~= Mountainspos then
                    Pos.CFrame = Mountainspos
                end
            end
            if CurrentArea == 7 then
                Pos.CFrame = Junglepos
                wait(0.2)
                if Pos.CFrame ~= Junglepos then
                    Pos.CFrame = Junglepos
                end
            end
            if CurrentArea == 8 then
                Pos.CFrame = Grottopos
                wait(0.2)
                if Pos.CFrame ~= Grottopos then
                    Pos.CFrame = Grottopos
                end
            end
        end
        if QuestTask == 1 and QuestArea == 1 then
            Pos.CFrame = Meadowpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Meadowpos then
                Pos.CFrame = Meadowpos
            end
        end
        if QuestTask == 2 and QuestArea == 1 then
            Pos.CFrame = Meadowpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Meadowpos then
                Pos.CFrame = Meadowpos
            end
        end
        if QuestTask == 3 and QuestArea == 1 then
            Pos.CFrame = Meadowpos
            wait(0.2)
            if Pos.CFrame ~= Meadowpos then
                Pos.CFrame = Meadowpos
            end
        end
        if QuestTask == 1 and QuestArea == 2 then
            Pos.CFrame = Forestpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Forestpos then
                Pos.CFrame = Forestpos
            end
        end
        if QuestTask == 2 and QuestArea == 2 then
            Pos.CFrame = Forestpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Forestpos then
                Pos.CFrame = Forestpos
            end
        end
        if QuestTask == 3 and QuestArea == 2 then
            Pos.CFrame = Forestpos
            wait(0.2)
            if Pos.CFrame ~= Forestpos then
                Pos.CFrame = Forestpos
            end
        end
        if QuestTask == 1 and QuestArea == 3 then
            Pos.CFrame = Desertpos
			for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Desertpos then
                Pos.CFrame = Desertpos
            end
        end
		if QuestTask == 2 and QuestArea == 3 then
            Pos.CFrame = Desertpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Desertpos then
                Pos.CFrame = Desertpos
            end
		end
        if QuestTask == 3 and QuestArea == 3 then
            Pos.CFrame = Desertpos
            wait(0.2)
            if Pos.CFrame ~= Desertpos then
                Pos.CFrame = Desertpos
            end
        end
        if QuestTask == 1 and QuestArea == 4 then
            Pos.CFrame = Arcticpos
			for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Arcticpos then
                Pos.CFrame = Arcticpos
            end
        end
        if QuestTask == 2 and QuestArea == 4 then
            Pos.CFrame = Arcticpos
			for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Arcticpos then
                Pos.CFrame = Arcticpos
            end
        end
        if QuestTask == 3 and QuestArea == 4 then
            Pos.CFrame = Arcticpos
            wait(0.2)
            if Pos.CFrame ~= Arcticpos then
                Pos.CFrame = Arcticpos
            end
        end
        if QuestTask == 1 and QuestArea == 5 then
            Pos.CFrame = Beachpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Beachpos then
                Pos.CFrame = Beachpos
            end
        end
        if QuestTask == 2 and QuestArea == 5 then
            Pos.CFrame = Beachpos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Beachpos then
                Pos.CFrame = Beachpos
            end
        end
        if QuestTask == 3 and QuestArea == 5 then
            Pos.CFrame = Beachpos
            wait(0.2)
            if Pos.CFrame ~= Beachpos then
                Pos.CFrame = Beachpos
            end
        end
        if QuestTask == 1 and QuestArea == 6 then
            Pos.CFrame = Mountainspos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Mountainspos then
                Pos.CFrame = Mountainspos
            end
        end
        if QuestTask == 2 and QuestArea == 6 then
            Pos.CFrame = Mountainspos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Mountainspos then
                Pos.CFrame = Mountainspos
            end
        end
        if QuestTask == 3 and QuestArea == 6 then
            Pos.CFrame = Mountainspos
            wait(0.2)
            if Pos.CFrame ~= Mountainspos then
                Pos.CFrame = Mountainspos
            end
        end
        if QuestTask == 1 and QuestArea == 7 then
            Pos.CFrame = Junglepos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Junglepos then
                Pos.CFrame = Junglepos
            end
        end
        if QuestTask == 2 and QuestArea == 7 then
            Pos.CFrame = Junglepos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if  Pos.CFrame ~= Junglepos then
                Pos.CFrame = Junglepos
            end
        end
        if QuestTask == 3 and QuestArea == 7 then
            Pos.CFrame = Junglepos
            wait(0.2)
            if Pos.CFrame ~= Junglepos then
                Pos.CFrame = Junglepos
            end
        end
        if QuestTask == 1 and QuestArea == 8 then
            Pos.CFrame = Grottopos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Grottopos then
                Pos.CFrame = Grottopos
            end
        end
        if QuestTask == 2 and QuestArea == 8 then
            Pos.CFrame = Grottopos
            for _, obj in pairs(Workspace.Drops:GetDescendants()) do
			    if obj.Name == 'Base' then
				    Pos.CFrame = CFrame.new(obj.Position.X, obj.Position.Y, obj.Position.Z)
			    end
            end
            wait(0.2)
            if Pos.CFrame ~= Grottopos then
                Pos.CFrame = Grottopos
            end
        end
        if QuestTask == 3 and QuestArea == 8 then
            Pos.CFrame = Grottopos
            wait(0.2)
            if Pos.CFrame ~= Grottopos then
                Pos.CFrame = Grottopos
            end
        end
        wait()
    end
    wait()
end