if reacting to arrives then lockit;

##lockit:
getgender $init_obj;
find $loc, icy passageway;
set $found_id's host to $found_id;
print "[$init_obj] looks around and sees [$found_id] vanish before $hisher eyes!";
relook $loc;