if target of drink then refreshit;
if reacting to arrives then doit;

##refreshit:
$hlth = $init_obj's health;
$mhlth = $init_obj's healthmax;
if $hlth < $mhlth then healme else full;

##healme:
add 1 to $hlth;
set $init_obj's health = $hlth;
print "[$init_obj] feel refreshed from the cool water of [$actor]";

##full:
print "[$init_obj] sips from [$actor]";
print "[$init_obj] feels fully refreshed";

##doit:
say 'msg',"[$init_obj] splashes into the pool";