git-svn-id: https://crawl-ref.svn.sourceforge.net/svnroot/crawl-ref/trunk@4946 c06c8d41-db1a-0410-9941-cceddc491573
TPDD6YOMSQHPNJRSHCRPYZQPOLYDZE3YZD64ZU6IRX3MZBFVQFEQC
3B2ZAT7GIM6WQX3K2MOXHFO2HPSXEQUHRCPE5SQCUFSS6KHXZVMAC
NJFYSNTX33RAPYMVYJYGSCHOE7AWYX4ZG6ZRJZBDVDQWTANTM2QQC
K2CS6TCX2NDVL2ASEHGP4J4K4IJ6FP3ANNKTSIWVG43HPYSBX6ZQC
35NWNQBNLDOHPPHMYA2722IIFGAA57LUN5NOZPRUFZBD5EVCSYCAC
FEXFEKY3QAJ4M2RIJB3SOV65ECDY6M6K5DQJ7FEOXNAGQDEYVKUAC
const int old_hp_max = you.hp_max;
set_hp(you.hp * you.hp_max / old_hp_max, false);