[ol_yeller] drops [carried_item] as [ol_yeller.p_they()] die[ol_yeller.p_s()].")
+ carried_item.forceMove(get_turf(ol_yeller))
+ blackboard[BB_SIMPLE_CARRY_ITEM] = null
+
+// next section is regarding commands
+
+/// Someone alt clicked us, see if they're someone we should show the radial command menu to
+/datum/ai_controller/dog/proc/check_altclicked(datum/source, mob/living/clicker)
+ SIGNAL_HANDLER
+
+ if(!COOLDOWN_FINISHED(src, command_cooldown))
+ return
+ if(!istype(clicker) || !blackboard[BB_DOG_FRIENDS][clicker])
+ return
+ . = COMPONENT_CANCEL_CLICK_ALT
+ INVOKE_ASYNC(src, PROC_REF(command_radial), clicker)
+
+/// Show the command radial menu
+/datum/ai_controller/dog/proc/command_radial(mob/living/clicker)
+ var/list/commands = list(
+ COMMAND_HEEL = image(icon = 'icons/Testing/turf_analysis.dmi', icon_state = "red_arrow"),
+ COMMAND_FETCH = image(icon = 'icons/mob/actions/actions_spells.dmi', icon_state = "summons"),
+ COMMAND_ATTACK = image(icon = 'icons/effects/effects.dmi', icon_state = "bite"),
+ COMMAND_DIE = image(icon = 'icons/mob/pets.dmi', icon_state = "puppy_dead")
+ )
+
+ var/choice = show_radial_menu(clicker, pawn, commands, custom_check = CALLBACK(src, PROC_REF(check_menu), clicker), tooltips = TRUE)
+ if(!choice || !check_menu(clicker))
+ return
+ set_command_mode(clicker, choice)
+
+/datum/ai_controller/dog/proc/check_menu(mob/user)
+ if(!istype(user))
+ CRASH("A non-mob is trying to issue an order to [pawn].")
+ if(user.incapacitated() || !can_see(user, pawn))
+ return FALSE
+ return TRUE
+
+/// One of our friends said something, see if it's a valid command, and if so, take action
+/datum/ai_controller/dog/proc/check_verbal_command(mob/speaker, speech_args)
+ SIGNAL_HANDLER
+
+ if(!blackboard[BB_DOG_FRIENDS][speaker])
+ return
+
+ if(!COOLDOWN_FINISHED(src, command_cooldown))
+ return
+
+ var/spoken_text = speech_args[SPEECH_MESSAGE] // probably should check for full words
+ var/command
+ if(findtext(spoken_text, "heel") || findtext(spoken_text, "sit") || findtext(spoken_text, "stay"))
+ command = COMMAND_HEEL
+ else if(findtext(spoken_text, "fetch") || findtext(spoken_text, "get it"))
+ command = COMMAND_FETCH
+ else if(findtext(spoken_text, "attack") || findtext(spoken_text, "sic"))
+ command = COMMAND_ATTACK
+ else if(findtext(spoken_text, "play dead"))
+ command = COMMAND_DIE
+ else
+ return
+
+ if(!can_see(pawn, speaker, length=AI_DOG_VISION_RANGE))
+ return
+ set_command_mode(speaker, command)
+
+/// Whether we got here via radial menu or a verbal command, this is where we actually process what our new command will be
+/datum/ai_controller/dog/proc/set_command_mode(mob/commander, command)
+ COOLDOWN_START(src, command_cooldown, AI_DOG_COMMAND_COOLDOWN)
+
+ switch(command)
+ // heel: stop what you're doing, relax and try not to do anything for a little bit
+ if(COMMAND_HEEL)
+ pawn.visible_message("[pawn]'s ears prick up at [commander]'s command, and [pawn.p_they()] sit[pawn.p_s()] down obediently, awaiting further orders.")
+ blackboard[BB_DOG_ORDER_MODE] = DOG_COMMAND_NONE
+ COOLDOWN_START(src, heel_cooldown, AI_DOG_HEEL_DURATION)
+ CancelActions()
+ // fetch: whatever the commander points to, try and bring it back
+ if(COMMAND_FETCH)
+ pawn.visible_message("[pawn]'s ears prick up at [commander]'s command, and [pawn.p_they()] bounce[pawn.p_s()] slightly in anticipation.")
+ blackboard[BB_DOG_ORDER_MODE] = DOG_COMMAND_FETCH
+ // attack: harass whoever the commander points to
+ if(COMMAND_ATTACK)
+ pawn.visible_message("[pawn]'s ears prick up at [commander]'s command, and [pawn.p_they()] growl[pawn.p_s()] intensely.") // imagine getting intimidated by a corgi
+ blackboard[BB_DOG_ORDER_MODE] = DOG_COMMAND_ATTACK
+ if(COMMAND_DIE)
+ blackboard[BB_DOG_ORDER_MODE] = DOG_COMMAND_NONE
+ CancelActions()
+ LAZYADD(current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/play_dead))
+
+/// Someone we like is pointing at something, see if it's something we might want to interact with (like if they might want us to fetch something for them)
+/datum/ai_controller/dog/proc/check_point(mob/pointing_friend, atom/movable/pointed_movable)
+ SIGNAL_HANDLER
+
+ if(!COOLDOWN_FINISHED(src, command_cooldown))
+ return
+ if(pointed_movable == pawn || blackboard[BB_FETCH_TARGET] || !istype(pointed_movable) || blackboard[BB_DOG_ORDER_MODE] == DOG_COMMAND_NONE) // busy or no command
+ return
+ if(!can_see(pawn, pointing_friend, length=AI_DOG_VISION_RANGE) || !can_see(pawn, pointed_movable, length=AI_DOG_VISION_RANGE))
+ return
+
+ COOLDOWN_START(src, command_cooldown, AI_DOG_COMMAND_COOLDOWN)
+
+ switch(blackboard[BB_DOG_ORDER_MODE])
+ if(DOG_COMMAND_FETCH)
+ if(ismob(pointed_movable) || pointed_movable.anchored)
+ return
+ pawn.visible_message("[pawn] follows [pointing_friend]'s gesture towards [pointed_movable] and barks excitedly!")
+ current_movement_target = pointed_movable
+ blackboard[BB_FETCH_TARGET] = pointed_movable
+ blackboard[BB_FETCH_DELIVER_TO] = pointing_friend
+ current_behaviors += GET_AI_BEHAVIOR(/datum/ai_behavior/fetch)
+ if(DOG_COMMAND_ATTACK)
+ pawn.visible_message("[pawn] follows [pointing_friend]'s gesture towards [pointed_movable] and growls intensely!")
+ current_movement_target = pointed_movable
+ blackboard[BB_DOG_HARASS_TARGET] = pointed_movable
+ current_behaviors += GET_AI_BEHAVIOR(/datum/ai_behavior/harass)
diff --git a/code/datums/ai/dog/dog_subtrees.dm b/code/datums/ai/dog/dog_subtrees.dm
new file mode 100644
index 000000000000..1eab7b87251b
--- /dev/null
+++ b/code/datums/ai/dog/dog_subtrees.dm
@@ -0,0 +1,40 @@
+/datum/ai_planning_subtree/dog
+ COOLDOWN_DECLARE(heel_cooldown)
+ COOLDOWN_DECLARE(reset_ignore_cooldown)
+
+/datum/ai_planning_subtree/dog/SelectBehaviors(datum/ai_controller/dog/controller, delta_time)
+ var/mob/living/living_pawn = controller.pawn
+
+ // occasionally reset our ignore list
+ if(COOLDOWN_FINISHED(src, reset_ignore_cooldown) && length(controller.blackboard[BB_FETCH_IGNORE_LIST]))
+ COOLDOWN_START(src, reset_ignore_cooldown, AI_FETCH_IGNORE_DURATION)
+ controller.blackboard[BB_FETCH_IGNORE_LIST] = list()
+
+ // if we were just ordered to heel, chill out for a bit
+ if(!COOLDOWN_FINISHED(src, heel_cooldown))
+ return
+
+ // if we're not already carrying something and we have a fetch target (and we're not already doing something with it), see if we can eat/equip it
+ if(!controller.blackboard[BB_SIMPLE_CARRY_ITEM] && controller.blackboard[BB_FETCH_TARGET])
+ var/atom/movable/interact_target = controller.blackboard[BB_FETCH_TARGET]
+ if(in_range(living_pawn, interact_target) && (isturf(interact_target.loc)))
+ controller.current_movement_target = interact_target
+ if(IS_EDIBLE(interact_target))
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/eat_snack))
+ else if(isitem(interact_target))
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/simple_equip))
+ else
+ controller.blackboard[BB_FETCH_TARGET] = null
+ controller.blackboard[BB_FETCH_DELIVER_TO] = null
+ return
+
+ // if we're carrying something and we have a destination to deliver it, do that
+ if(controller.blackboard[BB_SIMPLE_CARRY_ITEM] && controller.blackboard[BB_FETCH_DELIVER_TO])
+ var/atom/return_target = controller.blackboard[BB_FETCH_DELIVER_TO]
+ if(!can_see(controller.pawn, return_target, length=AI_DOG_VISION_RANGE))
+ // if the return target isn't in sight, we'll just forget about it and carry the thing around
+ controller.blackboard[BB_FETCH_DELIVER_TO] = null
+ return
+ controller.current_movement_target = return_target
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/deliver_item))
+ return
diff --git a/code/datums/ai/generic_actions.dm b/code/datums/ai/generic_actions.dm
new file mode 100644
index 000000000000..fdcc978857fd
--- /dev/null
+++ b/code/datums/ai/generic_actions.dm
@@ -0,0 +1,111 @@
+
+/datum/ai_behavior/resist/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+ var/mob/living/living_pawn = controller.pawn
+ living_pawn.resist()
+ finish_action(controller, TRUE)
+
+/datum/ai_behavior/battle_screech
+ ///List of possible screeches the behavior has
+ var/list/screeches
+
+/datum/ai_behavior/battle_screech/perform(delta_time, datum/ai_controller/controller)
+ var/mob/living/living_pawn = controller.pawn
+ INVOKE_ASYNC(living_pawn, TYPE_PROC_REF(/mob, emote), pick(screeches))
+ finish_action(controller, TRUE)
+
+/// Use in hand the currently held item
+/datum/ai_behavior/use_in_hand
+ behavior_flags = AI_BEHAVIOR_MOVE_AND_PERFORM
+
+/datum/ai_behavior/use_in_hand/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+ var/mob/living/pawn = controller.pawn
+ var/obj/item/held = pawn.get_item_by_slot(pawn.get_active_hand())
+ if(!held)
+ finish_action(controller, FALSE)
+ return
+ pawn.activate_hand(pawn.get_active_hand())
+ finish_action(controller, TRUE)
+
+/// Use the currently held item, or unarmed, on an object in the world
+/datum/ai_behavior/use_on_object
+ required_distance = 1
+ behavior_flags = AI_BEHAVIOR_REQUIRE_MOVEMENT
+
+/datum/ai_behavior/use_on_object/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+ var/mob/living/pawn = controller.pawn
+ var/obj/item/held_item = pawn.get_item_by_slot(pawn.get_active_hand())
+ var/atom/target = controller.current_movement_target
+
+ if(!target || !pawn.CanReach(target))
+ finish_action(controller, FALSE)
+ return
+
+ pawn.a_intent = INTENT_HELP
+
+ if(held_item)
+ held_item.melee_attack_chain(pawn, target)
+ else
+ pawn.UnarmedAttack(target, TRUE)
+
+ finish_action(controller, TRUE)
+
+/datum/ai_behavior/give
+ required_distance = 1
+ behavior_flags = AI_BEHAVIOR_REQUIRE_MOVEMENT
+
+/datum/ai_behavior/give/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+ var/mob/living/pawn = controller.pawn
+ var/obj/item/held_item = pawn.get_item_by_slot(pawn.get_active_hand())
+ var/atom/target = controller.current_movement_target
+
+ if(!target || !pawn.CanReach(target) || !isliving(target))
+ finish_action(controller, FALSE)
+ return
+
+ var/mob/living/living_target = target
+ controller.PauseAi(1.5 SECONDS)
+ living_target.visible_message(
+ "[pawn] starts trying to give [held_item] to [living_target]!",
+ "[pawn] tries to give you [held_item]!"
+ )
+ if(!do_after(pawn, 1 SECONDS, living_target))
+ return
+ if(QDELETED(held_item) || QDELETED(living_target))
+ finish_action(controller, FALSE)
+ return
+ var/pocket_choice = prob(50) ? ITEM_SLOT_RPOCKET : ITEM_SLOT_LPOCKET
+ if(prob(50) && living_target.can_put_in_hand(held_item))
+ living_target.put_in_hand(held_item)
+ else if(held_item.mob_can_equip(living_target, pawn, pocket_choice, TRUE))
+ living_target.equip_to_slot(held_item, pocket_choice)
+
+ finish_action(controller, TRUE)
+
+/datum/ai_behavior/consume
+ required_distance = 1
+ behavior_flags = AI_BEHAVIOR_REQUIRE_MOVEMENT
+ action_cooldown = 2 SECONDS
+
+/datum/ai_behavior/consume/setup(datum/ai_controller/controller, obj/item/target)
+ . = ..()
+ controller.current_movement_target = target
+
+/datum/ai_behavior/consume/perform(delta_time, datum/ai_controller/controller, obj/item/target)
+ . = ..()
+ var/mob/living/pawn = controller.pawn
+
+ if(!(target in pawn.held_items))
+ if(!pawn.put_in_hand_check(target))
+ finish_action(controller, FALSE)
+ return
+
+ pawn.put_in_hands(target)
+
+ target.melee_attack_chain(pawn, pawn)
+
+ if(QDELETED(target) || prob(10)) // Even if we don't finish it all we can randomly decide to be done
+ finish_action(controller, TRUE)
diff --git a/code/datums/ai/monkey/monkey_behaviors.dm b/code/datums/ai/monkey/monkey_behaviors.dm
new file mode 100644
index 000000000000..822dae22eb23
--- /dev/null
+++ b/code/datums/ai/monkey/monkey_behaviors.dm
@@ -0,0 +1,279 @@
+/datum/ai_behavior/battle_screech/monkey
+ screeches = list("roar","screech")
+
+/datum/ai_behavior/monkey_equip
+ behavior_flags = AI_BEHAVIOR_REQUIRE_MOVEMENT
+
+/datum/ai_behavior/monkey_equip/finish_action(datum/ai_controller/controller, success)
+ . = ..()
+
+ if(!success) //Don't try again on this item if we failed
+ var/list/item_blacklist = controller.blackboard[BB_MONKEY_BLACKLISTITEMS]
+ var/obj/item/target = controller.blackboard[BB_MONKEY_PICKUPTARGET]
+
+ item_blacklist[target] = TRUE
+
+ controller.blackboard[BB_MONKEY_PICKUPTARGET] = null
+
+/datum/ai_behavior/monkey_equip/proc/equip_item(datum/ai_controller/controller)
+ var/mob/living/living_pawn = controller.pawn
+
+ var/obj/item/target = controller.blackboard[BB_MONKEY_PICKUPTARGET]
+ var/best_force = controller.blackboard[BB_MONKEY_BEST_FORCE_FOUND]
+
+ if(!target)
+ finish_action(controller, FALSE)
+ return
+
+ if(target.anchored) //Can't pick it up, so stop trying.
+ finish_action(controller, FALSE)
+ return
+
+ // Strong weapon
+ else if(target.force > best_force)
+ living_pawn.drop_all_held_items()
+ living_pawn.put_in_hands(target)
+ controller.blackboard[BB_MONKEY_BEST_FORCE_FOUND] = target.force
+ finish_action(controller, TRUE)
+ return
+
+ else if(target.slot_flags) //Clothing == top priority
+ living_pawn.dropItemToGround(target, TRUE)
+ living_pawn.update_icons()
+ if(!living_pawn.equip_to_appropriate_slot(target))
+ finish_action(controller, FALSE)
+ return //Already wearing something, in the future this should probably replace the current item but the code didn't actually do that, and I dont want to support it right now.
+ finish_action(controller, TRUE)
+ return
+
+ // EVERYTHING ELSE
+ else if(living_pawn.get_empty_held_index_for_side(LEFT_HANDS) || living_pawn.get_empty_held_index_for_side(RIGHT_HANDS))
+ living_pawn.put_in_hands(target)
+ finish_action(controller, TRUE)
+ return
+
+ finish_action(controller, FALSE)
+
+/datum/ai_behavior/monkey_equip/ground
+ required_distance = 0
+
+/datum/ai_behavior/monkey_equip/ground/perform(delta_time, datum/ai_controller/controller)
+ equip_item(controller)
+
+/datum/ai_behavior/monkey_equip/pickpocket
+
+/datum/ai_behavior/monkey_equip/pickpocket/perform(delta_time, datum/ai_controller/controller)
+
+ if(controller.blackboard[BB_MONKEY_PICKPOCKETING]) //We are pickpocketing, don't do ANYTHING!!!!
+ return
+ INVOKE_ASYNC(src, PROC_REF(attempt_pickpocket), controller)
+
+/datum/ai_behavior/monkey_equip/pickpocket/proc/attempt_pickpocket(datum/ai_controller/controller)
+ var/obj/item/target = controller.blackboard[BB_MONKEY_PICKUPTARGET]
+
+ var/mob/living/victim = target.loc
+
+ var/mob/living/living_pawn = controller.pawn
+
+ victim.visible_message("[living_pawn] starts trying to take [target] from [victim]!", "[living_pawn] tries to take [target]!")
+
+ controller.blackboard[BB_MONKEY_PICKPOCKETING] = TRUE
+
+ var/success = FALSE
+
+ if(do_after(living_pawn, MONKEY_ITEM_SNATCH_DELAY, victim) && target)
+
+ for(var/obj/item/I in victim.held_items)
+ if(I == target)
+ victim.visible_message("[living_pawn] snatches [target] from [victim].", "[living_pawn] snatched [target]!")
+ if(victim.temporarilyRemoveItemFromInventory(target))
+ if(!QDELETED(target) && !equip_item(controller))
+ target.forceMove(living_pawn.drop_location())
+ success = TRUE
+ break
+ else
+ victim.visible_message("[living_pawn] tried to snatch [target] from [victim], but failed!", "[living_pawn] tried to grab [target]!")
+
+ finish_action(controller, success) //We either fucked up or got the item.
+
+/datum/ai_behavior/monkey_equip/pickpocket/finish_action(datum/ai_controller/controller, success)
+ . = ..()
+ controller.blackboard[BB_MONKEY_PICKPOCKETING] = FALSE
+ controller.blackboard[BB_MONKEY_PICKUPTARGET] = null
+
+/datum/ai_behavior/monkey_flee
+
+/datum/ai_behavior/monkey_flee/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+
+ var/mob/living/living_pawn = controller.pawn
+
+ if(living_pawn.health >= MONKEY_FLEE_HEALTH)
+ finish_action(controller, TRUE) //we're back in bussiness
+
+ var/mob/living/target = null
+
+ // flee from anyone who attacked us and we didn't beat down
+ for(var/mob/living/L in view(living_pawn, MONKEY_FLEE_VISION))
+ if(controller.blackboard[BB_MONKEY_ENEMIES][L] && L.stat == CONSCIOUS)
+ target = L
+ break
+
+ if(target)
+ walk_away(living_pawn, target, MONKEY_ENEMY_VISION, 5)
+ else
+ finish_action(controller, TRUE)
+
+/datum/ai_behavior/monkey_attack_mob
+ behavior_flags = AI_BEHAVIOR_REQUIRE_MOVEMENT | AI_BEHAVIOR_MOVE_AND_PERFORM //performs to increase frustration
+
+/datum/ai_behavior/monkey_attack_mob/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+
+ var/mob/living/target = controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET]
+ var/mob/living/living_pawn = controller.pawn
+
+ if(!target || target.stat != CONSCIOUS)
+ finish_action(controller, TRUE) //Target == owned
+
+ if(isturf(target.loc) && !IS_DEAD_OR_INCAP(living_pawn)) // Check if they're a valid target
+ // check if target has a weapon
+ var/obj/item/W
+ for(var/obj/item/I in target.held_items)
+ if(!(I.item_flags & ABSTRACT))
+ W = I
+ break
+
+ // if the target has a weapon, chance to disarm them
+ if(W && DT_PROB(MONKEY_ATTACK_DISARM_PROB, delta_time))
+ living_pawn.a_intent = INTENT_DISARM
+ monkey_attack(controller, target, delta_time)
+ else
+ living_pawn.a_intent = INTENT_HARM
+ monkey_attack(controller, target, delta_time)
+
+
+/datum/ai_behavior/monkey_attack_mob/finish_action(datum/ai_controller/controller, succeeded)
+ . = ..()
+ controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET] = null
+
+/// attack using a held weapon otherwise bite the enemy, then if we are angry there is a chance we might calm down a little
+/datum/ai_behavior/monkey_attack_mob/proc/monkey_attack(datum/ai_controller/controller, mob/living/target, delta_time)
+ var/mob/living/living_pawn = controller.pawn
+
+ if(living_pawn.next_move > world.time)
+ return
+
+ living_pawn.changeNext_move(CLICK_CD_MELEE) //We play fair
+
+ var/obj/item/weapon = locate(/obj/item) in living_pawn.held_items
+
+ living_pawn.face_atom(target)
+
+ if(isnull(controller.blackboard[BB_MONKEY_GUN_WORKED]))
+ controller.blackboard[BB_MONKEY_GUN_WORKED] = TRUE
+
+ living_pawn.a_intent = INTENT_HARM
+ if(living_pawn.CanReach(target, weapon))
+ if(weapon)
+ weapon.melee_attack_chain(living_pawn, target)
+ else
+ target.attack_paw(living_pawn)
+ controller.blackboard[BB_MONKEY_GUN_WORKED] = TRUE // We reset their memory of the gun being 'broken' if they accomplish some other attack
+ else if(weapon)
+ var/atom/real_target = target
+ if(prob(10)) // Artificial miss
+ real_target = pick(oview(2, target))
+
+ var/obj/item/gun/gun = locate() in living_pawn.held_items
+ var/can_shoot = gun?.can_shoot() || FALSE
+ if(gun && controller.blackboard[BB_MONKEY_GUN_WORKED] && prob(95))
+ // We attempt to attack even if we can't shoot so we get the effects of pulling the trigger
+ gun.afterattack(real_target, living_pawn, FALSE)
+ controller.blackboard[BB_MONKEY_GUN_WORKED] = can_shoot ? TRUE : prob(80) // Only 20% likely to notice it didn't work
+ if(can_shoot)
+ controller.blackboard[BB_MONKEY_GUN_NEURONS_ACTIVATED] = TRUE
+ else
+ living_pawn.throw_item(real_target)
+ controller.blackboard[BB_MONKEY_GUN_WORKED] = TRUE // 'worked'
+
+
+
+ // no de-aggro
+ if(controller.blackboard[BB_MONKEY_AGRESSIVE])
+ return
+
+ if(DT_PROB(MONKEY_HATRED_REDUCTION_PROB, delta_time))
+ controller.blackboard[BB_MONKEY_ENEMIES][target]--
+
+ // if we are not angry at our target, go back to idle
+ if(controller.blackboard[BB_MONKEY_ENEMIES][target] <= 0)
+ var/list/enemies = controller.blackboard[BB_MONKEY_ENEMIES]
+ enemies.Remove(target)
+ if(controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET] == target)
+ finish_action(controller, TRUE)
+
+/datum/ai_behavior/disposal_mob
+ behavior_flags = AI_BEHAVIOR_REQUIRE_MOVEMENT | AI_BEHAVIOR_MOVE_AND_PERFORM //performs to increase frustration
+
+/datum/ai_behavior/disposal_mob/finish_action(datum/ai_controller/controller, succeeded)
+ . = ..()
+ controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET] = null //Reset attack target
+ controller.blackboard[BB_MONKEY_DISPOSING] = FALSE //No longer disposing
+ controller.blackboard[BB_MONKEY_TARGET_DISPOSAL] = null //No target disposal
+
+/datum/ai_behavior/disposal_mob/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+
+ if(controller.blackboard[BB_MONKEY_DISPOSING]) //We are disposing, don't do ANYTHING!!!!
+ return
+
+ var/mob/living/target = controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET]
+ var/mob/living/living_pawn = controller.pawn
+
+ controller.current_movement_target = target
+
+ if(target.pulledby != living_pawn && !HAS_AI_CONTROLLER_TYPE(target.pulledby, /datum/ai_controller/monkey)) //Dont steal from my fellow monkeys.
+ if(living_pawn.Adjacent(target) && isturf(target.loc))
+ living_pawn.a_intent = INTENT_GRAB
+ target.grabbedby(living_pawn)
+ return //Do the rest next turn
+
+ var/obj/machinery/disposal/disposal = controller.blackboard[BB_MONKEY_TARGET_DISPOSAL]
+ controller.current_movement_target = disposal
+
+ if(living_pawn.Adjacent(disposal))
+ INVOKE_ASYNC(src, PROC_REF(try_disposal_mob), controller) //put him in!
+ else //This means we might be getting pissed!
+ return
+
+/datum/ai_behavior/disposal_mob/proc/try_disposal_mob(datum/ai_controller/controller)
+ var/mob/living/living_pawn = controller.pawn
+ var/mob/living/target = controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET]
+ var/obj/machinery/disposal/disposal = controller.blackboard[BB_MONKEY_TARGET_DISPOSAL]
+
+ controller.blackboard[BB_MONKEY_DISPOSING] = TRUE
+
+ if(target && disposal?.stuff_mob_in(target, living_pawn))
+ disposal.flush()
+ finish_action(controller, TRUE)
+
+
+/datum/ai_behavior/recruit_monkeys/perform(delta_time, datum/ai_controller/controller)
+ . = ..()
+
+ controller.blackboard[BB_MONKEY_RECRUIT_COOLDOWN] = world.time + MONKEY_RECRUIT_COOLDOWN
+ var/mob/living/living_pawn = controller.pawn
+
+ for(var/mob/living/L in view(living_pawn, MONKEY_ENEMY_VISION))
+ if(!HAS_AI_CONTROLLER_TYPE(L, /datum/ai_controller/monkey))
+ continue
+
+ if(!DT_PROB(MONKEY_RECRUIT_PROB, delta_time))
+ continue
+ var/datum/ai_controller/monkey/monkey_ai = L.ai_controller
+ var/atom/your_enemy = controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET]
+ var/list/enemies = L.ai_controller.blackboard[BB_MONKEY_ENEMIES]
+ enemies[your_enemy] = MONKEY_RECRUIT_HATED_AMOUNT
+ monkey_ai.blackboard[BB_MONKEY_RECRUIT_COOLDOWN] = world.time + MONKEY_RECRUIT_COOLDOWN
+ finish_action(controller, TRUE)
diff --git a/code/datums/ai/monkey/monkey_controller.dm b/code/datums/ai/monkey/monkey_controller.dm
new file mode 100644
index 000000000000..4cb8605d185f
--- /dev/null
+++ b/code/datums/ai/monkey/monkey_controller.dm
@@ -0,0 +1,255 @@
+/*
+AI controllers are a datumized form of AI that simulates the input a player would otherwise give to a mob. What this means is that these datums
+have ways of interacting with a specific mob and control it.
+*/
+///OOK OOK OOK
+
+/datum/ai_controller/monkey
+ movement_delay = 0.4 SECONDS
+ planning_subtrees = list(/datum/ai_planning_subtree/monkey_tree)
+ blackboard = list(
+ BB_MONKEY_AGRESSIVE = FALSE,
+ BB_MONKEY_BEST_FORCE_FOUND = 0,
+ BB_MONKEY_ENEMIES = list(),
+ BB_MONKEY_BLACKLISTITEMS = list(),
+ BB_MONKEY_PICKUPTARGET = null,
+ BB_MONKEY_PICKPOCKETING = FALSE,
+ BB_MONKEY_DISPOSING = FALSE,
+ BB_MONKEY_TARGET_DISPOSAL = null,
+ BB_MONKEY_CURRENT_ATTACK_TARGET = null,
+ BB_MONKEY_GUN_NEURONS_ACTIVATED = FALSE,
+ BB_MONKEY_GUN_WORKED = TRUE,
+ BB_MONKEY_NEXT_HUNGRY = 0
+ )
+/datum/ai_controller/monkey/angry
+
+/datum/ai_controller/monkey/angry/TryPossessPawn(atom/new_pawn)
+ . = ..()
+ if(. & AI_CONTROLLER_INCOMPATIBLE)
+ return
+ blackboard[BB_MONKEY_AGRESSIVE] = TRUE //Angry cunt
+
+/datum/ai_controller/monkey/TryPossessPawn(atom/new_pawn)
+ if(!isliving(new_pawn))
+ return AI_CONTROLLER_INCOMPATIBLE
+
+ blackboard[BB_MONKEY_NEXT_HUNGRY] = world.time + rand(0, 300)
+
+ var/mob/living/living_pawn = new_pawn
+ RegisterSignal(new_pawn, COMSIG_PARENT_ATTACKBY, PROC_REF(on_attackby))
+ RegisterSignal(new_pawn, COMSIG_ATOM_ATTACK_HAND, PROC_REF(on_attack_hand))
+ RegisterSignal(new_pawn, COMSIG_ATOM_ATTACK_PAW, PROC_REF(on_attack_paw))
+ RegisterSignal(new_pawn, COMSIG_ATOM_BULLET_ACT, PROC_REF(on_bullet_act))
+ RegisterSignal(new_pawn, COMSIG_ATOM_HITBY, PROC_REF(on_hitby))
+ RegisterSignal(new_pawn, COMSIG_LIVING_START_PULL, PROC_REF(on_startpulling))
+ RegisterSignal(new_pawn, COMSIG_LIVING_TRY_SYRINGE, PROC_REF(on_try_syringe))
+ RegisterSignal(new_pawn, COMSIG_ATOM_HULK_ATTACK, PROC_REF(on_attack_hulk))
+ RegisterSignal(new_pawn, COMSIG_CARBON_CUFF_ATTEMPTED, PROC_REF(on_attempt_cuff))
+ RegisterSignal(new_pawn, COMSIG_MOB_MOVESPEED_UPDATED, PROC_REF(update_movespeed))
+ RegisterSignal(new_pawn, COMSIG_FOOD_EATEN, PROC_REF(on_eat))
+ movement_delay = living_pawn.cached_multiplicative_slowdown
+ return ..() //Run parent at end
+
+/datum/ai_controller/monkey/UnpossessPawn(destroy)
+ UnregisterSignal(pawn, list(COMSIG_PARENT_ATTACKBY, COMSIG_ATOM_ATTACK_HAND, COMSIG_ATOM_ATTACK_PAW, COMSIG_ATOM_BULLET_ACT, COMSIG_ATOM_HITBY, COMSIG_LIVING_START_PULL,\
+ COMSIG_LIVING_TRY_SYRINGE, COMSIG_ATOM_HULK_ATTACK, COMSIG_CARBON_CUFF_ATTEMPTED, COMSIG_MOB_MOVESPEED_UPDATED))
+ return ..() //Run parent at end
+
+/datum/ai_controller/monkey/able_to_run()
+ . = ..()
+ var/mob/living/living_pawn = pawn
+
+ if(IS_DEAD_OR_INCAP(living_pawn))
+ return FALSE
+
+///re-used behavior pattern by monkeys for finding a weapon
+/datum/ai_controller/monkey/proc/TryFindWeapon()
+ var/mob/living/living_pawn = pawn
+
+ if(!locate(/obj/item) in living_pawn.held_items)
+ blackboard[BB_MONKEY_BEST_FORCE_FOUND] = 0
+
+ if(blackboard[BB_MONKEY_GUN_NEURONS_ACTIVATED] && (locate(/obj/item/gun) in living_pawn.held_items))
+ // We have a gun, what could we possibly want?
+ return FALSE
+
+ var/obj/item/weapon
+ var/list/nearby_items = list()
+ for(var/obj/item/item in oview(2, living_pawn))
+ nearby_items += item
+
+ weapon = GetBestWeapon(nearby_items, living_pawn.held_items)
+
+ var/pickpocket = FALSE
+ for(var/mob/living/carbon/human/human in oview(5, living_pawn))
+ var/obj/item/held_weapon = GetBestWeapon(human.held_items + weapon, living_pawn.held_items)
+ if(held_weapon == weapon) // It's just the same one, not a held one
+ continue
+ pickpocket = TRUE
+ weapon = held_weapon
+
+ if(!weapon || (weapon in living_pawn.held_items))
+ return FALSE
+
+ blackboard[BB_MONKEY_PICKUPTARGET] = weapon
+ current_movement_target = weapon
+ if(pickpocket)
+ LAZYADD(current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/monkey_equip/pickpocket))
+ else
+ LAZYADD(current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/monkey_equip/ground))
+ return TRUE
+
+/// Returns either the best weapon from the given choices or null if held weapons are better
+/datum/ai_controller/monkey/proc/GetBestWeapon(list/choices, list/held_weapons)
+ var/gun_neurons_activated = blackboard[BB_MONKEY_GUN_NEURONS_ACTIVATED]
+ var/top_force = 0
+ var/obj/item/top_force_item
+ for(var/obj/item/item as anything in held_weapons)
+ if(!item)
+ continue
+ if(blackboard[BB_MONKEY_BLACKLISTITEMS][item])
+ continue
+ if(gun_neurons_activated && istype(item, /obj/item/gun))
+ // We have a gun, why bother looking for something inferior
+ // Also yes it is intentional that monkeys dont know how to pick the best gun
+ return item
+ if(item.force > top_force)
+ top_force = item.force
+ top_force_item = item
+
+ for(var/obj/item/item as anything in choices)
+ if(!item)
+ continue
+ if(blackboard[BB_MONKEY_BLACKLISTITEMS][item])
+ continue
+ if(gun_neurons_activated && istype(item, /obj/item/gun))
+ return item
+ if(item.force <= top_force)
+ continue
+ top_force_item = item
+ top_force = item.force
+
+ return top_force_item
+
+/datum/ai_controller/monkey/proc/TryFindFood()
+ . = FALSE
+ var/mob/living/living_pawn = pawn
+
+ // Held items
+
+ var/list/food_candidates = list()
+ for(var/obj/item as anything in living_pawn.held_items)
+ if(!item || !IsEdible(item))
+ continue
+ food_candidates += item
+
+ for(var/obj/item/candidate in oview(2, living_pawn))
+ if(!IsEdible(candidate))
+ continue
+ food_candidates += candidate
+
+ if(length(food_candidates))
+ var/obj/item/best_held = GetBestWeapon(null, living_pawn.held_items)
+ for(var/obj/item/held as anything in living_pawn.held_items)
+ if(!held || held == best_held)
+ continue
+ living_pawn.dropItemToGround(held)
+
+ AddBehavior(/datum/ai_behavior/consume, pick(food_candidates))
+ return TRUE
+
+/datum/ai_controller/monkey/proc/IsEdible(obj/item/thing)
+ if(IS_EDIBLE(thing))
+ return TRUE
+ if(istype(thing, /obj/item/reagent_containers/food/drinks/drinkingglass))
+ var/obj/item/reagent_containers/food/drinks/drinkingglass/glass = thing
+ if(glass.reagents.total_volume) // The glass has something in it, time to drink the mystery liquid!
+ return TRUE
+ return FALSE
+
+//When idle just kinda fuck around.
+/datum/ai_controller/monkey/PerformIdleBehavior(delta_time)
+ var/mob/living/living_pawn = pawn
+
+ if(DT_PROB(25, delta_time) && (living_pawn.mobility_flags & MOBILITY_MOVE) && isturf(living_pawn.loc) && !living_pawn.pulledby)
+ step(living_pawn, pick(GLOB.cardinals))
+ else if(DT_PROB(5, delta_time))
+ INVOKE_ASYNC(living_pawn, TYPE_PROC_REF(/mob, emote), pick("screech"))
+ else if(DT_PROB(1, delta_time))
+ INVOKE_ASYNC(living_pawn, TYPE_PROC_REF(/mob, emote), pick("scratch","jump","roll","tail"))
+
+///Reactive events to being hit
+/datum/ai_controller/monkey/proc/retaliate(mob/living/L)
+ var/list/enemies = blackboard[BB_MONKEY_ENEMIES]
+ enemies[L] += MONKEY_HATRED_AMOUNT
+
+/datum/ai_controller/monkey/proc/on_attackby(datum/source, obj/item/I, mob/user)
+ SIGNAL_HANDLER
+ if(I.force && I.damtype != STAMINA)
+ retaliate(user)
+
+/datum/ai_controller/monkey/proc/on_attack_hand(datum/source, mob/living/L)
+ SIGNAL_HANDLER
+ if(L.a_intent == INTENT_HARM && prob(MONKEY_RETALIATE_HARM_PROB))
+ retaliate(L)
+ else if(L.a_intent == INTENT_DISARM && prob(MONKEY_RETALIATE_DISARM_PROB))
+ retaliate(L)
+
+/datum/ai_controller/monkey/proc/on_attack_paw(datum/source, mob/living/L)
+ SIGNAL_HANDLER
+ if(L.a_intent == INTENT_HARM && prob(MONKEY_RETALIATE_HARM_PROB))
+ retaliate(L)
+ else if(L.a_intent == INTENT_DISARM && prob(MONKEY_RETALIATE_DISARM_PROB))
+ retaliate(L)
+
+/datum/ai_controller/monkey/proc/on_bullet_act(datum/source, obj/projectile/Proj)
+ SIGNAL_HANDLER
+ var/mob/living/living_pawn = pawn
+ if(istype(Proj , /obj/projectile/beam)||istype(Proj, /obj/projectile/bullet))
+ if((Proj.damage_type == BURN) || (Proj.damage_type == BRUTE))
+ if(!Proj.nodamage && Proj.damage < living_pawn.health && isliving(Proj.firer))
+ retaliate(Proj.firer)
+
+/datum/ai_controller/monkey/proc/on_hitby(datum/source, atom/movable/AM, skipcatch = FALSE, hitpush = TRUE, blocked = FALSE, datum/thrownthing/throwingdatum)
+ SIGNAL_HANDLER
+ if(istype(AM, /obj/item))
+ var/mob/living/living_pawn = pawn
+ var/obj/item/I = AM
+ if(I.throwforce < living_pawn.health && ishuman(I.thrownby))
+ var/mob/living/carbon/human/H = I.thrownby
+ retaliate(H)
+
+/datum/ai_controller/monkey/proc/on_startpulling(datum/source, atom/movable/puller, state, force)
+ SIGNAL_HANDLER
+ var/mob/living/living_pawn = pawn
+ if(!IS_DEAD_OR_INCAP(living_pawn) && prob(MONKEY_PULL_AGGRO_PROB)) // nuh uh you don't pull me!
+ retaliate(living_pawn.pulledby)
+ return TRUE
+
+/datum/ai_controller/monkey/proc/on_try_syringe(datum/source, mob/user)
+ SIGNAL_HANDLER
+ // chance of monkey retaliation
+ if(prob(MONKEY_SYRINGE_RETALIATION_PROB))
+ retaliate(user)
+
+/datum/ai_controller/monkey/proc/on_attack_hulk(datum/source, mob/user)
+ SIGNAL_HANDLER
+ retaliate(user)
+
+/datum/ai_controller/monkey/proc/on_attempt_cuff(datum/source, mob/user)
+ SIGNAL_HANDLER
+ // chance of monkey retaliation
+ if(prob(MONKEY_CUFF_RETALIATION_PROB))
+ retaliate(user)
+
+/datum/ai_controller/monkey/proc/update_movespeed(mob/living/pawn)
+ SIGNAL_HANDLER
+ movement_delay = pawn.cached_multiplicative_slowdown
+
+/datum/ai_controller/monkey/proc/target_del(target)
+ SIGNAL_HANDLER
+ blackboard[BB_MONKEY_BLACKLISTITEMS] -= target
+
+/datum/ai_controller/monkey/proc/on_eat(mob/living/pawn)
+ SIGNAL_HANDLER
+ blackboard[BB_MONKEY_NEXT_HUNGRY] = world.time + rand(120, 600) SECONDS
diff --git a/code/datums/ai/monkey/monkey_subtrees.dm b/code/datums/ai/monkey/monkey_subtrees.dm
new file mode 100644
index 000000000000..4e7317de5a56
--- /dev/null
+++ b/code/datums/ai/monkey/monkey_subtrees.dm
@@ -0,0 +1,84 @@
+/datum/ai_planning_subtree/monkey_tree/SelectBehaviors(datum/ai_controller/monkey/controller, delta_time)
+ var/mob/living/living_pawn = controller.pawn
+
+ if(SHOULD_RESIST(living_pawn) && DT_PROB(MONKEY_RESIST_PROB, delta_time))
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/resist)) //BRO IM ON FUCKING FIRE BRO
+ return SUBTREE_RETURN_FINISH_PLANNING //IM NOT DOING ANYTHING ELSE BUT EXTUINGISH MYSELF, GOOD GOD HAVE MERCY.
+
+ var/list/enemies = controller.blackboard[BB_MONKEY_ENEMIES]
+
+ if(HAS_TRAIT(controller.pawn, TRAIT_PACIFISM)) //Not a pacifist? lets try some combat behavior.
+ return
+
+ var/mob/living/selected_enemy
+ if(length(enemies) || controller.blackboard[BB_MONKEY_AGRESSIVE]) //We have enemies or are pissed
+ var/list/valids = list()
+ for(var/mob/living/possible_enemy in view(MONKEY_ENEMY_VISION, living_pawn))
+ if(possible_enemy == living_pawn || (!enemies[possible_enemy] && (!controller.blackboard[BB_MONKEY_AGRESSIVE] || HAS_AI_CONTROLLER_TYPE(possible_enemy, /datum/ai_controller/monkey)))) //Are they an enemy? (And do we even care?)
+ continue
+ // Weighted list, so the closer they are the more likely they are to be chosen as the enemy
+ valids[possible_enemy] = CEILING(100 / (get_dist(living_pawn, possible_enemy) || 1), 1)
+
+ selected_enemy = pick_weight(valids)
+
+ if(selected_enemy)
+ if(!selected_enemy.stat) //He's up, get him!
+ if(living_pawn.health < MONKEY_FLEE_HEALTH) //Time to skeddadle
+ controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET] = selected_enemy
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/monkey_flee))
+ return //I'm running fuck you guys
+
+ if(controller.TryFindWeapon()) //Getting a weapon is higher priority if im not fleeing.
+ return SUBTREE_RETURN_FINISH_PLANNING
+
+ controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET] = selected_enemy
+ controller.current_movement_target = selected_enemy
+ if(controller.blackboard[BB_MONKEY_RECRUIT_COOLDOWN] < world.time)
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/recruit_monkeys))
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/battle_screech/monkey))
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/monkey_attack_mob))
+ return SUBTREE_RETURN_FINISH_PLANNING //Focus on this
+
+ else //He's down, can we disposal him?
+ var/obj/machinery/disposal/bodyDisposal = locate(/obj/machinery/disposal/) in view(MONKEY_ENEMY_VISION, living_pawn)
+ if(bodyDisposal)
+ controller.blackboard[BB_MONKEY_CURRENT_ATTACK_TARGET] = selected_enemy
+ controller.blackboard[BB_MONKEY_TARGET_DISPOSAL] = bodyDisposal
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/disposal_mob))
+ return SUBTREE_RETURN_FINISH_PLANNING
+
+ if(prob(5))
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/use_in_hand))
+
+ if(selected_enemy || !DT_PROB(MONKEY_SHENANIGAN_PROB, delta_time))
+ return
+
+ if(world.time >= controller.blackboard[BB_MONKEY_NEXT_HUNGRY] && controller.TryFindFood())
+ return
+
+ if(prob(50))
+ var/list/possible_targets = list()
+ for(var/atom/thing in view(2, living_pawn))
+ if(!thing.mouse_opacity)
+ continue
+ if(thing.IsObscured())
+ continue
+ possible_targets += thing
+ var/atom/target = pick(possible_targets)
+ if(target)
+ controller.current_movement_target = target
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/use_on_object))
+ return
+
+ if(prob(5) && (locate(/obj/item) in living_pawn.held_items))
+ var/list/possible_receivers = list()
+ for(var/mob/living/candidate in oview(2, controller.pawn))
+ possible_receivers += candidate
+
+ if(length(possible_receivers))
+ var/mob/living/target = pick(possible_receivers)
+ controller.current_movement_target = target
+ LAZYADD(controller.current_behaviors, GET_AI_BEHAVIOR(/datum/ai_behavior/give))
+ return
+
+ controller.TryFindWeapon()
diff --git a/code/datums/ai/movement/_ai_movement.dm b/code/datums/ai/movement/_ai_movement.dm
new file mode 100644
index 000000000000..c9d47bc6d66b
--- /dev/null
+++ b/code/datums/ai/movement/_ai_movement.dm
@@ -0,0 +1,19 @@
+///This datum is an abstract class that can be overriden for different types of movement
+/datum/ai_movement
+ ///Assoc list ist of controllers that are currently moving as key, and what they are moving to as value
+ var/list/moving_controllers = list()
+ ///How many times a given controller can fail on their route before they just give up
+ var/max_pathing_attempts
+
+/datum/ai_movement/proc/start_moving_towards(datum/ai_controller/controller, atom/current_movement_target)
+ controller.pathing_attempts = 0
+ if(!moving_controllers.len)
+ START_PROCESSING(SSai_movement, src)
+ moving_controllers[controller] = current_movement_target
+
+/datum/ai_movement/proc/stop_moving_towards(datum/ai_controller/controller)
+ controller.pathing_attempts = 0
+ moving_controllers -= controller
+
+ if(!moving_controllers.len)
+ STOP_PROCESSING(SSai_movement, src)
diff --git a/code/datums/ai/movement/ai_movement_dumb.dm b/code/datums/ai/movement/ai_movement_dumb.dm
new file mode 100644
index 000000000000..0ce64669d373
--- /dev/null
+++ b/code/datums/ai/movement/ai_movement_dumb.dm
@@ -0,0 +1,27 @@
+///The most braindead type of movement, bee-line to the target with no concern of whats infront of us.
+/datum/ai_movement/dumb
+ max_pathing_attempts = 16
+
+///Put your movement behavior in here!
+/datum/ai_movement/dumb/process(delta_time)
+ for(var/datum/ai_controller/controller as anything in moving_controllers)
+ if(!COOLDOWN_FINISHED(controller, movement_cooldown))
+ continue
+ COOLDOWN_START(controller, movement_cooldown, controller.movement_delay)
+
+ var/atom/movable/movable_pawn = controller.pawn
+
+ if(!isturf(movable_pawn.loc)) //No moving if not on a turf
+ continue
+
+ var/current_loc = get_turf(movable_pawn)
+
+ var/turf/target_turf = get_step_towards(movable_pawn, controller.current_movement_target)
+
+ if(!is_type_in_typecache(target_turf, GLOB.dangerous_turfs))
+ movable_pawn.Move(target_turf, get_dir(current_loc, target_turf))
+
+ if(current_loc == get_turf(movable_pawn)) //Did we even move after trying to move?
+ controller.pathing_attempts++
+ if(controller.pathing_attempts >= max_pathing_attempts)
+ controller.CancelActions()
diff --git a/code/datums/ai/movement/ai_movement_jps.dm b/code/datums/ai/movement/ai_movement_jps.dm
new file mode 100644
index 000000000000..ea05b0fc899e
--- /dev/null
+++ b/code/datums/ai/movement/ai_movement_jps.dm
@@ -0,0 +1,61 @@
+/**
+ * This movement datum represents smart-pathing
+ */
+/datum/ai_movement/jps
+ max_pathing_attempts = 4
+
+///Put your movement behavior in here!
+/datum/ai_movement/jps/process(delta_time)
+ for(var/datum/ai_controller/controller as anything in moving_controllers)
+ if(!COOLDOWN_FINISHED(controller, movement_cooldown))
+ continue
+ COOLDOWN_START(controller, movement_cooldown, controller.movement_delay)
+
+ var/atom/movable/movable_pawn = controller.pawn
+ if(!isturf(movable_pawn.loc)) //No moving if not on a turf
+ continue
+
+ var/minimum_distance = controller.max_target_distance
+ // right now I'm just taking the shortest minimum distance of our current behaviors, at some point in the future
+ // we should let whatever sets the current_movement_target also set the min distance and max path length
+ // (or at least cache it on the controller)
+ if(LAZYLEN(controller.current_behaviors))
+ for(var/datum/ai_behavior/iter_behavior as anything in controller.current_behaviors)
+ if(iter_behavior.required_distance < minimum_distance)
+ minimum_distance = iter_behavior.required_distance
+
+ if(get_dist(movable_pawn, controller.current_movement_target) <= minimum_distance)
+ continue
+
+ var/generate_path = FALSE // set to TRUE when we either have no path, or we failed a step
+ if(length(controller.movement_path))
+ var/turf/next_step = controller.movement_path[1]
+ movable_pawn.Move(next_step)
+
+ // this check if we're on exactly the next tile may be overly brittle for dense pawns who may get bumped slightly
+ // to the side while moving but could maybe still follow their path without needing a whole new path
+ if(get_turf(movable_pawn) == next_step)
+ controller.movement_path.Cut(1,2)
+ else
+ generate_path = TRUE
+ else
+ generate_path = TRUE
+
+ if(generate_path)
+ if(!COOLDOWN_FINISHED(controller, repath_cooldown))
+ continue
+ controller.pathing_attempts++
+ if(controller.pathing_attempts >= max_pathing_attempts)
+ controller.CancelActions()
+ continue
+
+ COOLDOWN_START(controller, repath_cooldown, 2 SECONDS)
+ controller.movement_path = get_path_to(movable_pawn, controller.current_movement_target, AI_MAX_PATH_LENGTH, minimum_distance, id=controller.get_access())
+
+/datum/ai_movement/jps/start_moving_towards(datum/ai_controller/controller, atom/current_movement_target)
+ controller.movement_path = null
+ return ..()
+
+/datum/ai_movement/jps/stop_moving_towards(datum/ai_controller/controller)
+ controller.movement_path = null
+ return ..()
diff --git a/code/datums/components/spinny.dm b/code/datums/components/spinny.dm
new file mode 100644
index 000000000000..cdf5262ab31b
--- /dev/null
+++ b/code/datums/components/spinny.dm
@@ -0,0 +1,33 @@
+/**
+ * spinny.dm
+ *
+ * It's a component that spins things a whole bunch, like [proc/dance_rotate] but without the sleeps
+*/
+/datum/component/spinny
+ dupe_mode = COMPONENT_DUPE_UNIQUE
+ /// How many turns are left?
+ var/steps_left
+ /// Turns clockwise by default, or counterclockwise if the reverse argument is TRUE
+ var/turn_degrees = 90
+
+/datum/component/spinny/Initialize(steps = 12, reverse = FALSE)
+ if(!isatom(parent))
+ return COMPONENT_INCOMPATIBLE
+
+ steps_left = steps
+ turn_degrees = (reverse ? -90 : 90)
+ START_PROCESSING(SSfastprocess, src)
+
+/datum/component/spinny/Destroy(force, silent)
+ STOP_PROCESSING(SSfastprocess, src)
+ return ..()
+
+/datum/component/spinny/process(delta_time)
+ steps_left--
+ var/atom/spinny_boy = parent
+ if(!istype(spinny_boy) || steps_left <= 0)
+ qdel(src)
+ return
+
+ // 25% chance to make 2 turns instead of 1 since the old dance_rotate wasn't strictly clockwise/counterclockwise
+ spinny_boy.setDir(turn(spinny_boy.dir, turn_degrees * (prob(25) ? 2 : 1)))
diff --git a/code/datums/mutations/body.dm b/code/datums/mutations/body.dm
index 0954c2a35bc8..d520c3bae5ed 100644
--- a/code/datums/mutations/body.dm
+++ b/code/datums/mutations/body.dm
@@ -179,11 +179,11 @@
/datum/mutation/human/race/on_acquiring(mob/living/carbon/human/owner)
if(..())
return
- . = owner.monkeyize(TR_KEEPITEMS | TR_KEEPIMPLANTS | TR_KEEPORGANS | TR_KEEPDAMAGE | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_KEEPSE)
+ . = owner.monkeyize(TR_KEEPITEMS | TR_KEEPIMPLANTS | TR_KEEPORGANS | TR_KEEPDAMAGE | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_KEEPSE | TR_KEEPAI)
/datum/mutation/human/race/on_losing(mob/living/carbon/monkey/owner)
if(owner && istype(owner) && owner.stat != DEAD && (owner.dna.mutations.Remove(src)))
- . = owner.humanize(TR_KEEPITEMS | TR_KEEPIMPLANTS | TR_KEEPORGANS | TR_KEEPDAMAGE | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_KEEPSE)
+ . = owner.humanize(TR_KEEPITEMS | TR_KEEPIMPLANTS | TR_KEEPORGANS | TR_KEEPDAMAGE | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_KEEPSE | TR_KEEPAI)
/datum/mutation/human/glow
name = "Glowy"
diff --git a/code/game/atoms.dm b/code/game/atoms.dm
index 46b08169f829..75a36e1aa677 100644
--- a/code/game/atoms.dm
+++ b/code/game/atoms.dm
@@ -136,6 +136,9 @@
///List of smoothing groups this atom can smooth with. If this is null and atom is smooth, it smooths only with itself.
var/list/canSmoothWith = null
+ ///AI controller that controls this atom. type on init, then turned into an instance during runtime
+ var/datum/ai_controller/ai_controller
+
/// The icon file of the connector to use when smoothing.
/// Use of connectors requires the smoothing flags SMOOTH_BITMASK and SMOOTH_CONNECTORS.
var/connector_icon = null
@@ -265,6 +268,7 @@
set_custom_materials(temp_list)
ComponentInitialize()
+ InitializeAIController()
return INITIALIZE_HINT_NORMAL
@@ -311,6 +315,7 @@
LAZYCLEARLIST(managed_overlays)
QDEL_NULL(light)
+ QDEL_NULL(ai_controller)
if(smoothing_flags & SMOOTH_QUEUED)
SSicon_smooth.remove_from_queues(src)
@@ -737,6 +742,7 @@
* throw lots of items around - singularity being a notable example)
*/
/atom/proc/hitby(atom/movable/AM, skipcatch, hitpush, blocked, datum/thrownthing/throwingdatum)
+ SEND_SIGNAL(src, COMSIG_ATOM_HITBY, AM, skipcatch, hitpush, blocked, throwingdatum)
if(density && !has_gravity(AM)) //thrown stuff bounces off dense stuff in no grav, unless the thrown stuff ends up inside what it hit(embedding, bola, etc...).
addtimer(CALLBACK(src, PROC_REF(hitby_react), AM), 2)
@@ -1068,6 +1074,7 @@
VV_DROPDOWN_OPTION(VV_HK_RADIATE, "Radiate")
VV_DROPDOWN_OPTION(VV_HK_EDIT_FILTERS, "Edit Filters")
VV_DROPDOWN_OPTION(VV_HK_SELL, "Export Item")
+ VV_DROPDOWN_OPTION(VV_HK_ADD_AI, "Add AI controller")
/atom/vv_do_topic(list/href_list)
. = ..()
@@ -1112,6 +1119,15 @@
var/strength = input(usr, "Choose the radiation strength.", "Choose the strength.") as num|null
if(!isnull(strength))
AddComponent(/datum/component/radioactive, strength, src)
+
+ if(href_list[VV_HK_ADD_AI])
+ if(!check_rights(R_VAREDIT))
+ return
+ var/result = input(usr, "Choose the AI controller to apply to this atom WARNING: Not all AI works on all atoms.", "AI controller") as null|anything in subtypesof(/datum/ai_controller)
+ if(!result)
+ return
+ ai_controller = new result(src)
+
if(href_list[VV_HK_MODIFY_TRANSFORM] && check_rights(R_VAREDIT))
var/result = input(usr, "Choose the transformation to apply","Transform Mod") as null|anything in list("Scale","Translate","Rotate")
var/matrix/M = transform
@@ -1710,3 +1726,12 @@
*/
/atom/proc/setClosed()
return
+
+/**
+* Instantiates the AI controller of this atom. Override this if you want to assign variables first.
+*
+* This will work fine without manually passing arguments.
++*/
+/atom/proc/InitializeAIController()
+ if(ai_controller)
+ ai_controller = new ai_controller(src)
diff --git a/code/game/machinery/porta_turret/portable_turret.dm b/code/game/machinery/porta_turret/portable_turret.dm
index ea51bac01b50..93225b2af9a9 100644
--- a/code/game/machinery/porta_turret/portable_turret.dm
+++ b/code/game/machinery/porta_turret/portable_turret.dm
@@ -513,9 +513,6 @@
if(!is_type_in_typecache(target_mob, dangerous_fauna))
return FALSE
- if(ismonkey(target_mob))
- var/mob/living/carbon/monkey/monke = target_mob
- return monke.mode == MONKEY_HUNT && target(target_mob)
if(istype(target_mob, /mob/living/simple_animal/hostile/retaliate))
var/mob/living/simple_animal/hostile/retaliate/target_animal = target_mob
return length(target_animal.enemies) && target(target_mob)
diff --git a/code/game/objects/items.dm b/code/game/objects/items.dm
index 23de618975a8..17bcfd78d5c9 100644
--- a/code/game/objects/items.dm
+++ b/code/game/objects/items.dm
@@ -867,7 +867,7 @@ GLOBAL_VAR_INIT(embedpocalypse, FALSE) // if true, all items will be able to emb
. = ""
/obj/item/hitby(atom/movable/AM, skipcatch, hitpush, blocked, datum/thrownthing/throwingdatum)
- return
+ return SEND_SIGNAL(src, COMSIG_ATOM_HITBY, AM, skipcatch, hitpush, blocked, throwingdatum)
/obj/item/attack_hulk(mob/living/carbon/human/user)
return FALSE
diff --git a/code/game/objects/items/handcuffs.dm b/code/game/objects/items/handcuffs.dm
index f36c27bb244d..66d829baee25 100644
--- a/code/game/objects/items/handcuffs.dm
+++ b/code/game/objects/items/handcuffs.dm
@@ -40,17 +40,13 @@
if(!istype(C))
return
+ SEND_SIGNAL(C, COMSIG_CARBON_CUFF_ATTEMPTED, user)
+
if(iscarbon(user) && (HAS_TRAIT(user, TRAIT_CLUMSY) && prob(50)))
to_chat(user, "Uh... how do those things work?!")
apply_cuffs(user,user)
return
- // chance of monkey retaliation
- if(ismonkey(C) && prob(MONKEY_CUFF_RETALIATION_PROB))
- var/mob/living/carbon/monkey/M
- M = C
- M.retaliate(user)
-
if(!C.handcuffed)
if(C.canBeHandcuffed())
C.visible_message("[user] is trying to put [src.name] on [C]!", \
diff --git a/code/game/objects/objs.dm b/code/game/objects/objs.dm
index bbcaa94f0867..aa63701ce0e9 100644
--- a/code/game/objects/objs.dm
+++ b/code/game/objects/objs.dm
@@ -243,11 +243,20 @@
/obj/get_dumping_location(datum/component/storage/source,mob/user)
return get_turf(src)
-/obj/proc/CanAStarPass(ID, dir, caller)
- if(ismovable(caller))
- var/atom/movable/AM = caller
- if(AM.pass_flags & pass_flags_self)
- return TRUE
+/**
+ * This proc is used for telling whether something can pass by this object in a given direction, for use by the pathfinding system.
+ *
+ * Trying to generate one long path across the station will call this proc on every single object on every single tile that we're seeing if we can move through, likely
+ * multiple times per tile since we're likely checking if we can access said tile from multiple directions, so keep these as lightweight as possible.
+ *
+ * Arguments:
+ * * ID- An ID card representing what access we have (and thus if we can open things like airlocks or windows to pass through them). The ID card's physical location does not matter, just the reference
+ * * to_dir- What direction we're trying to move in, relevant for things like directional windows that only block movement in certain directions
+ * * caller- The movable we're checking pass flags for, if we're making any such checks
+ **/
+/obj/proc/CanAStarPass(obj/item/card/id/ID, to_dir, atom/movable/caller)
+ if(istype(caller) && (caller.pass_flags & pass_flags_self))
+ return TRUE
. = !density
/obj/proc/check_uplink_validity()
diff --git a/code/game/objects/structures/girders.dm b/code/game/objects/structures/girders.dm
index d30f28801f76..85af7c9bb8eb 100644
--- a/code/game/objects/structures/girders.dm
+++ b/code/game/objects/structures/girders.dm
@@ -304,11 +304,10 @@
if((mover.pass_flags & PASSGRILLE) || istype(mover, /obj/projectile))
return prob(girderpasschance)
-/obj/structure/girder/CanAStarPass(ID, dir, caller)
+/obj/structure/girder/CanAStarPass(obj/item/card/id/ID, to_dir, atom/movable/caller)
. = !density
- if(ismovable(caller))
- var/atom/movable/mover = caller
- . = . || (mover.pass_flags & PASSGRILLE)
+ if(istype(caller))
+ . = . || (caller.pass_flags & PASSGRILLE)
/obj/structure/girder/deconstruct(disassembled = TRUE)
if(!(flags_1 & NODECONSTRUCT_1))
diff --git a/code/game/objects/structures/grille.dm b/code/game/objects/structures/grille.dm
index 10a4413f442f..7e2527c11dae 100644
--- a/code/game/objects/structures/grille.dm
+++ b/code/game/objects/structures/grille.dm
@@ -135,11 +135,10 @@
if(!. && istype(mover, /obj/projectile))
return prob(30)
-/obj/structure/grille/CanAStarPass(ID, dir, caller)
+/obj/structure/grille/CanAStarPass(obj/item/card/id/ID, to_dir, atom/movable/caller)
. = !density
- if(ismovable(caller))
- var/atom/movable/mover = caller
- . = . || (mover.pass_flags & PASSGRILLE)
+ if(istype(caller))
+ . = . || (caller.pass_flags & PASSGRILLE)
/obj/structure/grille/attackby(obj/item/W, mob/user, params)
user.changeNext_move(CLICK_CD_MELEE)
diff --git a/code/game/objects/structures/window.dm b/code/game/objects/structures/window.dm
index 35cc9fba1aae..e7a0fa946e23 100644
--- a/code/game/objects/structures/window.dm
+++ b/code/game/objects/structures/window.dm
@@ -379,7 +379,7 @@
/obj/structure/window/get_dumping_location(obj/item/storage/source,mob/user)
return null
-/obj/structure/window/CanAStarPass(ID, to_dir)
+/obj/structure/window/CanAStarPass(obj/item/card/id/ID, to_dir, atom/movable/caller)
if(!density)
return TRUE
if(fulltile || (dir == to_dir))
diff --git a/code/game/turfs/turf.dm b/code/game/turfs/turf.dm
index 4da6e25703bb..1f9dfc08f7da 100644
--- a/code/game/turfs/turf.dm
+++ b/code/game/turfs/turf.dm
@@ -676,3 +676,23 @@ GLOBAL_LIST_EMPTY(created_baseturf_lists)
/turf/bullet_act(obj/projectile/hitting_projectile)
. = ..()
bullet_hit_sfx(hitting_projectile)
+
+/**
+ * Returns adjacent turfs to this turf that are reachable, in all cardinal directions
+ *
+ * Arguments:
+ * * caller: The movable, if one exists, being used for mobility checks to see what tiles it can reach
+ * * ID: An ID card that decides if we can gain access to doors that would otherwise block a turf
+ * * simulated_only: Do we only worry about turfs with simulated atmos, most notably things that aren't space?
+*/
+/turf/proc/reachableAdjacentTurfs(caller, ID, simulated_only)
+ var/static/space_type_cache = typecacheof(/turf/open/space)
+ . = list()
+
+ for(var/iter_dir in GLOB.cardinals)
+ var/turf/turf_to_check = get_step(src,iter_dir)
+ if(!turf_to_check || (simulated_only && space_type_cache[turf_to_check.type]))
+ continue
+ if(turf_to_check.density || LinkBlockedWithAccess(turf_to_check, caller, ID))
+ continue
+ . += turf_to_check
diff --git a/code/modules/antagonists/changeling/powers/tiny_prick.dm b/code/modules/antagonists/changeling/powers/tiny_prick.dm
index 033b71b6df5b..0ed035002f09 100644
--- a/code/modules/antagonists/changeling/powers/tiny_prick.dm
+++ b/code/modules/antagonists/changeling/powers/tiny_prick.dm
@@ -47,7 +47,7 @@
return
if(!isturf(user.loc))
return
- if(!AStar(user, target.loc, /turf/proc/Distance, changeling.sting_range, simulated_only = FALSE))
+ if(!get_path_to(user, target, max_distance = changeling.sting_range, simulated_only = FALSE))
return
if(target.mind && target.mind.has_antag_datum(/datum/antagonist/changeling))
sting_feedback(user, target)
@@ -106,7 +106,7 @@
C.real_name = NewDNA.real_name
NewDNA.transfer_identity(C)
if(ismonkey(C))
- C.humanize(TR_KEEPITEMS | TR_KEEPIMPLANTS | TR_KEEPORGANS | TR_KEEPDAMAGE | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_DEFAULTMSG)
+ C.humanize(TR_KEEPITEMS | TR_KEEPIMPLANTS | TR_KEEPORGANS | TR_KEEPDAMAGE | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_DEFAULTMSG | TR_KEEPAI)
C.updateappearance(mutcolor_update=1)
diff --git a/code/modules/mob/living/carbon/carbon.dm b/code/modules/mob/living/carbon/carbon.dm
index 5276cf514d65..bcf78e60c8d1 100644
--- a/code/modules/mob/living/carbon/carbon.dm
+++ b/code/modules/mob/living/carbon/carbon.dm
@@ -108,6 +108,7 @@
/mob/proc/throw_item(atom/target)
SEND_SIGNAL(src, COMSIG_MOB_THROW, target)
+ SEND_GLOBAL_SIGNAL(COMSIG_GLOB_CARBON_THROW_THING, src, target)
return
/mob/living/carbon/throw_item(atom/target)
diff --git a/code/modules/mob/living/carbon/carbon_defense.dm b/code/modules/mob/living/carbon/carbon_defense.dm
index 51815282406d..48747f0106f8 100644
--- a/code/modules/mob/living/carbon/carbon_defense.dm
+++ b/code/modules/mob/living/carbon/carbon_defense.dm
@@ -138,6 +138,9 @@
//ATTACK HAND IGNORING PARENT RETURN VALUE
/mob/living/carbon/attack_hand(mob/living/carbon/human/user)
+ if(SEND_SIGNAL(src, COMSIG_ATOM_ATTACK_HAND, user) & COMPONENT_CANCEL_ATTACK_CHAIN)
+ . = TRUE
+
for(var/datum/surgery/S in surgeries)
if(body_position != LYING_DOWN && S.lying_required)
continue
diff --git a/code/modules/mob/living/carbon/emote.dm b/code/modules/mob/living/carbon/emote.dm
index 358fa0626092..d96bbd72531a 100644
--- a/code/modules/mob/living/carbon/emote.dm
+++ b/code/modules/mob/living/carbon/emote.dm
@@ -82,7 +82,22 @@
key = "screech"
key_third_person = "screeches"
message = "screeches."
- mob_type_allowed_typecache = list(/mob/living/carbon/monkey, /mob/living/carbon/alien)
+ mob_type_allowed_typecache = list(/mob/living/carbon/monkey)
+ emote_type = EMOTE_AUDIBLE
+
+/datum/emote/living/carbon/screech/get_sound(mob/living/user)
+ return pick('sound/creatures/monkey/monkey_screech_1.ogg',
+ 'sound/creatures/monkey/monkey_screech_2.ogg',
+ 'sound/creatures/monkey/monkey_screech_3.ogg',
+ 'sound/creatures/monkey/monkey_screech_4.ogg',
+ 'sound/creatures/monkey/monkey_screech_5.ogg',
+ 'sound/creatures/monkey/monkey_screech_6.ogg',
+ 'sound/creatures/monkey/monkey_screech_7.ogg')
+
+/datum/emote/living/carbon/screech/roar
+ key = "roar"
+ key_third_person = "roars"
+ message = "roars."
/datum/emote/living/carbon/sign
key = "sign"
diff --git a/code/modules/mob/living/carbon/human/examine.dm b/code/modules/mob/living/carbon/human/examine.dm
index 0c8782129698..c4a447b59d5b 100644
--- a/code/modules/mob/living/carbon/human/examine.dm
+++ b/code/modules/mob/living/carbon/human/examine.dm
@@ -7,6 +7,7 @@
var/t_him = p_them()
var/t_has = p_have()
var/t_is = p_are()
+ var/t_es = p_es()
var/obscure_name
var/list/obscured = check_obscured_slots()
var/skipface = ((wear_mask?.flags_inv & HIDEFACE) || (head?.flags_inv & HIDEFACE))
@@ -330,6 +331,8 @@
if(HAS_TRAIT(src, TRAIT_DUMB))
msg += "[t_He] [t_has] a stupid expression on [t_his] face.\n"
if(getorgan(/obj/item/organ/brain))
+ if(ai_controller?.ai_status == AI_STATUS_ON)
+ msg += "[t_He] do[t_es]n't appear to be [t_him]self.\n"
if(!key)
msg += "[t_He] [t_is] totally catatonic. The stresses of life in deep-space must have been too much for [t_him]. Any recovery is unlikely.\n"
else if(!client)
diff --git a/code/modules/mob/living/carbon/human/human.dm b/code/modules/mob/living/carbon/human/human.dm
index a4d89a53b548..b33a751df628 100644
--- a/code/modules/mob/living/carbon/human/human.dm
+++ b/code/modules/mob/living/carbon/human/human.dm
@@ -1289,6 +1289,9 @@
return known_name
return .
+/mob/living/carbon/human/monkeybrain
+ ai_controller = /datum/ai_controller/monkey
+
/mob/living/carbon/human/species
var/race = null
diff --git a/code/modules/mob/living/carbon/monkey/combat.dm b/code/modules/mob/living/carbon/monkey/combat.dm
deleted file mode 100644
index 8fd4e89566c7..000000000000
--- a/code/modules/mob/living/carbon/monkey/combat.dm
+++ /dev/null
@@ -1,426 +0,0 @@
-#define MAX_RANGE_FIND 32
-
-/mob/living/carbon/monkey
- var/aggressive=0 // set to 1 using VV for an angry monkey
- var/frustration=0
- var/pickupTimer=0
- var/list/enemies = list()
- var/mob/living/target
- var/obj/item/pickupTarget
- var/mode = MONKEY_IDLE
- var/list/myPath = list()
- var/list/blacklistItems = list()
- var/maxStepsTick = 6
- var/best_force = 0
- var/martial_art = new/datum/martial_art
- var/resisting = FALSE
- var/pickpocketing = FALSE
- var/disposing_body = FALSE
- var/obj/machinery/disposal/bodyDisposal = null
- var/next_battle_screech = 0
- var/battle_screech_cooldown = 50
-
-/mob/living/carbon/monkey/proc/IsStandingStill()
- return resisting || pickpocketing || disposing_body
-
-// blocks
-// taken from /mob/living/carbon/human/interactive/
-/mob/living/carbon/monkey/proc/walk2derpless(target)
- if(!target || IsStandingStill())
- return 0
-
- if(myPath.len <= 0)
- myPath = get_path_to(src, get_turf(target), /turf/proc/Distance, MAX_RANGE_FIND + 1, 250,1)
-
- if(myPath)
- if(myPath.len > 0)
- for(var/i = 0; i < maxStepsTick; ++i)
- if(!IsDeadOrIncap())
- if(myPath.len >= 1)
- walk_to(src,myPath[1],0,5)
- myPath -= myPath[1]
- return 1
-
- // failed to path correctly so just try to head straight for a bit
- walk_to(src,get_turf(target),0,5)
- sleep(1)
- walk_to(src,0)
-
- return 0
-
-
-// taken from /mob/living/carbon/human/interactive/
-/mob/living/carbon/monkey/proc/IsDeadOrIncap()
- return HAS_TRAIT(src, TRAIT_INCAPACITATED) || HAS_TRAIT(src, TRAIT_HANDS_BLOCKED)
-
-
-/mob/living/carbon/monkey/proc/battle_screech()
- if(next_battle_screech < world.time)
- emote(pick("roar","screech"))
- for(var/mob/living/carbon/monkey/M in view(7,src))
- M.next_battle_screech = world.time + battle_screech_cooldown
-
-/mob/living/carbon/monkey/proc/equip_item(obj/item/I)
- if(I.loc == src)
- return TRUE
-
- if(I.anchored)
- blacklistItems[I] ++
- return FALSE
-
- // WEAPONS
- if(istype(I, /obj/item))
- var/obj/item/W = I
- if(W.force >= best_force)
- put_in_hands(W)
- best_force = W.force
- return TRUE
-
- // CLOTHING
- else if(istype(I, /obj/item/clothing))
- var/obj/item/clothing/C = I
- monkeyDrop(C)
- addtimer(CALLBACK(src, PROC_REF(pickup_and_wear), C), 5)
- return TRUE
-
- // EVERYTHING ELSE
- else
- if(!get_item_for_held_index(1) || !get_item_for_held_index(2))
- put_in_hands(I)
- return TRUE
-
- blacklistItems[I] ++
- return FALSE
-
-/mob/living/carbon/monkey/proc/pickup_and_wear(obj/item/clothing/C)
- if(!equip_to_appropriate_slot(C))
- monkeyDrop(get_item_by_slot(C)) // remove the existing item if worn
- addtimer(CALLBACK(src, PROC_REF(equip_to_appropriate_slot), C), 5)
-
-/mob/living/carbon/monkey/resist_restraints()
- var/obj/item/I = null
- if(handcuffed)
- I = handcuffed
- else if(legcuffed)
- I = legcuffed
- if(I)
- changeNext_move(CLICK_CD_BREAKOUT)
- last_special = world.time + CLICK_CD_BREAKOUT
- cuff_resist(I)
-
-/mob/living/carbon/monkey/proc/should_target(mob/living/L)
- if(HAS_TRAIT(src, TRAIT_PACIFISM))
- return FALSE
-
- if(enemies[L])
- return TRUE
-
- // target non-monkey mobs when aggressive, with a small probability of monkey v monkey
- if(aggressive && (!istype(L, /mob/living/carbon/monkey/) || prob(MONKEY_AGGRESSIVE_MVM_PROB)))
- return TRUE
-
- return FALSE
-
-/mob/living/carbon/monkey/proc/handle_combat()
- if(pickupTarget)
- if(IsDeadOrIncap() || blacklistItems[pickupTarget] || HAS_TRAIT(pickupTarget, TRAIT_NODROP))
- pickupTarget = null
- else
- pickupTimer++
- if(pickupTimer >= 4)
- blacklistItems[pickupTarget] ++
- pickupTarget = null
- pickupTimer = 0
- else
- INVOKE_ASYNC(src, PROC_REF(walk2derpless), pickupTarget.loc)
- if(Adjacent(pickupTarget) || Adjacent(pickupTarget.loc)) // next to target
- drop_all_held_items() // who cares about these items, i want that one!
- if(isturf(pickupTarget.loc)) // on floor
- equip_item(pickupTarget)
- pickupTarget = null
- pickupTimer = 0
- else if(ismob(pickupTarget.loc)) // in someones hand
- var/mob/M = pickupTarget.loc
- if(!pickpocketing)
- pickpocketing = TRUE
- M.visible_message("[src] starts trying to take [pickupTarget] from [M]!", "[src] tries to take [pickupTarget]!")
- INVOKE_ASYNC(src, PROC_REF(pickpocket), M)
- return TRUE
-
- switch(mode)
- if(MONKEY_IDLE) // idle
- if(enemies.len)
- var/list/around = view(src, MONKEY_ENEMY_VISION) // scan for enemies
- for(var/mob/living/L in around)
- if(should_target(L))
- if(L.stat == CONSCIOUS)
- battle_screech()
- retaliate(L)
- return TRUE
- else
- bodyDisposal = locate(/obj/machinery/disposal/) in around
- if(bodyDisposal)
- target = L
- mode = MONKEY_DISPOSE
- return TRUE
-
- // pickup any nearby objects
- if(!pickupTarget)
- var/obj/item/I = locate(/obj/item/) in oview(2,src)
- if(I && !blacklistItems[I])
- pickupTarget = I
- else
- var/mob/living/carbon/human/H = locate(/mob/living/carbon/human/) in oview(2,src)
- if(H)
- pickupTarget = pick(H.held_items)
-
- if(MONKEY_HUNT) // hunting for attacker
- if(health < MONKEY_FLEE_HEALTH)
- mode = MONKEY_FLEE
- return TRUE
-
- if(target != null)
- INVOKE_ASYNC(src, PROC_REF(walk2derpless), target)
-
- // pickup any nearby weapon
- if(!pickupTarget && prob(MONKEY_WEAPON_PROB))
- var/obj/item/W = locate(/obj/item/) in oview(2,src)
- if(!locate(/obj/item) in held_items)
- best_force = 0
- if(W && !blacklistItems[W] && W.force > best_force)
- pickupTarget = W
-
- // recruit other monkies
- var/list/around = view(src, MONKEY_ENEMY_VISION)
- for(var/mob/living/carbon/monkey/M in around)
- if(M.mode == MONKEY_IDLE && prob(MONKEY_RECRUIT_PROB))
- M.battle_screech()
- M.target = target
- M.mode = MONKEY_HUNT
-
- // switch targets
- for(var/mob/living/L in around)
- if(L != target && should_target(L) && L.stat == CONSCIOUS && prob(MONKEY_SWITCH_TARGET_PROB))
- target = L
- return TRUE
-
- // if can't reach target for long enough, go idle
- if(frustration >= MONKEY_HUNT_FRUSTRATION_LIMIT)
- back_to_idle()
- return TRUE
-
- if(target && target.stat == CONSCIOUS) // make sure target exists
- if(Adjacent(target) && isturf(target.loc) && !IsDeadOrIncap()) // if right next to perp
-
- // check if target has a weapon
- var/obj/item/W
- for(var/obj/item/I in target.held_items)
- if(!(I.item_flags & ABSTRACT))
- W = I
- break
-
- // if the target has a weapon, chance to disarm them
- if(W && prob(MONKEY_ATTACK_DISARM_PROB))
- pickupTarget = W
- a_intent = INTENT_DISARM
- monkey_attack(target)
-
- else
- a_intent = INTENT_HARM
- monkey_attack(target)
-
- return TRUE
-
- else // not next to perp
- var/turf/olddist = get_dist(src, target)
- if((get_dist(src, target)) >= (olddist))
- frustration++
- else
- frustration = 0
- else
- back_to_idle()
-
- if(MONKEY_FLEE)
- var/list/around = view(src, MONKEY_FLEE_VISION)
- target = null
-
- // flee from anyone who attacked us and we didn't beat down
- for(var/mob/living/L in around)
- if(enemies[L] && L.stat == CONSCIOUS)
- target = L
-
- if(target != null)
- walk_away(src, target, MONKEY_ENEMY_VISION, 5)
- else
- back_to_idle()
-
- return TRUE
-
- if(MONKEY_DISPOSE)
-
- // if can't dispose of body go back to idle
- if(!target || !bodyDisposal || frustration >= MONKEY_DISPOSE_FRUSTRATION_LIMIT)
- back_to_idle()
- return TRUE
-
- if(target.pulledby != src && !istype(target.pulledby, /mob/living/carbon/monkey/))
-
- INVOKE_ASYNC(src, PROC_REF(walk2derpless), target.loc)
-
- if(Adjacent(target) && isturf(target.loc))
- a_intent = INTENT_GRAB
- target.grabbedby(src)
- else
- var/turf/olddist = get_dist(src, target)
- if((get_dist(src, target)) >= (olddist))
- frustration++
- else
- frustration = 0
-
- else if(!disposing_body)
- INVOKE_ASYNC(src, PROC_REF(walk2derpless), bodyDisposal.loc)
-
- if(Adjacent(bodyDisposal))
- disposing_body = TRUE
- addtimer(CALLBACK(src, PROC_REF(stuff_mob_in)), 5)
-
- else
- var/turf/olddist = get_dist(src, bodyDisposal)
- if((get_dist(src, bodyDisposal)) >= (olddist))
- frustration++
- else
- frustration = 0
-
- return TRUE
-
- return IsStandingStill()
-
-/mob/living/carbon/monkey/proc/pickpocket(mob/M)
- if(do_after(src, MONKEY_ITEM_SNATCH_DELAY, M) && pickupTarget)
- for(var/obj/item/I in M.held_items)
- if(I == pickupTarget)
- M.visible_message("[src] snatches [pickupTarget] from [M].", "[src] snatched [pickupTarget]!")
- if(M.temporarilyRemoveItemFromInventory(pickupTarget))
- if(!QDELETED(pickupTarget) && !equip_item(pickupTarget))
- pickupTarget.forceMove(drop_location())
- else
- M.visible_message("[src] tried to snatch [pickupTarget] from [M], but failed!", "[src] tried to grab [pickupTarget]!")
- pickpocketing = FALSE
- pickupTarget = null
- pickupTimer = 0
-
-/mob/living/carbon/monkey/proc/stuff_mob_in()
- if(bodyDisposal && target && Adjacent(bodyDisposal))
- bodyDisposal.stuff_mob_in(target, src)
- disposing_body = FALSE
- back_to_idle()
-
-/mob/living/carbon/monkey/proc/back_to_idle()
-
- if(pulling)
- stop_pulling()
-
- mode = MONKEY_IDLE
- target = null
- a_intent = INTENT_HELP
- frustration = 0
- walk_to(src,0)
-
-// attack using a held weapon otherwise bite the enemy, then if we are angry there is a chance we might calm down a little
-/mob/living/carbon/monkey/proc/monkey_attack(mob/living/L)
- var/obj/item/Weapon = locate(/obj/item) in held_items
-
- // attack with weapon if we have one
- if(Weapon)
- Weapon.melee_attack_chain(src, L)
- else
- L.attack_paw(src)
-
- // no de-aggro
- if(aggressive)
- return
-
- // if we arn't enemies, we were likely recruited to attack this target, jobs done if we calm down so go back to idle
- if(!enemies[L])
- if(target == L && prob(MONKEY_HATRED_REDUCTION_PROB))
- back_to_idle()
- return // already de-aggroed
-
- if(prob(MONKEY_HATRED_REDUCTION_PROB))
- enemies[L] --
-
- // if we are not angry at our target, go back to idle
- if(enemies[L] <= 0)
- enemies.Remove(L)
- if(target == L)
- back_to_idle()
-
-// get angry are a mob
-/mob/living/carbon/monkey/proc/retaliate(mob/living/L)
- mode = MONKEY_HUNT
- target = L
- if(L != src)
- enemies[L] += MONKEY_HATRED_AMOUNT
-
- if(a_intent != INTENT_HARM)
- battle_screech()
- a_intent = INTENT_HARM
-
-/mob/living/carbon/monkey/attack_hand(mob/living/L)
- if(L.a_intent == INTENT_HARM && prob(MONKEY_RETALIATE_HARM_PROB))
- retaliate(L)
- else if(L.a_intent == INTENT_DISARM && prob(MONKEY_RETALIATE_DISARM_PROB))
- retaliate(L)
- return ..()
-
-/mob/living/carbon/monkey/attack_paw(mob/living/L)
- if(L.a_intent == INTENT_HARM && prob(MONKEY_RETALIATE_HARM_PROB))
- retaliate(L)
- else if(L.a_intent == INTENT_DISARM && prob(MONKEY_RETALIATE_DISARM_PROB))
- retaliate(L)
- return ..()
-
-/mob/living/carbon/monkey/attackby(obj/item/W, mob/user, params)
- ..()
- if((W.force) && (!target) && (W.damtype != STAMINA))
- retaliate(user)
-
-/mob/living/carbon/monkey/bullet_act(obj/projectile/Proj)
- if(istype(Proj , /obj/projectile/beam)||istype(Proj, /obj/projectile/bullet))
- if((Proj.damage_type == BURN) || (Proj.damage_type == BRUTE))
- if(!Proj.nodamage && Proj.damage < src.health && isliving(Proj.firer))
- retaliate(Proj.firer)
- . = ..()
-
-/mob/living/carbon/monkey/hitby(atom/movable/AM, skipcatch = FALSE, hitpush = TRUE, blocked = FALSE, datum/thrownthing/throwingdatum)
- if(istype(AM, /obj/item))
- var/obj/item/I = AM
- if(I.throwforce < src.health && I.thrownby && ishuman(I.thrownby))
- var/mob/living/carbon/human/H = I.thrownby
- retaliate(H)
- ..()
-
-/mob/living/carbon/monkey/on_entered(datum/source, atom/movable/AM)
- . = ..()
- if(!IsDeadOrIncap() && ismob(AM) && target)
- var/mob/living/carbon/monkey/M = AM
- if(!istype(M) || !M)
- return
- knockOver(M)
- return
-
-/mob/living/carbon/monkey/proc/monkeyDrop(obj/item/A)
- if(A)
- dropItemToGround(A, TRUE)
- update_icons()
-
-/mob/living/carbon/monkey/grabbedby(mob/living/carbon/user)
- . = ..()
- if(!IsDeadOrIncap() && pulledby && (mode != MONKEY_IDLE || prob(MONKEY_PULL_AGGRO_PROB))) // nuh uh you don't pull me!
- if(Adjacent(pulledby))
- a_intent = INTENT_DISARM
- monkey_attack(pulledby)
- retaliate(pulledby)
- return TRUE
-
-#undef MAX_RANGE_FIND
diff --git a/code/modules/mob/living/carbon/monkey/life.dm b/code/modules/mob/living/carbon/monkey/life.dm
index b4469ea5b63c..01423b1aa2ee 100644
--- a/code/modules/mob/living/carbon/monkey/life.dm
+++ b/code/modules/mob/living/carbon/monkey/life.dm
@@ -1,33 +1,5 @@
-
-
/mob/living/carbon/monkey
-
-/mob/living/carbon/monkey/Life()
- set invisibility = 0
-
- if (notransform)
- return
-
- if(..() && !IS_IN_STASIS(src))
-
- if(!client)
- if(stat == CONSCIOUS)
- if(on_fire || buckled || HAS_TRAIT(src, TRAIT_RESTRAINED) || (pulledby && pulledby.grab_state > GRAB_PASSIVE))
- if(!resisting && prob(MONKEY_RESIST_PROB))
- resisting = TRUE
- walk_to(src,0)
- execute_resist()
- else if(resisting)
- resisting = FALSE
- else if((mode == MONKEY_IDLE && !pickupTarget && !prob(MONKEY_SHENANIGAN_PROB)) || !handle_combat())
- if(prob(25) && (mobility_flags & MOBILITY_MOVE) && isturf(loc) && !pulledby)
- step(src, pick(GLOB.cardinals))
- else if(prob(1))
- emote(pick("scratch","jump","roll","tail"))
- else
- walk_to(src,0)
-
/mob/living/carbon/monkey/handle_mutations_and_radiation()
if(radiation)
if(radiation > RAD_MOB_KNOCKDOWN && prob(RAD_MOB_KNOCKDOWN_PROB))
diff --git a/code/modules/mob/living/carbon/monkey/monkey.dm b/code/modules/mob/living/carbon/monkey/monkey.dm
index 755c674a107d..6056ac83fa7d 100644
--- a/code/modules/mob/living/carbon/monkey/monkey.dm
+++ b/code/modules/mob/living/carbon/monkey/monkey.dm
@@ -26,6 +26,8 @@
hud_type = /datum/hud/monkey
melee_damage_lower = 1
melee_damage_upper = 3
+ ai_controller = /datum/ai_controller/monkey
+ faction = list("neutral", "monkey")
/mob/living/carbon/monkey/Initialize(mapload, cubespawned=FALSE, mob/spawner)
add_verb(src, /mob/living/proc/mob_sleep)
@@ -169,10 +171,10 @@
return 1
/mob/living/carbon/monkey/angry
- aggressive = TRUE
/mob/living/carbon/monkey/angry/Initialize()
. = ..()
+ ai_controller.blackboard[BB_MONKEY_AGRESSIVE] = TRUE
if(prob(10))
var/obj/item/clothing/head/helmet/justice/escape/helmet = new(src)
equip_to_slot_or_del(helmet,ITEM_SLOT_HEAD)
diff --git a/code/modules/mob/living/living.dm b/code/modules/mob/living/living.dm
index 99db31b26c0f..ba9b99822600 100644
--- a/code/modules/mob/living/living.dm
+++ b/code/modules/mob/living/living.dm
@@ -1125,7 +1125,7 @@
if(G.trigger_guard == TRIGGER_GUARD_NONE)
to_chat(src, "You are unable to fire this!")
return FALSE
- if(G.trigger_guard != TRIGGER_GUARD_ALLOW_ALL && !IsAdvancedToolUser())
+ if(G.trigger_guard != TRIGGER_GUARD_ALLOW_ALL && (!IsAdvancedToolUser(src) && !HAS_TRAIT(src, TRAIT_GUN_NATURAL)))
to_chat(src, "You try to fire [G], but can't use the trigger!")
return FALSE
return TRUE
diff --git a/code/modules/mob/living/simple_animal/bot/bot.dm b/code/modules/mob/living/simple_animal/bot/bot.dm
index 3c7736c06230..1e81bd48b63f 100644
--- a/code/modules/mob/living/simple_animal/bot/bot.dm
+++ b/code/modules/mob/living/simple_animal/bot/bot.dm
@@ -564,7 +564,7 @@ Pass a positive integer as an argument to override a bot's default speed.
var/datum/job/captain/All = new/datum/job/captain
all_access.access = All.get_access()
- set_path(get_path_to(src, waypoint, /turf/proc/Distance_cardinal, 0, 200, id=all_access))
+ set_path(get_path_to(src, waypoint, 200, id=all_access))
calling_ai = caller //Link the AI to the bot!
ai_waypoint = waypoint
@@ -782,16 +782,16 @@ Pass a positive integer as an argument to override a bot's default speed.
// given an optional turf to avoid
/mob/living/simple_animal/bot/proc/calc_path(turf/avoid)
check_bot_access()
- set_path(get_path_to(src, patrol_target, /turf/proc/Distance_cardinal, 0, 120, id=access_card, exclude=avoid))
+ set_path(get_path_to(src, patrol_target, 120, id=access_card, exclude=avoid))
/mob/living/simple_animal/bot/proc/calc_summon_path(turf/avoid)
check_bot_access()
INVOKE_ASYNC(src, PROC_REF(do_calc_summon_path), avoid)
/mob/living/simple_animal/bot/proc/do_calc_summon_path(turf/avoid)
- set_path(get_path_to(src, summon_target, /turf/proc/Distance_cardinal, 0, 150, id=access_card, exclude=avoid))
+ set_path(get_path_to(src, summon_target, 150, id=access_card, exclude=avoid))
if(!length(path)) //Cannot reach target. Give up and announce the issue.
- speak("Summon command failed, destination unreachable.",radio_channel)
+ speak("Summon command failed, destination unreachable.", radio_channel)
bot_reset()
/mob/living/simple_animal/bot/proc/summon_step()
@@ -816,7 +816,9 @@ Pass a positive integer as an argument to override a bot's default speed.
calc_summon_path()
/mob/living/simple_animal/bot/proc/summon_step_not_moved()
- calc_summon_path()
+ //calc_summon_path()
+ speak("Summon command failed, destination unreachable.",radio_channel)
+ bot_reset()
tries = 0
/mob/living/simple_animal/bot/Bump(atom/A) //Leave no door unopened!
diff --git a/code/modules/mob/living/simple_animal/bot/cleanbot.dm b/code/modules/mob/living/simple_animal/bot/cleanbot.dm
index e53b675c95bc..aad4a7a63f86 100644
--- a/code/modules/mob/living/simple_animal/bot/cleanbot.dm
+++ b/code/modules/mob/living/simple_animal/bot/cleanbot.dm
@@ -261,11 +261,11 @@
mode = BOT_IDLE
return
- if(target && path.len == 0 && (get_dist(src,target) > 1))
- path = get_path_to(src, target.loc, /turf/proc/Distance_cardinal, 30, id=access_card)
+ if(target && (!path || path.len == 0) && (get_dist(src,target) > 1))
+ path = get_path_to(src, target, 30, id=access_card)
mode = BOT_MOVING
if(!path.len) //try to get closer if you can't reach the target directly
- path = get_path_to(src, target.loc, /turf/proc/Distance_cardinal, 30, 1, id=access_card)
+ path = get_path_to(src, target, 30, id=access_card)
if(!path.len) //Do not chase a target we cannot reach.
add_to_ignore(target)
target = null
diff --git a/code/modules/mob/living/simple_animal/bot/firebot.dm b/code/modules/mob/living/simple_animal/bot/firebot.dm
index 0fabc6c7fb53..1b04fbb51669 100644
--- a/code/modules/mob/living/simple_animal/bot/firebot.dm
+++ b/code/modules/mob/living/simple_animal/bot/firebot.dm
@@ -269,7 +269,7 @@
if(get_dist(src, target_fire) > 2)
- path = get_path_to(src, get_turf(target_fire), /turf/proc/Distance_cardinal, 0, 30, 1, id=access_card)
+ path = get_path_to(src, target_fire, 30, 1, id=access_card)
mode = BOT_MOVING
if(!length(path))
soft_reset()
diff --git a/code/modules/mob/living/simple_animal/bot/floorbot.dm b/code/modules/mob/living/simple_animal/bot/floorbot.dm
index 980f12897e70..662386649186 100644
--- a/code/modules/mob/living/simple_animal/bot/floorbot.dm
+++ b/code/modules/mob/living/simple_animal/bot/floorbot.dm
@@ -255,9 +255,9 @@
if(path.len == 0)
if(!isturf(target))
var/turf/TL = get_turf(target)
- path = get_path_to(src, TL, /turf/proc/Distance_cardinal, 0, 30, id=access_card,simulated_only = FALSE)
+ path = get_path_to(src, TL, 30, id=access_card,simulated_only = FALSE)
else
- path = get_path_to(src, target, /turf/proc/Distance_cardinal, 0, 30, id=access_card,simulated_only = FALSE)
+ path = get_path_to(src, target, 30, id=access_card,simulated_only = FALSE)
if(!bot_move(target))
add_to_ignore(target)
diff --git a/code/modules/mob/living/simple_animal/bot/medbot.dm b/code/modules/mob/living/simple_animal/bot/medbot.dm
index 22d68c8a6190..6bcd39abb6a6 100644
--- a/code/modules/mob/living/simple_animal/bot/medbot.dm
+++ b/code/modules/mob/living/simple_animal/bot/medbot.dm
@@ -413,10 +413,10 @@
return
if(patient && path.len == 0 && (get_dist(src,patient) > 1))
- path = get_path_to(src, get_turf(patient), /turf/proc/Distance_cardinal, 0, 30,id=access_card)
+ path = get_path_to(src, patient, 30,id=access_card)
mode = BOT_MOVING
if(!path.len) //try to get closer if you can't reach the patient directly
- path = get_path_to(src, get_turf(patient), /turf/proc/Distance_cardinal, 0, 30,1,id=access_card)
+ path = get_path_to(src, patient, 30,1,id=access_card)
if(!path.len) //Do not chase a patient we cannot reach.
soft_reset()
diff --git a/code/modules/mob/living/simple_animal/bot/mulebot.dm b/code/modules/mob/living/simple_animal/bot/mulebot.dm
index 1c10311f7b3c..59a6125b5fbd 100644
--- a/code/modules/mob/living/simple_animal/bot/mulebot.dm
+++ b/code/modules/mob/living/simple_animal/bot/mulebot.dm
@@ -615,7 +615,7 @@
// calculates a path to the current destination
// given an optional turf to avoid
/mob/living/simple_animal/bot/mulebot/calc_path(turf/avoid = null)
- path = get_path_to(src, target, /turf/proc/Distance_cardinal, 0, 250, id=access_card, exclude=avoid)
+ path = get_path_to(src, target, 250, id=access_card, exclude=avoid)
// sets the current destination
// signals all beacons matching the delivery code
diff --git a/code/modules/mob/living/simple_animal/friendly/dog.dm b/code/modules/mob/living/simple_animal/friendly/dog.dm
index 2a47d4f0c220..6dc3bbf55048 100644
--- a/code/modules/mob/living/simple_animal/friendly/dog.dm
+++ b/code/modules/mob/living/simple_animal/friendly/dog.dm
@@ -16,65 +16,11 @@
see_in_dark = 5
speak_chance = 1
turns_per_move = 10
- var/turns_since_scan = 0
- var/obj/movement_target
+ ai_controller = /datum/ai_controller/dog
+ stop_automated_movement = TRUE
footstep_type = FOOTSTEP_MOB_CLAW
-/mob/living/simple_animal/pet/dog/Life()
- ..()
-
- //Feeding, chasing food, FOOOOODDDD
- if(!stat && !resting && !buckled)
- turns_since_scan++
- if(turns_since_scan > 5)
- turns_since_scan = 0
- if((movement_target) && !(isturf(movement_target.loc) || ishuman(movement_target.loc)))
- movement_target = null
- stop_automated_movement = 0
- if(!movement_target || !(movement_target.loc in oview(src, 3)))
- movement_target = null
- stop_automated_movement = 0
- for(var/obj/item/reagent_containers/food/snacks/S in oview(src,3))
- if(isturf(S.loc) || ishuman(S.loc))
- movement_target = S
- break
- if(movement_target)
- stop_automated_movement = 1
- step_to(src,movement_target,1)
- sleep(3)
- step_to(src,movement_target,1)
- sleep(3)
- step_to(src,movement_target,1)
-
- if(movement_target) //Not redundant due to sleeps, Item can be gone in 6 decisecomds
- var/turf/T = get_turf(movement_target)
- if(!T)
- return
- if (T.x < src.x)
- setDir(WEST)
- else if (T.x > src.x)
- setDir(EAST)
- else if (T.y < src.y)
- setDir(SOUTH)
- else if (T.y > src.y)
- setDir(NORTH)
- else
- setDir(SOUTH)
-
- if(!Adjacent(movement_target)) //can't reach food through windows.
- return
-
- if(isturf(movement_target.loc))
- movement_target.attack_animal(src)
- else if(ishuman(movement_target.loc))
- if(prob(20))
- manual_emote("stares at [movement_target.loc]'s [movement_target] with a sad puppy-face")
-
- if(prob(1))
- manual_emote(pick("dances around.","chases its tail!"))
- INVOKE_ASYNC(GLOBAL_PROC, GLOBAL_PROC_REF(dance_rotate), src)
-
//Corgis and pugs are now under one dog subtype
/mob/living/simple_animal/pet/dog/corgi
@@ -165,6 +111,7 @@
dat += "| Head: | [inventory_head]" : "add_inv=head'>Empty"] |
"
dat += "| Back: | [inventory_back]" : "add_inv=back'>Empty"] |
"
dat += "| Collar: | [pcollar]" : "add_inv=collar'>Empty"] |
"
+ dat += "| ID Card: | [access_card]" : "add_inv=card'>Empty"] |
"
dat += {"
Close
"}
@@ -248,6 +195,10 @@
pcollar = null
update_corgi_fluff()
regenerate_icons()
+ if("card")
+ if(access_card)
+ usr.put_in_hands(access_card)
+ access_card = null
show_inv(usr)
@@ -300,9 +251,22 @@
return
item_to_add.forceMove(src)
- src.inventory_back = item_to_add
+ inventory_back = item_to_add
update_corgi_fluff()
regenerate_icons()
+ if("card")
+ if(access_card)
+ to_chat(usr, "[src] already has \an [access_card] pinned to [p_them()]!")
+ return
+ var/obj/item/item_to_add = usr.get_active_held_item()
+ if(!usr.temporarilyRemoveItemFromInventory(item_to_add))
+ to_chat(usr, "\The [item_to_add] is stuck to your hand, you cannot pin it to [src]!")
+ return
+ if(!istype(item_to_add, /obj/item/card/id))
+ to_chat(usr, "You can't pin [item_to_add] to [src]!")
+ return
+ item_to_add.forceMove(src)
+ access_card = item_to_add
show_inv(usr)
else
diff --git a/code/modules/mob/living/simple_animal/parrot.dm b/code/modules/mob/living/simple_animal/parrot.dm
index 92b955d3a841..5a900e64e199 100644
--- a/code/modules/mob/living/simple_animal/parrot.dm
+++ b/code/modules/mob/living/simple_animal/parrot.dm
@@ -648,7 +648,7 @@
item = I
break
if(item)
- if(!AStar(src, get_turf(item), /turf/proc/Distance_cardinal))
+ if(!get_path_to(src, item))
item = null
continue
return item
diff --git a/code/modules/mob/living/simple_animal/simple_animal.dm b/code/modules/mob/living/simple_animal/simple_animal.dm
index a1a0886a2362..738428592d9a 100644
--- a/code/modules/mob/living/simple_animal/simple_animal.dm
+++ b/code/modules/mob/living/simple_animal/simple_animal.dm
@@ -208,7 +208,8 @@
. = ..()
if(stat == DEAD)
. += "Upon closer examination, [p_they()] appear[p_s()] to be dead."
-
+ if(access_card)
+ . += "There appears to be [icon2html(access_card, user)] \a [access_card] pinned to [p_them()]."
/mob/living/simple_animal/update_stat()
if(status_flags & GODMODE)
diff --git a/code/modules/mob/transform_procs.dm b/code/modules/mob/transform_procs.dm
index ef21915e1fca..1be945b3d8f4 100644
--- a/code/modules/mob/transform_procs.dm
+++ b/code/modules/mob/transform_procs.dm
@@ -1,6 +1,6 @@
#define TRANSFORMATION_DURATION 22
-/mob/living/carbon/proc/monkeyize(tr_flags = (TR_KEEPITEMS | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_DEFAULTMSG))
+/mob/living/carbon/proc/monkeyize(tr_flags = (TR_KEEPITEMS | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_DEFAULTMSG| TR_KEEPAI))
if (notransform || transformation_timer)
return
@@ -150,6 +150,8 @@
changeling.purchasedpowers += hf
changeling.regain_powers()
+ if(tr_flags & TR_KEEPAI)
+ ai_controller.PossessPawn(O)
if (tr_flags & TR_DEFAULTMSG)
to_chat(O, "You are now a monkey.")
@@ -167,7 +169,7 @@
////////////////////////// Humanize //////////////////////////////
//Could probably be merged with monkeyize but other transformations got their own procs, too
-/mob/living/carbon/proc/humanize(tr_flags = (TR_KEEPITEMS | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_DEFAULTMSG))
+/mob/living/carbon/proc/humanize(tr_flags = (TR_KEEPITEMS | TR_KEEPVIRUS | TR_KEEPSTUNS | TR_KEEPREAGENTS | TR_DEFAULTMSG | TR_KEEPAI))
if (notransform || transformation_timer)
return
@@ -329,6 +331,9 @@
else
O.set_species(/datum/species/human)
+ if(tr_flags & TR_KEEPAI)
+ ai_controller.PossessPawn(O)
+
O.a_intent = INTENT_HELP
if (tr_flags & TR_DEFAULTMSG)
to_chat(O, "You are now a human.")
diff --git a/code/modules/movespeed/_movespeed_modifier.dm b/code/modules/movespeed/_movespeed_modifier.dm
index 06cbaf0b99cd..4befe2458faa 100644
--- a/code/modules/movespeed/_movespeed_modifier.dm
+++ b/code/modules/movespeed/_movespeed_modifier.dm
@@ -200,6 +200,7 @@ GLOBAL_LIST_EMPTY(movespeed_modification_cache)
continue
. += amt
cached_multiplicative_slowdown = .
+ SEND_SIGNAL(src, COMSIG_MOB_MOVESPEED_UPDATED)
/// Get the move speed modifiers list of the mob
/mob/proc/get_movespeed_modifiers()
diff --git a/code/modules/reagents/reagent_containers/syringes.dm b/code/modules/reagents/reagent_containers/syringes.dm
index 5d11dcb720ee..3241695c7e78 100644
--- a/code/modules/reagents/reagent_containers/syringes.dm
+++ b/code/modules/reagents/reagent_containers/syringes.dm
@@ -67,11 +67,7 @@
if(!L.can_inject(user, 1))
return
- // chance of monkey retaliation
- if(ismonkey(target) && prob(MONKEY_SYRINGE_RETALIATION_PROB))
- var/mob/living/carbon/monkey/M
- M = target
- M.retaliate(user)
+ SEND_SIGNAL(target, COMSIG_LIVING_TRY_SYRINGE, user)
switch(mode)
if(SYRINGE_DRAW)
diff --git a/shiptest.dme b/shiptest.dme
index ef4500858dca..d7a9f1aa48d9 100644
--- a/shiptest.dme
+++ b/shiptest.dme
@@ -160,6 +160,7 @@
#include "code\__DEFINES\vv.dm"
#include "code\__DEFINES\wall_dents.dm"
#include "code\__DEFINES\wires.dm"
+#include "code\__DEFINES\ai\ai.dm"
#include "code\__DEFINES\dcs\flags.dm"
#include "code\__DEFINES\dcs\helpers.dm"
#include "code\__DEFINES\dcs\signals\signals.dm"
@@ -185,7 +186,6 @@
#include "code\__HELPERS\_planes.dm"
#include "code\__HELPERS\_string_lists.dm"
#include "code\__HELPERS\areas.dm"
-#include "code\__HELPERS\AStar.dm"
#include "code\__HELPERS\atoms.dm"
#include "code\__HELPERS\bindings.dm"
#include "code\__HELPERS\bitflag_lists.dm"
@@ -212,6 +212,7 @@
#include "code\__HELPERS\mouse_control.dm"
#include "code\__HELPERS\nameof.dm"
#include "code\__HELPERS\names.dm"
+#include "code\__HELPERS\path.dm"
#include "code\__HELPERS\priority_announce.dm"
#include "code\__HELPERS\pronouns.dm"
#include "code\__HELPERS\qdel.dm"
@@ -325,6 +326,7 @@
#include "code\controllers\configuration\entries\resources.dm"
#include "code\controllers\subsystem\achievements.dm"
#include "code\controllers\subsystem\acid.dm"
+#include "code\controllers\subsystem\ai_controllers.dm"
#include "code\controllers\subsystem\air.dm"
#include "code\controllers\subsystem\ambience.dm"
#include "code\controllers\subsystem\assets.dm"
@@ -401,6 +403,8 @@
#include "code\controllers\subsystem\vis_overlays.dm"
#include "code\controllers\subsystem\vote.dm"
#include "code\controllers\subsystem\weather.dm"
+#include "code\controllers\subsystem\processing\ai_behaviors.dm"
+#include "code\controllers\subsystem\processing\ai_movement.dm"
#include "code\controllers\subsystem\processing\fastprocess.dm"
#include "code\controllers\subsystem\processing\fluids.dm"
#include "code\controllers\subsystem\processing\instruments.dm"
@@ -468,6 +472,19 @@
#include "code\datums\achievements\skill_achievements.dm"
#include "code\datums\actions\beam_rifle.dm"
#include "code\datums\actions\ninja.dm"
+#include "code\datums\ai\_ai_behavoir.dm"
+#include "code\datums\ai\_ai_controller.dm"
+#include "code\datums\ai\_ai_planning_subtree.dm"
+#include "code\datums\ai\generic_actions.dm"
+#include "code\datums\ai\dog\dog_behaviors.dm"
+#include "code\datums\ai\dog\dog_controller.dm"
+#include "code\datums\ai\dog\dog_subtrees.dm"
+#include "code\datums\ai\monkey\monkey_behaviors.dm"
+#include "code\datums\ai\monkey\monkey_controller.dm"
+#include "code\datums\ai\monkey\monkey_subtrees.dm"
+#include "code\datums\ai\movement\_ai_movement.dm"
+#include "code\datums\ai\movement\ai_movement_dumb.dm"
+#include "code\datums\ai\movement\ai_movement_jps.dm"
#include "code\datums\atmosphere\_atmosphere.dm"
#include "code\datums\atmosphere\planetary.dm"
#include "code\datums\brain_damage\brain_trauma.dm"
@@ -554,6 +571,7 @@
#include "code\datums\components\sizzle.dm"
#include "code\datums\components\slippery.dm"
#include "code\datums\components\spill.dm"
+#include "code\datums\components\spinny.dm"
#include "code\datums\components\spooky.dm"
#include "code\datums\components\squeak.dm"
#include "code\datums\components\stationstuck.dm"
@@ -2634,7 +2652,6 @@
#include "code\modules\mob\living\carbon\human\species_types\vampire.dm"
#include "code\modules\mob\living\carbon\human\species_types\vox.dm"
#include "code\modules\mob\living\carbon\human\species_types\zombies.dm"
-#include "code\modules\mob\living\carbon\monkey\combat.dm"
#include "code\modules\mob\living\carbon\monkey\death.dm"
#include "code\modules\mob\living\carbon\monkey\inventory.dm"
#include "code\modules\mob\living\carbon\monkey\life.dm"
diff --git a/sound/creatures/monkey/monkey_screech_1.ogg b/sound/creatures/monkey/monkey_screech_1.ogg
new file mode 100644
index 0000000000000000000000000000000000000000..a4d5bc45429aa0416a1a189c0aaefca1ab8af5bd
GIT binary patch
literal 15300
zcmeIYbyOYA@+dl3u;A_+3GVJraCaxTy9D1@u%N-+A!u-ygkT{+@ZbT0ThJZY$lJ+x
z?m6eK`__7E{ocQ~X3eyebai!2bx%*L+u3OY@W8(yOoLkMPd0xUi3pAo&ezS;(!uLb
z1-xwSp9BUT{}6Y;ssG{pH~is*gOzA4nDH^6n4kUwf(ZYJQHEg+9Ng{M)jjP%&JLD(
ze}#h-LEM~N+??E;JRnAO7gq;&Pa7{AS8pZ}kh;6K!@r1pIoY|{IYEptIvzGIZZ8A@C)&B@pJKUxxg?o
z>Z+=8YC76tQfi8-QYx$<83jdE4JkDvIXMv9KLwDsjFy~~sx~V~N<)qnq^ho_EN2MP
z@N{r_sqn?AS_bWRakd}>=o2Rvds~r=@A62xZ
zWR%r(Ri)*$#JGrI74mXwT5|s{&BG!6V<;wR89g`v1puB60+RNl%m6Gu0OR`y{vss-
zfDl<8egFU%(a=!A2mtW68VnmKK#=^$K$r|%A}w_aBOR{f763@n{27^l(STsAv9hV;
zi9ZbzUnr*138mU7X2>?t{nHXQAPFM`f3z5YCI5zE>KXt*1pt_szgd#M*+1yNMah2`
z|IP7Nnj}0RDbFQH9v3lK{9lY3MX(D%BS%99@mdr7=^f}_eDMG12`l}Bfdecyfsb4O
zHfa;uAH_H|i1Gi?69fzt!N#8z1NdX&B1w2~dGTLn$r+e|5dd(-zeU0D|I22SgO-W_
zW8zB>Ue*DRWO5h={4H4*)*1jNRBdJ*FEL~#jFs7P7bH)#O)(%Pw{!~cau}}Odm|CV-P-e)QP+?fG2lwBWeHJ0L>HfF%
ze;$8%lL6qH2mW{yxpFGGoCo;`+}~bu|8W5g@`x=){1I47|2?YzB>?!xq<=-wjium^
zc;G9h&|&@~7Y?R8*h&E{TDBNw3E22x7{XpQ_&*-`zXPm6c)%I}Fabiq!Vnh#c_`o(
zG2$9zyf7qWb!P<#!AP+7(cnP52m>G?u(ct$-2Yz^K#f4bGkej0m6GkjyKub!yYT;6
zDVZ1R2OKZfznJa+BZL$HDF0LXpXcaQ5qK#r&i^Gq5&`((@UJ`=8Tj$P>i_5R|1anN
zwZQ+k1z@oVQ4n?;phUf?MFF-Df#<1+W8pSZvp{O)$4gKErx>`*pHu9$McjXc8B`-r
zMC?o9!(|}nAgf0*{WFpO!CUxK@?sS{n?N)uLDr1elOp&}@cbr=Q-Y!y$q3Io9cd?x
zzZv@G5`kfzDO2Rv%rG|;ed!zn2NCA01SA*u&_Dm|3AR`{rpeAvoxNe
zVHlzUvTy(~x%?&gr#-1Vxhg_xxdWhzU{5MJ3zVS1f-r#phxmIDQ={M?t>D0n01&-x
zkg=CdGt$VaiYJ$7Wtc;sLpRpMtIGSzFvm9T8?U;ys(r!Udm7m(JYBrk74Oktb1W?O
zqI{6jw)6o14SCdX049uIokw-nTXkAjH__TKhasTEA*b4*8YW9r9bZn97lt!Twec_5
z&n|hNQ{g1t%sY)QH>+c+kEDDlo6eY1QPaiDI&rC@jc+>bt@=xJnnw8D0LJ)TU^(sW*0svT3VFs#j$gx#QwfUQ2Qp_oL$f$5Au`z@_b1JgwCuUex
zXL(ch9SZhhbM|oflxIcNXR}In{Yx0)C{;ACL{%?UO6=oG7;;LOxW&}xM78l@YoZ^p
z8OWk^bQh6U3Z@?-09!jgPb@JMm7HZA-}3*Vm|EsgPyt7ofDDeV@CT+!&qcw=u(1B`
z5Drt70XDV--#-X{Qk*uh_&d7K0pK$z5}O-^Ix<;vl(;laS^?&KFwc_&quLaGOHKzQ
zVcq+WZ~veEC}-KQ)4LgUQ4`3XV8epCqn2>_Cb+W<0NBwm@oee-~dTv*gFOHQpYGJ-`2z*F_F{}TTxV`KmQ{6LI=
zdHWyu^ZD^7p5+T3u1V--afG0;Q`DAjN}{wGmBoGB~^mKmc&(7_#)m1U1XdzAr;7llbu{m4msx&mo%Hj8#9Y!B7pANs
z8WplO<|=iV9lM_xZJ|2NgU5!`K&EEmiaL^`EZm3}{wvJD)R479HDaRh&YkOmED>5(
zBW}T(BuksmLjHLzCIn`t@|``Jgg+3PW7qB`;=DrEuCM(+mMQV}1JaL$+&p4%X%E!_
z+cd~t-o)-{@k%I&xW3A?lkS_+gJX(aT0B!LT{Z%5_!^0IorCdR>!PGzS&&)k+paXO
zH?-1pim7keZ9uOktthRyL?`JXEJTlQIXYrYuenFXta>QBAtt&Yv-tULHB*hl&M9;+{Z6T}+{m
z=ee=2Ny0bk2vd+^#4?JcIlnKT%awR2b5=aqr5}jY6iV-hMoM+yGOYP1236u|cZafg
zLn(09P2j>}{SC8D9dj0*iE-m;>xE>liVx3l6si{RWxPwCjYtG9Rl)8dDk2EXD0u08xa8)^vnABcS_yj@S6y?8Eu{Xq0|qRwNr
z7sjH~M}r3EjVvbw(euoZJ)RId1>+Yw_(wcas;!D#v6_j(8TsBTe)!OFzAj%-Z4^(N
zBQWv1S~_RU08KtF$EBK|s;_gce-iiIM&T7(K|9}t(~i>Y*Gw@I4P7x3Z9RKOdjr`!
zX`qTBV67m7GOTI2yXKmCBc!nEYvPO6F4}VTsKBSWMTfiJ0h2#wM7LF<=ZS4|5|?FkIA@E38D|WoJ~iia$%Z*Ld!$
z8Y?DkI84-u4d=?I)ChyrQmQ(<7Rc$vZNHK)89@4^{Z-C
zN9%5;On&~_4y0}`@%2QYn~>8%CK2mH7ADTJ$;ngvP;Xz$_};hp@nlLP=a7xlpr@0(
zwIQwL_Ef5!sIlEoR=4iHzn70T0qaDN6$i7J{DR;JoIVj6twDI;Qp*
zHw5qoGFb>t)W>DYsRr@g_oBEM*E)wca+Y&wJXTLofh$3WfV5{*uMsiS;mUrmhz6OR
zd?S19Dmq_x5HThyK4QyxRZ_Q@l%wxJd+9|JAEN)+B9Bt-+B>j>PF_{Bkt|9wy9`(Q
z1+!))6H;WvtoHqnx@wGN)>)rQ0wb{`F-;YUyg?1|x7D0Z`o{|Cg#_Nywj4h6EHN3i
zMH0h?Rl8@x*OHk@;~%~KAmIU7>r#X#D$3=9k|Jgwl>&G~`Ot;f)0!FVX5L=4@VjQ-
zo{SOVURsGjt{v@aK)7;ZZzo%m1}{B)&pnn_qaWJ8Cw*Hyzc?ZE*utx%rX7LwLiD_h
zf=eNGEDT9nVHj1xHNttl1rQJRDJ+et3^tc8^Rc_}oc#?yb#t~PRDx^P-D;idaW>=5
zvy#!iC1J6?c0q{8f}6l@kL%Xb&j-Zegf})VW&zi@=3x_0J_TA;(|gkoj_;hr>USXh
z5f?Y=d(ipI(C3T*7~Z)uR96_ZISrehWusxCeEkhMZX0%RZRVEn6Fur^nr0+PL&?tm
z$DY?MZqyjx)%&pOFwv8e$ns9IPG@XtjJ^|At}*DmhH?Jd>%FC-J!j74&s-qk<1l6#
znvT<d6CTv#*K2M)
z`4FNeeQ(n##+&whh}GA30jE_A;xg;}Q|y_3vwqV7*Cv^JPt89MXDNhU4s*0`i|D-0
z>$w~X*2%z(-w|le$H+`HC%=?m=D>v9I-90W`(``_9Ssh9Nz4{5E_l`4o-L~?FqXIY
z)NIKIszR1r&Rp21Ik=SL(TAxXLh>dvqL#v^dUbde;BjsV)KZ4RwSo0H%JttS)Y_|5
zVe2!V7?n423(^uk0Ql(UT_K!VMINR|So={pO%KWtYbb^gqN9zE|06G9C}xNy6=X=O
z!>rr;jYK&g8~4uJRV~=oOz&MlcZewE*fZSbC_XOUG*&LsAU+fbZc+Er{^MQJEWG}Fz8%7H&Txc*RrL;icX|v;j+oL
z1fmsCEj7^$f4pa1#gG6;L^Kb}ic;7EN;Wjt}35nC#TN
zRP^S~@;q724km0rxaVAA&DGz{HnkH@Vu=@qzFxY=
zxqW#r=Q6my(+aOM+vo1Uwa!jLyYAhJ@yKP?mbdEKzqP72MXdvvEJ1<(hu@j>W|@Y1~_H>K*-lGoqxQJg{9YY$GmzmFS3eDg+=T
z!vx8=jK@HFQ)jedIP|7~uP<;`2YHBKV!s8=9zr+M1YvG-_D^oy{
z=z;X)m-kI`r}*`U-hhI#&ttJ&_6a&|>eI+{3dj}oc!XQS@9wfBC+$FA%~
zk$Lt6tjaYO1TsZ>MH$9lbA*=)6_~^jGr`Xfg_CA>xY7)Ni0|78;_Ir^*}c;GsG4?NmIc(|^R8NpLxtR)u{m
zt%hk!W1T&ZM04~D(55{$(oMg}H95GJ%*|jH*OhhJeKd6Cxf`?V(HBg*c^7!-dV5u0
z$PzU)HI!D~@$hD;<2kwJ=B~)bcT>ABXa4dc8(f0{d14<1O>+R+0EomxP@LCY*ZFae
z$K>Vk!rsl{oe@+J((^dD;A-o6wwcSnY#6IR6^wH(94SwJfkz|8lb_9GwsDn}w)JiK
zsO{Nz*Cos!*(3}gj;Xf_(uXVO7=^#<0Yd_=z6b?u0z*+qE*v1DTu|`YSd(?O|7Z(~}u9wG?z9=BDdaxED^k
zmS`BrCV790F;Y9-Rhi8W)dU%j7<)jWNb?~powTg{e0_owhtt&B!c>?DnOjsB4l9lkNF^g`*_0C69S^g9Ah?t9BJE;x;~iTi
zi*%`c7EW}3TN4n)QY1r
z-VeVuE98`Nj%3$LMr^^#}WPb`M2DTbRS)(Fu+V^B^>_(BV0y|P!F;S{RY+sOOWbCsuIBp_{;
z8NX=)dHWsJD=4oZ6hHeeV4dsAjz%&#uPYU6x-cTn{cV6?{k}kUGrkUmKT}K_AHMii
z_sg=X6lDFhX5w3<+oTl6QAD%FTDmHeZB_@?Ku(&gJcqA*k;EfOdl(Lsa(;c4g3Y8}
zZ;DgpR6wTA)S?*@L$o$B-wWv*mC4D-8i!g~jk23yJD^XBJORUo4Vrq}@3KzwEKd~{
zK3))Nree27ll_*C+}nG*6igA6-_>1dTpHk`6)%`9h^8myJfNexF8LhK-y*5V8Oh#6
z^WkZYtN*t#l0GptmNFAjm^Uv8Kj!AQwr?po+ZolY*j^}x;Q=qp$;#76Xfjb{>a?#c
zlMpoDl0GxxR2V64lf!la*;2Ck_hULz($mt!uHwthvH$uy=5lQP-DOCIrrp$x-jQ}~
zY?F7#(zeFP?3%SHYDB4GGu^Eq;3qWwZgVe*wzBtVeVbWFOD*P7$YPDiPLJD0_H)3(
z7rmcN*V04)oSdxAV3MXH8PCd6gO2UHS^l^HA2bnO{yyPBI(LmgLd#k=1q0OS0+Q;S
z`xn%4ZNps*Jpqw=@Yc)^H=DmqZM1|
z?~)tVHq1ZB8g(&KBzh%^*d5KmYf@}@SU-|LhkuV1em@4E=g)8FYUn
z{VKpn`Yvp%KiD&I8LK!>#gK>f3xWj(0&L{%nB+A=ojjCOYDbWOS)r>}KS?_b4zhB_
zS4#HVPbYD(TAq2n@bD^9)~lUvn6kxMoI4YOF(xHA(rusM=p$CE;}?o!
z5nPS0vnyV#7oi9q&4`4j%?6%4Vq#PrW#3F&TbBig54qgr?x9M$kTXqX
zmM6(+Wi`jRLg|7aFP{A4?Q72Af%Tgn>6e)K0ihn$tX$c}4pZ?W7Ad)jJa4`oeB2C)
zd_Dstv7;E+==llRj0EV(r5{F+7KA%hwxI*R);&6}Up{&(CM6RG$LvBnGJVaM=Z1$m
ze{HC-B@9A=)GT|F#aZXV*iBb80#!KBg6SwjTo861Z^g$>`xto>pu7YBVo#-m)CD(eInZ`~c@=6|=g<*ez?ltPDa-
zMOpg-X<^`Jr@pyam6e$<<0XO|&j+**zQ*w~X|*Fz37G@tU49vrhN`bs<~58*6C61Q
zD`Yw#RLYF>|7Q09!MP)T_kpb|9i+_9TyaaA#d%JHTU{wbt)jP4EQB`DN4i_1tilk)
zq=zT4>P*#!LK=qdH{vQ67nsp7s$d&uX)eEOlExJuC{ONq^|2nQ&u&uI}*
z2xo5`YGqVE3tyB{!XGU$WE-yP?n+56L|=u@8HvIHeb0L5wtYqG$qnAlwn<@;Se!hq
zr&yGlH@e9#bkgQVzIQ9wysUT)N7I7w{atyWts_&sJwX|vV*qT+DjvRD+Z?N%_0<7^
zgIh0pMR<+LFQ29lg}9oYj?U~xHwv_T-h+14c=i;`DOw!bR(d)q8t!S~hC4>FI#|^$
zG@fCS#~SZ({EzI(I+sbAqg3OV0i&4139Qjyi7rC5i*;IIe
zgCH;w%vRMLVg~z{uudq(+nm5(I`DN_pA+LwlJKpCmz9DTg2%YNN~n@MyXo4;FP(Nx
zI%3;ZEj(Y9*a)HQfaH!J86ihOtB)lYTBu$kx^Q7aX<#))V44_*mQ`y{4E9$AmT@vJ
z*2bzMIZI3JbPo938ICu2D~MJm@hpy@QrtjE8uKGPRX~;mz=)RNmsMJ
z_xeNh1zWmohT0B9i=6^rr8{WqqqrY5xtr83&9`;#Rhy_9B%rKip4#(Qsqgy!vN3^e
zdZwM+Pfnf~GVeFhONnWe1h(|^0kOU&gim<_b|LIHPHND%8W$st=K(D>+DFwjsrAr}
zr2Si`+TPNsXuOV_%~&n7$y1V!LR$d8MOvUY$*(}J5Gr`JbXJ#??bZ*~R_}ch2^K$^
zGox${l;E;kH!UIRz7Dx@JzYTTu5-J2Q1c*Fc&!R8cps#_5M$xes9xEt+4BqpsNBLv
zr6}4CK&%kirwoWFrbKDIVXkt*zUvc=kqy7pyib86AmEal63=J_C)&B{0U->gKEtye
z{bk{bz6tNx`S5sG1L2#)b|RSE1IznGJ{dk@Q)SPWg(MWg+WkL?N`3dW32b(w(&qhK~^k
zukWmt85=O@I+jthGY%qHrbnd!u~_V!dGdt^O?VJ7cDVn*3AJotVhreHS}`Hq;;!TPSkj3Sg)8-+PNgT=)0k
zJ}mf6QRKa~^j+L{y|!+E~pHx_so)sv{l|?_BRaN8|T9cku8X%8bMo6b4dOoJ0LSMchcNilFmeq8C
z;~7#A-&0PMKd?|tF4ifPY-y2Oz!m1lq}VCvRac6BKFdb~(jL`owh1dow>Zmguc6QUVD9>_3^rJzhcSlmJ(A?HR|MF7kM);+RXI(X@;{14x2vh~R4nLnvFCsEVa3z!h0>}dH1T8gk{Ox}b
zIeHzFvk%Wo(fgDJq{a(BI3-}Iiuzk**%2G6ost-o5RS6d%2G$>vog@2%D(-c9FX3U
zV8`{G7r*G^JCm5=tq!Yz>(R^{it3U&wHj{$u0Ug3h#>0tc#Mki&#HCprg0w?+~&5D
zAlh96xA#4Uv{=ki-I6{wYvlXb7KaK#On9a}=!*dtEmm5k}+iO!3oqK*Ni@`dr%Y7>A@B1qX
zCVS`SR#Fbc>UPYSazEvK4m`R(atXOi`!RLo6N)!I*}uNmZbulT@qDMSU#`Z}woxz^
zmF?Zag8n*?_gneflejkRxlP^NDM?s8OumN#_{DPAdbwwaif+3&$MB3$)_(wxSS+zq*MW{@I
zNM7E`ItumfCH$UmgRt>zifep^KL`!hl*-`u_o!Q)~@RQ
z$O2(MGEIHKSr3*^>tGL1X-!_Q#|TjgH-!JVpYvkYQX`UTbG+DuH$*NlhoKys5*r+%
zSnH%6pBx)m@tE$zemGcv*X4MyytTN!ydj~Brqr+4gVtP0Y2zp!{+pW7RB7&AeO=&d
zt>A`{{kovQCNtA(ar_ag4y@+(0?^Uq(#&rB9N?0Dw;N_aPVa`#AiQ+)LMC3Piw#Qr(
zX(i%NHTA>l=7r?-k}o&TL;&c@A?{8;U2>go;1d_L{hh1;oh{>}?ZUb}w|gj0QoVHc
zrMN-bSUo;PhZ`6LebtjR=6Zn{uU0`4aT#7yX1@eJZvO>+l#vvhs*<27vyc&=Jp%TC
z**<>}v5cMWCOr789{Y%<1F=VEjO_08%0N~=ZlAZzwJlz)p|_e=yQQX?T55-)>mm4i
zpnJ?D=5)I3cya5O?AD}%bpC?;Vkl+6+%(>Ap_SE1fknWm>hXD3-0zI@h5S|M{KD?*
zOM8Exdz2b;3B8T_$^PEeyAi|sVJ|ad_h6?NIBflnK0szzF2buViWPEJ
zE1gvy46ZawgX5i%YmM4tR^>souwT>geD8Ehb&Bb&TUF(;ksWy#++7Aeible-ULYFt
z3PB2!*X=3z&DQ2~JZ(jjK2S*#aQ4Onq1A9apTr_1aU6z^oTs)IJOaX&wQPyLq%IVE
zDdH6@P}V>@j-yO@Ga3)3c9?BsPI$
z{x;Ew?RsI0;_(SH^wuSR<7tyuY{P~uai`x;mW<+NWO2|ds8eFH9@{k-B-zW=zOdn{
zednhnn*KwX)2~V+T7vmnPdt!6wDktl)>c0^JO6fG9FFl7vPXdp+sBXH8B0_PSWm~c
zK@iT}=)w_?mi%0~pR_N38sT(-!A#t6zd|?ccy^Lq8&M_N&^3u;T^U1bnow8wbOR(%
z`s>e+cuwmeHIJ|2m^6OQ`%>xPOJWlcSb%^Sv?8F0+Y&ZJ3@7ERm1Oy{q@=3#xxNY9
zuladU1#g&0b9$=^18VOQNbF30-l$hf8oX=1$P)=J)cl1f;^f9y)f;r~5k+@#sr8xQ
zIl!qL)}r!UMO5gaO|s#$1qWtgA$rnCm|lC+YYyfbSGDKi(~K7C$BGI&hZ0dwOjFmb
z9D=J&;ll5KgckT=cbK^`RD(0D0@U`hB`^xoieh#zP}bK!j^di8g62>ya0X~J>C%+;
zl6^nmOGU$DwqQ6Sk+E@kUgg?Oy=y+SlEZF3gTTqC_WZN{EF&bHT6*uZD)^>-bVCp>-G
z5wtrb5*;1Rj6HyQP2%M<1lP>@NxHj5-uR6g*~3;@XzOqDtEH9L`jhzOL9Khw`1c4O
zZv$tR;%BL30$a_4e%pL~V5=BG&+Q8A>TWwLU#RH1-k|c6rwT)ae=+g%8rd4S>6d&4
zf3>lOw6{5VcdC4IYa7O*pip?$YwFA^iVau#MRxG^K6L`9+Vs#C*A@*O-3{%@mkW=7
zD*IrY-IjZp)?uXUxW7Vyq}kb%K&DeX9M|>d2!uG%3FS`bR34&?>|(uaJ|x9fKLJ+f={+X}Lt?UJz59iCcluF#vS-%PW4+#R>#
zuI(B%1N@D&paP&i+;DvmANLbCc&#g%)F>RTiF_#ndyrc0Y8sD~?XDKKH*CdNGGtN*H74)l&z`Bif7ulN>i=^`&&N=NX1$H6_&tJX70y`=zJz$OkmGH
z{AW)RSE>hIz$1#&Q-k)HP4o|;-1CQmAhHewaA-r3ISSDB^7^%p*pyG#f_6pQeRox&
zkVoj^)7HxPVBHSYV%^gU4@G8xLo(1^VnHt({^(Z$!lvMT?-F*RN`&?JQ{3OEq^+nw
z5Be6w9V9vJUrzP(@H>z}Kc19V^gt8Aaw!)`u$5hOU8@W}LVhnY^WK?=^hHpZ%ALQncQX&rJSMndgiakD0ZWZ&6uBOyz%vCy6SvQ$8$HPA%i>DL&4F$NN>k%r!k`9#Nt%E_w{I)
z8f)im5dP#o<&uI^3J2qAM%xjOqQeR!M0p__M$F0|#*Thtnhe1J|LCsDc
z;+WSnfk=L*X3*mo;@3^vA32$RSgAFvuSM~UD|voDxqGbITV7fae)5sv+Re^AyXGKd
zhnRMaQzER1J!T$7ddQoZ1E?F-^ru$BtIZqRA!oO@ruZ9MB0dtu&+Piff^7yk;7CB&
zSVkiFsX~d7CiQ>&)g%U`BVKo2*oPU~
zt&4}IBdId^(BCbkdU%deXQ~Lm!=G2GJq_}3_)}R<_4if=ncYC4
z&&S(?hj7lyZ5+P*hVoGdjg^ZT-31X^Fjxn(f#Dzpy}?1hHY~+hJH`5^pl48zkd5`H
zsnq~!o~o&Ny+vdTSFwIO+GnTLK2wFwe!6{-IX@>_JCo-RKCVOlVKj@Yi2j!+z3^X-
zNkH}8U^8w#_$n|O+OJ~pH}Tf1!(bx3!T=0ura?P6;4|eV^mg~WbOXNgMaY8aC%K;?
zlY)7PjUyR+STzREL^&cqmGB%RC!E7kVZ;@7GaoQ6-nV#18t`u*0RxrJ#d^ebvK9GN
zugUp%GG-E$#w+Zziqi7GjYo!Ly>MT2I8H?sU~ANH=3}ip-a-o8_q5hzuGVBnQ2?Q8
zROOer8yM5Xh7o_97}LDXtDxLt&CzYVAnu0Lwl-N!EG!0~M3}a^zN#YnRvot#qHS*4
zzmsEv>3hHxU3M_+;E~ksuupSX>~nfPZ!=i_tXkbO?fM)BCEIrlL2Si`s
z$MvPt^Q!ii>Bh-+Rmc9(^CbKkH%PNV-cz=SIPX~vvZM#XWDQjMS^{D&a+3d^=dAgu
zRp9H=yr+D9Pkn+n`cHX|-r#}gU#LDHH%Y%=adW*+Nr$N{dBf@VS9_Im9oS*)kI_t>
zrcH^A0Z!vev^(A}s8(UScHvcwPL-G(_SN!djHoE!?A19^m5Yv7QqE6C;;+7Z|yB9l=;ln2g>KK&Ue&){=nFwc^35euJL-hO-HXt4UMmP
zZ|j$9YxyD}{WdGJ*hoRSprAiCcU8kW(}t1UGtIpk+Ots#5Qlx>-c?K+o^;HLC+UUz
zSMd-uj)}q}hknRK!~{~M!hm^P#2$Q_8|v-P&;L
zpagM)i0;ve=8z3+UmTbl7Kg~2hB~#>Gu7E-Y9Y1R^_x%jYaHLn%5RdLZ;29vjlRvu
z$EBT*i^Z?~QqQ!!K%jAzl?@8ZA-D}3L(GoW{`wTOwDRXn>3YV!CjJDYW|?x?j@Uf3
zBB;_i&ORVl+t-KzKR4Lfc|d-=ZK=7t1M|+!MW`3Y1tJPa}+EI%a~z#r<~H
z86T+C(*n+LLd+ARzENA|w4}A8SNZ>V_jXJ=HDn;DP
z#jr5c$#o?WpZRRwtSvkAi_^VY?j?);mCxzI*^IZJ%tQ9&Pgb!$stk3n-Aiw(vn&42
zxe+4a-+c@;Pz2Bqn=tAK+lS(|;qjWK>tErdS4K}mV*QZ7)EHLV$4UKgl@(-M<;|sQ
zji?4-J?cJtSq<}=_va5^$~QAU)cqzcVw2O0C0(TjT#=8##nJgH2m9>)+HPf0j&EAf
z0shhZ#Vd;a@~09ES@sKYi@ia
z(u-c@HNI{b^5tW~WrufxB;&FevmacKJc={*v3q?y&3k8!OGjARIib8KJ9bA_=Fr-b
z9-n}t7Og$2M4t=F0!Z>#?!t^^j?83h>BagTdy%ZQ1F}6eDk?A0AgVZ5XhrkMQTjLp
z`fATclxHgl*Jix2Fqlf+N_nqQO*sAl>NH@K<&IDg?8>quGPM@5ou538&5fPIyU*EI
z&t)f8cj@)%>xuy!_;&rW0Af7v6_LN*Y!)52aUAXqXA&?OL|yTlBdW8$AOt^NkZYuW&9@ryes2_`Geq+)3Lan%
zE$qj^42PXZ(m#BfzlCxu*>)$1sq5gf96EkNJzb+N^uqM5%xL>OIHJWZIl#%u)VfV-
zAoR)8okjgQ53k#83vuaw@|ny+J;j;UG+?{`J@QTXLvY+vc0Gy6`vn8Vg=X8}b)hr=
zO7h-!5aZlehR_o6Ueh)FmI}R_(1&@$H>_e*Q}Qb^iS>3)6lWgher*|8@`snxDN(f|
z##h<#TRCfL>Ti1%%#R+ks$CE=WW~PTO~>A&YNnahH>Y#J$Yv8u1FL&!HU+
z&q9=s-a`uObuT#{C8P%Ptw=+WA5CI9MSrznsbdAT8v3pC7h9iwTbmpwuerZRUuB=k
z;hycb8$AxqcxsiKoD5#*YoHK0yDTWIkSb$`7IEVyw9ILQffu<2AjUh;{r&hohnL=+hNSjpl3)k-Gyt^q#*>O-CW+3Hgg
zWp96k*d|h7_?Q;=3@Z(-_>C=}X3V^N_^>TWNw*^;($BE^4Fa
zpuf8g6(^&MARo>pIfQt{?a_wq2G=nqM!!WI1;x_z{{zLbM@j$y
literal 0
HcmV?d00001
diff --git a/sound/creatures/monkey/monkey_screech_2.ogg b/sound/creatures/monkey/monkey_screech_2.ogg
new file mode 100644
index 0000000000000000000000000000000000000000..ea44bcbcd814b7dd2a59bfc0f3fc8193135335a6
GIT binary patch
literal 15649
zcmeHucTiN%v+wMZ5fG3d(G?a2L?kLm&LBBS&N=6>#1%=BgXAb6Dmg1iQY2>)K{660
z=M4K6zxV#`y;Zl~t9rNIf3K@{&)J!tnVwJgO!w(It88VZ4xr%QNFY-?^ZIse`VAL^
z9^&cbYHH(lT>zCVxxS#u-HSVQm3ZurYNtaYay|OEu&)6r_YW(d_(2oZOH3
zc{m?)@^U($Yb2Bv6{VCk)P=;9HUNr@?{v%$nv
zq}X7J%1ZK5IxrPi8wV423pX^EqLZVY1;P#8*4oCw8GRLVMwc@`w{dhgv9f@vS(rJw
zn%g*9u@GL1q9!IGucWCcE~O^KbsJqEBc-G!_1_E+!TJX%7IBH^5P%B+cKe(&cyqTH
z02ly~CIEDDqMM_Mn7RrdtrW0>#6m92@$r$)$x?L2@e!e`fkjK9(#uQ>o9!=WX8g$d__^O2F_Fq2(3N7LUi;Q+YPcDgXr;)i{K{B6T^
z-6mIM&Y6#lC`24RBSIat(xBHf`>*tu8?DQy2@A3@aQ+wumSj_YQR^;NAc_q{0f-Tg
zCren0lSPmH?M=o1p&w!Z=)xrjCFwQKjX^;VIeUAxN&VT
zY=AGW6-s*pCmCIWCT&t6ik>lYC{7cNH$e7^tI#++5k}SQ1eh<5Act0FaX#o
zZpbt6C!6yp=kuqVvm}_J`Tv$|b|)5}4$Y3(@0^@DToI$m5t3^5t-*EUlNi-5j
z3OQG}oEp4c72dA)Pay$70ss$LV2(hmW-(5i4G`h|V||!t>HZQn1~wMj8vmic1ERZK
zm5pKKk161bK+CoG4@y+mW{K`cJ7U3^8QyCOi41P9`UhXw^(fbLn*b~KUuJc!Xgm-H
z0enD~0@-dlj9&2F&^UN!kYzl)vl3~^pMb5MTnOp^er~(USa|5&_8lXBAy{NI^Jc{XgpX-y6qSBMbl4E!sN&
zeFi)K&hY=Q{~v+>rwE7wAd195e?nBOyCMKg3A7r^#ldAMcnFOV)Cwd;xWgFQ={V}a
z)?dl~WvQS-;bu1W@XPy9w&CFAFSkr0{zFFDJlw(HcVc9aGR8}lL
zBB)HJILxCss%fH={m!TGeR`Q~!w{SDEk#vc%`p$L5wt*>>bxJ==g@5$%J4-;1cw(J
z0MFnp#gQebcREXY;UB0dnN;GR2390XI&0F6)&g|bP~)P)Kfhfesrr;DXp}K<&^tBb
zDm=f3!JcRSE5<*HKqCZ`OE%X@WAEb(7c1(QX_vG^lK<8?xRPM9OjW4+2>K*mmKAhQvM;>udb-c%Zu(&
z832{P=teVS+={{^zlK*93vlqo6e6;%A{dh4HrcC)Y@57m6&3#BR7`wllfHtGOzh&3
z>PMr4Ir4)?F&LKz4L?v_NMpDcUU)w}6%3n0Qwy!qfx<1&%7X`hvNHgz6(%0RiFuW+
zeiEK0c}e-tqJg6ag5d~o=6Eswv-4#dg51bxqZQS
zW?M=6@H}RlbZIgvZ|@y%YcxjLD~KI$`XNE({T=I_ogMAum0g~j^fw1zqN_qXU*Zf(
zEZB&Wy<#AKmA677CCNY%&-|VEl_Yxc^UzDGlHC=DM|ca)-OUptBOwtZ6Oxpaycxet
zBE=BSK#T~_dkn;mW(orlU;~_O*&O#@r_F{VNK&D#7@B
zy6CuAaByExm5f)OanCz%6~RCq&wRae5o3be;c;oAxd5NQ9JE5jgUEo2w(;t1b|};p
zj|vMr#Oy2opBi*vD{dYtE6Ila3U5?Ym6Hyzv2!e9h=z7ZPqbsXQ_TgjZ#^XzCk`V1
z_8Z{Kwtm5TBDfoRe`*dhD^CsQZzzZM>u7CtV-u5*^wY|Ob>hf|cj3yt>c;zL109F7
z;sDVEC>kH`&f)o82q^=XxSFYJ5ISbYMQ=f9g5rvbivGQWp}$2%|2~~z%3Ay_0@qJx
z*8_Qlt1gN^lUFn{G%-TGLA9Y8P{XJh)D~(U)r_jt)6&(@(loU&GqXZhW}^~ONvL>K
zG3o=V3{`^KL|@;dqEM-*1kBSC)iyv4d&)0j1wwBDl869c7i~H>d26-O@2Xf;Ji;VU
zc|(nW&3rkI<}HnuHqK+=<$F(W$j9P1ZP-N=Wb3|^c`XB`12GQ{_}=`OVunVDTZjll
z=Pa?XbFYB59hp=dhPFS8x|I99dPl}h0w-!$dpowTdS{ewjrKQ}i`H)MDf^%4WH9^Q
zOm;KyS`-$N1Q!RHRbud;n39dh2MNPNa8u7$R12lEW;-XN9X4sHbdrDDzrp5@*{;lyDolC`kuK#txh=&kUj>
zqpf0|>`y(Z@)M${x^b9XNz`|)8=m)U4Pc(mkmM9-=#IEgNwvJI$|5ji5d1dkxS(yP
z;*Z%#NvI}s>
zoUEU<9|WkVSR91YU9o;n9dhVI_X^iLhxysLJ^pE7F8_03oql-QXi&11{-NAk|AWJh
zFH5>O86vW|g(g_~SWdVBMrjdi^eHiCmv=t}a#Ak%cwB**cXhZ*qCRA$-#bc@j6Yzs
zUErGP5@qkvvd*9uMst3iM>RNPrv;2*OkFknSaGr{zk2$zcByjx{;71LmPXCzk)>u5
zSU$8t^Wts3m+nwtT!uO@5^d`+rQFS6eh+_i@?_U}Ipuxbqk#NQ@9dqktG&rFu_d*D
zwyF@r{?*dn@hYkqVOp0GT6K@Ekc%n+XgWuIRh2Wo27c(p+Br&1sT({k+t~}HXsVet
zQeobR3u8I6J~frmyD?Z()4=24)1}WpYP%T2rBjRKvJm+0;HalZQrUE#i{X3*vAh>ly9js7d{>G6DetOu|E)?*~2R{e04|8cRI1YmTR)*=k9w}FWNp}
z{W~(W+qPxC=?lf)i_eYpv7OQ6wV28#+e-zz{WCQrYdSSQIQ?SY?02_K|NJ=}t%kkF
zg_L;V-j#jdbL;ZbCgGE9=P%#wN+oaAqkTOEHu)iLRZS_O&z~7u{bLTdhoij`>UvHu
z*Tpl8Cd1ZEb*7am1Qcy1ZHr<>wjS&Tioie5E)HN=;Rbgl{;>Qy#VO|E*d*^zH6@m-
zle_;i7iwZ`8j$m%X3xJCQaNxSn#6yfN&LbwVshnjo1KG{8M_Bs@4A5lQ_G%(Jik-W
zy3P{^2icYzlu2m@KEg$6YesqaiW19xi+E?wnj(OCBOE}Uw^;4H)?{uLQqv9G%K2dLP%1XlaOzF6|TCGN*T6H}APa77Sf>0nux->JZr|T!Dg{q=y4ijd4g@iQs
z(pCHWb7hf6|AzKEJ@(VTjd-s2a`CSUD{Wdi(Yn$$?;|L=q5?YOAkr^|;~PSyr!*Xah!jW
zioH|pe!OTAMNFf)L$1aalpq{6n|!41Nx5dTMhbHMAV@QmzY1gn2h8CEXLYD86pV`i
zBsuaD0DTB>UF~9K)xjDiBcMH(j)8kg_!0bqL>M6ZYOj
z^>%vQt_<9IgYgX9HORNWx48c7wx<#lzenr^o9M+&1_&@-F5HTXgCJ{Efc>l*9DokS
z0ZX6r?{e2Me#yr}Y=Au39FFAmUeF0rq)>u#f_=<08lFj`nawS^xM~p2QV{J@vmUZV
z`Ehf84>PIhi0kd!fN1lO*DthFKe;|uRRQk>M}%AjxLl+NIwD4caI)d*1IPI$Y4e$O
zwz3Kc1#zK!}~8FXJSDimsT|h{X1>5&%QbdZh2imQ|ZjwaNO(ew>xdvE
zHif|eVd>?K*!x;Ca%N!F$TCcdF)i-OP8o;C6?B1;C_tH&y8LT0V`I&C@J1#wI&Dv3
z`@{pC91~>22p1DO2uL?fw-j8HK}Uz6_1Cl|naZ`U!NJPT;7mE<&`sbeX#Mz$OBkA6
z2+t_%AITxVZ3%xh_IFQjqo$dv
zztp$PjDK=*!(t#uvf{`B!?~9_4T&dST|I-q?5i+-HGCVL>d>@wN>^c!q>JqY9|H2zzKg*k6`mV8XNLw8@8nD_{97ex7)PCRq@b31t1?bSy
z2}rfRk%P~xk!H!6_>PuwT;6`-a=F^W?lokZD+2RA%?u2@|HR`@>1#!8`RA_630xJ}
zp{G-8w}Rv!lztaS94{Zzzh$2)#$GN(r@Oqjy&l{LAeFMaIlwO}6dl+P{+u)mShC_X
zed>#do_0)8pT*S8Y{`sttHlSzac%2bD|I4nabwL&OuNS(7-_dub3H*o;i4i@Wc{3o
znQC@JWT&8zC#E8<=5#dj8>u^6pr>IYy)CC*zrjtzBrVK1SHG*>Zn69yUE@NxQv|ft
zz<3})wwxQ+T0n_Kr1#IR1pNJ@UmQ}h*FU$TM0UB@y!qtWm(fzC*YRrBf7&NK&UpSM
zJVSV{nQfx%ru}LE!IzxSjh(4vrEO0`}Z0B*YA)LS-a*y7rMU&97U8r5z}MoY_h`r=NLstp0@wWcp5f
zdpX^XJsH4ojuQIlzd-sfXZL-bRI0D3!cu>W)O@5?^^NWHIwQ0-v<4jQ3GAM^4Ya7T
zveWvB^taJOWJia84j8x?`XYXzTO+vJn6#vRd0WNsarS<_!k2qsnt6oIGG3O6VYy7>
z-ARoN+N1>4w(g`yy3J&WF@xOqzLV#FdUFy9T92N_vZBYpdo8s8D2LpIT(A{Y?27V~
zZRQ2cAaeV&-dRXLW3?R88pQbsmV`c7Tk8nyh$A5W9BXpD{s3&QWqWXPWr%f?V}1S<
z;hPbwvV#lsLN2sMeeR3JJzE#lJfnmL3!ULsWS)@r(
zagXyX{-Vn2Pxw{HM((k-IkUj0O{VUkLZgwY)1V30*>oXFoprmGZKX#LQ1bvF%Y?Mv
zQ4-EPKYnR@V~!?wK)W<4`87pA@y=|dj0`y=_?&O(^jTup;9xqyjh)*_Q)Jdh3-jl(
zh=bQ)SZo+7>R3KmGoLH8-%})Az0=Uo)z=7=N}7_5wXwH(Q&1K&Bs63E9~2~r=*`D14D)jLOUOsv|4q3EINT$!s6ccGr5
z>590+?CG3X3Khxdw(Ss1@;$79>kUoW*9}7a8G5rWV*FO5;n_)r)f>Njcl7R3EW^Gv
z1Ifj`HC5H77XFD#YL%i-ceDw0isn@kH5ejVfJyTm5j3q|e)jGVSt`!tMnuQR1
zbY@-DU3&PH#yTbH`ya1;j(n_UAhrL9WBtlMH4SY%`!OG=!A^#sS=X=HHB8=hJ=|Q#
zPR_Qc6a*#>PSNK%&S)P6z*V6+;k)6^FF7l^vGwZ5juK~Vc=(Q~_g?y8Wwdvl9k&?V
zk(TlFH}<5mi^utjIiA!@XoQl_nBIy0dEAW9a6R+O&V)D*I3C~m^kv};GHa?;e%YR5Qyv@cN6G=sVRB
zAM~;Qfz7kEs(k9^i&b`6VQVm8)~)f+l2-)C>OYqe8`De5JY&u?L*l+K+UuF?-nwXw
zcSnq>NjMD7W_zDDwvf(L1**vdqy}D`iq{)eJu1|*cQ+SM-@S!$vM*Fc^k?%B{okAR
zlOdw268GTpmQ)~|&zZbSemGPnRqyGG+bA!%dV{^P
zdGOnBzo9w4bIF-czkw0WB)iO9-Z|zZF}Sk7*@$i>YG8177&2AXR1c@BUUaxPU#r)q
zrpqe#^76V1<{I0S?~g^IrRiZWPVt?~4`vRZ2@o!;vCrshsfs5IlM?b==f&=Bl?JTR
zg2yvAfH5s*L-SgI7(Nt|ipAWU{ICyVcz=|pj&!w|v{4G3qWCDKX-F=*e54v$)|Fu+vy{S{o`2N^QDJaG0p
z7lQnLVjLXx`*Oejsgpky6OvDr?<`O^Pa}A(GS}S)zmSWiwaKlw(R~?9OY6q)LQCtB
z%EG&k+b~kUBTtfnh5)lUApLQ`-jIz~Rn;OqV+x|t7qR|R@?|ofSgRm;LNc`-=BPBg*yaj
zKVs)D;B4o=|4!s)P)T_8)6wXoV)J#jE1kS%qfogtdh+UWaknmToG=l6syThG2d$IQ
zjCHL(BWhw&v+imY!06+m?3pLJxwDzGOz*(m+2ld#ibdeK!BMCdQt$M*SC7-4xu8Mo=TN75aq36f
zwmj28J*jr=P|TQ|vgB5b%bPOL?`ij!U)7N#VX2vVGBou&-*bIGW$=`hhQKt6vjcZ%
z0xPq6eQLbDqf*#4fx0hF$b8H)+RLywbZLNpr3QN@xfNWeJ0+bh?+xc{`tMqPHq1%O
zwB{h+Ual{~MjtIoECpoD*G<~LQ~Y=!L>cQK8ij^7kiQNwicGprO|2Rq=A$p7Rp;c+
zPt{NKV7>1wW|Cz(8Iip7$g$EQA^z8%Vkr+U4(v@rLX%pFqs8ngY#3SaUTkTm)j
z1iI!bGJ)vN4l@9Jq+W4^I(W;Tjgmr<)rQgF+fpbMxS#_&BEVfruiu|G;V~KZsL?R<
zLM+X*421b3^U{bnO!MXxiS1!T0!~|}(5-pPR16st|2qsI&f^9I85zP2j;yh$AHC6p
zEIlkx#!Qvi`vG>&{lU;Ih}*{VQ%sy#z%#w`R`aYSFMFURbFnfr`{2X3wD<-jLjLy4
z-(PNCeRZcG4P!551Fr@N<&o2F>;UdDI{-1OPS-!^4(yL53E$z*hsFi;SrSV=x`Sju
z$wR)OfV*6V{vlNF%QuB)w7|s{gc=tY@rZIPY0VS|jHgerP_lL5r`;Qb)tL(y(wU)JODsWnL(!hjZiZ`Ik#WFuj<)qABt`+=;mH&(XkYlIw7I3%Zq$nqW&;@}{4Z=-Pq-A?|iT;QO2
z-TgJYuQM6oXuM0}9Ec%-6&tAO|>PS
z9vf!_g>~bJ>#m;8PXD0Zn&;8d|5H^xz2xRs?S@)%g|+m))MY1H)Qv{~g&`GxDjeZZyf@j0jM&WsT=mN^IN0O&uw&vUr?)OG*m
zDC_cQw-Myr}hQQ#IAWcw?cu8jG?<6Iuh*&v^t
zGpm}f4#BSHGh(l{yB099W79Q6Z|t)F;0CSZhopDfWuHG%W8tj2Bnpz9h`69Xd41q8
zZ_$Kx=o8DEG=OsY$zImja@+9ybQBx5F@!?cqNG0neNM{Hht(6yT&Wl8T`vRHdVKJu
zyMl~D3?c2J>-}LVjd9d8J5ojrilycLqA~BX%fY^*xzsbdRYZ48BH<>oh3^#*ZFv(H
zvhjlv;a7noXm%?&xiPb(b?$U$&cA@D><(<_0UbD7E(kq{Jtn$i0`T^Fenh*eNt{)-
zFb=$LbwL%cv|l#&%xCsa-EJ>>lRV6@-=`Uc;CYK@5VP5+_NqW>bY1)=K&CdwGP1P4
zYn)r+;_zhHN@|?p3EXdf@@B8^s=?+kpX_`f;`8rAj6!37oWdQIgeQjt*>}XH&)UeH
z>Y?qX!7=^J6~wP1#-E!mkO)E^p_O4+$`)+(%y;)7Yo#U)-BxWwn|m?~`n@H578
zFm7Kjpyb80sFMs45RGq|zIA-giBErQVJR|4FJ#TXZMms7g5dj9#9F@onQ`0Oic9^^
zdhs`cwuhfSROYuB-W#P+rAtQ&l;7)5P`M&1Lv-04h#*<_fsQtiOs?{VHeqV
z#DX&s4Qzy4+l((3WKZ?)<0AnQx2KYB_~~?^@3l*!FYMEI9dsFRq^9)Y-}`Z^uurhj
z{78`DLx=X_u$xtsC7)f?Ow`bWsylXyJ_F=a@7Dl0+2vZvIc={sdz0MF2*t&G-4Q`z
zY*YGiG*ya(jjg{|e)t^rMHlY$=(BLQQP_6S#&_GhY&UcQgc-y%;rG~5qYO=6hB$i^
zbpZmvPmA{|ZTpD1?k=%dn`rfbfPBKtbJj1+&Jap#^ea2q0{*lg=Y!`PLvi33odr{r
z+SNa+_9i@&PmEWw9pZporjAU~T;MrD_
z8Rb!*zLrmZT|+wiZC0k61=RUo3O8*%94-}apn`)9g6s#EG5Pk-tSs+J!1Ag4m{dmGWJ>2n9*~3AFDR(`nGjaOxq0B0@
zbr2B~Slq#%-EjJcPp0tJVCTMry(}i9JB&p1TmF#EMg98+)Vaqzr7`%{`DB-JU2)A{p5p(ZQ(6^V6JY4?=#eaU4R3uWdq);T`0B}oOr96hOJ{qDRf}42EnZ#3L61e
zvb6nSdI?PS?GeSg%$W6CnvAv3f+X}aQvJ}Lu7r2Lbwfeq`V_8F6m_2Ei!ieIboo_S<1zCWjKE
zo{Jn*t%Ot1R`inzuZIStFu@yAkp2;%S~{rPtNq5%;2h2-4+RJ3#7GK)
zxerA}Tc_h-4)zG3RYD({`Lh{Ybs#0T`&0N?(D#rMJtozYUM%8d0_+(V!}mQVWQ?o{
zR1EQy9@K@^3@NP>6T(%Ccz7i3T70dRw+
zJaln26i#m!eq!ilJN>-%opTyBoklk=Sw%sqsPg?g|TBFLCoOXW6XW_vy5FUg?r$}B_&W66@4)wx#&vJB+Xc
z%^rd^^*FGeT~c>-yPjA_x|N2j4Nz%y+OL|CK`%PAP
z71Byl+r>=u7Ro4%s61qjoW;V&-Sr56mO$aRy?)eqyvg5V$PkHWDh=jTYfZ=^^il86
z>X65`$u<2I@i@`gyHyle^1UI%Sg0t0w|{YPW;HE<3k^;@@3=BG{X!0ChZ^@{vD)X$
zc{|?ngg0d#-_!cD#n5EcG{d|ZyzRU|(4dg?j8TH6uT`LPbgzi+XNvu@VRamhlf{H)
z5;I-cm-iEuG6lk%IuW?GmA=V=jfI2#47CGGBi8DEdHs*nY~Wqbw#2P~{w+xd
zS<;2tP=+Wsp%RUC>YvBQx3qQ;hxLuWy_ihTe6RE}sGj)2Z>1Xy6&Z@&OST+q9@j(_
z*C@0R=w0nJDYW5q%~hXs-S~O3e3J|Lrq72GORA{!q^uvEW|{HGj3N2(wle&Cx=W&y
zEg@C=Z~ynLQ{mRO{x2U{)pt^0H}d3I4m}~Rl*TOKmX0CmH7Sm^O)$2^7Xr6sFZ}}h
z#JTpXm<4TL2J*q$^O<^*BODkX3mc5mnm$&{kUWFgp+YU_SW;{{o7asmhMe#Ez!kB_
z@7;xgR`wLksyS+&7*NK{$i5#J`Dr-&N?qcQ4F$Z3Tjd2dz$Iqx|1+rc?e|K;jMy5-
zTk#KX8NwpAN6%dkho6zY4jn5W8cqYyLDB?KCJm2My9M@nZ7XUkUd4Dm$2s!*oT+cr
z8$O0?PYT^Qeg=;#yRB^6;?@xL!!6?BJTI^R+XG=Np;2zBX)F(=nb0t|BJ84Rv$G{v
z6})Zv9sS8rDW>^Mv-Fa3^@m#1nLQ7^z|ek;z|g+HCtm*nZ}HWwFahe--z6^D>V8!b
z4Gay`MB;;ML;b+IIhOi2V%es7Ry`|g|A*_uqsij2ZGAc=BIUM9@>Y&Y(y3J{Vx)aJ
zFXp3ELR_HTb9D#Yi~F>FF5-7{PZcCT!I;fLJ2Z*_<8`sXKlk|=o?yaqWYGSl*|QJI
zSUUI1k7VL&t+et4{r%1HNDFSko<>&Pn&IUhIYaj>YnE6UN!|}~lx!I03An#vvi;4i
zvu?d2pngIM&u)DG+ZzDQSIV<{R@7#{?JV3LTW>dLat7m!B|fu$DCtbgQXJm+IRXNLf;%7=iDkEaw5BY%+fHui2%d_)+$YX8vmzI3Rv_|7OpHk8x1|0{zA1l@(OVVs;w}Pbe2uV+NSL0m0bq*q6
zt-^SK>C)@B;l+ZgJViqDD?L=H+b7?W_Ufl9xU=`~isre!U|N~po)zRk9FSl$!raGt
zZ}P+fNKFo|gI-8$=bdpHpq=_W`U&56YwtoDj-$9QUC<~@&`S9HtDhE`k=1j>;UB{I
zsab#H0Lv0_iP+3=TQ{|XS~C{@Kip>I*3W`Nc-?J#8e(@=X=WpfZgLVlOH)J|5LQgs
z_VVUgC66c|b!^B|xg+oa(!S32YSY3ZMlK~`j6=wkizdiZu*BZ;nj%Nx*o1&pL+MA6qN7Da6q}g%mzdOO
zXf=*vgFWY0y${#`;4se}NuFjiMWZ-bd%WGgrnqum!0%5s$vM)c?(ZqJ$rLeA3aGY$3l8?WlyzfB6mKMcs%&*)W-sLNdi
zH59)1YNv$5o?@sF=cweS-ix(~T|Bz;P?}SJc0u-OiQs1YLMen9_LYhP6!8~dJy)Um
z?H2O6JcebC28mg~+J}!6nKCq7h>TaN&Ux4HPA1=DyIpJEki3A7d{jUbKsgMdL00J3
zy2dFn0DrUl>y{9FuBk&pFcTU@ZN_*nytZ9RuUBT0F5*ei0T
zCEY-BUg1m0QEDiOC$1A~Ou7d2Cb@=+ohAgR@Fm?FF2L#PXi}iziLa*ZA3IyeNT*2e
zKBH*Aelc7$sAQ4A)9U9hUPZFw0!c1H~}ODh>FDO7D-Zs?)i5
zm)dI?DSbDey6boNqiJj#mF%Y6;xM!R`bowvr_n1xLJdmvOXQi;)dKvN{4J~N7XvZ7
zBT9AFv*y_oKlc3CyT<1_(65mW-ST@-vl~5B$fGHhjl{nf^_jxlQv?J0+|NRUnD}kW
za5ERe`520;5PEM@UXs79Ifx`U_#)8#E<+vzXzn0mOIntPH5Tc(ne2p`875mj(@`=`
z6DkS(HvUQFWQwQJY+F7k(UFEY5CX1`%^AcC3d-5((^Jr~9J{o+Z;lmvDIs}WVyqm;b}mnQ~7GKCq`Z4`Jc
z1ADY`z+nO#sj0yI!fisEx81p_g!XeRD|pYX*3U7clI1ag0g&3PqNUQo2oa}ht^uif
z9l={xJy*NGw7-7fc*#@JRECwA&GNcsbJ}Kj6Mcvg!6Z=?P8PyFL08UVCRF!JDL4DA
z!!utkuapl>U$ebS+Ly$~bj+iEo=@gPex6v@FyydP`Wh!r@Af=#-`tkT%8_Mob(-4z
z3%ouLk0346;2!bo)+JeU?FM;r9_)k|zDF?}07%!Z3!bdwnkrjheXu%cA-rTcM?I9q
zuobXD|LftapqT?3&GdXx;^!xkE@qc`Bfq(!C!p8NRI~k)Cqfc}H-4XTJ%#
zN;_`EivA1BsoH6l%d{}s!r`sCKNbr3ACTru*JY(ND|swN-e@(40=`UR3IvPrq|OkGhh&!WdYfxk%ez
z57DKUG1-SQ=oJquo-9<+^jM$LvO4{tPJf#lC#J;*-vO5?$B%Um=d1LJy2MBt
z83kQ^!WRF_y&hdOi0l?ZHy9YA4vH@K9TcYwu5;BID=boyiD_iPd9TmL5JCa)TxS=cVq#%;~y@E>zh+J2q&heD)D(hBTm+UWEGyoj~WI
z)QC6|*D75o{RvxV^-j}Nm*CZow^|QYCF>pO^wum#$)udEEj$sTvg*jNPnZr4tuz@m
z5^8ZjO0a)PzkPYBhuY$gx{tv@3bf&o?b{QNTV@%4{PFfiSeR^|je1{+4DM&i{D>C|
zr2C*xRnIjTLEYR8$mcA(PvTQggpjUekA7(r{FuJq-d4Y{gh~%b`!lM=5gDHB>Z}dJ<
z-w(1Cb)_e`xW$w3;-JmQgP*;IwiyksFLMjx*V1zS#5$Cx@Hg$Bry0z@e`@ODwRAG|
z0E?QNakj4yx3+?Z8IW`rFmU?5Cr>JRXlhJzFO_YTi(g2I>cx%Nv=EGUV=f(txCZI;
zZ%-dNRb0hRt=?{H_Fa-4M-&1QQ7;m^ngu1(6zT1ZfLzbt4-FP7n!dzG2ns3`P*mC<
z?&QxB9n$7GsSd#y5HzB1=zQG@ao+o%#HK0WEW3t<)D<_Bt$Auonf3?^jLSPRjmUOr
zmY^i+lRLjXgiIK5ewHUz|9p%+3IiK!ev6gMhYqSjPGgM
z@}oU2zt`fQ`)GMNZ-44fdc{L27a$9UZm_eW6(d|F#nWG
zm#r78vH?r&2+evJRbi<4xiG^~UUS`yu|h0-Vv`P*(YH#)zn(-TRAaL#{}#L_>~&Q-
zjFov7Thtp+AC#J@ezz?5b}SCb^9wI0q&D#nTNhcT7PZgkbj4K9<5;;%ACA22)0_9a
zz1PrlW62q(tCXm#tHM6cL|5CAyFj%~aKp!m^5X;|bY^>Y`RPRg^?Md4XwgDK;EC^O
zZDo8})IDq6!gZ9dO&ZrFV+3pg!8@9}_0(u(x5Y`~fnfONNA9QA4GqZjgV>6$S=Kj$
zvfn191w
zjOLG}Wr;kkkR*|<7@qlKFGr-!|2*X`k+I$Px9B_nQb+RIDH;%XRuwEBzztYC>aMQtuIlNouAWvfH&+3mfPcZ+51W`jL1K$fMId63o4u2frSqQ%
zDDjFv4+uE^L)-#V_>=R$!=IcW2s*I|fga9jqocALuI~OkpD;Fy#t1To&
zOhH~=;)AM+fXD|Kc@a4V5;18Rc}0;A+7c2ZjQ=1cDq_kKBJwH>BqE9u3?%XjA7mx8
zNEDqcZ4F&aogq~6_IB2$p3acG7M8XSkf(?PB%Vgy($2-u+>}Jw)Y#t1#L~{37UfS>
zltsj3Kd8xzN+=7kzlKCeNqkV2_+Jzcg8fHOw4!3_AOHaX-~jYDb*~`82UsB3Kk)CE
z8Xg`1oq`9T`6B}$IJ5$y77zdf0Pq_;r~_X&6{R;EqzN%2DE=trFZ`tu1^|Xw6W+wa
zc!~&e-dIzaRFhhUC>RnB6C40iB*{Od|G6WeXu$%~kfZ!828AhJVZ`fkP&VC%b@`aDuc}Gy97cG44=-R-$PFM^vE<
z18&rw)`jN9#@9bN|0Q){2xEqkIttlDLMf*|f7!%8DCCdyS9p*%{!yL-MJ$C(;*Mr)
zVLT57ZiGY~L!xP|0Vv{6H-^B!m4ncSEc%`_I9l`-Z7{aeAZZw((;z61v>X70|40G=
zA`2V{C6s9hQ4#-S`v?AJrT~CGN5aSg>BvIqM5w<-5B^bUPo8w_Hcf0`&<;sLyfpA%
z>-6vZf1iI<0_jYAiIlv5GHlZ%8uR|ufH2&j!ecjSC?aO<6OJ~Dd5DP>4
z_Fv!t5)dr@6$VSfh(pkSVgL8>e
zKT0;@Ob`te#aPgR2)1G5f2yHbhM*8s@>KjZ#1so78HO
zzl8WdNttw_KMlMt_`#H!7pfj~{22d9`mZ5$0ASgGjIjoy`2W354uq%xAWaAWJ)6=H
zTF5Xa{6EhE|CPo6r?4=D8yFf81|yp0PR6GI!q@;<%#j0yC)Nx!P|L8vlL|Y@0X79O
zAVEd~2(fU$A7YeD%qVE=H+7gmI27Q(6Km?3ZRJEbGR>i~!;@NMnJ*0)$gjn*GK)O(
z5#_Hr=7NhoGiiHgI21So4l>FB01O2W83746C~@H-t)m3cF@X&SLfLD6C2aW_7d1SY
zI)*VU2^AOlg`Gr-u`7P1pK>#t@^ch2sk;&RG?~SvnM|6Q`w_(!nfYaHOpvm4r#RH+
zb^{^xpv^2hY-^e17-N^8b5UDx1x>KaFBCa}GWRmdjsuZ6Ca~mHTtOb$)MZs8u)^5#
z3n54bnZ=fEOhEoYW>q8vp=$wpc10m_`P)@)A
zmPk0z%nYNhyAT(DBd*kkC4pvfAs(KOfDv^N5uOhKHPG;o3n}lfXo&%^L?VMsJ%{{^
z9HfO1amlk&4%IQp&oGS5LQqJ6Bfr!#yVx?*EVH=SGJDUHSY?iX?3y3a29;}$2}r;s
zvv}V#vzS#aY2P#ZptP7SGt(?GpBey4{&rx=gfT?Pz*i_*h(I9}@ETj{ibG+>!y>iN
zk~niePb(3U7sAxz4cf#tFjfG%@Bn)LHC1>(x(lS!Wp6;tE`x7J2-FhB0U@CkFaR4Q
z-XvaR@O2@ws5Gewy7DVh$ZQG?>53q#E@
zi4M}zfP*xI59S{n0+^W60AduxNQh?uG;3=9L>YkoSUM0uf&~9O|J+ky0S3*#ahedk
z1`GhX5T$_uayrJo5A0R^P*T`za>9R0gIEQG`Ge4zW*KiVGWQ%9kf;DzXK|@S{v>Mc
zVsaU>Y>NbjA+`*v{4ZK$B$?TWa^eua=rF+R@c0bjT;LV53D5%)4a5c%H4P44GeJQ)
zA>zZrg&6np9yUPCR#B5sX>kU)2*f#IB~~JUfr(`YS~&E($Qub1`NO8Y6!b1|ASHgV%#`J>N=Es+FT31n=0zPve
zGtcj!#Ol~xom(njY3M-pw#ZelaQmknfu`9f45Z
z*>=_+$*-n6*AJ*0aF7hHRD%oi!u4TP4z87j8JM~g*Q+~@DUY4EJSSa+&U~mX1t~Gp
zGmv05x=^t%t#m7}X?)`CSIa9S_Lg5hN-{@N8kX2>V)iBx&5A0zmZ|7yU=$R|Z&#Ai
zu~(;d`jq@~>vp)4hPnxvM9vnSY^>(sxZ&$cHk$M<<-T+^AT2svy$YTpAU!apJ%s%r
zN*C0Ez>+eF#N(*^&8}BMGfj`p&inN$(OF1wBJwYSvZ}+=iD*FgNp%!mF>$x-3PaN_
zR;-{VC$&+`>W=SQCjU7FHVM{`b@gZ(fpW`I44QqeNXJb@L-i}^{pQ$`#dXKGQp#a;
zNR4S1Kk}0~M$1o{5$l(pfjD6WXp{Twh(%qv^|^NpAEs?Z9k|%@|}%SFRE;RdR4ip5uQF;w&D=iPNc
zYL@VdEA4HXx-GxC~3H~UAf0&t&t}B
zj)I+lthY#6DZ^Dut%We3TY3T^ZE(mYeRXchoYN}rOAsAp5cG-J@dK~7zHRZc6G}+?
zrl%?Wx}L7~Og*Ldk8}e&aPSGG?b~x+<{01c{fXkKR)7se7a?68)38cnTi`ztfe&^Z
zy#9Hy`^N2;>RTqGNI=AASIE>rSrM9#B<<83?FcnFH)mQ^2-lu*QsKk>?x2h|ybOd6
zD;^ucZ`zK$4%dC)JF3t9a$pknWqu}n(8B`Xw$ugf@|T}tpm_slVs
z{+UH@j;43h`bAomp&GV*o&OHWAcLPxP<|3S42ntDAy_3JzY#rPP#B8;0>$e*ZfG89
zxM}*SPVO|j`|^Lzvy_X1W9#T?PFY45*`WR9DH4m=cG?$yi~+fsMI&
z`JzwF$M^kbK`v#hjbCqGGA#6}MM;PydF6B)g#h+2nJIW!00nFVV^w!(WxOoP7U+4}V``s$hw}vh4}YF-sTZ3M
zh}n%n?rQYD_%tXD=I9M+9M(3^vrN%{z@2q4;AN>tjWa8snTtV|Yj7Hg%8c2?zecqG
z$aMt~#3c4{Q^|_G!)lxShqV1G-Jo?C02s49zvceik!II?eCpNiXGe;%Qi+T8uyTC4
zIy~4if8yq?@D&y~5z$?Ed1{vX^?AITmw2a*-43aRF|Galvm9h`98a{a$TXnhDyw()
zMWC1`vUDttmopp@++SWo#g@TU8O6*3zVn2Im@FjVhZwxg%(A#6ob8t!1LjMyBs^lt
zJ`H_%l+*%RE%;SWORMPc>c#sxM>VRUN_Un)!7AdB_Qk3lzmCRv?G0>BXSPnFC>Q5E
ziVV>#MTB^V7lAYa&-#yyKfX2d)$79-{9-8JFdU(Nygr`&lp-tmfb8~-lEkYeqqJ4t
zT}gr*A33syT_3uUgZ&FWB^XMqOKc;V9bO|bno?C=%WbsGIVLQc*9REGtPPgJ)V+
zq52!j{DVDoymIM?erzsuIcaX@TG6<#ySt{Z2XEuAZ<~!B_RsGEFOTdhy#!y(x#gkP
zTQUc;UwMstc7E8xz00IKKO!@bx%$RbQE9sECzowvhRb)n$fSj=M`1kbl@u(FH`?!X
zr}UNGOm~he_WE*4CmXm(1f;zDd^z@t%FQ`(Y9UUf1JD~`;p2A)arNdhTzPxwPjGSY7Kk-BaLsLDz1McdeS8kbXw6&A|3P3>tp2=yvp4+O_9y&gI0=rKV(le4+-=Z
zVmrar^UW#-Vn0ML9U3mJcz0Z0MMUM->0EiChNiONZa+z~f4sY)HCqpLM&C_7x1o)J
zldB6aUWQNp^?DYcg9`Mavq;o;_x3X{EU?kWsB2|TcXj;Mu=fVb>|WDh!`&6e8#dqo
z2d~lW3I78LJV1fxn!~O!(axLw$qX}YS9$W`XZ-VL0;n<$6P=&GiwM1++!~v>c;Eqa
z=FkNsm*Jy*s<`EJI2o~r7uwxSXW`5?mdEnzP3f@;OKP<&CpO(!Q&0oi4Vh++LCuN^zKJonp^
zXx#mS%i;`6ecD3q%4sqjz_#7;X^VvI5=<8SI=;sDZt(e`&=d|kx%=VeWwg-EEWU$u
z^R(ma*Z9}NKCWOw#&C)Y)D(k9^dPYx51Mrbds*d;^O?u_dgPiiAi#+4ROi-eMfK$)
zyRKEsq3m&7&3Cv2>F6mjS;FU+M}?s7UN*ULk4*friUlS+c-JCS}3heva{i
z#_ip%ro%V?EV1&Bwv3V_W&p`v=G=l58+_ct`l&tM)64d{j-<4df;Uh`UZ|KG
zS8-!;vAY+Kb%om2@*Q2BYaqS*4uNc2d4e<|SKdzquJ%-;^t7qn{e@X!Z$He3)jd|9
zx_Tf4h9iJueTeH0N%E>UCi67iY3
zLZ&q742T3s<6Qi{NZGJx@xZu?Qq7n%wcK=p2xrSg)mP(W#I)7+Zk&Cc!Xm{$@8Nm3
zY8j_h@gz1(E)g9pW<7IhNdJ0zeg5#P6WK2_?A&*F;+3i;J+`EgU@=mMt{mN9SwI-N
z^X`-8QNd=RCV
z|95xQUD(~7%_y*u=-@BY*`Th&7((+lW?pGAuM=S3sDV`nuYP^Z0AX4P%0rgAeeeX?
zdCC_-#JONvu$8cBI2;8sDE|DeGsy&^8GUtrd=n_1!V3JG%l$U2q+^XsHv{5A(iqQL
z-!q=_=igjqQF@j?FdnoPeH)p{R_fGR4(lWVnlnQU{3Dhbs5BR+_3p)Gn%fdnL-jR(
z@{o@WBTbm}x*SLya!WHKuinuo*HTT$M){hXQsBgz-kYG~^vqV^cq`yuDRNN3&BH7X
zoykS~MCNC&Xa|vD^YgFO{o2l;twi0#pFheUL7+`6#J3!;8fAzCNP;dHMa4JC42y{?
zT+J0Q-;FwoJS>%E&XkPF0bo$`E10}_3
z*Y6w;D5UU%u_eV-`>hP*DIE_OVe@N<<@yS{GjPHg;wSE*hHPAb@9>3`s(u!GnVj~(I%KrLCG7p4d1|@K+oL#x_GktKHi&vq
z%HDr>d(Sr~r!AOKjzS$rY9x`Q3Lmup#W#pOQ?jZUZpsnAS=U6(*K}EgYD9s=2|qlY
zET2r&xvWUzrbouYXf(E1H;@p1vxf%7j1n=P<+v&I>OfxnJIAbqsc<}cnf|v&%e;GQ
z0wN&+H%c-v@G*pwu{QzzJ#xUzWfOsJzO2MO>~L}8P7s@D0>_wTxE=J=F;bkL#KI%{
zl;Cqh*6n__NB>%l0nE@Fn7K1ouSd1GZ%qJJ-9D!dw!})vmMhdaguQ&fGBU
zu3Cx%M7jf-3G{c5H8=7)mz)GYC3o3n_w1i@%6Wy;KnLsZjLywS=*sE)fb-Bof4iwH
zO_?%?*_3+cZHesU_KA4kO;p%lDD|PF%U%x(8$rbTKej
z)m=97idaP_E_F+@pvFgnT+J^wRlkN&OU}aF02s~i))2BFVsl~t+fX43xUuHnx&ab#
z9O!*So*Cw?X$f~M>LhQ&gRcP4Xj5e?r1^=!%JKTF!N=O9c(g%DhTe}tTOLu7P%bhig
zqM$OY=cTU0kfk@qv5K=1Zj>7wcS~iEP9361_2eFY)d$E<jhwHuMOGAn;#_geGuU
zg&Tkek*8P4>m0(7btD=Ca#=WveT4^NO_AQue`i&BSFWx{&ni{Cf3-Rl>N|T#u!L@y
zS5Y@;$fb?7Q5LTpTc;?mpYo&J>EZk9UbZ1y`k_^0PcduRje+s9$oD3hp%)z@yrTze
zk-;tq#)+Ra{Epa-^)sBKct19*Sf6b<7kz(eXw7N3Cm1k(Ok%u!!KrpUMKk7&)xWzv
zhL|#%xq7(F&8O*pxNY0K`WCLA5hubH_%^U|*?PwUW&1uQB>kp`V05v
zwB9%(t-=c44at}*4STMci?5;Voi!?wbH@1zkU|zu*{NA@k~jYDVj0n)bN)@fk}FWJ
znxhnG4GVC#n&bq!Ics+`r%%yXZhq1(mMK(cODSAe@BskN+nt*cZ_g~eaCh^p4}CUw
zo6~Y^)0vzoKgd0Li?hyt(1u5>WOIzbOPD7`oxWEY62(C3L0`zDEl`^r1{#goMkxtR
zWzxlUDMi3&5(=jT?{p~GQ1t_7*a8f%RH^-T+&at_)eyyvBA(p=B{9(Ih8P50>RGXQC)K`hxmylvZm;xu(=fpT
ze4QOcR5aFuN6nf}xE(_oLw*e}SNV!_&inBTend~f`$|xN%Q&NVOIAh9k1JAKZpC-6
z%ij`QkLhtGj#XEe#Xa2|{R$(Xztr*_{rTcf9w&9xm4hx6p~hJ!hudpGmG!0o`E&8%
zv(?}zn;4ukhMW$Yt1?Zp43oQQdpyW8RFw-n5-?m!STSl1!l<(=E#*_pglgyKgSh-L
zjSQ9or7dyG;~oV4GOFG?W4HKRWhiay%=X8q^2FNch=?g6n&Yoc?z(OToCi2Xz)&JI
zSlr#9Cm^d+>UVuNk2*Y+ycwL{D4XNaGhrE?8(`j__PnI1zwElU2ts
z3fUwq;r*Bp901Sxx#fZkNt>x`Ca!HPRKOkqhD6F}o8Oj-oxOercn&=gp?a{z8V-c;V9zOie%o?u5tEU;cWnNa3w^DKYT27Z?D|REzTCDzylAx%tcrg0>;Y!Va
z%+r_k<};4gkP0LbJ_1+A7!kl$?DN$lPli
z4x^j$dho6X1~&qSvt(E@+Jaxj3Gwz4*_-y>RLOFnzOXan{hSLnii@rnJ7W3d&B3eH
z`EcgB6@BHs6Ahx#)vW1K?`#DE%JavobIq%zXF<%;+05zK!we-oJ;(-W{3utOh9&XU
z+nIf|G#C5fxc#&?qL+@exnE`5!`zM
zGg^H%y}l6?+f&(pPWJM-RnZkk2ZVFt_U}H*&R#qmFP8yeMxbjiOQaozgBMSOS#_j<
z-&+4eUTP(li6x5rOVS;>oH*)RpI1KxpBg&TjJ2r9DG!S%V1d9kFOb4|sA1z>miME1
zf3(4pY!!XaFL4MK3%ei7=`g
zoEFqPgNTUgR4476G*QZCiHBAoUI~g(FCPhtPh7+IdJ^zBSXE|PG;1v-cUe}ITO~$z
zHckOwkG(V$t*L=7kBv4Rn$CSEZ&KfAd5Z!m5pl69K}W4FRQ${PL|WC9owTj>yT`$b
z`G!k`=Qu*IUMna7GBim)@}0aa-%!5EymnCdeHUg*kb*q&!IsvxqXl&f_~9o=(XEm=
z+u^CT%T-r8XvWnw+8k~j-pmd&vq#se_4C&=KP5u0?R7fS$at#fMTUx(Hu!0jc}Tc7;?Oex4ThJ-~&kFKb+?Y
z9Qf)Je;mn{QIm|brf;ejw$K=x@Sq9i7pZpIX@ZIWC0!@uu_G<%WTJ-grYg-sFl3T6
zg;FNa>U}{|z!w~b_twF%s6Aqg)_jC5$$LFLJ@5qm%nq+v`En&WPCu}T^P)Ujh2HF{
z;G*{Ae^Z028D#&~%%wIhm}wTsu6v6e~ph?6KY!_Wtn?G(9EH&;1;?DulS=q=dq`B
z@pz-)+%bAmB_1H1N!PaMEt3nh3{)g&PsRE;`mx>_R_{A^81O8kU6mTqwS@VEkFStm
z5$rFoI=#y|lZ9@Yix#@^U&Eau0?y=dRYvbYziG>YU`f`cfph>D+}vE|I+Er100&2I#<&?Yw@~Zlc7w5JYjGA$+S2bG#3CJDc^3c}EXYf<#j|p{PsxeJ
zzJE`EyyP~VD&?eUb`!g_9IN#dmU0>CPJRN_Uzv%6J8Of_!NPrE-GeVWpUsZ&)+tvE
zfu5QoSeth0l|{k41xUe-Hvw_4b=(*OMN0(rjNBf0e@JKpzF;T73E+<=`yho~r8WDO
z2k&SFy{dTe!UhyA?rG5bStV*%=?8FWR8_Wp5G_Lcj&XX|P5n%3dG4m^w4#?@AuVjl
zOwdW-CHVpRPQBUju!1kUUtOH(b2aPo_Ic&e?Gc*QYBqDgv(*FDZ+i{jobl?B@htC&
z`Pgj(T7U!Kgi$eqo#}LU*I(Q=L;H-2uSnbpD~=JtebIhirGej=nVya5=|YRb
zu|n{#@3StQkZWOts0eEkTVwW9;^a}z##VT3_C
zn0!m@I7`uc3}JUFU^a%9ZKmNhs{=h(PT2PnQ7bO&zV8&xr~RZeg0599P^d(l%bA)-
z195RxPsn^-P#b(qpyyGIfb@9T1lZt(9fP_6wp;{m&6(Kzic<49W9J8LQv(s~k{)Q{
zSIVV$(Th})4EbatcB1tF>dCi*!
z#f&d+;LZ;pU&0K1M@Pk`FLOdx#!HjcO{suBYob^#ZEL%GKfz_Z*7?n!r>D+Y9~(cr
zNiEKo{5%5;qAsVpI<6XcXI6}1JD0PBRMjXFNz`rw8f2milcf(XJ#Ljt
z+=Xus+7I=VDfV<6V8?kB?|06pRFH6)&gGS#*}}1L`x4Wn4r9Ft}Jpq(Y(yacUFfx3jYK<~-~vy`m#dbh8wx6-DwjEc(Dl7O&V
zhLHMjcAs`}kp`Yj3guQxIW)aqm;%FlGNzJbHv(ULY7T5lKoRkSMN{ue6D=|cy{>YS
z0jV^b`11Ekbko93lph-;y69b7Ax0oV8iywC0TUAw(T}YYOvW@{bM-_`gL^aR66Aub
zvJ*~40k%{?@3x=e2FV4!X}1hpY_Kiux_joz@tb|(y2It6;N>e~
zj?*$L6yeDw;Kru*KpUy{n-bb~E-W5j^l)56{Hk7Y5KgssutYYc?Q}!@RP
zsOZ!i28iCa-@I8lbtBYXRUYE{(u`cj^e%U=-3iNQKP;GM&2p0#c(;K82L=H(Am%pS
z>HK%dz(xTbAJ787wd;fj!UmSAuG%YP(dU-wOvp_5S{$Hr6sn@4N?hY1AGV3W!jVDt
zO`qZP7%Ex#Oa&E&$Da1Gql$)tsjQ>Q<4ewyyCbsuGiEV@(gf;lN9Ke4?@cj4Ic=*;
zbwuPntsn8RFS=x@bhppX>=Pi&kIkR%*4aP*k}WqM+CKVhm0%tNn6*i~$Kp?rr@1Hv
zdkTxfO~&`W!Lm`{biEof8jquoH7}JqDs3FlnnTyq>B{BHIf|OH{a99^~}4C+<)_uKz|e!
za=!sR^gts3y(R5eCJ&Or!n^YgBUR2Jl~98AId=%F`%iX#&Oc9k%XOAqlft?gGQUGF
zcJmwe&+QWHM6A731-&dfx~R>~t;%vO10v$_UkSdX9MiwpYh7yNV&N;Iy@lGq1wTcj
z#Z!P3XH7vm@n4Z_Bo@kEDzeokbwz&;3%WYptnQ6V4}VJWouG)$h_hRT(x*N({K6^l
z*|(~zr(8qlXLu-!KxtSAdh*#oUr3|+nsvOFO1#{M(W28XDrMS`k6Uj*KqPVh=&w_O
zo_ROvaWZ4pgC0`r?`(RX3RW#q1f2BP>X00EOiCt=0#QTFfP`FHF1s;D5(N%Dn-Y#L2xRsOhVRSJ
zh&ReyQipYm=PqVzVoVt-2JGVSR0yGz916;YeUycq#Dw$mHSPBH>x4|cS1&xyYxvMu
zxVBy-m#a)nNDsml7K(d6BQ;n%Fp5rRg6gZe?glwexz28MqR`HtP%UXdywUiIik^k?
zDT@;5OBzo(VQUm8G#y?F-wNWF+KYT#50g2ij?;5aDo77_S}ebFEPr|unOJ=n8`NyC
zvrKuExnf|)uth?uap8l1ro+@~V?cUH%AI@DXAUM6gWH!`bdG#roXFn_9_pDqh2~^L
ziavA2Z`_sLcFRZ%cz*Krt0*OTizsH+#asI-4Nz=^ESiYn^*m(JDq>X@d=g-+JiYC%
zmnf31`lisGtlQ)rjqI3D&Q;*GTLtN(2{Xr*v&#bpRikI_mKdg7)q#VxGTKC
zCJGlG)3GLqmP_t_=a<@B=V$fD_p{&9On<+F)tl0Zj@wc4Cvc1Gm%hiwNvWt@X&&O^
zU#6ep2oW@qAM;i2D3Nwi<1vaPWZz-A00kJf^jK!*6AWV?%Su
zi2&(AQnqDsQog&%758gKb7q5G{8p0VvvrrYiroY6dD`7=JU=xgMH6f=+u5(_poTly
zw=IV+TNi`N8=?Ge@VT!BOL^_tV_>ZO)N`7zdHaZd1e?O!Tr#_u*i?d_yVuf@InVBN
z){BNkmbagN9vre1)Sl#*lL-PXuVy0Ex+}DA02lIz-?8=7HDM<@<{-XT0#yndq4?IAl3lW+u>$dClC(nZn_E7Jmf=cL2g@$
zrX>@$Y&+M?~4A4e271=L4kB-7V`vOmQ=0oU;>~%kszAK7!9bw3qQR$Vhr(Y`5_I@*aK*Dp)_RMy*`K+9({Nk;_0l(Gp
zIZAstoI(+An0?Sz5hM%R2M%HIc~GqfQpH1s;b6w|Ipw%iHLP2U69O8ggEJs5a-wN)
zeo(O0g(trEBt0ocpBVCfxS@k_xv)C=XDwk%QV|u{0*@ckTSam?1>#4ODRgB#m`VI@
z@miP49-2;hAwI)$EY(&hj??N^v%cE8puQuW%vu)C@M_$o-yH3C^({GoYIga|D6zGT
z<@MK7wYx^{h(l_Hy&CajgLj_5fwsH3YTCh3W*qko(fn`zFY7^K)6SICIP%oH+49#PBV0M%nzpvgz?JHv
ziZ~}awOH1Q&6dD$42J;)DE`>-+p_VV9!Uf3a0
zhC6JLSF)@Lpm10qtOQfs_UW38k`W@-5eI8&n6=YTTf_%yH54d{0G1!%cTmEISc7%sBzm-6PM1#9GAvow8TYx+cv_Vqv*mFfF%Cx?5n
z)=f{ce)Yr7nVXTIKl7o=b=lZSZ
zWyw3V?r7=-3v+5cB&~<|qaw`TRF^(^3D-
ztxd~MERk-1=GtI^o8}+Fb(>uCOU=c)Q|-U=W=me(ze{z}@L1EI&97no2syP0MQA%+
zduZ0lPZ`bL8IU0oQJ=?>emmI}ldMqCB$KmYf~!P``}tE_x99F&*;Gu_Dmv}_VgJq?
z`uR$hKyCNBqxsd{jFt!jETCBsTEuFse7vLLQY`2(DgqU+)-yUco|ZWmGf-{)$4(n4U-CKhA>n;0g|-!HRt!8BKxTb64Vrg6*0x62D(~78=Ww
zoj%$Bn!k--MHQw9yu)9frImr-)=p2^M%ln4IfhhjZq+Ebnsld*Q8&V!n2>|_r9Nux
z?wdB-bK-pc+3FksHj$Hj-@*ew%+U<>z@q1G!;DeP$#7L*h*rv-H
zEj!b-`F(G*pY=LF8O9do+h!dTaMQ$h*GF`33!JClGVXY!GG7bq<;K#lXmJXi-t8p{
zeR{e*O+)kFjet_k2|zW;-Qqw?7Rft4A*bPcjqniSXDDQ()VQ3!-L7XR1vv}~f}Mh9
z?#`+DIRLwMODMk?)j_jx;dzln^!&M*>#h0Y*2RfauZdQLR|YKbZzhs+KQXZ?-LsM}xtyca#ZhAPq}8?C#DSJ~Ry
zcdt5`JjXycwT(BC{0i}*ZVoS;89(H+f&l>1e|L%r*Op`U)*%)a$iJWdzT
zgFkAV)#IW`O7<~hVR?t`0$Bt}(oZg6t+b5+tAybK!WBU67d7lgfWjrU!eIt#mg{
zU1I;dKlgav^mOGbh&Cw{PJNBB;X~Pj&6LaZGN~7{YdTW4?EIlMrR&I9ay?e9!aCB#
zXz3H%@KcJU5rtC(H#;r>KCPnhjfv@T%!I@Kmy2bZheO4|2P9BJyeIJ@umJgDCv^}GyBDHu=g
zdVZ#Sw|HE4qR!UWq@A<`Ih@3!Dnx5b^A8xj)>69~&gAW-FCV-)tYLJ&^tt?1>lzmo5Jig&*=<$xTLQ1_OPO>`p!ORk
zPJ(5u)PV>%E8O%RTlXa1Fs(s7-k)U^N~{fZS5s-PW1sIc@4tBZmO$%&nO$b$E*lR$
zE9uQ_lbaKPlD4yW-fg*45zLu=uFw&(TXQc~T0OtTO|z>$6zlN;!Wauvf^l!^wihyrP;>c-?!1Pyt#q6f
z5SI-5vo4l5vIAZRJl;Iz5X<1}{Y)XX4b%RnQhY)-D_4
zlEdxot{?B-ChE@%OqnE+crkabxGw7iDx)0$;n9{Ia57&;k;oaYZkA8`dQ4iP>mWXX
zA|2heS=2lU%0;&?8nR5kf4z98MlWLMYTbS3u7_{t+<`RPNfwKvvK@SOiakbd{XD>Uu1oG(jO<&6DpD{0f`UCl7M
zT32=w4={CW`r++cgMH=fxq
z#9nvm?1i*RbK5gdygGPnVFsQbcb)rRzj+0K)4y+^vBiS`K`!y+BfCpDHjKg49_es5
zl!VGQ9b47Fu)Mv^;GKPXJNOAQ!x7>z6Dzag0h2bXJ^bua7(j971@Fm1_G&_7;q%-F
z-8J`^fw>K-^&OcaMV3zr-JM-I%-W1%YNkdD$8UDx+^s5>=Fu_5zG4Y=bf;Mwt0$-i
zjqd(zPkp5VXUc?>v=m@L)p}C>&}9UlVP%(E!N?XKEhFE^?>|W6jI5U6D=zuHc_%%=
z;?^~00qBE#dfmjJr=A;aa-NaDI`(v?6(A>XduGdt*L>}4fAY|BeP_cupx#v8F1?^Q
zc_zQ`lQ6k|>`|-M)EIi8xP9OBVAopk`R!@5mbKqY+rI7G$pdrM<}abPHUxw9qNu{Q
zHnKGDwU^^T$hJ5@a;JBcLk}KzBs&{gg0gFN+|qg#X9d4*Te-i!pNAniIT_BtqTt
literal 0
HcmV?d00001
diff --git a/sound/creatures/monkey/monkey_screech_4.ogg b/sound/creatures/monkey/monkey_screech_4.ogg
new file mode 100644
index 0000000000000000000000000000000000000000..5a60b9466fa047efb2a6ff1083c5063d2e5f1dad
GIT binary patch
literal 16704
zcmeHuWmFyAvS1(FgS%Vs;O_1g+=6>>*8>59y9Xy&2=49{+=GYU4ncx5C;9HX@4mI>
z*UXxKQ>XiMZL6+bwRhFt-PI~qR&N0);9r2210Mf_=3DoufJi|ejxMG)u75J1B)|T-
zK*0H*%FQ5^KP~?ae_DbdDNl+1IJ6grm;VMa=zqv4KuUFNoUBEB~>wHJt--2=6@38Zza^F#FXALk&CHHF_9~&C@VGd
zyf<;PaD~)Ta&)k>@OFi?wYGWh1i6YiLGtOeY#iK7tSrdYEzBHU%xxU3=u!W$qAn((
zpscARE~PHSi4Vz;ky2Kd`rq6h1pAMm=*1nd%ehi3Br=Ut>f%Ph{F@Y{CM!P5AD;gU$T`h%0CEtJ
zC!ViLheG!cF9ZPapR9@gJNaL&{^^D&6d;;N#YYVHL1Obi8mi)B)2Ze`I`^Nq{ddbh
z$X{;JA>5*&Q%gYoWdRHT#;mMBNZ41%aD)O-kWyj6u>bT8iC7015{CxE{iQLL_b=A|
zrv6JzAixVd)SM3>9@><}1xCc2|CIi{4Hy8pW28RxQ##XS_E9)9MfDZbaH4YRqz=q*
z>M*6!CU8bcnN90(;{H)B1pX=m!dqOCZYs50>^5&Km0T>fF62nHs9_q1`Y)n?W({4U
z8DFZo9Chqx9kh>Tx{2m;On+%W{=if5nt${R?t^F}ks6{r$T0#rk|gDlbvXYS2Izq3
zpQ=4Soal(rK1%*G5&uy5Tl`17A0f>?^F|i(#%{^}lL_~yO>od3A^a5_J-39`Y)DbGvTcPum8c{|6u}h
z4{JhE2-kl>knrDR@<7)A#{X{+(O-i9ZY~Oa4sgEuSJEp7{@(@vANl_h_387AXE#Y7Q;`59Q?N>G|nIuM9qO$fzc^I
z9RFY?e)ZoRR!d@JBB*?@hGLriP}Xyq=kwo1I>qp_9}dN?fK)nhP7|MV#s4n)PfQd5
zy1~$ZC>YTq@4tBZYk>Y%`eW(;?|~d*|GPl|d3OlAs`aouK#l}-=ksR55)ajaw{&ow
zs7Il!al0XQ2X>0{kHO3PTNzF%VgQ7Ms*4Cnf&gAfUBPiqzE}&JOlue7(HYLS)N+|c
z-o*%i(2!#992@aj!AXrx?;Oia(JKu#h@FMlKv6JiCT0{gHeoF$fPe@%@y1$u=Nx1d
z&}9}MCQ^^i2&!pF&AJ&b(#U1*dKc_R6qIFF$|W+5VkxO%8!qm&Rx?dvNzHO9&1x#?
zr0!)D+h%@2(#iaTwEjVMGb+nlzt}(tPU0BOx;Y!>*%Vl3Y8Z&lN=|FG0Fo-$N=c)z
zc}Wb)D7xTMF&N}<9e@x60}ALyBZizzArQX>1$YAh=|~Ne
zQXQwlCB%?3sX+KnrXH>39G&G%wa|qKE0Z>|xX326)FzX@mQ(3c5YjibS#x)d{{5jDZ91d3&8h#?%MMF#iY-ka~gtSXWU1@Ct?oRD)23L>NqfTnvhuIv(P5At3r^Vf4>x7EzWQ1YlCjVv0gl13>Bk#K-FZV93G_
z*;w}v`kz1!0Q-N3b+|lo&1^JdTsKB23YO|0egSp>_*i<8Ud(y9@U
zN?b9;nt6NWNY_%Mo^y_3f;cg{IU)0r906cOr{D+@1!3b417PS77Z6eN*}Gv4SKY}&$YChL
z2SC{I;15_1UO!P)ntKrWrHarXngD|1}HM
z(BM}9m>M=bJlrz2ux|^RTGBk^bN@CB4P;1*{viOspo78SznCcG9}NDx4}p37*OKAS
zJ_I5(z#(PlgRG9GjI^wbgsh&Hw(d*LOCID`@sjzH`%?V!1@fQ%lJ!#lQu31aQvDM5
zlJe62QvZ_iQt;CMk_@?id`Wmoh2)05_+J4tmM2;Uj1@C{f)hkZO~
zHW1t(MKC^Kg*tvLxC4uJuiZIkuD>05{*AZ$vlmE()c9Of<3)BRh^QNo{s-7~?@$Eu^
zQ^~04_WBl4tIqaz@<^%QDb^OhlzRx929n$x38MTEo$Z%5iG1y7{QT~(Y-PFcD^?Ge
ztor4+IA>Sn=ZHpxrt(3Y7kVxvuWb+S^44lXOp}*?90aUa&8AC^VN;>!$BFEzmLTWf
zgw@m8ZHjF?z|u8s{Jy~;r()RQJJOn>Jnndm?L@>rV7b<|(}~cNYAt`NfsMHFOM$1S
zm2M`Aq4m&mON^E@K`5L^4CQb>i{4tTS`{D*e7ExbQ=1EY?1mp($=3(LRRoUU=QtR@
zlLe+awE+a8Mt#d@?4<12)<7;El7jii;h)uTj<7P_y`40$N&12oCdr>ytechI(Tn_y
zu6Z22^Ju+kYm>DdT{+$~Z|5Kj=t|3I95uAAuNOL7@sFX!0oqTBt#TMNuQxohS!L`H
z9Ve~Jgs!Cbo#Z>}tdxG19lMMUwdA%huj=Uf+JANLsye1HCDP2f@%;EID(2)0CU@i^
z=Al#Uuu^S9w=Q7D2vxbO$)^k650&hzpy^NBZ&HZwZlTM5)evobU
z-slh!BnUL`_##fdRstqt-N>`;ZvTSfKAvrd8T{fBM>{5Ey;vgUC96o&yZ<@HUg>?L
z_o>c-Gwi)Vjx&xE_+F9n`t3YqYaXm>{iTet=az&+QaJ~`eOoSjM_
zeH!;dKL}-CS9rXGTy_z85(K!398a!Qd739=kQ}9|>6f_HkA3<`_~SLi&8⋙P=*j
z&%kLWtL2W_x_$aQXXU&Fb9ULCR>U=uXsFQyxIzJv;pn9uFPCrU4P+mVViLZ$^QBT#v#sojM@P2coub}ywkmnf@g(Cqz<*svviDyOVC6#XX7i<1A;P9#Q=$764?7!m9mp3Go$u(lVao)vNH-0LB$jV84kX^dEsGA
zoSbW4TDFb~S1Wx?2)3o04NmnUBRhn0>p8|O+B$9xXzTHjQe<58w=8E{n{IfjvxTky
zdSj*N4Tpo%`N-qYc}Ldm4GXtnF2VYMhpm{Kl|VD|cml%~P5D!Gx~&V?KRxaY_>JK!
z6Can7VzU@