mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2025-12-10 10:12:45 +00:00
4d9879937f
Co-authored-by: ShadowLarkens <shadowlarkens@gmail.com> Co-authored-by: Kashargul <KashL@t-online.de>
60 lines
2.3 KiB
Plaintext
60 lines
2.3 KiB
Plaintext
SUBSYSTEM_DEF(chemistry)
|
|
name = "Chemistry"
|
|
wait = 20
|
|
flags = SS_NO_FIRE
|
|
init_order = INIT_ORDER_CHEMISTRY
|
|
|
|
var/list/chemical_reactions = list()
|
|
var/list/instant_reactions_by_reagent = list()
|
|
var/list/distilled_reactions_by_reagent = list()
|
|
// var/list/fusion_reactions_by_reagent = list() // TODO: Fusion reactions as chemical reactions
|
|
var/list/chemical_reagents = list()
|
|
|
|
/datum/controller/subsystem/chemistry/Recover()
|
|
log_debug("[name] subsystem Recover().")
|
|
chemical_reactions = SSchemistry.chemical_reactions
|
|
chemical_reagents = SSchemistry.chemical_reagents
|
|
|
|
/datum/controller/subsystem/chemistry/Initialize()
|
|
initialize_chemical_reagents()
|
|
initialize_chemical_reactions()
|
|
return SS_INIT_SUCCESS // CHOMPEdit
|
|
|
|
/datum/controller/subsystem/chemistry/stat_entry(msg)
|
|
msg = "C: [chemical_reagents.len] | R: [chemical_reactions.len]"
|
|
return ..()
|
|
|
|
//Chemical Reactions - Initialises all /decl/chemical_reaction into a list
|
|
// It is filtered into multiple lists within a list.
|
|
// For example:
|
|
// chemical_reactions_by_reagent["phoron"] is a list of all reactions relating to phoron
|
|
// Note that entries in the list are NOT duplicated. So if a reaction pertains to
|
|
// more than one chemical it will still only appear in only one of the sublists.
|
|
/datum/controller/subsystem/chemistry/proc/initialize_chemical_reactions()
|
|
var/list/paths = decls_repository.get_decls_of_subtype(/decl/chemical_reaction)
|
|
|
|
for(var/path in paths)
|
|
var/decl/chemical_reaction/D = paths[path]
|
|
chemical_reactions += D
|
|
if(D.required_reagents && D.required_reagents.len)
|
|
var/reagent_id = D.required_reagents[1]
|
|
|
|
var/list/add_to = instant_reactions_by_reagent // Default to instant reactions list, if something's gone wrong
|
|
// if(istype(D, /decl/chemical_reaction/fusion)) // TODO: fusion reactions as chemical reactions
|
|
// add_to = fusion_reactions_by_reagent
|
|
if(istype(D, /decl/chemical_reaction/distilling))
|
|
add_to = distilled_reactions_by_reagent
|
|
|
|
LAZYINITLIST(add_to[reagent_id])
|
|
add_to[reagent_id] += D
|
|
|
|
//Chemical Reagents - Initialises all /datum/reagent into a list indexed by reagent id
|
|
/datum/controller/subsystem/chemistry/proc/initialize_chemical_reagents()
|
|
var/paths = subtypesof(/datum/reagent)
|
|
chemical_reagents = list()
|
|
for(var/path in paths)
|
|
var/datum/reagent/D = new path()
|
|
if(!D.name)
|
|
continue
|
|
chemical_reagents[D.id] = D
|