diff --git a/code/modules/shuttle/supply.dm b/code/modules/shuttle/supply.dm
index 2853ead8d6a..e27670faa90 100644
--- a/code/modules/shuttle/supply.dm
+++ b/code/modules/shuttle/supply.dm
@@ -195,6 +195,24 @@
 						shuttle_master.points += shuttle_master.points_per_design
 						shuttle_master.researchDesigns += design.id
 						msg += "<span class='good'>+[shuttle_master.points_per_design]</span>: Reliable [design.name] design.<br>"
+
+				// Sell exotic plants
+				if(istype(thing, /obj/item/seeds))
+					var/obj/item/seeds/S = thing
+					if(S.rarity == 0) // Mundane species
+						msg += "<span class='bad'>+0</span>: We don't need samples of mundane species \"[capitalize(S.species)]\".<br>"
+					else if(shuttle_master.discoveredPlants[S.type]) // This species has already been sent to CentComm
+						var/potDiff = S.potency - shuttle_master.discoveredPlants[S.type] // Compare it to the previous best
+						if(potDiff > 0) // This sample is better
+							shuttle_master.discoveredPlants[S.type] = S.potency
+							msg += "<span class='good'>+[potDiff]</span>: New sample of \"[capitalize(S.species)]\" is superior.  Good work.<br>"
+							shuttle_master.points += potDiff
+						else // This sample is worthless
+							msg += "<span class='bad'>+0</span>: New sample of \"[capitalize(S.species)]\" is not more potent than existing sample ([shuttle_master.discoveredPlants[S.type]] potency).<br>"
+					else // This is a new discovery!
+						shuttle_master.discoveredPlants[S.type] = S.potency
+						msg += "<span class='good'>[S.rarity]</span>: New species discovered: \"[capitalize(S.species)]\".  Excellent work.<br>"
+						shuttle_master.points += S.rarity // That's right, no bonus for potency.  Send a crappy sample first to "show improvement" later
 		qdel(MA)
 		shuttle_master.sold_atoms += "."