--[[
	-= This now functons differently! =-
	*READ BELOW*

	https://v3rmillion.net/showthread.php?tid=677832 -- Make sure to check that you are always up-to-date!

	*** Listed pets names are not the ones saved, they are the ones DELETED! ***
	*** DeletePets was made to prevent pets which people didn't know the names of from being deleted. ***
	*** Check Console (F9) to see what is being deleted and obtained! ***

	Thread default amount is 1. If lets say you set the thread to 2, its as if you executed the script twice.
	If you set the threads to 20, it fires the Main() function 20 times making it about the same speed as executing
	the script 20 times with a thread of one.

	Note: If you raise the thread to 2, your "Egg Purchase Amount" will remain the same, even with multiple threads (scripts)
	running it will stay the same. When you raise the threading I reccomend raising the "Egg Purchase Amount" to at LEAST
	above 100.

	Using too high of threading can cause lagg spikes which could slow down the process of Buying and Deleting Eggs.

	Have another update idea? Join the discord!

	Last Update
	11/10/2018
--]]


local DeletePets = {
    "Spike","Aesthetic Cat","Magic Fox", -- Any pet name here will be auto-deleted after purchase!
}

local Settings = {
	["Egg Purchase Amount"] = 1000000000000000000, -- Amount of Eggs you want the script to purchase! (Ends After)
	["Egg Tier"] = "Tier 18", -- What tier of egg you want purchased! (Tier 1-17)
	["Keep All Rainbow Pets"] = false, -- Keeps ALL rainbow pets no matter the type of pet it is when set to true!
	["Threads"] = 5, -- How many threads of the autobuy function running? (More Threads means faster speeds but more lagg)
}

local Directory = require(game:GetService("ReplicatedStorage")["1 | Directory"])

local CheckDeleters = function(Info)
	for _,Delete in pairs(DeletePets) do
		if string.lower(tostring(Delete)) == string.lower(Directory.Pets[Info].DisplayName) then
			return true
		end
		if string.lower(tostring(Delete)) == string.lower(Directory.Pets[Info].ReferenceName) then
			return true
		end
	end
end

local CheckIfRainbow = function(Stats, PET_ID)
	for _,Pet in ipairs(Stats.Save.Pets) do
		for ID,Info in pairs (Pet) do
			if ID == "id" then
				if Info == PET_ID then
					if Pet.r == true then
						return true
					end
				end
			end
		end
	end
end

local GetPurchasedPetInfo = function(Stats, PET_ID)
	for _,Pet in ipairs(Stats.Save.Pets) do
		for ID,Info in pairs (Pet) do
			if ID == "id" then
				if Info == PET_ID then
					return Pet.n
				end
			end
		end
	end
end

local GetStats = function()
	return workspace["__REMOTES"]["Core"]["Get Stats"]:InvokeServer()
end

local BuyEgg = function()
	return workspace["__REMOTES"]["Game"]["Shop"]:InvokeServer("Buy", "Eggs", Settings["Egg Tier"])
end

local PrintPetInfo = function(PetInfo, PetID)
	warn(tostring("Pet Name: " .. Directory.Pets[PetInfo].DisplayName .. " - ID: " .. PetID))
end

local DeletePet = function(PetID)
	workspace["__REMOTES"]["Game"]["Inventory"]:InvokeServer("Delete", PetID)
end

local Main = (function()
	repeat
		wait()
		Settings["Egg Purchase Amount"] = Settings["Egg Purchase Amount"] - 1
		local EggPurchase,EggPurchaseInfo = BuyEgg()
		if EggPurchase == true and EggPurchaseInfo then
			wait()
			local Stats = GetStats()
			local PurchasedPetInfo = GetPurchasedPetInfo(Stats, EggPurchaseInfo.id)
			if PurchasedPetInfo then
				PrintPetInfo(PurchasedPetInfo, EggPurchaseInfo.id)
				if CheckDeleters(PurchasedPetInfo) == true then
					if CheckIfRainbow(Stats, EggPurchaseInfo.id) == true then
						if Settings["Keep All Rainbow Pets"] ~= true then
							warn(tostring("Deleting Pet: " .. Directory.Pets[PurchasedPetInfo].DisplayName .. " - ID: " .. EggPurchaseInfo.id))
							DeletePet(EggPurchaseInfo.id)
						end
					else
						warn(tostring("Deleting Pet: " .. Directory.Pets[PurchasedPetInfo].DisplayName .. " - ID: " .. EggPurchaseInfo.id))
						DeletePet(EggPurchaseInfo.id)
					end
				end
			end
		end
	until
	Settings["Egg Purchase Amount"] <= 0
end)

for i=1,Settings["Threads"] do
	spawn(function()
		Main()
	end)
end