Human AI

code/__DEFINES/dcs/signals/atom/mob/living/signals_human.dm

@@ -56,6 +56,9 @@
 //from /mob/living/carbon/human/equip_to_slot()
 #define COMSIG_HUMAN_EQUIPPED_ITEM "human_equipped_item"
 
+//from /mob/living/carbon/human/u_equip()
+#define COMSIG_HUMAN_UNEQUIPPED_ITEM "human_unequipped_item"
+
 /// From /mob/proc/equip_to_slot_if_possible()
 #define COMSIG_HUMAN_ATTEMPTING_EQUIP "human_attempting_equip"
 	#define COMPONENT_HUMAN_CANCEL_ATTEMPT_EQUIP (1<<0)
@@ -74,3 +77,12 @@
 /// From /mob/living/carbon/human/UnarmedAttack()
 #define COMSIG_HUMAN_BEFORE_ATTACK_HAND "human_before_attack_hand"
 	#define COMPONENT_CANCEL_HUMAN_ATTACK_HAND (1<<0)
+
+/// From /obj/item/restraint/proc/place_handcuffs() : ()
+#define COMSIG_HUMAN_HANDCUFFED "human_handcuffed"
+
+/// From /mob/living/carbon/human/proc/set_species() : (new_species)
+#define COMSIG_HUMAN_SET_SPECIES "human_set_species"
+
+/// From /mob/living/carbon/human/proc/get_human_ai_brain() : (datum/human_ai_brain/out_brain)
+#define COMSIG_HUMAN_GET_AI_BRAIN "human_get_ai_brain"

code/__DEFINES/dcs/signals/atom/mob/signals_mob.dm

@@ -186,6 +186,8 @@
 /// Cancels all running cloaking effects on target
 #define COMSIG_MOB_EFFECT_CLOAK_CANCEL "mob_effect_cloak_cancel"
 
+#define COMSIG_MOB_DROP_ITEM "mob_drop_item"
+
 #define COMSIG_MOB_END_TUTORIAL "mob_end_tutorial"
 
 #define COMSIG_MOB_NESTED "mob_nested"

code/__DEFINES/equipment.dm

