Files
VOREStation/code/game/machinery/seed_extractor.dm
T
Will c7644c7877 Xenobotany machines can be constructed (#19342)
* required

* fixes for contents

* prevent deconstruction while activated

* node already existed

* part stuff

* corrected nodes

* oops
2026-03-26 21:08:04 -04:00

71 lines
1.9 KiB
Plaintext

/obj/machinery/seed_extractor
name = "seed extractor"
desc = "Extracts and bags seeds from produce."
icon = 'icons/obj/hydroponics_machines.dmi'
icon_state = "sextractor"
density = TRUE
anchored = TRUE
circuit = /obj/item/circuitboard/botany_seedextractor
/obj/machinery/seed_extractor/Initialize(mapload)
. = ..()
default_apply_parts()
/* Currently part upgrades do nothing
/obj/machinery/seed_extractor/RefreshParts()
..()
*/
/obj/machinery/seed_extractor/attackby(var/obj/item/O as obj, var/mob/user as mob)
// Fruits and vegetables.
if(istype(O, /obj/item/reagent_containers/food/snacks/grown) || istype(O, /obj/item/grown))
user.remove_from_mob(O)
var/datum/seed/new_seed_type
if(istype(O, /obj/item/grown))
var/obj/item/grown/F = O
new_seed_type = SSplants.seeds[F.plantname]
else
var/obj/item/reagent_containers/food/snacks/grown/F = O
new_seed_type = SSplants.seeds[F.plantname]
if(new_seed_type)
to_chat(user, span_notice("You extract some seeds from [O]."))
var/produce = rand(1,4)
for(var/i = 0;i<=produce;i++)
var/obj/item/seeds/seeds = new(get_turf(src))
seeds.seed_type = new_seed_type.name
seeds.update_seed()
else
to_chat(user, "[O] doesn't seem to have any usable seeds inside it.")
qdel(O)
return
//Grass.
if(istype(O, /obj/item/stack/tile/grass))
var/obj/item/stack/tile/grass/S = O
if(S.use(1))
to_chat(user, span_notice("You extract some seeds from the grass tile."))
new /obj/item/seeds/grassseed(loc)
return
// Fossils
if(istype(O, /obj/item/fossil/plant))
var/obj/item/seeds/random/R = new(get_turf(src))
to_chat(user, "\The [src] pulverizes \the [O] and spits out \the [R].")
qdel(O)
return
// Deconstruction
if(default_deconstruction_screwdriver(user, O))
return
if(default_deconstruction_crowbar(user, O))
return
if(default_part_replacement(user, O))
return
if(default_unfasten_wrench(user, O, 20))
return