if target of drink then drinkfromit;

##drinkfromit:
$health = $actor's health;
if $health > 0 then candrink else empty;

##candrink:
$ih = $init_obj's health;
$ihm = $init_obj's healthmax;
if $ih < $ihm then increaseh else noeffect;

##noeffect:
sayto $init_obj,"You feel no effect."

##increaseh:
add 1 to $ih;
take 1 from $health;
set $init_obj's health to $ih;
set $actor's health to $health;
sayto $init_obj,"You feel a little less hurt.";

##empty:
say 'msg',"[$init_obj] looks at [$actor] and notices it is empty.";
set $actor's extra to 'empty';