@@ -579,3 +579,15 @@ GLOBAL_LIST_INIT(uniform_categories, list(
 #define PHONE_ON_BASE_UNIT_ICON_STATE "[initial(icon_state)]"
 #define PHONE_OFF_BASE_UNIT_ICON_STATE "[initial(icon_state)]_ear"
 #define PHONE_RINGING_ICON_STATE "[initial(icon_state)]_ring"
+
+// Human AI flags
+/// This item is classified as a healing item for the sake of human AI
+#define HEALING_ITEM (1<<0)
+/// This item is classified as ammunition for the sake of human AI
+#define AMMUNITION_ITEM (1<<1)
+/// This item is classified as a grenade for the sake of human AI
+#define GRENADE_ITEM (1<<2)
+/// This item is classified as a tool for the sake of human AI
+#define TOOL_ITEM (1<<3)
+/// This item is classified as a melee weapon for the sake of human AI
+#define MELEE_WEAPON_ITEM (1<<4)

code/__DEFINES/human_ai.dm

@@ -0,0 +1,19 @@
+#define HUMAN_AI_HEALTHITEMS "health"
+#define HUMAN_AI_AMMUNITION "ammo"
+#define HUMAN_AI_GRENADES "grenades"
+#define HUMAN_AI_TOOLS "tools"
+
+#define ACTION_USING_HANDS (1<<0)
+#define ACTION_USING_LEGS (1<<1)
+#define ACTION_USING_MOUTH (1<<2)
+
+/// Action is completed, delete this and move onto the next ongoing action
+#define ONGOING_ACTION_COMPLETED "completed"
+/// Action isn't finished, move onto the next ongoing action
+#define ONGOING_ACTION_UNFINISHED "unfinished"
+/// Action isn't finished, block any further actions from the AI this tick
+#define ONGOING_ACTION_UNFINISHED_BLOCK "unfinished_block"
+
+#define HUMAN_AI_MAX_PATHFINDING_RANGE 45
+
+GLOBAL_LIST_EMPTY(ai_humans)

code/__DEFINES/job.dm

@@ -310,6 +310,7 @@ GLOBAL_LIST_INIT(job_command_roles, JOB_COMMAND_ROLES_LIST)
 #define JOB_UPP_ENGI "Sapper"
 #define JOB_UPP_MEDIC "Sanitar"
 #define JOB_UPP_SPECIALIST "Serzhant"
+#define JOB_UPP_SNIPER "Marksman"
 #define JOB_UPP_LEADER "Master Serzhant"
 #define JOB_UPP_POLICE "Politsiya"
 #define JOB_UPP_SUPPLY "Logistics Technician"

code/__DEFINES/mode.dm

@@ -75,6 +75,7 @@
 #define MODE_BYPASS_JOE (1<<11) // Toggles if ghosts can bypass Working Joe spawn limitations, does NOT bypass WL requirement. Off by default.
 #define MODE_DISABLE_JOE_RESPAWN (1<<12) // Toggles if ghosts can respawn as Working Joes after dying as one when 15 minutes have passed. Off by default
 #define MODE_NO_JOIN_AS_XENO (1<<13) // Toggles if players can join as xeno
+#define MODE_HUMAN_AI_TWEAKS (1<<14) // Modifies some numbers to be more friendly to marines when fighting against human AI
 
 #define ROUNDSTATUS_FOG_DOWN 1
 #define ROUNDSTATUS_PODDOORS_OPEN 2
@@ -286,7 +287,7 @@ DEFINE_BITFIELD(whitelist_status, list(
 #define FACTION_MONKEY "Monkey" // Nanu
 
 #define FACTION_LIST_MARINE list(FACTION_MARINE, FACTION_ARMY, FACTION_NAVY)
-#define FACTION_LIST_HUMANOID list(FACTION_MARINE, FACTION_PMC, FACTION_WY, FACTION_WY_DEATHSQUAD, FACTION_CLF, FACTION_CONTRACTOR, FACTION_MARSHAL, FACTION_UPP, FACTION_FREELANCER, FACTION_SURVIVOR, FACTION_NEUTRAL, FACTION_COLONIST, FACTION_MERCENARY, FACTION_DUTCH, FACTION_HEFA, FACTION_GLADIATOR, FACTION_PIRATE, FACTION_PIZZA, FACTION_SOUTO, FACTION_YAUTJA, FACTION_ZOMBIE, FACTION_TWE)
+#define FACTION_LIST_HUMANOID list(FACTION_MARINE, FACTION_PMC, FACTION_WY, FACTION_WY_DEATHSQUAD, FACTION_CLF, FACTION_CONTRACTOR, FACTION_MARSHAL, FACTION_UPP, FACTION_FREELANCER, FACTION_SURVIVOR, FACTION_NEUTRAL, FACTION_COLONIST, FACTION_MERCENARY, FACTION_DUTCH, FACTION_HEFA, FACTION_GLADIATOR, FACTION_PIRATE, FACTION_PIZZA, FACTION_SOUTO, FACTION_YAUTJA, FACTION_ZOMBIE, FACTION_TWE, FACTION_ARMY, FACTION_NAVY)
 #define FACTION_LIST_ERT_OTHER list(FACTION_HEFA, FACTION_GLADIATOR, FACTION_PIRATE, FACTION_PIZZA, FACTION_SOUTO)
 #define FACTION_LIST_ERT_ALL list(FACTION_PMC, FACTION_WY_DEATHSQUAD, FACTION_WY, FACTION_CLF, FACTION_CONTRACTOR, FACTION_UPP, FACTION_FREELANCER, FACTION_MERCENARY, FACTION_DUTCH, FACTION_HEFA, FACTION_GLADIATOR, FACTION_PIRATE, FACTION_PIZZA, FACTION_SOUTO, FACTION_MARSHAL, FACTION_TWE)
 #define FACTION_LIST_WY list(FACTION_PMC, FACTION_WY_DEATHSQUAD, FACTION_WY)

code/__DEFINES/subsystems.dm

@@ -163,6 +163,7 @@
 #define SS_PRIORITY_SOUND   250
 #define SS_PRIORITY_TICKER  200
 #define SS_PRIORITY_XENO_AI 185
+#define SS_PRIORITY_HUMAN_AI 182
 #define SS_PRIORITY_NIGHTMARE   180
 #define SS_PRIORITY_QUADTREE    160
 #define SS_PRIORITY_CHAT    155
@@ -172,7 +173,7 @@
 #define SS_PRIORITY_MOB 150
 #define SS_PRIORITY_XENO    149
 #define SS_PRIORITY_HUMAN   148
-#define SS_PRIORITY_XENO_PATHFINDING 130
+#define SS_PRIORITY_PATHFINDING 130
 #define SS_PRIORITY_STAMINA 126
 #define SS_PRIORITY_COMPONENT   125
 #define SS_PRIORITY_NANOUI  120

code/__DEFINES/xeno_ai.dm

@@ -1,4 +1,4 @@
-#define XENO_CALCULATING_PATH(X) (X in SSxeno_pathfinding.hash_path)
+#define CALCULATING_PATH(X) (X in SSpathfinding.hash_path)
 
 #define DIRECTION_CHANGE_PENALTY 2
 #define NO_WEED_PENALTY 2
@@ -91,7 +91,7 @@ PROBABILITY CALCULATIONS ARE HERE
 
 
 /// Special blockers for pathfinding or obstacle handling
-#define XENO_AI_SPECIAL_BLOCKERS list(/obj/flamer_fire, /obj/vehicle/multitile, /turf/open/space, /turf/open/gm/river)
+#define AI_SPECIAL_BLOCKERS list(/obj/flamer_fire, /mob/living, /obj/vehicle/multitile, /turf/open/space, /turf/open/gm/river)
 
 // Friend-or-foe universal check
 #define IS_SAME_HIVENUMBER(A,B) (A.hivenumber == B.hivenumber)

code/__HELPERS/unsorted.dm

@@ -46,8 +46,8 @@
 #define format_frequency(f) "[floor((f) / 10)].[(f) % 10]"
 
 #define reverse_direction(direction) ( \
-											( dir & (NORTH|SOUTH) ? ~dir & (NORTH|SOUTH) : 0 ) | \
-											( dir & (EAST|WEST) ? ~dir & (EAST|WEST) : 0 ) \
+											( direction & (NORTH|SOUTH) ? ~direction & (NORTH|SOUTH) : 0 ) | \
+											( direction & (EAST|WEST) ? ~direction & (EAST|WEST) : 0 ) \
 										)
 
 // The sane, counter-clockwise angle to turn to get from /direction/ A to /direction/ B
@@ -1735,6 +1735,55 @@ GLOBAL_LIST_INIT(duplicate_forbidden_vars,list(
 		if(NORTHWEST)
 			return list(NORTHWEST, NORTH, WEST)
 
+/// Makes a given dir cardinal. If the dir is non-cardinal, it will return both cardinal directions that make up the direction. Else, it will be a single-entry list returned.
+/proc/make_dir_cardinal(direction)
+	switch(direction)
+		if(NORTH)
+			return list(NORTH)
+
+		if(EAST)
+			return list(EAST)
+
+		if(SOUTH)
+			return list(SOUTH)
+
+		if(WEST)
+			return list(WEST)
+
+		if(NORTHEAST)
+			return list(NORTH, EAST)
+
+		if(SOUTHEAST)
+			return list(EAST, SOUTH)
+
+		if(SOUTHWEST)
+			return list(SOUTH, WEST)
+
+		if(NORTHWEST)
+			return list(NORTH, WEST)
+
+//straight directions get priority over diagonal directions in edge cases
+/proc/angle2dir4ai(angle)
+	switch(angle) // 80/10 degrees diagonals/cardinals respectively
+		if (40 to 50)
+			return NORTHEAST
+		if (130 to 140)
+			return SOUTHEAST
+		if (220 to 230)
+			return SOUTHWEST
+		if (310 to 320)
+			return NORTHWEST
+		if (0 to 40)
+			return NORTH
+		if (50 to 130)
+			return EAST
+		if (140 to 220)
+			return SOUTH
+		if (230 to 310)
+			return WEST
+		else
+			return NORTH
+
 /// Returns TRUE if the target is somewhere that the game should not interact with if possible
 /// In this case, admin Zs and tutorial areas
 /proc/should_block_game_interaction(atom/target)

code/_compile_options.dm

@@ -38,6 +38,6 @@
 
 //#define UNIT_TESTS //If this is uncommented, we do a single run though of the game setup and tear down process with unit tests in between
 
-// #define TESTING
+//#define TESTING
 // #define REFERENCE_TRACKING
 // #define GC_FAILURE_HARD_LOOKUP

code/controllers/subsystem/human_ai.dm

@@ -0,0 +1,74 @@
+
+SUBSYSTEM_DEF(human_ai)
+	name = "Human AI"
+	priority = SS_PRIORITY_HUMAN_AI
+	wait = 0.2 SECONDS
+	/// A list of mobs scheduled to process
+	var/list/mob/living/carbon/human/current_run = list()
+
+	var/ai_kill = FALSE
+
+	/// List of current squads
+	var/list/datum/human_ai_squad/squads = list()
+
+	/// Dict of "id" : squad
+	var/list/squad_id_dict = list()
+
+	/// The current highest ID of any squad
+	var/highest_squad_id = 0
+
+	/// List of all existing orders
+	var/list/datum/ai_order/existing_orders = list()
+
+	var/list/human_ai_factions = list()
+
+/datum/controller/subsystem/human_ai/Initialize()
+	for(var/faction_path in subtypesof(/datum/human_ai_faction))
+		var/datum/human_ai_faction/faction_obj = new faction_path
+		human_ai_factions[faction_obj.faction] = faction_obj
+	return SS_INIT_SUCCESS
+
+/datum/controller/subsystem/human_ai/stat_entry(msg)
+	msg = "P:[length(GLOB.human_ai_brains)]"
+	return ..()
+
+/datum/admins/proc/toggle_human_ai()
+	set name = "Toggle Human AI"
+	set category = "Game Master.HumanAI"
+
+	if(!check_rights(R_DEBUG))
+		return
+
+	SShuman_ai.ai_kill = !SShuman_ai.ai_kill
+	message_admins("[key_name_admin(usr)] [SShuman_ai.ai_kill? "killed" : "revived"] all human AI.")
+
+/datum/controller/subsystem/human_ai/fire(resumed = FALSE)
+	if(ai_kill)
+		return
+
+	if(!resumed)
+		src.current_run = GLOB.human_ai_brains.Copy()
+	// Cache for sanic speed (lists are references anyways)
+	var/list/current_run = src.current_run
+	while(length(current_run))
+		var/datum/human_ai_brain/brain = current_run[length(current_run)]
+		current_run.len--
+		if(!QDELETED(brain) && !brain.tied_human?.client)
+			brain.process(wait * 0.1)
+
+		if(MC_TICK_CHECK)
+			return
+
+/datum/controller/subsystem/human_ai/proc/create_new_squad()
+	highest_squad_id++
+	var/datum/human_ai_squad/new_squad = new
+	squads += new_squad
+	squad_id_dict["[highest_squad_id]"] = new_squad
+	return new_squad
+
+/datum/controller/subsystem/human_ai/proc/get_squad(squad_id)
+	RETURN_TYPE(/datum/human_ai_squad)
+
+	if(!squad_id || !(squad_id in squad_id_dict))
+		return null
+	return squad_id_dict[squad_id]