#const ITEM_NUM 2
#const MAXHP 0
#const NOWHP 1

dim char, ITEM_NUM

char.NOWHP -= damage + recovery
if char.NOWHP>char.MAXHP: char.NOWHP = char.MAXHP
if char.NOWHP<0: char.NOWHP = 0

こんな風に誰のHPか分かるようにする方が俺は好き。

まぁ、どうでもいいんだけど・・・・・