Add NO_BODY_HEAT flag for characters who don't show up on infrared (CleverRaven#83336)

* Initial commit

* Update src/character_health.cpp

Co-authored-by: github-actions[bot] <41898282+github-actions[bot]@users.noreply.github.com>

* Kick tests

* Add to vampire weakness and Boreal Mage cold aura

---------

Co-authored-by: github-actions[bot] <41898282+github-actions[bot]@users.noreply.github.com>

Author: Standing-Storm

data/json/flags.json

@@ -2246,6 +2246,11 @@
     "type": "json_flag",
     "info": "Allows movement in open air."
   },
+  {
+    "id": "NO_BODY_HEAT",
+    "type": "json_flag",
+    "info": "The character produces no body heat and is not visible on infrared (for characters only, for monsters use the WARM flag to enable infrared visibility)."
+  },
   {
     "id": "ALL_TERRAIN_NAVIGATION",
     "type": "json_flag",

data/mods/Magiclysm/mutations/spell_triggering_mutations.json

@@ -26,7 +26,8 @@
         "intermittent_activation": { "effects": [ { "frequency": "5 seconds", "spell_effects": [ { "id": "boreal_mage_cold_damage" } ] } ] }
       }
     ],
-    "transform": { "target": "COLD_AURA_OFF", "msg_transform": "You suppress your frozen powers.", "active": false, "moves": 10 }
+    "transform": { "target": "COLD_AURA_OFF", "msg_transform": "You suppress your frozen powers.", "active": false, "moves": 10 },
+    "flags": [ "NO_BODY_HEAT" ]
   },
   {
     "type": "mutation",

data/mods/Xedra_Evolved/effects/effects.json

@@ -968,7 +968,7 @@
     "remove_message": "You end your imitation of death.",
     "rating": "mixed",
     "enchantments": [ { "mutations": [ "WINTER_FEIGN_DEATH_TRAITS" ], "ench_effects": [ { "effect": "downed", "intensity": 1 } ] } ],
-    "flags": [ "CANNOT_ATTACK", "CANNOT_MOVE" ]
+    "flags": [ "CANNOT_ATTACK", "CANNOT_MOVE", "NO_BODY_HEAT" ]
   },
   {
     "type": "effect_type",

data/mods/Xedra_Evolved/mutations/mutation_thresh.json

@@ -5,7 +5,7 @@
     "name": { "str": "Ierde" },
     "points": 1,
     "description": "You have ascended into your fae nature.",
-    "flags": [ "FAEBLOOD" ],
+    "flags": [ "FAEBLOOD", "NO_BODY_HEAT" ],
     "valid": false,
     "purifiable": false,
     "threshold": true
@@ -16,7 +16,7 @@
     "name": { "str": "Arvore" },
     "points": 1,
     "description": "You have ascended into your fae nature.",
-    "flags": [ "FAEBLOOD" ],
+    "flags": [ "FAEBLOOD", "NO_BODY_HEAT" ],
     "valid": false,
     "purifiable": false,
     "threshold": true
@@ -27,7 +27,7 @@
     "name": { "str": "Undine" },
     "points": 1,
     "description": "You have ascended into your fae nature.",
-    "flags": [ "FAEBLOOD" ],
+    "flags": [ "FAEBLOOD", "NO_BODY_HEAT" ],
     "valid": false,
     "purifiable": false,
     "threshold": true
@@ -49,7 +49,7 @@
     "name": { "str": "Sylph" },
     "points": 1,
     "description": "You have ascended into your fae nature.",
-    "flags": [ "FAEBLOOD" ],
+    "flags": [ "FAEBLOOD", "NO_BODY_HEAT" ],
     "valid": false,
     "purifiable": false,
     "threshold": true

data/mods/Xedra_Evolved/mutations/mutations.json

@@ -1455,7 +1455,7 @@
     "purifiable": false,
     "valid": false,
     "can_only_eat": [ "blood", "hblood", "fae_blood", "vampire_blood" ],
-    "flags": [ "CANNIBAL", "DAYFEAR", "NO_THIRST" ],
+    "flags": [ "CANNIBAL", "DAYFEAR", "NO_THIRST", "NO_BODY_HEAT" ],
     "vitamin_rates": [ [ "vitC", -500 ], [ "iron", -500 ], [ "calcium", -500 ] ],
     "//": "When weariness can be modified through Json, this mutation should make the player immune to it.",
     "enchantments": [
@@ -1729,7 +1729,8 @@
           { "value": "SPEED", "add": { "math": [ "temperature_speed_mod(65, 0.5)" ] } }
         ]
       }
-    ]
+    ],
+    "flags": [ "NO_BODY_HEAT" ]
   },
   {
     "type": "mutation",

data/mods/Xedra_Evolved/mutations/temporary.json

@@ -531,7 +531,8 @@
       "SALAMANDER",
       "SYLPH",
       "UNDINE"
-    ]
+    ],
+    "flags": [ "NO_BODY_HEAT" ]
   },
   {
     "type": "mutation",

doc/JSON/JSON_FLAGS.md

@@ -409,6 +409,7 @@ Character flags can be `trait_id`, `json_flag_id` or `flag_id`.  Some of these a
 - ```MYOPIC_SUPERNATURAL``` You are nearsighted in such a way that glasses cannot fix it, such as by magic.
 - ```MYOPIC_IN_LIGHT_SUPERNATURAL``` You are nearsighted in light in such a way that glasses cannot fix it, such as by magic.
 - ```NIGHT_VISION``` You can see in the dark.
+- ```NO_BODY_HEAT``` Your temperature is indistinguishable from the surrounding environmental temperature, making you not show up on infrared.
 - ```NO_CBM_INSTALLATION``` You are unable to install any CBMs.
 - ```NO_DISEASE``` This mutation grants immunity to diseases.
 - ```NO_RADIATION``` This mutation grants immunity to radiations.

src/character_health.cpp

@@ -166,6 +166,7 @@ static const json_character_flag json_flag_CANNOT_TAKE_DAMAGE( "CANNOT_TAKE_DAMA
 static const json_character_flag json_flag_DEAF( "DEAF" );
 static const json_character_flag json_flag_GRAB( "GRAB" );
 static const json_character_flag json_flag_HEAL_OVERRIDE( "HEAL_OVERRIDE" );
+static const json_character_flag json_flag_NO_BODY_HEAT( "NO_BODY_HEAT" );
 static const json_character_flag json_flag_NO_RADIATION( "NO_RADIATION" );
 static const json_character_flag json_flag_NO_THIRST( "NO_THIRST" );
 static const json_character_flag json_flag_PAIN_IMMUNE( "PAIN_IMMUNE" );
@@ -248,8 +249,11 @@ bool Character::can_recover_oxygen() const
 
 bool Character::is_warm() const
 {
-    // TODO: is there a mutation (plant?) that makes a npc not warm blooded?
-    return true;
+    if( has_flag( json_flag_NO_BODY_HEAT ) ) {
+        return false;
+    } else {
+        return true;
+    }
 }
 
 int Character::get_fat_to_hp() const