##tickloc:
runsub overgrowme/10;

##overgrowme:
find $loc, random not doorway not me not player;
copy $actor;
set $new_id's pwd to "";
set $new_id's host to $found_id;
set $new_id's hosthow to 'around';
set $new_id's pose to 'tangled';
set $new_id's class to 'tendril';
set $new_id's material to '_bdwnit_';
say 'msg',"[$actor] twists and tightens itself around [$found_id]";
msg $loc,$actor,0,0,'force',"force:look $loc,look",$actor;