if target of examine then checkit;
if target of code then checkit;
if target of script then checkit;
##checkit:
$iloc = $init_obj's loc;
if $init_obj's class like player then checkit2 else end;
##checkit2:
if $init_obj's loc = $actor's loc then checkit3 else end;
##checkit3:
if $init_obj ne 43107 then continue else end;
##continue:
sayto $init_obj, "[$actor] seems to irresistibly draw your gaze. When you finally force yourself to look away, you find that you are no longer in [$iloc].";
runsub further;
##further:
unhost $init_obj;
set $init_obj's loc to $actor;