/proc/cmp_numeric_dsc(a,b) return b - a /proc/cmp_numeric_asc(a,b) return a - b /proc/cmp_text_asc(a,b) return sorttext(b,a) /proc/cmp_text_dsc(a,b) return sorttext(a,b) /proc/cmp_embed_text_asc(a,b) if(isdatum(a)) a = REF(a) if(isdatum(b)) b = REF(b) return sorttext("[b]", "[a]") /proc/cmp_embed_text_dsc(a,b) if(isdatum(a)) a = REF(a) if(isdatum(b)) b = REF(b) return sorttext("[a]", "[b]") /proc/cmp_list_len_asc(list/a, list/b) return length(a) - length(b) /proc/cmp_list_len_dsc(list/a, list/b) return length(b) - length(a) /proc/cmp_name_asc(atom/a, atom/b) return sorttext(b.name, a.name) /proc/cmp_name_dsc(atom/a, atom/b) return sorttext(a.name, b.name) /proc/cmp_init_name_asc(atom/a, atom/b) return sorttext(initial(b.name), initial(a.name)) /proc/cmp_records_asc(datum/record/a, datum/record/b) return sorttext(b.name, a.name) /proc/cmp_records_dsc(datum/record/a, datum/record/b) return sorttext(a.name, b.name) // Datum cmp with vars is always slower than a specialist cmp proc, use your judgement. /proc/cmp_datum_numeric_asc(datum/a, datum/b, variable) return cmp_numeric_asc(a.vars[variable], b.vars[variable]) /proc/cmp_datum_numeric_dsc(datum/a, datum/b, variable) return cmp_numeric_dsc(a.vars[variable], b.vars[variable]) /proc/cmp_datum_text_asc(datum/a, datum/b, variable) return sorttext(b.vars[variable], a.vars[variable]) /proc/cmp_datum_text_dsc(datum/a, datum/b, variable) return sorttext(a.vars[variable], b.vars[variable]) /proc/cmp_ckey_asc(client/a, client/b) return sorttext(b.ckey, a.ckey) /proc/cmp_ckey_dsc(client/a, client/b) return sorttext(a.ckey, b.ckey) /proc/cmp_playtime_asc(client/a, client/b) return cmp_numeric_asc(a.get_exp_living(TRUE), b.get_exp_living(TRUE)) /proc/cmp_playtime_dsc(client/a, client/b) return cmp_numeric_asc(a.get_exp_living(TRUE), b.get_exp_living(TRUE)) /proc/cmp_subsystem_init(datum/controller/subsystem/a, datum/controller/subsystem/b) return a.init_order - b.init_order /proc/cmp_subsystem_init_stage(datum/controller/subsystem/a, datum/controller/subsystem/b) return initial(a.init_stage) - initial(b.init_stage) /proc/cmp_subsystem_display(datum/controller/subsystem/a, datum/controller/subsystem/b) return sorttext(b.name, a.name) /proc/cmp_subsystem_priority(datum/controller/subsystem/a, datum/controller/subsystem/b) return a.priority - b.priority /proc/cmp_filter_data_priority(list/A, list/B) return A["priority"] - B["priority"] /proc/cmp_timer(datum/timedevent/a, datum/timedevent/b) return a.timeToRun - b.timeToRun /proc/cmp_ruincost_priority(datum/map_template/ruin/A, datum/map_template/ruin/B) return initial(A.cost) - initial(B.cost) /proc/cmp_qdel_item_time(datum/qdel_item/A, datum/qdel_item/B) . = B.hard_delete_time - A.hard_delete_time if (!.) . = B.destroy_time - A.destroy_time if (!.) . = B.failures - A.failures if (!.) . = B.qdels - A.qdels /proc/cmp_generic_stat_item_time(list/A, list/B) . = B[STAT_ENTRY_TIME] - A[STAT_ENTRY_TIME] if (!.) . = B[STAT_ENTRY_COUNT] - A[STAT_ENTRY_COUNT] /proc/cmp_profile_avg_time_dsc(list/A, list/B) return (B[PROFILE_ITEM_TIME]/(B[PROFILE_ITEM_COUNT] || 1)) - (A[PROFILE_ITEM_TIME]/(A[PROFILE_ITEM_COUNT] || 1)) /proc/cmp_profile_time_dsc(list/A, list/B) return B[PROFILE_ITEM_TIME] - A[PROFILE_ITEM_TIME] /proc/cmp_profile_count_dsc(list/A, list/B) return B[PROFILE_ITEM_COUNT] - A[PROFILE_ITEM_COUNT] /proc/cmp_atom_layer_asc(atom/A,atom/B) if(A.plane != B.plane) return A.plane - B.plane else return A.layer - B.layer /proc/cmp_advdisease_resistance_asc(datum/disease/advance/A, datum/disease/advance/B) return A.totalResistance() - B.totalResistance() /proc/cmp_quirk_asc(datum/quirk/A, datum/quirk/B) var/a_sign = SIGN(initial(A.value) * -1) var/b_sign = SIGN(initial(B.value) * -1) // Neutral traits go last. if(a_sign == 0) a_sign = 2 if(b_sign == 0) b_sign = 2 var/a_name = initial(A.name) var/b_name = initial(B.name) if(a_sign != b_sign) return a_sign - b_sign else return sorttext(b_name, a_name) /proc/cmp_job_display_asc(datum/job/A, datum/job/B) return A.display_order - B.display_order /proc/cmp_department_display_asc(datum/job_department/A, datum/job_department/B) return A.display_order - B.display_order /proc/cmp_reagents_asc(datum/reagent/a, datum/reagent/b) return sorttext(initial(b.name),initial(a.name)) /proc/cmp_typepaths_asc(A, B) return sorttext("[B]","[A]") /proc/cmp_pdaname_asc(datum/computer_file/program/messenger/A, datum/computer_file/program/messenger/B) return sorttext(B?.computer?.saved_identification, A?.computer?.saved_identification) /proc/cmp_pdajob_asc(datum/computer_file/program/messenger/A, datum/computer_file/program/messenger/B) return sorttext(B?.computer?.saved_job, A?.computer?.saved_job) /proc/cmp_num_string_asc(A, B) return text2num(A) - text2num(B) /proc/cmp_mob_realname_dsc(mob/A,mob/B) return sorttext(A.real_name,B.real_name) /// Orders bodyparts by their body_part value, ascending. /proc/cmp_bodypart_by_body_part_asc(obj/item/bodypart/limb_one, obj/item/bodypart/limb_two) return limb_one.body_part - limb_two.body_part /// Orders by integrated circuit weight /proc/cmp_port_order_asc(datum/port/compare1, datum/port/compare2) return compare1.order - compare2.order /// Orders by uplink category weight /proc/cmp_uplink_category_desc(datum/uplink_category/compare1, datum/uplink_category/compare2) return initial(compare2.weight) - initial(compare1.weight) /** * Sorts crafting recipe requirements before the crafting recipe is inserted into GLOB.crafting_recipes * * Prioritises [/datum/reagent] to ensure reagent requirements are always processed first when crafting. * This prevents any reagent_containers from being consumed before the reagents they contain, which can * lead to runtimes and item duplication when it happens. */ /proc/cmp_crafting_req_priority(A, B) var/lhs var/rhs lhs = ispath(A, /datum/reagent) ? 0 : 1 rhs = ispath(B, /datum/reagent) ? 0 : 1 return lhs - rhs /// Orders heretic knowledge by priority /proc/cmp_heretic_knowledge(datum/heretic_knowledge/knowledge_a, datum/heretic_knowledge/knowledge_b) return initial(knowledge_b.priority) - initial(knowledge_a.priority) /// Passed a list of assoc lists, sorts them by the list's "name" keys. /proc/cmp_assoc_list_name(list/A, list/B) return sorttext(B["name"], A["name"]) /// Orders mobs by health /proc/cmp_mob_health(mob/living/mob_a, mob/living/mob_b) return mob_b.health - mob_a.health /proc/cmp_deathmatch_mods(datum/deathmatch_modifier/a, datum/deathmatch_modifier/b) return sorttext(b.name, a.name) /** * Orders fish types following this order (freshwater -> saltwater -> anadromous -> sulphuric water -> any water -> air) * If both share the same required fluid type, they'll be ordered by name instead. */ /proc/cmp_fish_fluid(obj/item/fish/a, obj/item/fish/b) var/static/list/fluids_priority = list( AQUARIUM_FLUID_FRESHWATER, AQUARIUM_FLUID_SALTWATER, AQUARIUM_FLUID_ANADROMOUS, AQUARIUM_FLUID_SULPHWATEVER, AQUARIUM_FLUID_ANY_WATER, AQUARIUM_FLUID_AIR, ) var/position_a = fluids_priority.Find(initial(a.required_fluid_type)) var/position_b = fluids_priority.Find(initial(b.required_fluid_type)) return cmp_numeric_asc(position_a, position_b) || cmp_text_asc(initial(b.name), initial(a.name)) /// Orders vending products by their price /proc/cmp_vending_prices(datum/data/vending_product/a, datum/data/vending_product/b) return b.price - a.price /proc/cmp_item_vending_prices(obj/item/a, obj/item/b) return b.custom_price - a.custom_price ///Sorts stock parts based on tier /proc/cmp_rped_sort(obj/item/first_item, obj/item/second_item) ///even though stacks aren't stock parts, get_part_rating() is defined on the item level (see /obj/item/proc/get_part_rating()) and defaults to returning 0. return second_item.get_part_rating() - first_item.get_part_rating() /// Orders cameras by their `c_tag` ascending /proc/cmp_camera_ctag_asc(obj/machinery/camera/a, obj/machinery/camera/b) return sorttext(b.c_tag, a.c_tag) /// Sorts client colors based on their priority /proc/cmp_client_colours(datum/client_colour/first_color, datum/client_colour/second_color) return second_color.priority - first_color.priority