Close revival loophole for monster training limits (#82141)

Author: Maleclypse

src/game.cpp

@@ -5764,6 +5764,10 @@ bool game::revive_corpse( const tripoint_bub_ms &p, item &it, int radius )
         }
     }
 
+    if( it.get_var( "times_combatted", 0.0 ) > 0.0 ) {
+        critter.times_combatted_player = it.get_var( "times_combatted", 0.0 );
+    }
+
     return place_critter_around( newmon_ptr, tripoint_bub_ms( p ), radius );
 }
 

src/mondeath.cpp

@@ -291,5 +291,8 @@ item_location make_mon_corpse( map *here, monster &z, int damageLvl )
     if( !z.has_eaten_enough() ) {
         corpse.set_flag( json_flag_UNDERFED );
     }
+    if( z.times_combatted_player ) {
+        corpse.set_var( "times_combatted", z.times_combatted_player );
+    }
     return here->add_item_or_charges_ret_loc( z.pos_bub( *here ), corpse );
 }