if target of use then used;
##used:
print "[$init_obj] sends a prayer to the gods.";
print "Suddenly [65066] flicker, and a holy light pierces through [65471], bathing [$init_obj] in its glorious sacred rays.";
foreach in $loc do checkon;
##checkon:
if $for_id's host == 65067 then checkon2;
##checkon2:
if $for_id's hosthow == 'on' then checkon3;
##checkon3:
if $for_id's pwd == '' then checkon4;
##checkon4:
$worth = $for_id's worth;
$health = $init_obj's health;
$mhealth = $init_obj's healthmax;
add $worth to $health;
if $health > $mhealth then maxit;
set $init_obj's health to $health;
multiset $for_id to "host='',loc=0";
relook $loc;
##maxit:
$health = $mhealth;