Add support for adding vestigial implicits (#10156)

* Add support for adding vestigial implicits

* Prevent adding item to itself as vestigial

* Cleanup

* Fix shavs + Infernal Mantle mod id

* Fix equality comparison

* Add "Core drop pool" filtering to vestigial implicits and unique db

* Fix (hopefully) all the rest of the core drop pool uniques

* Fix stasis prison and typo

* Regen modcache

* Cleanup

* Remove delve implicits

* Move popup code to its own module and remove various bits of dead code

* Fix random sorting on vestigial mods

* Fix mod double up

The mod on Kaom's was wrong so was double matching the mod

* Fix tooltip to show stat difference of replacing the implicit

The stat diff wasn't taking into account that the vestigial mods replace the implicit on an item

---------

Co-authored-by: LocalIdentity <localidentity2@gmail.com>

Author: vaisest

src/Classes/ItemDBControl.lua

@@ -47,7 +47,7 @@ function ItemDBClass:ItemDBControl(anchor, rect, itemsTab, db, dbType)
 		self.controls.requirement = new("DropDownControl"):DropDownControl({"LEFT",self.controls.sort,"BOTTOMLEFT"}, {0, 11, 179, 18}, { "Any requirements", "Current level", "Current attributes", "Current useable" }, function(index, value)
 			self.listBuildFlag = true
 		end)
-		self.controls.obtainable = new("DropDownControl"):DropDownControl({"LEFT",self.controls.requirement,"RIGHT"}, {2, 0, 179, 18}, { "Obtainable", "Any source", "Unobtainable", "Vendor Recipe", "Upgraded", "Boss Item", "Corruption"}, function(index, value)
+		self.controls.obtainable = new("DropDownControl"):DropDownControl({"LEFT",self.controls.requirement,"RIGHT"}, {2, 0, 179, 18}, { "Obtainable", "Any source", "Unobtainable", "Vendor Recipe", "Upgraded", "Boss Item", "Corruption", "Core Drop Pool"}, function(index, value)
 			self.listBuildFlag = true
 		end)
 	end
@@ -126,6 +126,8 @@ function ItemDBClass:DoesItemMatchFilters(item)
 			return false
 		elseif (self.controls.obtainable.selIndex == 7 and not (string.match(source, "Vaal Orb"))) then
 			return false
+		elseif (self.controls.obtainable.selIndex == 8) and item.source then
+			return false
 		end
 	end
 	if self.dbType == "UNIQUE" and self.controls.requirement.selIndex > 1 then