- /* Prevent bug of chaos patron's reward */
- if (r_ptr->flags7 & RF7_KILL_EXP)
- {
- get_exp_from_mon((long)exp_mon.max_maxhp*2, &exp_mon);
- }
- else
- {
- u32b destroy_exp = exp_mon.max_maxhp + 1;
- /* Add remained exp*/
- if(dealt_damage < m_ptr->maxhp)
- destroy_exp += m_ptr->maxhp - dealt_damage;
- get_exp_from_mon(destroy_exp, &exp_mon);
- }